Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
COMPUTED BY,CHILD COLUMN
[*] Roman <sw.maurice(zv)seznam(tec)cz> - 15.7.2002 10:45:00
>> (jestli s nim muzu udelat treba SUM DLE NEJAKYCH
>> PODMINEK neco jako COMPUTED BY castka as select
>> sum(castka) from faktury)
>
>mam pocit, ze se domaha s COMPRUTE BY ve stylu M$SQL,
>ktery timto umi udelat treba soucty za skupinu.
Ano, napriklad:
alter table faktury add sumzapolozky computed by ((select sum(cena) from
pfaktury p where p.id_faktury=faktury.id_faktury));
Ovsem mnohem rychlejsi mi pride pouzit normalni pole a aktualizovat jej
pomoci triggeru.
>> Pak bych potreboval vedet jestli existuji v FB (myslim ze se
>> tomu tak rika) child column, mno pokud je vyplnena urcita
>> hodnota tak se na tabulce vytvori jeste dalsi col....
>tak to jsem vubec nepochopil. asi jsem se s tim jeste nesetkal,
>treba nekdo jiny....
Jestli ma byt FB=FireBird, tak tohle tam neni. K cemu by to melo byt dobre?
Roman
ClassName CHM okna
[*] �tevl�k Mari�n <Marian.Stevlik(zv)merlin(tec)cz> - 15.7.2002 10:57:59
Hi all
Mam taky problem, potreboval by som cez FindWindow zistit Handle okna, kt.
sa otvorilo po spusteni chm suboru. Mam vsak problem Caption tohto okna sa
stale meni, takze to cez Caption nezistim, ostava mi teda len ClassName
Viete mi niekto poradit ako na to?
Stevlik Marian
Software Development Specialist
MERLIN
Stefanikova 32
150 00 Prague 5
Czech Republic
e-mail: marian.stevlik(zv)merlin(tec)cz
tel: +420 2 41010111 (181)
Zkusenosti s IB/FB (was: Vykonani SP na FB)
[*] Petr Fejfar <development(zv)callnet(tec)cz> - 15.7.2002 11:00:43
From: "Lebeda David" <david.lebeda(zv)comarr(tec)cz>
> - jina GDS32.LIB, takze jiz neni treba zapisovat radek do souboru services
Tomuhle nerozumim - nikdy jsem nikam zadny radek nezapisoval ;-)
Muzes mi pls vysvetlit, co to znamena a v cem tedy tvi prinos?
Thx, pf
ClassName CHM okna
[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 15.7.2002 11:22:52
----- Original Message -----
From: "�tevl�k Mari�n" <Marian.Stevlik(zv)merlin(tec)cz>
> Mam taky problem, potreboval by som cez FindWindow zistit Handle okna, kt.
> sa otvorilo po spusteni chm suboru. Mam vsak problem Caption tohto okna sa
> stale meni, takze to cez Caption nezistim, ostava mi teda len ClassName
> Viete mi niekto poradit ako na to?
Pomoci enumerovani handlu vsech oken EnumWindows a zjistovani tridy
z handlu GetClass. A nebo muzes pouzit nejakou utilitku ktera to tak dela,
napr. ja pouzivam uz dlouho tuhle:
http://www.greatis.com/windowse.htm
Martin Schayna
Zkusenosti s IB/FB (was: Vykonani SP na FB)
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 15.7.2002 11:29:26
> > - jina GDS32.LIB, takze jiz neni treba zapisovat radek do souboru
> > services
>
> Tomuhle nerozumim - nikdy jsem nikam zadny radek nezapisoval ;-)
> Muzes mi pls vysvetlit, co to znamena a v cem tedy tvi prinos?
>
Pred jistou verzi Firebirdu (nevim, zda od 1.0 nebo i drivejsi), kdyz jsi chtel sirit
aplikaci s FB a na klientskem pocitaci nebyl instalovan IB klient, se musela spolu s
aplikaci sirit i knihovna gds32.dll a krome toho se musel do souboru services pripsat
radek
gds_db 3050/tcp
Cili bud na kazdem klientovi instalovat IB klienta, nebo uvedeny postup.
David Lebeda
exception EOutOfResources
[*] Jakub Dusek <jdev(zv)seznam(tec)cz> - 15.7.2002 12:01:50
To spis zmenit system, predpokladam ze to dela na Win9x/ME pri vice
spustenych programech. Pridani pameti co vim nikdy nepomohlo. Resi to
az Win2k a snad i NT 4.0 (nemam zkusenosti).
Jakub Dusek
-------------------------------------------
Homepage : http://dusek.zde(tec)cz
Phone : +420604615795
Sms email : jakub.dusek(zv)click(tec)cz
Icq : 86063232
Apps : Add/Remove Manager, Charmaper,
Sms GateKeeper
-------------------------------------------
Monday, July 15, 2002, 7:23:37 AM, you wrote:
CKM> Ahoj,
CKM> v jednom dialogovem okne mi program generuje tuto vyjimku s hlaskou Error
CKM> creating window.
CKM> Pomohlo by navysit pamet?
CKM> Diky
CKM> Karel
OT:Dlha doba pre prihlasenie sa k serveru Firebird
[*] miromr <preas_w(zv)stonline.sk> - 15.7.2002 12:10:55
Ahoj prave to je trochu problem lebo W2K mi prideluje IP dynamicky takze
do hostu nemozem napisat konkretnu IP. Miesto toho pouzivam meno serveru.
Miro
----- Original Message -----
From: "Richard Kejval" <kejval.delphi(zv)centrum(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, July 15, 2002 8:38 AM
Subject: Re: OT:Dlha doba pre prihlasenie sa k serveru Firebird
> > mam dva pocitace v sieti. Jeden je W2K SP2 a druhy je W98. Na obidvoch
mam
Cachedupdates a CommitUpdates
[*] bures <bures(zv)ssakhk(tec)cz> - 15.7.2002 12:17:35
Ahoj konference mam takovy malinkaty problemek, v programu pouzivam cached
updates a to asi naslednive
query1.edit;
query1.FieldByName('aaaa').asString := 'bleeeee';
query1.post;
try
query1.ApplyUpdates;
except
query1.CancelUpdates;
end; { try }
query1.CommitUpdates;
Podle napovedy Commit updates by melo vymazat bufer ale me se i pres to
stale hromadi pomocne tabulky ktere se neuvolnuji a po ukonceni programu
jich mam v adresari spousty, nepomuze ani query1.close; Co delam spatne jak
spravne ulozit data s zbavit se pomocnych tabulek ???
Predem dekuji za kazdou radu Vlada
exception EOutOfResources
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 15.7.2002 13:25:58
From: "CHMEL Karel, Mgr." <kchmel(zv)csob(tec)cz>
> v jednom dialogovem okne mi program generuje tuto vyjimku s hlaskou Error
> creating window.
>
> Pomohlo by navysit pamet?
Ne, to nema s velikosti RAM nic spolecneho. Pomohlo by prejit na skutecny
operacni system, tedy Windows NT4/2000/XP. Samozrejme to chybove hlaseni muze
byt zavadejici a chyba nemusi byt pouze v nedostatku systemovych prostredku.
Koneckoncu to muzes snadno zjistit Mericem prostredku, ktery by mel byt na
Windows 95/98/Me vzdy nainstalovany a spusteny, aby se poznalo kdy hrozi ze
ten system spadne.
Petr Vones
ClassName CHM okna
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 15.7.2002 13:27:41
From: "�tevl�k Mari�n" <Marian.Stevlik(zv)merlin(tec)cz>
> Mam taky problem, potreboval by som cez FindWindow zistit Handle okna, kt.
> sa otvorilo po spusteni chm suboru. Mam vsak problem Caption tohto okna sa
> stale meni, takze to cez Caption nezistim, ostava mi teda len ClassName
> Viete mi niekto poradit ako na to?
Co ma byt smyslem toho pocinani ?
Petr Vones
Cizi aplikace
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 15.7.2002 13:35:37
From: "Jujtov e-mail" <jujto(zv)stonline.sk>
> Mam takovy problem. Potrebuji dale spracovat data z jedne aplikace ktere
> autor bohuzel opomnel udelat ukladani vsech parametru. Jedna se o textova
> data na prvni pohled v komponente ktera ma blizko ke komponente TList.
TList neni komponenta.
> Autor se uz bohuzel zrekl pokracovani ve vyvoji aplikace a bohuzel na nej
> nikde nemohu nalezt kontakt. Neznam ani to v cem byla vytvorena ale
> predpokladam ze to byl nejaky objektove orientovany prostredek. Mozna i
> Delphi. Na komponente jako treba tTabcontrol nebo tPagecontrol je umisten
> dany list, ve kterem se nachazi na druhe strance zminovana komponenta
> vypadajici jako tabulka obsahujici textove informace. Handle okna jsem uz
> ziskal, ale at hledam v helpu jak hledam k nicemu pouzitelnemu jsem se zatim
> nedopracoval.
Pokud se jedna o standartni ovladaci prvek jako napriklad ListView, tak muzes
precist jeji obsah pomoci zprav (je tu ovsem problem, ze jsi v jinem procesu,
ale i to se da resit). Jestli se ale jedna o nejakou specifickou komponentu
vytvorenou v tom prostredi tam mas asi smulu.
> edna se o tak 20-30 radku textu a porad to prepisovat i kdyz se z toho da
> kopirovat (ale jenom po jedne bunce tabulky), neni to zadny med.
Tak muzes simulovat to kopirovani.
Petr Vones
OT: Prodej aplikace vs licence na MySQL
[*] <pawell.none(zv)atlas(tec)cz> - 15.7.2002 13:40:19
Ahoj,
mam situaci, se kterou si nejsem jisty, jak zcela spravne a legalne postupovat.
Vytvoril jsem databazovou aplikaci postavenou primo na MySQL. Nyni mam zakaznika, ktery chce koupit licenci na tuto moji aplikaci. Tak jak chapu licencni ujednani u MySQL, tak musim od MySQL AB koupit licenci na databazi a tu prodat soucasne s mym produktem zakaznikovi. Je to tak nebo se pletu?
Diky moc.
--------------------------------------
Pawell None, developer, Czech Republic
MDIChild do popredia
[*] <delphin(zv)centrum.sk> - 15.7.2002 13:59:23
Zdravim !
Neviem si rady s takouto vecou.. Mam okno MDIChildren - na celu
Client cast MDIFormu, na nom button, po jeho stlaceni sa objavi
druhe - male okno MDIChildren. Ak sa nahodou prekliknem na to
velke (zakryje to male) a stlacim znovu button, neviem ako dat do
popredia to male okno. Skusal som SetForegroundWindow a rozne
dalsie sposoby, ale nedari sa mi. Pomoze niekto.. cast kodu by
pomohla.
Dik
W98,D5Ent
----------------------------------------------------------------
http://www.webpark.sk/novy-web.htm - Profesion�lny webhosting
existuje property?
[*] Petr Kuklik <Petr.Kuklik(zv)seznam(tec)cz> - 15.7.2002 14:00:39
DD,
je v Delphi nejaka funkce, ktera mi zjisti, zda dana property
(popr. metoda) existuje?
Petr
______________________________________________________________________
Reklama:
Mapy Prahy, Brna a Cech najdete na http://www.mapy(tec)cz
QR, 2 problemy nahledu a tiskarny
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 15.7.2002 14:24:03
Ahoj,
mam dva problemky s tiskem pre QR.
1/
Mam vlastni nahled. Program bezi na Win98.
Pokud pouziju natahnuti reportu z disku pres
QRPreview1.QRPrinter.load(OpenDialog.fileName);
tak mi zmizi moznost nastavit vlastnosti tiskarny pres
QRPreview1.QRPrinter.PrintSetup;
2/
Na tiskarne HP LJ 1000 series se mi porad tiskne posledni stranka
nevite, prosim, nekdo cim to je? Ovladace jsou aktualni a originalni.
Dekuji za kazdou radu
Jaro B.
MDIChild do popredia
[*] <vaclav.sykora(zv)accidis(tec)cz> - 15.7.2002 15:01:15
zkus: MaleOkno_Form.Show;
v. s�kora
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
> Behalf Of delphin(zv)centrum.sk
> Sent: Monday, July 15, 2002 1:59 PM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: MDIChild do popredia
>
>
> Zdravim !
>
> Neviem si rady s takouto vecou.. Mam okno MDIChildren - na celu
> Client cast MDIFormu, na nom button, po jeho stlaceni sa objavi
> druhe - male okno MDIChildren. Ak sa nahodou prekliknem na to
> velke (zakryje to male) a stlacim znovu button, neviem ako dat do
> popredia to male okno. Skusal som SetForegroundWindow a rozne
> dalsie sposoby, ale nedari sa mi. Pomoze niekto.. cast kodu by
> pomohla.
>
> Dik
>
> W98,D5Ent
>
> ----------------------------------------------------------------
> http://www.webpark.sk/novy-web.htm - Profesion�lny webhosting
>
>
MDIChild do popredia
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 15.7.2002 15:11:47
From: <delphin(zv)centrum.sk>
> popredia to male okno. Skusal som SetForegroundWindow a rozne
TForm.BringToFront.
Petr Vones
exception EOutOfResources
[*] CHMEL Karel, Mgr. <kchmel(zv)csob(tec)cz> - 15.7.2002 15:54:07
Co jsem vypozoroval, tak problem je s tim, ze v tom dialogovem okne
mam hodne editacnich policek, ktere se podle potreby zobrazui nebo skryvaji.
Pokud jich mam zobrazeno "vetsi" mnozstvi (ty uvozovky proto, ze je to
pokazde
jiny pocet), tak uz se mi dalsi neukaze a misto toho dostanu tu vyjimku a
chybovou
hlasku.
Mam zkouset zmenit edity za labely a editaci resit mimo nebo to je zbytecne?
Karel Chmel
>-----Original Message-----
>From: Petr Vones [mailto:pvones(zv)mbox.vol(tec)cz]
>From: "CHMEL Karel, Mgr." <kchmel(zv)csob(tec)cz>
>> v jednom dialogovem okne mi program generuje tuto vyjimku s hlaskou Error
>> creating window.
>>
>> Pomohlo by navysit pamet?
>
>Ne, to nema s velikosti RAM nic spolecneho. Pomohlo by prejit na skutecny
>operacni system, tedy Windows NT4/2000/XP. Samozrejme to chybove hlaseni
muze
>byt zavadejici a chyba nemusi byt pouze v nedostatku systemovych
prostredku.
>Koneckoncu to muzes snadno zjistit Mericem prostredku, ktery by mel byt na
>Windows 95/98/Me vzdy nainstalovany a spusteny, aby se poznalo kdy hrozi ze
>ten system spadne.
>
>Petr Vones
exception EOutOfResources
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 15.7.2002 15:57:28
From: "CHMEL Karel, Mgr." <kchmel(zv)csob(tec)cz>
> Co jsem vypozoroval, tak problem je s tim, ze v tom dialogovem okne
> mam hodne editacnich policek, ktere se podle potreby zobrazui nebo skryvaji.
> Pokud jich mam zobrazeno "vetsi" mnozstvi (ty uvozovky proto, ze je to
> pokazde jiny pocet), tak uz se mi dalsi neukaze a misto toho dostanu tu
> vyjimku a chybovou hlasku.
Tim to pravdepodobne bude, kolik volnych (predevsim GDI) zdroju zbyde po
zobrazeni toho dialogu ?
Petr Vones
databaze pro Free projekt
[*] Richard Valny <Richard.Valny(zv)oku-st(tec)cz> - 15.7.2002 16:37:18
Ahoj chlapci
konecne hodlam svuj stary Fandovsky programek predelat do win32.
Vzhledem k tomu, ze pracuji s Dephi, tak volba progarmovaciho jazyka
je jasna. Problem je s databazi.
Aplikace bude obsahovat radove do 10-ti tabulek vzajemne propojenych,
pocet zaznamu v hlavnim ciselniku do 1000, v ostatnich tabulkach cca do
200 .
Mam jednoznacne pozadavky:
1) aplikce nesmi mit instalacni program (tedy pro jeji spusteni musi
stacit zkopirovat (rozbalit) soubory z diskety)
2) cela (vcetne databazicky) se musi dat exportovat pod free licenci
3) databaze musi fungovat svizne (hlavne v dobe zdavani udaju) a musi
se nechat dobre zalohovat a obnovovat
Mimo to nevim, zda pokud zaimplementuji spolupraci s MS Office (export
- import do Excelu), tak tim neporusim nejaka licencni ujednani
(Samozrejme. ze office nebude soucasti projektu). Take by mne zajimalo,
zda nekde nelezi komponenty na spolupraci s WinTextem (je pro domaci
pouziti zdarma) a ajke jsou s nimi zkusenosti
Dekuji
=========================================
Richard Valny richard.valny(zv)oku-st(tec)cz
Okresni urad Strakonice tel. 0342-377 377
Smetanova 533 fax. 0342-323 746
386 22 STRAKONICE mobile. 0737 565 196
=========================================
existuje property?
[*] Jakub Dusek <jdev(zv)seznam(tec)cz> - 15.7.2002 16:38:55
GetPropInfo (Object.ClassInfo, 'Property') <> nil
Jakub Dusek
-------------------------------------------
Homepage : http://dusek.zde(tec)cz
Phone : +420604615795
Sms email : jakub.dusek(zv)click(tec)cz
Icq : 86063232
Apps : Add/Remove Manager, Charmaper,
Sms GateKeeper
-------------------------------------------
Monday, July 15, 2002, 2:00:39 PM, you wrote:
PK> DD,
PK> je v Delphi nejaka funkce, ktera mi zjisti, zda dana property
PK> (popr. metoda) existuje?
PK> Petr
PK> ______________________________________________________________________
PK> Reklama:
PK> Mapy Prahy, Brna a Cech najdete na http://www.mapy(tec)cz
Fax server Windows 2000
[*] Filip Kinsky <xkinf01(zv)vse(tec)cz> - 15.7.2002 17:56:10
Ahoj,
jak ovladat Fax ve W2k bohuzel nevim (taky by mi to hodne pomohlo),
ale faxovani z aplikace resim pres komponenty ASync Pro od Turbopower
(www.turbopower.com) - s nima se da postavit Fax Server strasne
jednoduse a faxy se pak odesilaji opet pres Print Driver, ale lze pri
tom rovnou zadat adresata apod., takze uzivatel nemusi nic
vyplnovat...
Filip
------------------------------
ZS> Ahoj,
ZS> chtel bych se zeptat jestli nekdo z vas zkousel z aplikace poslat fax. Chtel
ZS> bych obejit jen tisk na "fax" tiskarnu, tedy tak abych sam vyplnil cislo kam
ZS> se posila apod.
ZS> Da se ta Fax sluzba ve win2000, nejak takto ovladat? Nebo mate nejaky jiny
ZS> priklad, jak toto vyresit?
ZS> Dekuji za kazdou radu
ZS> Zdenek Sedlak
Usporny rezim Windows
[*] Frankie Y <frankie.y(zv)seznam(tec)cz> - 15.7.2002 18:01:42
Ahoj,
jak lze (programove) prepnout Windows do usporneho rezimu?
Frankie
jak na nepotrebn� dll
[*] Petr Brant <brant(zv)dcomm(tec)cz> - 15.7.2002 18:14:17
Patrne jsi chtel napsat "zavisly", ze... Pouzij funkci LoadLibrary a podle
vysledku muzes usoudit, zda je ta knihovna pritomna. Funkci GetProcAddress
muzes overit, jestli ta knihovna ma tu funkci, kterou potrebujes.
RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
http://web.redbox(tec)cz/petr.brant
ICQ #68652380
D&COMM s.r.o.
Korunova�n� 6
170 00 Praha 7
> Subject: jak na nepotrebn� dll
>
> resim problem ohledne dll knihovny
> ...tzv chci ji pouzivat jen kdyz je pritomna tim padem nechci aby na ni
muj
> prog. by nezavisly
OT:Dlha doba pre prihlasenie sa k serveru Firebird
[*] Vit Jurasek <delphi(zv)obecpohori(tec)cz> - 15.7.2002 20:14:12
> > Pri prihlasovani sa z W98 k serveru firebird na W2K to vsak trva vzdy
> presne
> > 53 sekund. Ked sa to potom prihlasi tak uz vsetko bezi OK. Tu sa
hlasenie
> > "error reading data from the connection" este nikdy neobjavilo a vyzera
to
> > ze potom uz ziaden problem neni.
a neni to timhle?: (citace z poradny zive . cz)
Tip od pana Holcika (tusim )
Dulezity tip: pokud pouzivate Windows 2000, XP a prochazite sit Microsoft,
jiste znate nesmyslne pomale prochazeni sitovych zdroju, kdy musite dlouho
cekat, nez naskoci obsah vzdaleneho pocitace. Jak to opravit?
Na vine je funkce (chyba?) Windows 2000, ktera pri prochazeni pocitacu
prohledava take naplanovane ukoly. To muze zbrzdit prohlizeni az na
30sekundove prodlevy. Pokud jste z tech, ktera tato funkce trapi, musite si
to opravit v registrech v klici:
HKEY_LOCAL_MACHINE/Software/Microsoft/Windows/Current
Version/Explorer/RemoteComputer/NameSpace
Zde vyberte klic {D6277990-4C6A-11CF-8D87-00AA0060F5BF} a smazte ho.
Mozna nekdo vyzaduje, aby se vzdalene prohledavaly i naplanovane ukoly,
osobne ale zadneho takoveho neznam. Vysledek nastaveni by se mel projevit
okamzite, neni ani nutne restartovat pocitac.
databaze pro Free projekt
[*] Petr Palicka aka PeC(zv) <petr.palicka(zv)atlas(tec)cz> - 15.7.2002 22:05:44
tak bych to videl na pouziti komponenty TDBF.
osobne bych pouzil FireBird, ale to by se
musel instalovat server...
peca
Vykonani SP na FB
[*] Erik Salaj <winsoft(zv)stonline.sk> - 15.7.2002 22:05:42
> My vsichni ostatni budeme pouzivat to co je k dispozici a to
> co je pro nas a nase uzivatele vyhodne a holt budeme muset
> nejake ty optimalizace v dotazech a indexech delat. Ale myslim
> ze zatim jsou k dispozici pouze realne databaze, ktere se "rucne"
> optimalizovat musi (viz napr. na Informixu se sveho casu pomahalo
> optimalizatoru konstrukci ...WHERE (1=1) AND ....)
ja viem, "sveho casu" sa optimalizovalo a nielen v databazach.
A aj dnes sa optimalizuje ale som presvedceny, ze tie
optimalizacie su uz o niecom uplne inom.
Erik
Vykonani SP na FB
[*] Erik Salaj <winsoft(zv)stonline.sk> - 15.7.2002 23:12:46
> Myslim, ze pri teto diskuzi o srovnani vykonu ruznych SQL serveru a jejich
> dokumentace s FB se tu pomiji jedna dulezita vlastnost a to vykon / cena.
> Pro moji aplikaci to vychazi jednoznacne a to i pres nektere problemy v
> nedokonalosti optimalizatoru.
no skusme porovnat cenu najlacnejsieho riesenia s FB a s MSDE,
ak rozhodujuci je pomer cena/vykon:
1. Cena
za 4000,- Sk bez DPH kupim Visual C#.Net Standard s MSDE
za 30000,- Sk bez DPH kupim Delphi Professional (ale aj to je
len docasna akcia, tzv. konkurencny upgrade) + FB je zdarma
2. Vykon
nerobil som merania, ale dovolim si tvrdit, ze MSDE je daleko
vykonnejsi system sko FB
3. Zaver
riesenie s MSDE ja mi javi asi 10 krat vyhodnejsie co sa tyka
pomeru cena/vykon
Erik
Vykonani SP na FB
[*] Petr Palicka aka PeC(zv) <petr.palicka(zv)atlas(tec)cz> - 16.7.2002 00:15:45
>1. Cena
>
>za 4000,- Sk bez DPH kupim Visual C#.Net Standard s MSDE
nevim za kolik a kde se prodava MSDE, ale
FB je zdarma i bez Delf a zapocitavat cenu delphi
k reseni s FB je dost nefer.
nehlede na to, ze at uz jakekoli reseni, tak v teto
konferenci se primarne predpoklada pouziti delphi,
pripadne delphi + neco, rekneme tedy:
delphi + MSDE vs delphi + FB
me osobne se nezdarilo na MSDE pracovat s delphi pro.
nebylo jak vytvorit DB, jak se pripojit k DB, jak
spravovat DB, to vse mam k FB jako opensource projekty.
my jsme koupili developer verzi ofisu s tim, ze MSDE
lze sirit zdarma. ale vyvijet neco delphi + MSDE se
s tim opravdu nedalo. koupit si delphi C/S a MSSQL7
by se nam zase dost financne nevyplatilo...
peca
XML editor
[*] Petr Fejfar <development(zv)callnet(tec)cz> - 16.7.2002 07:44:59
From: "Zbysek Hlinka" <hlinka(zv)hlinka(tec)cz>
> nevite nekdo o nejake free komponente pro editovani XML? Nemusi to
> byt nic sloziteho.
Neco by mohlo byt tady: http://www.jansfreeware.com/ (EasyXML 2)
HTH, pf
databaze pro Free projekt
[*] Petr Fejfar <development(zv)callnet(tec)cz> - 16.7.2002 07:53:21
From: "Richard Valny" <Richard.Valny(zv)oku-st(tec)cz>
> 1) aplikce nesmi mit instalacni program (tedy pro jeji spusteni musi
> stacit zkopirovat (rozbalit) soubory z diskety)
> 2) cela (vcetne databazicky) se musi dat exportovat pod free licenci
> 3) databaze musi fungovat svizne (hlavne v dobe zdavani udaju) a musi
> se nechat dobre zalohovat a obnovovat
Me osobne se docela libi 2 database s docela slusnou podporou SQL:
- janSQL (www.jansfreeware.com)
- SQLite (http://www.hwaci.com/sw/sqlite/index.html)
SQLite se mi libil natolik, ze jsem testoval, nakolik je "lite" a zjistil
jsem,
ze opravdu je: insertovani 2.5 mil. zaznamu do tabulky pod transakci trvalo
lehce nad 58 hodin (na IB6 3h40) a relativne jednoduchy select (where
A='xxx' and B like 'yyy%') do teto tabulky trval pres 10 minut (na IB6 45
ms).
Ale Tobe by to mohlo stacit.
HTH, pf
exception EOutOfResources
[*] CHMEL Karel, Mgr. <kchmel(zv)csob(tec)cz> - 16.7.2002 08:10:24
>From: Petr Vones [mailto:pvones(zv)mbox.vol(tec)cz]
>
>From: "CHMEL Karel, Mgr." <kchmel(zv)csob(tec)cz>
>> Co jsem vypozoroval, tak problem je s tim, ze v tom dialogovem okne
>> mam hodne editacnich policek, ktere se podle potreby zobrazui nebo
skryvaji.
>> Pokud jich mam zobrazeno "vetsi" mnozstvi (ty uvozovky proto, ze je to
>> pokazde jiny pocet), tak uz se mi dalsi neukaze a misto toho dostanu tu
>> vyjimku a chybovou hlasku.
>
>Tim to pravdepodobne bude, kolik volnych (predevsim GDI) zdroju zbyde po
>zobrazeni toho dialogu ?
A pomohlo by dat do dialogu misto editacnich policek jenom labely nebo
ty zerou zdroje stejne?
Karel Chmel
Vykonani SP na FB
[*] Richard Kejval <kejval.delphi(zv)centrum(tec)cz> - 16.7.2002 08:30:01
> 2. Vykon
>
> nerobil som merania, ale dovolim si tvrdit, ze MSDE je daleko
> vykonnejsi system sko FB
Myslim, ze pokud si nedelal mereni, pak vubec nechapu duvod tveho tvrzeni
:-(o Ja si muzu myslet treba zrovna pravy opak ;-) Napr. na kterem
operacnim systemu. To byl jen pokus o vtip. Ale ted vazne.
FB je MULTIPLATFORMNI => neni optimalizovany na urcity typ procesoru, coz
muze snizit vykon oproti MS SQL ( presto si myslim, ze rozdil ve vykonu
cisteho DB stroje neni velky ,celkem by me zajimalo zda to nekdo seriozne
testoval), ale je to za cenu vetsich moznosti pouziti. Pokud by Te zajimalo
jak se FB zrychlil po prepsani kodu jen na NT, tak se obrat na p. Cisare,
ktery o tom zajimave mluvil v Laznich Belohrad.
>1. Cena
>za 4000,- Sk bez DPH kupim Visual C#.Net Standard s MSDE
>za 30000,- Sk bez DPH kupim Delphi Professional (ale aj to je
>len docasna akcia, tzv. konkurencny upgrade) + FB je zdarma
No a tohle snad uz nemuzes myslet ani vazne. Vim, ze jsme casto monopolem MS
nuceni k ruznym vecem, ale nutit se do pouzivani i jejich programovaciho
jazyku, jen kvuli licenci na MSDN to uz je prece jen silna kava i na me.
Zaver :
Pomer Cena / vykon u FB je zatim bezkonkurencni
Vykonani SP na FB
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 16.7.2002 09:10:06
On 16 Jul 2002 at 0:15, Petr Palicka aka PeC(zv) wrote:
> me osobne se nezdarilo na MSDE pracovat s delphi pro.
> nebylo jak vytvorit DB, jak se pripojit k DB, jak
> spravovat DB, to vse mam k FB jako opensource projekty.
> my jsme koupili developer verzi ofisu s tim, ze MSDE
> lze sirit zdarma. ale vyvijet neco delphi + MSDE se
> s tim opravdu nedalo. koupit si delphi C/S a MSSQL7
> by se nam zase dost financne nevyplatilo...
:-)) Chyba je ale pouze na tve strane. Budto pracujes asi s D3, coz
je nesmysl, nebo jsi neco proste prehledl. S MSDE muzes velice snadno
komunikovat primo pres ADO, nepotrebujes k tomu ani zadne komponenty.
Je to jen trochu mene pohodlne, ale funguje to velice dobre. Tohle by
melo jit i v te nejnizsi verzi Delphi. Kdybys chtel trochu vetsi
komfort, muzes sahnout po OLE DB komponentach, ty jsou take OS a
free. A opet nepotrebujes ani D Pro.
S pozdravem
Zbysek Hlinka
Vykonani SP na FB
[*] Otisk Rene <otisk(zv)misel(tec)cz> - 16.7.2002 09:17:45
Delal jsem nekolik projektu v D3 na MSSQL resp. MSDE 1.0 pres ODBCe a vse
bylo OK, takze neschopnost pripojit se k DB, vytvoreni metadat, sprava atd
bych asi hledal nekde jinde....
Sroub
> On 16 Jul 2002 at 0:15, Petr Palicka aka PeC(zv) wrote:
>
> > me osobne se nezdarilo na MSDE pracovat s delphi pro.
> > nebylo jak vytvorit DB, jak se pripojit k DB, jak
> > spravovat DB, to vse mam k FB jako opensource projekty.
> > my jsme koupili developer verzi ofisu s tim, ze MSDE
> > lze sirit zdarma. ale vyvijet neco delphi + MSDE se
> > s tim opravdu nedalo. koupit si delphi C/S a MSSQL7
> > by se nam zase dost financne nevyplatilo...
>
> :-)) Chyba je ale pouze na tve strane. Budto pracujes asi s D3, coz
> je nesmysl, nebo jsi neco proste prehledl. S MSDE muzes velice snadno
> komunikovat primo pres ADO, nepotrebujes k tomu ani zadne komponenty.
> Je to jen trochu mene pohodlne, ale funguje to velice dobre. Tohle by
> melo jit i v te nejnizsi verzi Delphi. Kdybys chtel trochu vetsi
> komfort, muzes sahnout po OLE DB komponentach, ty jsou take OS a
> free. A opet nepotrebujes ani D Pro.
>
> S pozdravem
>
> Zbysek Hlinka
>
>
databaze pro Free projekt
[*] Milan Tomes <milan.tomes(zv)haida(tec)cz> - 16.7.2002 09:17:50
> SQLite se mi libil natolik, ze jsem testoval, nakolik je "lite" a zjistil
> jsem,
> ze opravdu je: insertovani 2.5 mil. zaznamu do tabulky pod
> transakci trvalo
> lehce nad 58 hodin (na IB6 3h40) a relativne jednoduchy select (where
Zrovna nedavno jsem delal neco podobneho - do tabulky na IB jsem vkladal 2,5
mil. zaznamu a trvalo to cca. 2hod. Mozna to bude vykonosti serveru (P4
2GHz, 1GB RAM, 2x 36GB HDD 15000 rpm, Red Hat Linux 7.3) a stanice (Athlon
1GHz, 256MB Win XP)
> HTH, pf
S pozdravem
Milan Tomes
mailto:milan.tomes(zv)haida(tec)cz
XML editor
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 16.7.2002 09:18:09
On 16 Jul 2002 at 7:44, Petr Fejfar wrote:
> > nevite nekdo o nejake free komponente pro editovani XML? Nemusi to
> > byt nic sloziteho.
>
> Neco by mohlo byt tady: http://www.jansfreeware.com/ (EasyXML 2)
Diky, ale neni to ono, je to jen program.
S pozdravem
Zbysek Hlinka
Vykonani SP na FB
[*] Lstiburek Pavel <Lstiburek(zv)ceb(tec)cz> - 16.7.2002 09:26:45
> From: Petr Palicka aka PeC(zv) [mailto:petr.palicka(zv)atlas(tec)cz]
>
> me osobne se nezdarilo na MSDE pracovat s delphi pro.
> nebylo jak vytvorit DB, jak se pripojit k DB, jak
> spravovat DB, to vse mam k FB jako opensource projekty.
> my jsme koupili developer verzi ofisu s tim, ze MSDE
> lze sirit zdarma. ale vyvijet neco delphi + MSDE se
> s tim opravdu nedalo. koupit si delphi C/S a MSSQL7
> by se nam zase dost financne nevyplatilo...
>
> peca
>
>
Microsoft dodava jeste developer verzi MSSQL za cca 10.000,- Kc, kter�
obsahuje kompletni Enterpise verzi SQL serveru (tedy vcetne
administratorskych nastroju) pouze pro vyvoj a samozrejme MSDE i k sireni.
Napsat si neco ala Enterpise Manager neni prilis slozite, existuje free
manager (MS ho dokonce jeden cas dodaval s developer verzi) - napsany ve VB.
Lze vyuzit i knihovnu SQLDMO (lze ji sirit) obsahujici skoro vsechny dialogy
z EM (,uz to tady v konferenci nekdo radil).
Pouzivam Delphi s MSSQL cca 2 roky a jsem s touto kombinaci spokojen.
V praci mam D5E + MSSQL2000 Enterprise, soukrome D6P + MSDN (vyuzil jsem
slevove akce obou spolecnosti (:-), v obou jsou komponety pro pristup k SQL
serveru prostrednictvim ADO, pouzival jsem (a pouzivam) i komponenty Adonis
pro pristup k MSSQL a ty jsou pri sve cene a moznostech naprosto perfektni.
Neznam FB (trohu jsem si hral Interbase, ale neuchvatilo me to), pracuji jak
jsem jiz rekl s MSSQL, a ORACLEm. MSSQL mohu doporucit pro vsechny mensi
projekty, sprava a instalace tohoto serveru je naprosto "primitivni" temer
nevyzaduji ani oterit prirucku, nastavovat neni temer co a vykon je presto
velmi dobry.
To na co potrebujete u ORACLE "nekoho, kdo to umi" a ten se s tim dela pul
dne, to zvladnete u MSSQL na 30 minut s pomoci max. helpu.
Priznavam (nerad), ze ten ORACLE ma pak "ponekud" vetsi moznosti a asi i
vykon. Bohuzel nemohu provest srovnani vykonu, protoze MSSQL bezi na 4
procesorovych NT a ORACLE na Solarisu.
Pavel
Ukladani/nacitani dat
[*] Ing. Jiri SOKOL <JS-delphi(zv)seznam(tec)cz> - 16.7.2002 09:49:29
Ahoj!
Predem se omlouvam, ze otravuju asi s naprosto trivialnim prikladem, ale ja si s nim
nevim rady.
Chci do jednoho souboru ulozit nekolik konstatnich udaju (neco jako hlavicka) a pak
dynamickou promennou. Jenze to neumim udelat. Problem je s typem souboru.
Dyn.prom. ukladam takhle:
type
PoiontRDyPro = ^RDyPro;
RDyPro = record
a : string[8];
b : single;
c : byte;
end;
var
DyPro:TList; //vytvorim za behu programu a ukladam ukazatele na recordy typu RDyPro
procedure Uloz;
var
FFile: file of RDyPro;
ADyPro:RDyPro;
i : word;
begin
Assign(FFile, 'C:\Soubor.aaa');
ReWrite(FFile);
for i:=0 to DyPro.Count-1 do
begin
RDyPro:=DyPro.Items[i];
write(FFile, DyProm);
end;
Close(FFile);
end;
Jenze jak mam do toho samyho souboru pred tu dynamickou promennou nacpat jeste dalsi udaje. Jde
to nejak? Chtel jsem to resit tak, ze bych ten soubor s tim nazvem otevrel pro jiny record,
zapamatoval bych si ukazatel z toho souboru, otevrel ten soubor znovu pro record DyPro a
pokracoval z mista ukazatele.
Je to spravna cesta?
Ing. Jiri Sokol, js-delphi(zv)seznam(tec)cz, +420251431187
D6ProfSP2,WinNT
amatersky programator
______________________________________________________________________
Reklama:
Jake bude pocasi? http://pocasi.seznam(tec)cz
Nacteni souboru urcite pripony z daneho adresare
[*] Ing. Jiri SOKOL <JS-delphi(zv)seznam(tec)cz> - 16.7.2002 09:52:12
Ahoj,
existuje nejaka jednoducha f-ce nebo p-ura, ktera by mi pomohla vyresit problem:
"Nacteni souboru urcite pripony z daneho adresare"
do nejakeho StringListu?
Diky Jirka
Ing. Jiri Sokol, js-delphi(zv)seznam(tec)cz, +420251431187
D6ProfSP2,WinNT
amatersky programator
______________________________________________________________________
Reklama:
E-mail zdarma na cely zivot: http://email.seznam(tec)cz
Vykonani SP na FB
[*] Milan Tome� <milan.tomes(zv)haida(tec)cz> - 16.7.2002 09:53:13
> jsem jiz rekl s MSSQL, a ORACLEm. MSSQL mohu doporucit pro vsechny mensi
> projekty, sprava a instalace tohoto serveru je naprosto "primitivni" temer
> nevyzaduji ani oterit prirucku, nastavovat neni temer co a vykon je presto
> velmi dobry.
S tim bych si dovolil nesouhlasit. Sam jsem se kdysi pokousel rozjet verzi
6.5 a udelat na ni nejakou databazi a bylo to neco strasneho. Kdyz se
podivas na IB/FB tak tomu ja rikam jednoduchost instalace a spravy :)))
Neber to, prosim, jako nejaky utok - je to zkratka muj osobni dojem. A
zdaleka nechci rict, ze MS SQL je spatny...
> To na co potrebujete u ORACLE "nekoho, kdo to umi" a ten se s tim dela pul
> dne, to zvladnete u MSSQL na 30 minut s pomoci max. helpu.
To taky neni pravda (opet subjektivne). V praci bezne implementujeme Oracle
a i s importem databaze (cca. 4000 tabulek, po instalaci zabira cca. 800MB)
a trva to max. 4-5 hodin...
> Pavel
Shrnul bych to tak, ze vykonost, jednoduchost instalace a udrzby je
vyslovene subjektivnim pocitem kazdeho...
BTW: Oracle je mnohem pomalejsi a horsi nez treba Informix (alespon podle
mineni mych kolegu, kteri na techto serverech vyvijeji)
S pozdravem
Milan Tomes
mailto:milan.tomes(zv)haida(tec)cz
Ukladani/nacitani dat
[*] Sula Milos <milos.sula(zv)oku-su(tec)cz> - 16.7.2002 10:00:06
No tak nejak by to melo jit, staci kdyz si otevre soubor pro cteni/zapis pak si prectete cely soubor - ulozite do pameti (nebo po blocich) a pak se pomoci seek nastavite na zacatek souboru a vse prepisete s tim ze tam nejdrive zapisete to co chcete
Milos
-----Original Message-----
From: Ing. Jiri SOKOL [mailto:JS-delphi(zv)seznam(tec)cz]
Sent: Tuesday, July 16, 2002 9:49 AM
To: dotaz-delp
Subject: Ukladani/nacitani dat
Ahoj!
Predem se omlouvam, ze otravuju asi s naprosto trivialnim prikladem, ale ja si s nim
nevim rady.
Chci do jednoho souboru ulozit nekolik konstatnich udaju (neco jako hlavicka) a pak
dynamickou promennou. Jenze to neumim udelat. Problem je s typem souboru.
Dyn.prom. ukladam takhle:
type
PoiontRDyPro = ^RDyPro;
RDyPro = record
a : string[8];
b : single;
c : byte;
end;
var
DyPro:TList; //vytvorim za behu programu a ukladam ukazatele na recordy typu RDyPro
procedure Uloz;
var
FFile: file of RDyPro;
ADyPro:RDyPro;
i : word;
begin
Assign(FFile, 'C:\Soubor.aaa');
ReWrite(FFile);
for i:=0 to DyPro.Count-1 do
begin
RDyPro:=DyPro.Items[i];
write(FFile, DyProm);
end;
Close(FFile);
end;
Jenze jak mam do toho samyho souboru pred tu dynamickou promennou nacpat jeste dalsi udaje. Jde
to nejak? Chtel jsem to resit tak, ze bych ten soubor s tim nazvem otevrel pro jiny record,
zapamatoval bych si ukazatel z toho souboru, otevrel ten soubor znovu pro record DyPro a
pokracoval z mista ukazatele.
Je to spravna cesta?
Ing. Jiri Sokol, js-delphi(zv)seznam(tec)cz, +420251431187
D6ProfSP2,WinNT
amatersky programator
______________________________________________________________________
Reklama:
Jake bude pocasi? http://pocasi.seznam(tec)cz
Vykonani SP na FB
[*] Martinec <martin108(zv)post(tec)cz> - 16.7.2002 10:20:55
- Delphi 6 Personal Edition
- Firebird
- IBO
A mam to zadarmo :-)
Martinec
> -----Original Message-----
> From: Erik Salaj [mailto:winsoft(zv)stonline.sk]
>
> 1. Cena
>
> za 4000,- Sk bez DPH kupim Visual C#.Net Standard s MSDE
>
> za 30000,- Sk bez DPH kupim Delphi Professional (ale aj to je
> len docasna akcia, tzv. konkurencny upgrade) + FB je zdarma
>
> 2. Vykon
>
> nerobil som merania, ale dovolim si tvrdit, ze MSDE je daleko
> vykonnejsi system sko FB
>
> 3. Zaver
>
> riesenie s MSDE ja mi javi asi 10 krat vyhodnejsie co sa tyka
> pomeru cena/vykon
----
Open Air Techno festival - SVOJSICE 2002
Svetova techno spicka v sobotu 13.7.
Areal Svojsice u Pardubic
Vice na www.svojsice(tec)cz
Vykonani SP na FB
[*] Jan Krizek <krizek(zv)vitasw(tec)cz> - 16.7.2002 10:25:15
> vsechny mensi
> > projekty, sprava a instalace tohoto serveru je naprosto
> "primitivni" temer
> > nevyzaduji ani oterit prirucku, nastavovat neni temer co a
> vykon je presto
> > velmi dobry.
>
> S tim bych si dovolil nesouhlasit. Sam jsem se kdysi pokousel
> rozjet verzi
> 6.5 a udelat na ni nejakou databazi a bylo to neco strasneho. Kdyz se
> podivas na IB/FB tak tomu ja rikam jednoduchost instalace a
> spravy :)))
> Neber to, prosim, jako nejaky utok - je to zkratka muj osobni dojem. A
> zdaleka nechci rict, ze MS SQL je spatny...
MSSQL 6.5 neni od MS - to je pouze lehce upraveny prevzany produkt.
Skutecne MSSQL zacina od verze 7.0.
Honza +
Vykonani SP na FB
[*] Milan Tome� <milan.tomes(zv)haida(tec)cz> - 16.7.2002 10:33:22
> MSSQL 6.5 neni od MS - to je pouze lehce upraveny prevzany produkt.
> Skutecne MSSQL zacina od verze 7.0.
>
> Honza +
Abych rekl pravdu, tak je mi to sum a fuk, ze to nepochazelo primo od MS. Je
na tom jejich nalepka a tudiz je to i jejich vizitka. A v tomto pripade je
ta vizitka takova nejaka divna.... :(((
Nicmene, budeme pouzivat MS SQL 2000 a jsem na nej docela zvedav...
S pozdravem
Milan Tomes
mailto:milan.tomes(zv)haida(tec)cz
Vykonani SP na FB
[*] Otisk Rene <otisk(zv)misel(tec)cz> - 16.7.2002 10:45:54
Srovnavat SQL 6.5 a SQL2000 mi (subjektivne?) pripada jako srovnavat W9x
operacni sytemy s W2000. Mimochodem SQL server 6.5 ma predka ve spolecnem
projektu s IBM. Tam potom oddelenim vznikla IBM DB2
Sroub
> > MSSQL 6.5 neni od MS - to je pouze lehce upraveny prevzany produkt.
> > Skutecne MSSQL zacina od verze 7.0.
> >
> > Honza +
>
> Abych rekl pravdu, tak je mi to sum a fuk, ze to nepochazelo primo od MS.
Je
> na tom jejich nalepka a tudiz je to i jejich vizitka. A v tomto pripade je
> ta vizitka takova nejaka divna.... :(((
>
> Nicmene, budeme pouzivat MS SQL 2000 a jsem na nej docela zvedav...
>
Nacteni souboru urcite pripony z daneho adresare
[*] Otisk Rene <otisk(zv)misel(tec)cz> - 16.7.2002 10:56:15
V open dialogu si nastavis masku a pak
Strings: TStrings;
...
If OpenDialog1.Execute then
Strings.LoadFromFile(OpenDialog1.FielName)
...
Sroub
Ahoj,
existuje nejaka jednoducha f-ce nebo p-ura, ktera by mi pomohla vyresit
problem:
"Nacteni souboru urcite pripony z daneho adresare"
do nejakeho StringListu?
Vykonani SP na FB
[*] Milan Tome� <milan.tomes(zv)haida(tec)cz> - 16.7.2002 10:59:30
> Srovnavat SQL 6.5 a SQL2000 mi (subjektivne?) pripada jako srovnavat W9x
> operacni sytemy s W2000. Mimochodem SQL server 6.5 ma predka ve spolecnem
> projektu s IBM. Tam potom oddelenim vznikla IBM DB2
> Sroub
Jenze ja nesrovnaval verze 6.5 a 2000 ale 6.5 a IB :)))
Myslim, ze je vhodne tuto debatu ukoncit....
S pozdravem
Milan Tomes
mailto:milan.tomes(zv)haida(tec)cz
Nacteni souboru urcite pripony z daneho adresare
[*] bures <bures(zv)ssakhk(tec)cz> - 16.7.2002 11:07:41
Ahoj podivej se na funkce FindFirst, FindNext a FindClose, v helu je na to i
ukazka
Vlada
----- Original Message -----
From: "Ing. Jiri SOKOL" <JS-delphi(zv)seznam(tec)cz>
To: "dotaz-delp" <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, July 16, 2002 9:52 AM
Subject: Nacteni souboru urcite pripony z daneho adresare
> Ahoj,
> existuje nejaka jednoducha f-ce nebo p-ura, ktera by mi pomohla vyresit
problem:
> "Nacteni souboru urcite pripony z daneho adresare"
> do nejakeho StringListu?
>
> Diky Jirka
>
> Ing. Jiri Sokol, js-delphi(zv)seznam(tec)cz, +420251431187
> D6ProfSP2,WinNT
> amatersky programator
>
> ______________________________________________________________________
> Reklama:
> E-mail zdarma na cely zivot: http://email.seznam(tec)cz
>
>
>
Vykonani SP na FB
[*] Otisk Rene <otisk(zv)misel(tec)cz> - 16.7.2002 11:13:33
Tohle jsem kdysi nalezl na strankach IBM a taky to padlo kdysi v testu SQL
servru v Softwarovych novinach (je to cca 2 roky). Mozna to jeste najdu...
Sroub
>
> Otisk Rene wrote:
> >
> > Srovnavat SQL 6.5 a SQL2000 mi (subjektivne?) pripada jako srovnavat W9x
> > operacni sytemy s W2000. Mimochodem SQL server 6.5 ma predka ve
spolecnem
> > projektu s IBM. Tam potom oddelenim vznikla IBM DB2
>
> Coze ?! Dotedka jsem zil v domneni (posilenem i prectenim nejake knihy
> od spoluautora MS SQL), ze je to koupeny kod od Sybase ...
>
> =================================
>
> Tomas Michalik
> ProCA, s. r. o.
> V Luzich 818, Praha 4
> Czech Republic
>
> e-mail: michalik(zv)proca(tec)cz
> tel: +420 2 67283446
UserName, DomainName
[*] Peter Laufer <laufer(zv)dmasys.sk> - 16.7.2002 11:17:28
Ahojte.
Potreboval by som v Delfach zistit meno nalogovan�ho u��vatela do Windows a
meno dom�ny ktor� ho overila.
Robili ste to uz niekto? Ak� funkcia sa na to pou��va?(ako?)
Vdaka
Vykonani SP na FB
[*] Radim Kunz <privat(zv)casestudio(tec)com> - 16.7.2002 11:19:13
To si pletes s OS2. To byl spolecny projekt MS a IBM.
Radim
> Tohle jsem kdysi nalezl na strankach IBM a taky to padlo kdysi v testu SQL
> servru v Softwarovych novinach (je to cca 2 roky). Mozna to jeste najdu...
>
> Sroub
>
>
> >
> > Otisk Rene wrote:
> > >
> > > Srovnavat SQL 6.5 a SQL2000 mi (subjektivne?) pripada jako srovnavat
W9x
> > > operacni sytemy s W2000. Mimochodem SQL server 6.5 ma predka ve
> spolecnem
> > > projektu s IBM. Tam potom oddelenim vznikla IBM DB2
> >
> > Coze ?! Dotedka jsem zil v domneni (posilenem i prectenim nejake knihy
> > od spoluautora MS SQL), ze je to koupeny kod od Sybase ...
> >
> > =================================
> >
> > Tomas Michalik
> > ProCA, s. r. o.
> > V Luzich 818, Praha 4
> > Czech Republic
> >
> > e-mail: michalik(zv)proca(tec)cz
> > tel: +420 2 67283446
>
>
Vykonani SP na FB
[*] Otisk Rene <otisk(zv)misel(tec)cz> - 16.7.2002 11:25:14
takze je to s tim Sybasem? No dobre. (Jak jsem s tim mohl tak dlouho zit?)
Sroub
> To si pletes s OS2. To byl spolecny projekt MS a IBM.
>
> Radim
>
>
> > Tohle jsem kdysi nalezl na strankach IBM a taky to padlo kdysi v testu
SQL
> > servru v Softwarovych novinach (je to cca 2 roky). Mozna to jeste
najdu...
> >
> > Sroub
> >
> >
> >
> > >
> > > Otisk Rene wrote:
> > > >
> > > > Srovnavat SQL 6.5 a SQL2000 mi (subjektivne?) pripada jako srovnavat
> W9x
> > > > operacni sytemy s W2000. Mimochodem SQL server 6.5 ma predka ve
> > spolecnem
> > > > projektu s IBM. Tam potom oddelenim vznikla IBM DB2
> > >
> > > Coze ?! Dotedka jsem zil v domneni (posilenem i prectenim nejake knihy
> > > od spoluautora MS SQL), ze je to koupeny kod od Sybase ...
> > >
> > > =================================
> > >
> > > Tomas Michalik
> > > ProCA, s. r. o.
> > > V Luzich 818, Praha 4
> > > Czech Republic
> > >
> > > e-mail: michalik(zv)proca(tec)cz
> > > tel: +420 2 67283446
> >
> >
TADOQuery dynamicky
[*] Sula Milos <milos.sula(zv)oku-su(tec)cz> - 16.7.2002 11:33:34
Cau
potrebuji v aplikaci vytvorit TADOQuery dynamicky a aby mi ma procedura vratila TDataSet pro pristup na vracena data. Mam to nasledovne:
function GetDataListFromDB(sql:string):TDataSet;
var
ado:TADOQuery;
begin
ado:=TADOQuery.Create(nil);
ado.Name:='myado_'+IntToStr(integer(ado)); //unikatni jmeno podle pointeru
ado.Connection:=DataModule2.ADOConnection1;
ado.SQL.SetText(PChar(sql));
ado.Open;
result:=ado.DataSource.DataSet;
end;
bohuzel nekde je error - (hlasi access violation )?
Milos
databaze pro Free projekt
[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 16.7.2002 11:39:35
----- Original Message -----
From: "Petr Fejfar" <development(zv)callnet(tec)cz>
> From: "Richard Valny" <Richard.Valny(zv)oku-st(tec)cz>
> SQLite se mi libil natolik, ze jsem testoval, nakolik je "lite" a zjistil
> jsem,
> ze opravdu je: insertovani 2.5 mil. zaznamu do tabulky pod transakci trvalo
> lehce nad 58 hodin (na IB6 3h40) a relativne jednoduchy select (where
> A='xxx' and B like 'yyy%') do teto tabulky trval pres 10 minut (na IB6 45
> ms).
A zkousel jsi to na SQLite pri 'pragma synchronous=OFF'?
To je neco jako 'forced writes' na IB/FB, ktere jsou na IB6 defaultne vypnute,
takze tvoje mereni by bylo trochu nefer.
U me: 1 milion insertu = 2 minuty 58 sekun (Celeron 433MHz).
Vsechno v jedne transakci, viz kod (NxUniqueID generuje nahodny
retezec v delce podle zadaneho parametru):
mDB := sqlite_open('C:\SQLite\Data.db', 0, mErr);
try
mRes := sqlite_exec(mDB, 'pragma synchronous=OFF', nil, nil, mErr2);
mRes := sqlite_exec(mDB, 'create table tbl1 (id integer primary key, name varchar(30))', nil, nil, mErr2);
mRes := sqlite_exec(mDB, 'begin', nil, nil, mErr2);
for i := 1 to 1000000 do begin
s := Format('insert into tbl1 (name) values (''%s'')', [NxUniqueID(Random(20)+5)]);
mRes := sqlite_exec(mDB, PChar(s), nil, nil, mErr2);
end;
mRes := sqlite_exec(mDB, 'commit', nil, nil, mErr2);
finally
sqlite_close(mDB);
end;
Problem s LIKE je ze SQLite pro nej neumi pouzit index, pri normalnim porovnani
ho pouziva, ale i presto si myslim ze SQLite je velice dobry SQL enginek...
Martin Schayna
Vykonani SP na FB
[*] Alex Cherednichenko <cherednichenko(zv)wo(tec)cz> - 16.7.2002 11:39:54
Hello, Otisk!
You wrote:
OR> Srovnavat SQL 6.5 a SQL2000 mi (subjektivne?) pripada jako srovnavat
OR> W9x operacni sytemy s W2000. Mimochodem SQL server 6.5 ma predka ve
OR> spolecnem projektu s IBM. Tam potom oddelenim vznikla IBM DB2
Nekecaj ;o)
MS SQL byl odkoupen u Sybase a ne u IBM.
Pak ze z DB2 nema nic spolecneho.
With best regards, Alex Cherednichenko.
Vykonani SP na FB
[*] Erik Salaj <winsoft(zv)stonline.sk> - 16.7.2002 11:41:37
> S tim bych si dovolil nesouhlasit. Sam jsem se kdysi pokousel rozjet verzi
> 6.5 a udelat na ni nejakou databazi a bylo to neco strasneho. Kdyz se
> podivas na IB/FB tak tomu ja rikam jednoduchost instalace a spravy :)))
> Neber to, prosim, jako nejaky utok - je to zkratka muj osobni dojem. A
> zdaleka nechci rict, ze MS SQL je spatny...
lenze MS SQL 7 a 2000 su o niecom uplne inom ako SQL 6.5.
Erik
Vykonani SP na FB
[*] Erik Salaj <winsoft(zv)stonline.sk> - 16.7.2002 11:44:49
> FB je MULTIPLATFORMNI => neni optimalizovany na urcity typ procesoru, coz
> muze snizit vykon oproti MS SQL ( presto si myslim, ze rozdil ve vykonu
> cisteho DB stroje neni velky ,celkem by me zajimalo zda to nekdo seriozne
> testoval), ale je to za cenu vetsich moznosti pouziti. Pokud by Te
zajimalo
> jak se FB zrychlil po prepsani kodu jen na NT, tak se obrat na p. Cisare,
> ktery o tom zajimave mluvil v Laznich Belohrad.
len, ci ta multiplatformnost je to, co zakaznik najviac potrebuje
> >1. Cena
> >za 4000,- Sk bez DPH kupim Visual C#.Net Standard s MSDE
> >za 30000,- Sk bez DPH kupim Delphi Professional (ale aj to je
> >len docasna akcia, tzv. konkurencny upgrade) + FB je zdarma
>
> No a tohle snad uz nemuzes myslet ani vazne. Vim, ze jsme casto monopolem
MS
> nuceni k ruznym vecem, ale nutit se do pouzivani i jejich programovaciho
> jazyku, jen kvuli licenci na MSDN to uz je prece jen silna kava i na me.
ja som uviedol JEDNO mozne riesenie, nie JEDINE mozne riesenie
> Zaver :
> Pomer Cena / vykon u FB je zatim bezkonkurencni
??? z coho a ako robis taketo zavery je mi naozaj zahadou
Erik
TADOQuery dynamicky
[*] �tevl�k Mari�n <Marian.Stevlik(zv)merlin(tec)cz> - 16.7.2002 12:02:51
result := ado;
Stevlik Marian
Software Development Specialist
MERLIN
Stefanikova 32
150 00 Prague 5
Czech Republic
e-mail: marian.stevlik(zv)merlin(tec)cz
tel: +420 2 41010111 (181)
-----P�vodn� zpr�va-----
Od: Sula Milos [mailto:milos.sula(zv)oku-su(tec)cz]
Odesl�no: 16. �ervence 2002 11:34
Komu: delphi-l(zv)clexpert(tec)cz
P�edm�t: TADOQuery dynamicky
Cau
potrebuji v aplikaci vytvorit TADOQuery dynamicky a aby mi ma procedura
vratila TDataSet pro pristup na vracena data. Mam to nasledovne:
function GetDataListFromDB(sql:string):TDataSet;
var
ado:TADOQuery;
begin
ado:=TADOQuery.Create(nil);
ado.Name:='myado_'+IntToStr(integer(ado)); //unikatni jmeno podle pointeru
ado.Connection:=DataModule2.ADOConnection1;
ado.SQL.SetText(PChar(sql));
ado.Open;
result:=ado.DataSource.DataSet;
end;
bohuzel nekde je error - (hlasi access violation )?
Milos
Vykonani SP na FB
[*] Tomas Michalik <michalik(zv)proca(tec)cz> - 16.7.2002 11:07:54
Otisk Rene wrote:
>
> Srovnavat SQL 6.5 a SQL2000 mi (subjektivne?) pripada jako srovnavat W9x
> operacni sytemy s W2000. Mimochodem SQL server 6.5 ma predka ve spolecnem
> projektu s IBM. Tam potom oddelenim vznikla IBM DB2
Coze ?! Dotedka jsem zil v domneni (posilenem i prectenim nejake knihy
od spoluautora MS SQL), ze je to koupeny kod od Sybase ...
=================================
Tomas Michalik
ProCA, s. r. o.
V Luzich 818, Praha 4
Czech Republic
e-mail: michalik(zv)proca(tec)cz
tel: +420 2 67283446
exception EOutOfResources
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 16.7.2002 12:13:37
From: "CHMEL Karel, Mgr." <kchmel(zv)csob(tec)cz>
> A pomohlo by dat do dialogu misto editacnich policek jenom labely nebo
> ty zerou zdroje stejne?
To by mohlo pomoct, ale jak uz jsem psal predtim, dival jsi se o kolik klesnou
volne prostredky pri zobrazeni toho dialogu ? Nez zacnu neco jen tak zkouset
tak je snad dobre vedet kde je presne problem.
Petr Vones
Re[2]: exception EOutOfResources
[*] Jakub Dusek <jdev(zv)seznam(tec)cz> - 16.7.2002 12:19:15
Nejvice prostredku sezerou komponenty odvozene od TWinControl, cili ty
ktere maji handle okna. TLabel je potomek TGraphicControl cili sezere
mnohem min prostredku nez TEdit, coz je potomek TWinControl.
Jakub Dusek
-------------------------------------------
Homepage : http://dusek.zde(tec)cz
Phone : +420604615795
Sms email : jakub.dusek(zv)click(tec)cz
Icq : 86063232
Apps : Add/Remove Manager, Charmaper,
Sms GateKeeper
-------------------------------------------
Tuesday, July 16, 2002, 8:10:24 AM, you wrote:
>>From: Petr Vones [mailto:pvones(zv)mbox.vol(tec)cz]
>>
>>From: "CHMEL Karel, Mgr." <kchmel(zv)csob(tec)cz>
>>> Co jsem vypozoroval, tak problem je s tim, ze v tom dialogovem okne
>>> mam hodne editacnich policek, ktere se podle potreby zobrazui nebo
CKM> skryvaji.
>>> Pokud jich mam zobrazeno "vetsi" mnozstvi (ty uvozovky proto, ze je to
>>> pokazde jiny pocet), tak uz se mi dalsi neukaze a misto toho dostanu tu
>>> vyjimku a chybovou hlasku.
>>
>>Tim to pravdepodobne bude, kolik volnych (predevsim GDI) zdroju zbyde po
>>zobrazeni toho dialogu ?
CKM> A pomohlo by dat do dialogu misto editacnich policek jenom labely nebo
CKM> ty zerou zdroje stejne?
CKM> Karel Chmel
UserName, DomainName
[*] Ondrej Kelle <O.Kelle(zv)digitalpublishing.de> - 16.7.2002 12:23:56
> Potreboval by som v Delfach zistit meno nalogovan�ho
> u��vatela do Windows a
> meno dom�ny ktor� ho overila.
> Robili ste to uz niekto? Ak� funkcia sa na to pou��va?(ako?)
User name zistis jednoducho pomocou GetUserName.
Na zistenie domeny je viacero sposobov.
Na Windows NT a vyssie:
- GetTokenInformation/LookupAccountSid:
http://support.microsoft.com/default.aspx?scid=kb;en-us;Q111544
- NetWkstaUserGetInfo
- NetWkstaGetInfo
Na Windows 9x/ME:
- jedine cez NetWkstaGetInfo:
http://support.microsoft.com/default.aspx?scid=kb;EN-US;q155698
Tu je vsak problem, ze netapi.dll na tychto platformach je 16-bitova, to
znamena, ze musis pouzit tzv. flat thunking (volanie 16-bitoveho kodu z
32-bitovej aplikacie):
http://support.microsoft.com/default.aspx?scid=kb;en-us;Q155763
Priklad na flat thunking v Delphi najdes tu:
http://www.thedelphimagazine.com/samples/thunk/thunk95.htm
Co sa tyka 32-bitovych NetWkstaUserGetInfo a NetWkstaGetInfo, tu je
jedoduchy priklad:
const
netapi32 = 'netapi32.dll';
type
PWkstaUserInfo1 = ^TWkstaUserInfo1;
TWkstaUserInfo1 = packed record
wkui1_username: PWideChar;
wkui1_logon_domain: PWideChar;
wkui1_oth_domains: PWideChar;
wkui1_logon_server: PWideChar;
end;
PWkstaInfo = ^TWkstaInfo;
TWkstaInfo = packed record
wki100_platform_id: DWORD;
wki100_computername: PWideChar;
wki100_langroup: PWideChar;
wki100_ver_major: DWORD;
wki100_ver_minor: DWORD;
end;
function NetWkstaUserGetInfo(reserved: PWideChar; level: DWORD; var bufptr:
Pointer): Integer; stdcall;
external netapi32 name 'NetWkstaUserGetInfo';
function NetWkstaGetInfo(servername: PWideChar; level: DWord; var bufprt:
Pointer): integer; stdcall;
external 'netapi32.dll' name 'NetWkstaGetInfo';
function NetApiBufferFree(Buffer : Pointer) : Integer; stdcall;
external netapi32 name 'NetApiBufferFree';
procedure TForm1.Button1Click(Sender: TObject);
var
P: Pointer;
begin
NetWkstaUserGetInfo(nil, 1, P);
try
with PWkstaUserInfo1(P)^ do
ShowMessage(Format('username: %s'#13'logon_domain: %s'#13'oth_domains:
%s'#13'logon_server: %s',
[wkui1_username, wkui1_logon_domain, wkui1_oth_domains,
wkui1_logon_server]));
finally
NetApiBufferFree(P);
end;
end;
procedure TForm1.Button2Click(Sender: TObject);
var
P: Pointer;
begin
NetWkstaGetInfo(nil, 100, P);
try
with PWkstaInfo(P)^ do
ShowMessage(Format('platform_id: %d'#13'computername: %s'#13'langroup:
%s'#13'ver: %d.%d',
[wki100_platform_id, wki100_computername, wki100_langroup,
wki100_ver_major, wki100_ver_minor]));
finally
NetApiBufferFree(P);
end;
end;
Tento priklad linkuje netapi32.dll staticky, takze program nespustis na
Windows 9x a ME.
Ak chces, aby to fungovalo vsade, musis urobit nasledovne:
1. V runtime si zistit na akom OS to bezi
2. Na NT a vyssie mozes priamo pouzit jednu z horeuvedenych moznosti
(dynamicky, cez LoadLibrary/GetProcAddress)
3. Na Windows 9x/ME musis pouzit NetWkstaGetInfo cez flat thunking do
netapi.dll
HTH & good luck,
TOndrej
Vykonani SP na FB
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 16.7.2002 12:31:11
From: "Richard Kejval" <kejval.delphi(zv)centrum(tec)cz>
> FB je MULTIPLATFORMNI => neni optimalizovany na urcity typ procesoru, coz
To je prece nesmysl, multiplatformni a optimalizace na typ procesoru jsou
odlisne veci. Napriklad u Windows jina platforma nez Intel bezne nepripada v
uvahu (ano jsou Windows i pro Alphu a PowerPC), takze optimalizace (s vyjimkou
odlisnosti v instrukcnich sadach u AMD, ale to jsou asi instrukce ktere se v
databazovem serveru prilis neuplatni) je vcelku jasne dana. Jina situace bude
u 64bit Windows kde jsou architektury procesoru od Intelu a AMD zcela odlisne.
> muze snizit vykon oproti MS SQL ( presto si myslim, ze rozdil ve vykonu
Kod by mel byt v pripade serverove aplikace vzdy maximalne optimalizovan na
danou platformu/hardware, pohadky o multiplatformnosti nejsou v tomto omluvou.
K cemu je vec, ktera sice nejak bezi na ruznych systemech, ale ani na jednom
ne optimalne ?
> No a tohle snad uz nemuzes myslet ani vazne. Vim, ze jsme casto monopolem MS
> nuceni k ruznym vecem, ale nutit se do pouzivani i jejich programovaciho
> jazyku, jen kvuli licenci na MSDN to uz je prece jen silna kava i na me.
Podivej se na to z jine strany, ten nastroj stoji (alespon podle toho co tu
bylo prezentovano) zlomek ceny Delphi, takze to neni zase tak velka polozka.
Nikdo te nenuti jej pouzivat, budes ho mit jen kvuli te licenci. Jina moznost
je mit nektere z MSDN subscription. Ono se totiz situace trochu meni, protoze
C# neni az tak spatna vec, takze kdyz nekdo uvazuje o prechodu z VB apod. tak
uz tu neni jen Delphi ale prave i C#.
Jina vec o ktere se tu nepsalo je pak treba srovnani narocnosti instalace a
ruznych dalsich veci a problemu, ktere treba na prvni pohled nevyplynou.
Petr Vones
Vykonani SP na FB
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 16.7.2002 12:32:45
From: "Petr Palicka aka PeC(zv)" <petr.palicka(zv)atlas(tec)cz>
> me osobne se nezdarilo na MSDE pracovat s delphi pro.
> nebylo jak vytvorit DB, jak se pripojit k DB, jak
> spravovat DB, to vse mam k FB jako opensource projekty.
Vidis, mas hned napad na Open Source projekt. Udelat nejaky "SQL Explorer" pro
MSDE by technicky vzato nemel byt problem.
Petr Vones
Nacteni souboru urcite pripony z daneho adresare
[*] Karel Horky <horky.karel(zv)quick(tec)cz> - 16.7.2002 11:43:17
Ing. Jiri SOKOL, <mailto:JS-delphi(zv)seznam(tec)cz> napsal:
> "Nacteni souboru urcite pripony z daneho adresare"
> do nejakeho StringListu?
Precti si help k OpenDialog, pomoci nej si filtrujes urcite pripony.
U metody Execute je priklad.
U StringListu je metoda LoadFromFile, ktere predas vybrane jmeno
souboru. Opet je primo na ni priklad.
------
S pozdravem Karel Horky
horky.karel(zv)quick(tec)cz
W2K/SP1, D5Ent/UP1
Vykonani SP na FB
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 16.7.2002 12:56:41
Haj hou!
Srovnavat ruzne SQL servery je vzdy problematicke z duvodu _znacnych_
rozdilu mezi nimi. Diskuze na tema ktery z nich je lepsi je naprosto
bezpredmetna, stejne jako debata na tema ktery programovaci jazyk je lepsi.
Zalezi vzdy na konkretni uloze, a rozumny vyvojar vzdy pouzije ten, ktery je pro
danou ulohu nejlepsi. Protoze se necitim kompetentni vyjadrovat se o jinych
serverech (i kdyz svuj nazor mam :-), zminim se pouze o prednostech a
zaporech Firebirdu.
Prednosti:
- Cena. Pouziti FB sice neznamena, ze mate vse zadarmo (napr. tech. podporu
:-), ale uspora je ve vetsine pripadu jiste znacna.
- Open Source. Nezavislost produktu na konkretnim dodavateli, moznost upravit
FB (operativni reseni problemu) nebo portovat na nove platformy (takto napr.
vznikla verze pro WinCE a Sinix-Z). Rovnez chybi tlak na upgrade (rada lidi
pouziva i starsi verze).
- Multiplatformnost s koreny v unixu. Nabizi se cela skala platforem a portace na
libovolnou variantu unixu je relativne velmi jednoducha. Navic je server na vsech
platformach identicky -> neexistuji orezane nebo rozsirene verze. Server
pouzivany jako singl na windows je ten samy server jako server obsluhujici 300+
uzivatelu na Sparc Solarisu.
- Multigeneracni architektura, ktera zajistuje vysokou propustnost systemu,
obzvlaste pokud potrebujete soucasne menit data a zaroven je zpracovavat.
Vsechny databaze bez MGA maji prave s timto velke problemy.
- Kompaktnost a jednoduchost. Na to co umi, je server velmi maly (cca 1.5MB).
Uziva klasickou unixovou filozofii -> delat veci co nejjednodussim moznym
zpusobem. Vysledkem je mensi a jednodussi kod, a nasledne mensi moznost
chyby a nutnosti neco nastavovat.
- Velmi dobra podpora SQL, vcetne ulozenych procedur a triggeru.
- Dobra integrace s programovacimi jazyky (OP, C/C++, Perl, PHP, Python,
Cobol, Java) a dostupnost nastroju.
- Moznost zalohovat a menit strukturu db za plneho provozu.
- Skalovatelnost od singlu po stovky soucasnych uzivatelu. Od malych databazi
po stovky GB. Prumerne velmi slusny vykon.
Nevyhody:
- Minimalni nebo zadne optimalizace pro konkretni platformu nebo architekturu
procesoru (pominuli Intel :-).
- Spatna podpora SMP u superserveru (classic je ok).
- Nedokonaly (dle nekterych primo rozbity) optimalizator. Vetsinou funguje jak
ma, ale obcas je s nim treba zapasit.
- Jednoduchost -> rada serveru obsahuje kod pro specialni pripady ktere
umoznuji lepsi vykon (at uz jde o optimalizace, typy indexu nebo ulozeni dat)
ovsem za cenu vetsiho a slozitejsiho kodu a narocnejsi administrace.
- Chybejici nebo nedokonale FREE ODBC a OLE DB ovladace (pro jine jazyky
nebo propojeni lze vzdy nalezt nejaky velmi slusny free ovladac nebo knihovnu).
- Nedostatek vestavenych funkci, mala skala prikazu jazyka PSQL (oproti jinym
serverum).
- Historicky male max. hodnoty nekterych parametru (pocet indexu na tabulku,
pocet verzi metadat apod.). Nedokonale vyuzivani nadbytku systemovych zdroju,
obzvlaste RAM.
- Nedostatecne zabezpeceni dat a rizeni prav uzivatelu.
- Nemoznost inkrementalniho zalohovani.
- Odlisna filozofie od vetsiny "hlavnich" serveru. Server se v rade situaci chova
odlisne, ma jina uskali a obcas vyzaduje jine strategie. Nutno se ucit radu
novych veci, nelze pouzit radu znalosti z jinych serveru.
S pozdravem
Pavel Cisar
Mobil: 0724 281429
http://www.ibphoenix(tec)cz
Vse co potrebujete pro Firebird a InterBase
StringGrid (StringAlignGrid) a sloupce
[*] Zdenek Sedlak <zsedlak(zv)atlas(tec)cz> - 16.7.2002 13:10:00
Ahoj,
chtel bych se zeptat jestli muzu ve StringGridu nebo v StringAlignGridu
schovat sloupec (nebo radku). Aby nebyl videt a zase ho zobrazit. Potrebuji
to dle nastaveni nejakych parametru menit a nechci pokazde vytvaret ty
sloupce nove.
Nekdy chci videt sloupce napr. Jmeno, Ulice, Mesto, Tel jindy jen Jmeno, Tel
apod.
Neni to nad zadnou db. A dat neni mnoho cca 10-30 radek a 5-8 sloupcu.
Poradte jak? Diky
Zdenek Sedlak
Vykonani SP na FB
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 16.7.2002 13:40:25
On 16 Jul 2002 at 12:32, Petr Vones wrote:
> From: "Petr Palicka aka PeC(zv)" <petr.palicka(zv)atlas(tec)cz>
> > me osobne se nezdarilo na MSDE pracovat s delphi pro.
> > nebylo jak vytvorit DB, jak se pripojit k DB, jak
> > spravovat DB, to vse mam k FB jako opensource projekty.
>
> Vidis, mas hned napad na Open Source projekt. Udelat nejaky "SQL
> Explorer" pro MSDE by technicky vzato nemel byt problem.
Ja pro to nevidim zadny rozumny duvod. Ten, kdo nad databazi vyviji,
by mel mit stejne MS SQL pro vyvojare, a tam vse ma. A pro uzivatele,
kteremu davam MSDE, uplne staci, kdyz tech par spravcovskych veci
osetrim primo v programu, nebo v ulozenych procedurach. Delat pro
spravu cely program se v podstate nevyplati.
S pozdravem
Zbysek Hlinka
Vykonani SP na FB
[*] Richard Kejval <kejval.delphi(zv)centrum(tec)cz> - 16.7.2002 13:41:26
> To je prece nesmysl, multiplatformni a optimalizace na typ procesoru jsou
> odlisne veci. Napriklad u Windows jina platforma nez Intel bezne nepripada
v
> uvahu (ano jsou Windows i pro Alphu a PowerPC), takze optimalizace (s
vyjimkou
> odlisnosti v instrukcnich sadach u AMD, ale to jsou asi instrukce ktere se
v
> databazovem serveru prilis neuplatni) je vcelku jasne dana. Jina situace
bude
> u 64bit Windows kde jsou architektury procesoru od Intelu a AMD zcela
odlisne.
Asi jsem se spatne vyjadril, mel jsem na mysli to o cem mluvil P. Cisar,
kdyz prednasel o FB. Slo o to, ze skupina ruskych programatoru prepsala FB
jen pro platformu WinNT a vykon se mnohonasobne zvysil. Bohuzel to bylo na
ukor toho, ze jiny operacni system nepodporovala a ta vylepseni se nedala do
Open Source FB pouzit, protoze je stanoveno, ze bude multiplatformni. Skoda
ze se k tomu nemuze vyjadrit Pavel, ale asi bude na dovolene.
Pokud nekdo nepovazuje za dulezitou vlastnost to, ze DB bezi i na jinem
serverovem OS nez je Win, tak je to jeho problem, ale pro me je to
dulezitejsi nez nejake mouchy v optimalizaci SQL prikazu. Protoze o to v
teto diskuzi nejdrive slo. Ale uz bych to skoro ukoncil, protoze tu stejne
nikdo nezverejnil nejake vysledky serioznich vykonovych testu a takova ta
tvrzeni, ze MS SQL je 10 x vykonejsi nez FB, jen proto, ze je od Microsoftu,
mi pripadaji prinejmensim neseriozni.
Optimalizace procedury
[*] Vymazal Milan <vymazal.milan(zv)seznam(tec)cz> - 16.7.2002 13:59:31
Zdravim konferenci
Mam nasledujici problem. Napsal jsem COM+ componentu ktera je podle me
perfektni :). Provider vsak tvrdi ze pry vytezuje server na 100% .
Komponenta slouzi k resize jpegu. POuzivam unity a procedury z jpeg a
gifimage. Podle me to zadne zasadni chyby nema. Co vy na to ?
myslite ze je ten kod tak hrozny ? Dal by se nejak optimalizovat.
Vubec si v tomto ohledu nevim rady a ja vlastne programuju jak umim.
{*******************************************************************************
NAME: Resize *
DESCRIPTION: function resize picture of given name and save it under new nam*
SYNTAX: Result = Resize(strFileName1, strFileName2, intWidth, intHeight, *
intMaxWidth, intMaxHeight) *
PARAMETERS: *
strFileName1 <- string; contains name of original file *
strFileName2 <- string; contains name of thumbnail file *
intWidth <- integer; new width; if zero then proportional resize *
intHeight <- integer; new height; if zero then proportional resize *
intMaxWidth <- integer; new max width; *
intMaxHeight <- integer; new max height; *
RETURNS: string error string or OK if no errors *
*******************************************************************************}
function Resize(const strFileName,strFileNameFinal: WideString; intWidth, intHeight, intMaxWidth, intMaxHeight: Integer): WideString; safecall;
Var
objImageWEB, objFinalImage : TBitmap;
objPicture : TObject;
strPath, strFile, strNewFile, strExt : string;
//---------Effect-Zmenseni-------
intOriginalX, intOriginalWidth : Integer;
intOriginalY, intOriginalHeight : Integer;
intNewX, intNewWidth : Integer;
intNewY, intNewHeight : Integer;
intX, intY : Integer;
ix, iy, x1, x2, y1, y2 : Integer;
dblFromX, dblFromY : Double;
intFromX,intFromY : Integer;
dblXScale, dblYScale : Double;
dblTotalRed, dblTotalGreen,dblTotalBlue : Double;
dblRatio : Double;
objColor : TColor;
ArrWeightX, arrWeightY : array[0..1] of Double;
dblWeight : Double;
Begin
result:='Error: Resize (1000): Unknown error occured.';
try
// PARAMETERS CHECK ************************************************
if (Trim(strFileName)='') or (Trim(strFileNameFinal) = '') then begin
result:='Error: Resize (1010): Bad file names (at least one is empty string).';
exit;
end;
strPath := ExtractFilePath(strFileName); // path without filename
strFile := ExtractFileName(strFileName); // filename without path
strExt := UpperCase(ExtractFileExt(strFileName)); // ext only
if ExtractFilePath(strFileNameFinal) = ''
then strNewFile := strPath + ExtractFileName(strFileNameFinal)
else strNewFile := strFileNameFinal;
// init objects
objPicture := nil;
objImageWEB := TBitmap.Create;
// GIF or JPEG?
if (strExt = '.JPG') or (strExt = '.JPEG') or (strExt = '.JPE') then Begin
objPicture := TJPEGImage.Create;
(objPicture as TJPEGImage).LoadFromFile(strFileName);
objImageWEB.Assign(objPicture as TJPEGImage);
end;
if strExt = '.GIF' then Begin
objPicture := TGIFImage.Create;
(objPicture as TGIFImage).LoadFromFile(strFileName);
objImageWEB.Assign(objPicture as TGIFImage);
end;
if objPicture = nil then Begin
Result := 'Error: Resize (1020): Unsupported image type, upload GIF or JPEG file.';
Exit;
end;
try
// COUNT NEW VALUES FOR PICTURE WIDTH AND HEIGHT *******************
intOriginalX := 0; intOriginalY := 0;
intOriginalWidth := objImageWEB.Width; intOriginalHeight := objImageWEB.Height;
if intHeight = 0 then begin
// = count new size of H = W * orH / orW
intHeight := intWidth * intOriginalHeight div intOriginalWidth;
end;
if intWidth = 0 then begin
// = count new size of W = H * orW / orH
intWidth := intHeight * intOriginalWidth div intOriginalHeight;
end;
intNewX := 0; intNewY := 0;
intNewWidth := intWidth; intNewHeight := intHeight;
// MAXIMAS
if (intMaxWidth<>0) or (intMaxHeight<>0) then begin
{dblPictureScale = intOriginalWidth/intOriginalHeight;
dblFrameScale = intMaxWidth /intMaxHeight;
F>=P = H *
F<P = W }
If intOriginalWidth/intOriginalHeight <= intMaxWidth/intMaxHeight then begin
// frame scale is bigger = use height
intNewWidth := 0; intNewHeight := intMaxHeight;
end else begin
// frame scale is smaller = use width
intNewHeight := 0; intNewWidth := intMaxWidth;
end;
end;
objFinalImage := TBitmap.Create;
try
objFinalImage.Width:=intWidth; objFinalImage.Height:=intHeight;
if (intOriginalWidth <= intNewWidth) or (intOriginalHeight <= intNewHeight) then begin
// CREATE BIGGER IMAGE *****************************************
// Enlarge the picture in from_canvas and place it
// in to_canvas.
// Compute the scaling parameters. This is useful if
// the image is not being scaled proportionally.
dblXScale := (intNewWidth - intNewX + 1) / (intOriginalWidth - intOriginalX);
dblYScale := (intNewHeight - intNewY + 1) / (intOriginalHeight - intOriginalY);
for intY := intNewY to intNewHeight do begin
dblFromY := (intY -intNewY) / dblYScale + intOriginalY;
intFromY := Trunc(dblFromY);
arrWeightY[1] := dblFromY - intFromY;
arrWeightY[0] := 1 - arrWeightY[1];
for intX := intNewX to intNewWidth do begin
dblFromX := (intX -intNewX) / dblXScale + intOriginalX;
intFromX := Trunc(dblFromX);
arrWeightX[1] := dblFromX - intFromX;
arrWeightX[0] := 1 - arrWeightX[1];
dblTotalRed := 0.0; dblTotalGreen := 0.0; dblTotalBlue := 0.0;
// approximate color of new pixel from 4 pixels around.
for ix := 0 to 1 do begin
for iy := 0 to 1 do begin
dblWeight := arrWeightX[ix] * arrWeightY[iy];
objColor := objImageWEB.Canvas.Pixels[intFromX + ix, intFromY + iy];
dbltotalRed := dbltotalRed + dblWeight * (objColor Mod 256);
dbltotalGreen := dbltotalGreen + dblWeight * ((objColor Div 256) Mod 256);
dbltotalBlue := dbltotalBlue + dblWeight * (objColor Div 65536);
end;
end;
objFinalImage.Canvas.Pixels[intX, intY] := Round(dblTotalRed) + 256 * (Round(dblTotalGreen) + 256 * Round(dblTotalBlue));
end;
end;
end else begin
// CREATE SMALLER IMAGE ****************************************
dblXScale := (intNewWidth - intNewX + 1) / (intOriginalWidth - intOriginalX);
dblYScale := (intNewHeight - intNewY + 1) / (intOriginalHeight - intOriginalY);
for intY := intNewY to intNewHeight do begin
y1 := Trunc((intY - intNewY) / dblYScale + intOriginalY);
y2 := Trunc((intY + 1 - intNewY) / dblYScale + intOriginalY) - 1;
for intX := intNewX to intNewWidth do begin
x1 := Trunc((intX - intNewX) / dblXScale + intOriginalX);
x2 := Trunc((intX + 1 - intNewX) / dblXScale + intOriginalX) - 1;
dblTotalRed := 0; dblTotalGreen := 0; dblTotalBlue := 0;
for iy := y1 to y2 do begin
for ix := x1 to x2 do begin
objColor := objImageWEB.Canvas.Pixels[ix, iy];
dblTotalRed := dblTotalRed + objColor Mod 256;
dblTotalGreen := dblTotalGreen + (objColor Div 256) Mod 256;
dblTotalBlue := dblTotalBlue + objColor Div 65536;
end;
end;
dblRatio := 1 / (x2 - x1 + 1) / (y2 - y1 + 1);
objFinalImage.Canvas.Pixels[intX, intY] := Round(dblTotalRed * dblRatio) + 256 * (Round(dblTotalGreen * dblRatio) + 256 * Round(dblTotalBlue * dblRatio));
end;
end;
end;
//**************************************************************
if objPicture is TGIFImage then Begin
(objPicture as TGIFImage).ColorReduction := rmQuantizeWindows;
(objPicture as TGIFImage).Assign(objFinalImage);
(objPicture as TGIFImage).SaveToFile(strNewFile);
end;
if objPicture is TJPEGImage then Begin
(objPicture as TJPEGImage).Assign(objFinalImage);
(objPicture as TJPEGImage).SaveToFile(strNewFile);
end;
finally
objFinalImage.Free;
end;
finally
objImageWEB.Free;
end;
objPicture.Free;
result := 'Picture ' + ExtractFileName(strNewFile) + ' was successfully resized.';
except
on E:Exception do result:=E.Message;
end;
if result = 'JPEG error #52' then result := 'Invalid JPEG signature'
End;
--
Best regards,
Vymazal mailto:vymazal.milan(zv)seznam(tec)cz
exception EOutOfResources
[*] CHMEL Karel, Mgr. <kchmel(zv)csob(tec)cz> - 16.7.2002 14:02:03
>From: Petr Vones [mailto:pvones(zv)mbox.vol(tec)cz]
>
>From: "CHMEL Karel, Mgr." <kchmel(zv)csob(tec)cz>
>> A pomohlo by dat do dialogu misto editacnich policek jenom labely nebo
>> ty zerou zdroje stejne?
>
>To by mohlo pomoct, ale jak uz jsem psal predtim, dival jsi se o kolik
klesnou
>volne prostredky pri zobrazeni toho dialogu ? Nez zacnu neco jen tak
zkouset
>tak je snad dobre vedet kde je presne problem.
>
>Petr Vones
Zdroju tam je 83%. Nemohlo by to byt ovlivneno i tim, ze to je 16bitova
aplikace?
Karel Chmel
exception EOutOfResources
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 16.7.2002 14:13:38
From: "CHMEL Karel, Mgr." <kchmel(zv)csob(tec)cz>
> Zdroju tam je 83%. Nemohlo by to byt ovlivneno i tim, ze to je 16bitova
> aplikace?
Aha, to ovsem ponekud meni situaci ;-) Mohu vedet co nekoho v roce 2002 (!)
vede k psani 'aplikace' v nepodporovanem prostredi (Delphi 1) a na jiz davno
nepodporovane platforme (Windows 3.1) ? Mozna by bylo lepsi prehodnotit ten
zamer a orientovat se na platformy a vyvojova prostredi, ktere jsou tu uz
bezne nejmene 6 let, existuje pro ne podpora a hlavne ma smysl pro ne vyvijet
aplikace. Psat dnes 16ti bitovou aplikaci je stejne nesmyslne, jako napriklad
nahravat hudbu na fonograf.
Petr Vones
exception EOutOfResources
[*] CHMEL Karel, Mgr. <kchmel(zv)csob(tec)cz> - 16.7.2002 14:20:20
>From: Petr Vones [mailto:pvones(zv)mbox.vol(tec)cz]
>
>From: "CHMEL Karel, Mgr." <kchmel(zv)csob(tec)cz>
>> Zdroju tam je 83%. Nemohlo by to byt ovlivneno i tim, ze to je 16bitova
>> aplikace?
>
>Aha, to ovsem ponekud meni situaci ;-) Mohu vedet co nekoho v roce 2002 (!)
>vede k psani 'aplikace' v nepodporovanem prostredi (Delphi 1) a na jiz
davno
>nepodporovane platforme (Windows 3.1) ? Mozna by bylo lepsi prehodnotit ten
>zamer a orientovat se na platformy a vyvojova prostredi, ktere jsou tu uz
>bezne nejmene 6 let, existuje pro ne podpora a hlavne ma smysl pro ne
vyvijet
>aplikace. Psat dnes 16ti bitovou aplikaci je stejne nesmyslne, jako
napriklad
>nahravat hudbu na fonograf.
>
Je to stara aplikace, ktera jiz asi 4 roky bezi v dobe, kdy jsem ji psal byl
od
zadavetele jeste pozadavek na praci ve Win 3.11.
Myslis, ze by prevod do 32 bitu pomohl?
Karel Chmel
exception EOutOfResources
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 16.7.2002 14:30:57
From: "CHMEL Karel, Mgr." <kchmel(zv)csob(tec)cz>
> Myslis, ze by prevod do 32 bitu pomohl?
Samozrejme. Aplikace tak pobezi ve skutecnem operacnim systemu.
Petr Vones
Vykonani SP na FB
[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 16.7.2002 14:31:54
> Delal jsem nekolik projektu v D3 na MSSQL resp. MSDE 1.0 pres
> ODBCe a vse bylo OK, takze neschopnost pripojit se k DB, vytvoreni
> metadat, sprava atd bych asi hledal nekde jinde....
OK, myslim, ze z cele debaty vyplyva, ze nic se neji tak horke,
jak se to uvari (snad s vyjimkou caje ;). uznava, ze v dobe, kdy
jsme vybirali nejaky vhodny a pro uzivatele cenove pristupny (nejlepe
zdarma) SQL server, jsem o praci se SQL servery vedel velky prd.
s tim prdem jsem v pohode nainstaloval MSDE i IB6, ale solidne
neco delat jsem zvladl jenom na IB6. mozna to bylo diky nativnim
komponentam pro IB6 primo v Delphach. ted uz si to presne nevybavim,
je to 2 roky zpatky. klonil bych se k tomu, abysme debatu ukoncili.
cele to zacalo tim, ze pro FB/IB je potreba dotazy optimalizovat
rucne, ale podle toho, co jsem cetl o MSSQL (mistrovstvi MSSQL 6.5),
tak je to dost podobny i na MSSQL, nevim, jak ted na serveru 7 ci 2000.
z ostatnich mejlu mam pocit, ze kazdy SQL server ma sva specifika a
vyzaduje znacnou znalost a praxi vyvojare. navic si myslim, ze jenom
malokdo ma dostatecne velke a srovnatelne zkusenosti s vice servery,
nez s tim svym, pripadne trochu jeste jeden. ale asi nikdo z nas nemuze
opravdu kvalifikovane porovnavat servery tak, ze by pro kazdy byl
schopen
zplodit stejnou databazi _maximalne_ optimalizovanou pro MSSQL, Oracle,
IB/FB (a ty se asi brzy dost rozjedou), SQLAnywhere, Informix....
ma potom smysl se takto dohadovat? prijde mi to tak trochu jako zabomysi
valka. predpokladam, ze kazdy je schopen si vybrat reseni, ktere mu
vyhovuje.
s nimz je spokojeny. novacek se bohuzel musi proplacat uvodnima
porodnima
bolestma a projit si svuj krest ohnem...
nejlepe si myslim bude, kdyz si nadale budem radit jak napsat dotaz lepe
na tom kterem serveru, protoze na konkretni jeden server se tu vzdy par
odborniku najde :o)
dekuji peca
exception EOutOfResources
[*] CHMEL Karel, Mgr. <kchmel(zv)csob(tec)cz> - 16.7.2002 14:39:07
>From: Petr Vones [mailto:pvones(zv)mbox.vol(tec)cz]
>
>> Myslis, ze by prevod do 32 bitu pomohl?
>
>Samozrejme. Aplikace tak pobezi ve skutecnem operacnim systemu.
>
>Petr Vones
Zkusim to as potom podam zpravu.
Diky
Karel Chmel
Re[2]: exception EOutOfResources
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 16.7.2002 14:47:11
Co znamena "mnohem min prostredku" kdyz ne handle? Prostor? Cas?
Jaro B.
-----Original Message-----
From: Jakub Dusek [mailto:jdev(zv)seznam(tec)cz]
Nejvice prostredku sezerou komponenty odvozene od TWinControl, cili ty
ktere maji handle okna. TLabel je potomek TGraphicControl cili sezere
mnohem min prostredku nez TEdit, coz je potomek TWinControl.
TADOQuery dynamicky
[*] Bohdan Voska <bohdan(zv)softok(tec)cz> - 16.7.2002 15:36:39
Ahoj,
function GetDataListFromDB(sql:string):TDataSet;
var
ado:TADOQuery;
begin
ado:=TADOQuery.Create(nil);
ado.Name:='myado_'+IntToStr(integer(ado)); //unikatni jmeno podle pointeru
ado.Connection:=DataModule2.ADOConnection1;
ado.SQL.SetText(PChar(sql));
ado.Open;
result:=ado.DataSource.DataSet; { Tohle je urcite spatne. Jestli chces
TDataSet tak to staci pretypovat
result :=
TDataSet(Ado); Tu funkci bych asi udelal trochu jinak. Je treba jeste po
skonceni prace s objektem ho nekde potom uvolnit. Nebylo by lepsi pouzit
TAdoDataset? }
end;
Bohdan Voska
Re[4]: exception EOutOfResources
[*] Jakub Dusek <jdev(zv)seznam(tec)cz> - 16.7.2002 15:38:20
Bavime se o GDI prostredcich na Win9x/ME. Zkus pustit Resource Meter
na Win9x/ME a
vytvorit 1000 TWinControl (primo TWinControl, zadny potomek) na
formulari. No vlastne Resource Meter nepotrebujes, protoze Windows
prestanou reagovat :) Pokud pouzijes TGraphicControl (ktere v
constructoru nevola API funkci CreateWindow) prostredky se skoro
nepohnou.
Jakub Dusek
-------------------------------------------
Homepage : http://dusek.zde(tec)cz
Phone : +420604615795
Sms email : jakub.dusek(zv)click(tec)cz
Icq : 86063232
Apps : Add/Remove Manager, Charmaper,
Sms GateKeeper
-------------------------------------------
Tuesday, July 16, 2002, 2:47:11 PM, you wrote:
BJ> Co znamena "mnohem min prostredku" kdyz ne handle? Prostor? Cas?
BJ> Jaro B.
BJ> -----Original Message-----
BJ> From: Jakub Dusek [mailto:jdev(zv)seznam(tec)cz]
BJ> Nejvice prostredku sezerou komponenty odvozene od TWinControl, cili ty
BJ> ktere maji handle okna. TLabel je potomek TGraphicControl cili sezere
BJ> mnohem min prostredku nez TEdit, coz je potomek TWinControl.
StringGrid (StringAlignGrid) a sloupce
[*] Ing. Pavel �ilinec����)b���zf���3 - 16.7.2002 15:38:04
Pokud Ti to bude stacit, tak si nastav ColWidths[IndexSloupce] na nulu
anebude videt. Samozrejme jej uzivatel ma moznost zobrazit, pokud ma
pristupne roztazeni sloupce - ale je to rychle a jednoduche reseni :)
--------
ing. Pavel Zilinec
MailTo:zilinec(zv)email(tec)cz
Prog-Soft s.r.o. Plzen
Informacni system pro vyrobce
a distributory napoju
ZS> chtel bych se zeptat jestli muzu ve StringGridu nebo v StringAlignGridu
ZS> schovat sloupec (nebo radku). Aby nebyl videt a zase ho zobrazit. Potrebuji
ZS> to dle nastaveni nejakych parametru menit a nechci pokazde vytvaret ty
ZS> sloupce nove.
ZS> Nekdy chci videt sloupce napr. Jmeno, Ulice, Mesto, Tel jindy jen Jmeno, Tel
ZS> apod.
ZS> Neni to nad zadnou db. A dat neni mnoho cca 10-30 radek a 5-8 sloupcu.
ZS> Poradte jak? Diky
ZS> Zdenek Sedlak
TADOQuery dynamicky
[*] Lstiburek Pavel <Lstiburek(zv)ceb(tec)cz> - 16.7.2002 15:49:24
> From: Sula Milos [mailto:milos.sula(zv)oku-su(tec)cz]
> Cau
> potrebuji v aplikaci vytvorit TADOQuery dynamicky a aby mi ma
> procedura vratila TDataSet pro pristup na vracena data. Mam
> to nasledovne:
>
> function GetDataListFromDB(sql:string):TDataSet;
> var
> ado:TADOQuery;
> begin
> ado:=TADOQuery.Create(nil);
> ado.Name:='myado_'+IntToStr(integer(ado)); //unikatni
jmeno
^ Tento radek je urcite zbytecny !> podle pointeru
> ado.Connection:=DataModule2.ADOConnection1;
> ado.SQL.SetText(PChar(sql));
^ Tohle jde takhle ado.SQL.Text := sql;
> ado.Open;
> result:=ado.DataSource.DataSet;
^ Do DataSource nen� nic p�i�azeno !
pravdepodobne chces result := TDataSet
> end;
>
> bohuzel nekde je error - (hlasi access violation )?
Ahoj Pavel
Spu�t�n� DOS programu
[*] Martin Fi�ar <Martin Fisar(zv)gordic(tec)cz> - 16.7.2002 15:52:58
Zdravim,
mam dotaz: Jak spustit z D6 ve W98 DOS-ovsky EXE, tak aby se mi program
pokracoval az po skonceni spusteneho EXE ?
Pouzivam:
function Exec( FLine : String) : Integer;
var
PLine : PChar;
StartUpInfo : TStartUpInfo;
Process_Information : TProcessInformation;
StartOK : Boolean;
ExitCode : DWORD;
begin
{---- spusteni modulu}
GetMem( PLine, 255);
StrPCopy( PLine, FLine);
with StartUpInfo do
begin
cb := SizeOf( StartUpInfo);
lpReserved := nil;
lpDesktop := nil;
lpTitle := nil;
dwX := 0;
dwY := 0;
dwXSize := 0;
dwYSize := 0;
dwXCountChars := 0;
dwYCountChars := 0;
dwFillAttribute := 0;
dwFlags := 0;
wShowWindow := SW_HIDE;
cbReserved2 := 0;
lpReserved2 := nil;
hStdInput := 0;
hStdOutPut := 0;
hStdError := 0;
end;
StartOK := CreateProcess( nil, PLine, nil, nil, True, 0, nil, nil,
StartUpInfo, Process_Information);
FreeMem( PLine, 255);
if WaitForInputIdle( Process_Information.hProcess, INFINITE) <> 0 then;
if not StartOK then
ShowMessageError( 'Nepoda�ilo se spustit program '+FLine, 'Spu�t�n�
souboru')
else
begin
while WaitForSingleObject( Process_Information.hProcess,
200)=WAIT_TIMEOUT do
Application.ProcessMessages;
GetExitCodeProcess( Process_Information.hProcess, ExitCode);
end;
if StartOk then
Result:= ExitCode
else
Result:= -1;
end;
ve W2k mi to funguje, ale ve W98, kde nen� automaticky po ukonceni zavrit mi
to visi dokud se
neukonci proces spousteneho EXE. Da se nejak vnutit procesu pri spusteni,
aby se po ukonceni
automaticky zavrel ?
Martin Fisar
TADOQuery dynamicky
[*] Ondrej Kelle <O.Kelle(zv)digitalpublishing.de> - 16.7.2002 16:03:35
> function GetDataListFromDB(sql:string):TDataSet;
> var
> ado:TADOQuery;
> begin
> ado:=TADOQuery.Create(nil);
> ado.Name:='myado_'+IntToStr(integer(ado)); //unikatni jmeno
> podle pointeru
> ado.Connection:=DataModule2.ADOConnection1;
> ado.SQL.SetText(PChar(sql));
> ado.Open;
> result:=ado.DataSource.DataSet;
> end;
>
> bohuzel nekde je error - (hlasi access violation )?
Myslim, ze ado.DataSource je nil. Napisal by som to cele trochu inak:
function CreateAndOpenADOQuery(AConnection: TADOConnection; const SQL:
string): TADOQuery;
begin
Result := TADOQuery.Create(nil);
try
Result.Connection := AConnection;
Result.SQL.Text := SQL;
Result.Open;
except
Result.Free;
raise;
end;
end;
Pri volani tej funkcie nezabudni vytvoreny objekt uvolnit:
with CreateAndOpenADOQuery(ADOConnection1, 'select * from mytable') do
try
while not EOF do
begin
...
Next;
end;
finally
Free;
end;
HTH
TOndrej
Vykonani SP na FB
[*] mipr(zv)volny(tec)cz - 16.7.2002 16:09:10
Muzete mi, prosim, rici vice o MSDE - hlavne jaka ma omezeni oproti
MS SQL Serveru. Diky
Michal
Vykonani SP na FB
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 16.7.2002 16:33:01
From: "Richard Kejval" <kejval.delphi(zv)centrum(tec)cz>
> kdyz prednasel o FB. Slo o to, ze skupina ruskych programatoru prepsala FB
> jen pro platformu WinNT a vykon se mnohonasobne zvysil. Bohuzel to bylo na
To je presne to o cem jsem tu psal. Pekna ukazka toho, jak je ono zaklinadlo
multiplatformniho vyvoje ve skutecnosti problematicke a nevedouci k idealnimu
reseni. Podobny priklad je treba i Qt a CLX.
> ukor toho, ze jiny operacni system nepodporovala a ta vylepseni se nedala do
> Open Source FB pouzit, protoze je stanoveno, ze bude multiplatformni. Skoda
Multiplatformni prece znamena, ze bezi na vice platformach. Na kazde platforme
muze (musi ?) byt kod zcela odlisny, pouze navenek bude funkce stejna. Ano, je
to daleko vic prace, ale zaroven je to jedine kvalitni reseni.
> Pokud nekdo nepovazuje za dulezitou vlastnost to, ze DB bezi i na jinem
> serverovem OS nez je Win, tak je to jeho problem, ale pro me je to
> dulezitejsi nez nejake mouchy v optimalizaci SQL prikazu. Protoze o to v
Zajimave je, ze tyhle "mouchy" se tu ne zridka probiraji, takze to asi tak
nepodstatne nebude.
> teto diskuzi nejdrive slo. Ale uz bych to skoro ukoncil, protoze tu stejne
> nikdo nezverejnil nejake vysledky serioznich vykonovych testu a takova ta
> tvrzeni, ze MS SQL je 10 x vykonejsi nez FB, jen proto, ze je od Microsoftu,
> mi pripadaji prinejmensim neseriozni.
To je pravda. Mozna by to tvrzeni slo trochu zobecnit, je (pravdepodobne)
vykonnejsi proto, ze je psan tak jak by psan byt mel - sity na miru platforme
na ktere bezi. To je myslim to o co tu slo, a ne o to jestli je od Microsoftu
nebo kohokoli jineho.
Petr Vones
Spu�t�n� DOS programu
[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 16.7.2002 17:09:25
> ve W2k mi to funguje, ale ve W98, kde nen� automaticky po
> ukonceni zavrit mi to visi dokud se neukonci proces
> spousteneho EXE. Da se nejak vnutit procesu pri spusteni,
> aby se po ukonceni automaticky zavrel ?
zkus vyrobit nejaky pif a zatrhnout "po dokonceni zavrit",
nebo jak to tam je. dej vedet.
peca
NT prava
[*] Delphi - konference <Delphikonf(zv)pilscom(tec)cz> - 16.7.2002 17:18:09
> ----------
> From: Jan Netrval
> Sent: Tuesday, July 16, 2002 5:18:09 PM
> To: Delphi - konference
> Subject: NT prava
> Auto forwarded by a Rule
>
Ahoj
Mam takovy problem. Potreboval bych nejakym zpusobem zjistit NT prava na
zadany soubor(adresar) a popripade je i menit (mam-li na to pravo). Nasel
jsem nejakou komponentu ale ta nedokaze zjistit ze prava jsou zdedena z
nadrazeneho adresare coz se mi moc nehodi. Staci pro Win200 popripade WIN NT
A kdyz uz jsem v tom tak by se mi i hodilo zjistit zda je adresar sdileny a
kdyz ano, tak komu a jak.
Predem diky
Honza
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.377 / Virov� b�ze: 211 - datum vyd�n�: 15.7.2002
jak na WParam v D6
[*] bleak <bleak(zv)atlas(tec)cz> - 16.7.2002 17:50:43
zdravim,
D6 mi nebere Message.WParam, v helpu je uvedeno neco jako: pokud chcete
pouzit parametry zprav ve "starem" stylu, pouzijte jmena parametru zpravy.
Jenze ja nevim jake jsou parametry pro zpravu WM_NCPAINT, v API helpu je
pouze toto:
WM_NCPAINT
hrgn = (HRGN) wParam; // handle of update region
Prosim o prikladek.
bleak
Vykonani SP na FB
[*] Jan Krizek <krizek(zv)vitasw(tec)cz> - 16.7.2002 17:58:59
Hlavne databaze muze mit maximalne 2GB (ale na jednom pocitaci jich muze
byt vice) a pokud se pripoji vice nez 5 vzdalenych klientu (pocitacu),
tak se server umele zpomali.
Pak k MSDE neni zadny spravcovsky nastroj - vse musis delat ze sve
aplikace, nebo vzdalene.
A nema interaktivni instalak.
Podrobneji v MSDN.
Honza +
> -----Original Message-----
> From: mipr(zv)volny(tec)cz [mailto:mipr(zv)volny(tec)cz]
> Sent: Tuesday, July 16, 2002 4:09 PM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: RE: Vykonani SP na FB
>
>
> Muzete mi, prosim, rici vice o MSDE - hlavne jaka ma omezeni oproti
> MS SQL Serveru. Diky
> Michal
>
>
Detekce pripojeni & Wininet
[*] Frankie Y <frankie.y(zv)seznam(tec)cz> - 16.7.2002 19:14:07
Ahoj,
hledal jsem nejake zdrojove kody pro detekci pripojeni k internetu. Nasel
jsem vsak jen takove, ktere kontroluji IP adresu nebo vyuzivaji RAS. Pote
jsem nahodou narazil, ze k danemu ucelu lze vyuzit i fci
InternetGetConnectedState z Wininet. Zajima me, proc to zadne komponenty
nevyuzivaji. Ma to nejake nevyhody? Jak to vlastne funguje?
Frankie
databaze pro Free projekt
[*] Petr Fejfar <development(zv)callnet(tec)cz> - 16.7.2002 19:51:16
From: "Martin Schayna" <mschayna(zv)aktis(tec)cz>> A zkousel jsi to na SQLite pri 'pragma synchronous=OFF'?
Jo zkousel, ale IMHO to zadny podstatny vliv nema
> U me: 1 milion insertu = 2 minuty 58 sekun (Celeron 433MHz).
Tak jsem to pustil schvalne jeste jednou a stopnul po 2m58s (podotykam, ze
to je cisty cas DB operaci bez zbytku ostatniho cyklu - je v tom jen drobny
overhead s merenim casu.
Za tu dobu jsem vlozil neco mezi 5400 az 5500 zaznamu a prumerny cas na
insert byl pro poslednich 100 recordu cca 150 ms (zatimco ze zacatku
transakce se pohyboval kolem 6 ms (!)). Pro zajimavost jeste cas na insert
ke konci 2.5 mil. serie: kolem 1.2 sekundy.
Takze tim to nebude.
***
IMHO je to poctem indexu: vedle PK mam jeste dalsich 5 indexu na tabulce
(kdyz jsem meril na IB, tak jsem tech indexu me 10). Tabulka ma 13 sloupcu,
prumernou delku SQL commandu predavaneho do sqlite_exec odhaduji na 280
znaku.
> ale i presto si myslim ze SQLite je velice dobry SQL enginek...
Souhlasim, pro male veci urcite.
Bye, pf
databaze pro Free projekt
[*] Petr Fejfar <development(zv)callnet(tec)cz> - 16.7.2002 19:53:33
From: "Milan Tomes" <milan.tomes(zv)haida(tec)cz>
> Zrovna nedavno jsem delal neco podobneho -
> do tabulky na IB jsem vkladal 2,5
> mil. zaznamu a trvalo to cca. 2hod. Mozna to bude vykonosti serveru
Myslim, ze vykon server neni az tak vyznamny a ze ten cas bude daleko vic
ovlivnovat pocet indexu - ja jich mel 10, 5 ascending a 5 descending.
Bye, pf
Detekce pripojeni & Wininet
[*] Jakub Dusek <jdev(zv)seznam(tec)cz> - 16.7.2002 20:27:43
Pouzivam to taky. Nevyhoda je ze to vyzaduje knihovnu wininet.dll
(soucast IE) a podle zkusenosti je to taky celkem nespolehlive. Nevim
cim to je ale na nekterych konfiguracich to detekuje spatne. Ale
totalne spolehliva neni asi zadna metoda... Aspon o zadne nevim :)
Jakub Dusek
-------------------------------------------
Homepage : http://dusek.zde(tec)cz
Phone : +420604615795
Sms email : jakub.dusek(zv)click(tec)cz
Icq : 86063232
Apps : Add/Remove Manager, Charmaper,
Sms GateKeeper
-------------------------------------------
Tuesday, July 16, 2002, 7:14:07 PM, you wrote:
FY> Ahoj,
FY> hledal jsem nejake zdrojove kody pro detekci pripojeni k internetu. Nasel
FY> jsem vsak jen takove, ktere kontroluji IP adresu nebo vyuzivaji RAS. Pote
FY> jsem nahodou narazil, ze k danemu ucelu lze vyuzit i fci
FY> InternetGetConnectedState z Wininet. Zajima me, proc to zadne komponenty
FY> nevyuzivaji. Ma to nejake nevyhody? Jak to vlastne funguje?
FY> Frankie
Vykonani SP na FB
[*] Erik Salaj <winsoft(zv)stonline.sk> - 16.7.2002 20:55:19
> >za 4000,- Sk bez DPH kupim Visual C#.Net Standard s MSDE
>
> nevim za kolik a kde se prodava MSDE, ale
MSDE dostanes povedzme k tomu Visual C#.Net Standard,
hovori sa aj o tom, ze MSDE bude priamo sucastou Windows,
ale zatial to tak nie je. MSDE je aj v .Net SDK,
ktore je volne stiahnutelne ale predpokladam, ze
toto MSDE sirit nie je mozne.
> FB je zdarma i bez Delf a zapocitavat cenu delphi
> k reseni s FB je dost nefer.
ja na tom nevidim nic nefer. Zrejme zakaznikovi
nestaci iba SQL server ale potrebuje aj program
(klienta), takze podla mna je viac ferove uvadzat
cenu celeho riesenia. Visual C#.Net a Delphi
su podla mna porovnatelne riesenia. Este v tom
nie je zapocitana cena programovania, ale tu
vopred urcit neviem.
> nehlede na to, ze at uz jakekoli reseni, tak v teto
> konferenci se primarne predpoklada pouziti delphi,
> pripadne delphi + neco, rekneme tedy:
> delphi + MSDE vs delphi + FB
pokial existuje vyhodnejsie riesenie, tak nevidim
dovod trvat na Delphi
> me osobne se nezdarilo na MSDE pracovat s delphi pro.
> nebylo jak vytvorit DB, jak se pripojit k DB, jak
> spravovat DB, to vse mam k FB jako opensource projekty.
> my jsme koupili developer verzi ofisu s tim, ze MSDE
> lze sirit zdarma. ale vyvijet neco delphi + MSDE se
> s tim opravdu nedalo. koupit si delphi C/S a MSSQL7
> by se nam zase dost financne nevyplatilo...
ak mas developer verziu Office, tak s MSDE pracujes
pomocou MS Access-u. Pre vyvojarov sa dodava
automaticky MSSQL (predpokladam, ze tak to je
aj pre VC#.Net) s Management Console. Visual Studio
ma dokonca zabudovane administratorske nastroje
pre SQL server priamo v IDE, takze ani nie je potrebne
sa prepinat do SQL konzoly. Plus mozes programovo
pomocou SQLDMO robit vsetko to, co aj z konzoly.
Erik
Vykonani SP na FB
[*] Erik Salaj <winsoft(zv)stonline.sk> - 16.7.2002 20:57:24
> - Delphi 6 Personal Edition
> - Firebird
> - IBO
>
> A mam to zadarmo :-)
to ano ale len pre seba, zakaznikovi program
urobeny v D6 Personal dat nemozes
Erik
exception EOutOfResources
[*] Petr Fejfar <development(zv)callnet(tec)cz> - 16.7.2002 21:32:04
From: "CHMEL Karel, Mgr." <kchmel(zv)csob(tec)cz>
> Zdroju tam je 83%. Nemohlo by to byt ovlivneno i tim, > ze to je 16bitova
aplikace?
No ale tos mel napsat hned, ze je to v D1 :-(
Tam se to resilo nastavenim velikosti lokalniho
heapu alokovaneho v ramci data segmentu pro edit controls a listboxy -
podivej se na popis direktivy prekladace $M - druhy parametr - HeapSize.
Kdyz ho zvetsis, tak by to Tvuj problem melo vyresit.
HTH, pf
jak na WParam v D6
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 16.7.2002 22:52:34
From: "bleak" <bleak(zv)atlas(tec)cz>
> D6 mi nebere Message.WParam, v helpu je uvedeno neco jako: pokud chcete
> pouzit parametry zprav ve "starem" stylu, pouzijte jmena parametru zpravy.
> Jenze ja nevim jake jsou parametry pro zpravu WM_NCPAINT, v API helpu je
Patrne mas namysli TWMNCPaint
Petr Vones
Nacteni souboru urcite pripony z daneho adresare
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 16.7.2002 22:55:22
From: "Ing. Jiri SOKOL" <JS-delphi(zv)seznam(tec)cz>
> "Nacteni souboru urcite pripony z daneho adresare" do nejakeho StringListu?
Pokud jde o nacteni jmen techto souboru tak BuildFileList z unitu JclFileUtils
v JCL: http://delphi-jedi.org/Jedi:CODELIBJCL
Petr Vones
Usporny rezim Windows
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 16.7.2002 23:41:51
From: "Frankie Y" <frankie.y(zv)seznam(tec)cz>
> jak lze (programove) prepnout Windows do usporneho rezimu?
Podivej se na API funkci SetSystemPowerState a celou kategorii "Power
Management Functions"
Petr Vones
Aplikacni server dbOvernet a spol.
[*] Leos Urban <Leos.Urban(zv)iol(tec)cz> - 16.7.2002 23:48:26
Ahoj,
co byste pouzili pro prepsani stavajici aplikace s tlustymi klienty (2
vrstvy) na middleware (3+ vrstvy )?
Na internetu jsem nasel Midware (jen nekomercni pouziti), Asta (pouzivate
nekdo?), DbOvernet (podezrele stare datumy na serveru), NetServer a MIDAS
(nemam Enterprise).
Za kazdy napad predem dekuji.
Leos
Vykonani SP na FB
[*] miromr <preas_w(zv)stonline.sk> - 17.7.2002 00:21:28
Ahoj,
a ako je to u MSDE s licenciami?
Neviem ci to este plati ale kedysi ked som sa o to zaujimal bola MSDE
vpodstate vyvojarska zalezitost s tym , ze ten kto mal napr. Office
developer, resp. iny nastroj mohol na tom vyvyjat aplikacie a pripadne
tieto sirit avsak len pre najviac 5 uzivatelov. Pre viac ako tento pocet
bolo treba uz riadnu MS SQL. (Ta verzia co bola s developerom ta sa vtej
dobe urcite nesmela sirit - mala sluzit ciste na vyvoj a ta co bola s Office
Premium aleboi VisualStudiomta sa mohla aj sirit). Neviem ci to este plati
ale takto to pred casom nejak bolo. Ak tieto podmienky este platia tak potom
debatovat o MSDE v porovnani s FB je absolutne bezpredmetne.
Myslim ze debata o tom ci sa niekomu lepsie robi s MS SQL alebo FB tiez nema
zmysel. Kazdy bude trvat na tom ze lepsie je to s cim on pracuje a co ma
nastudovane.
miro
Vykonani SP na FB
[*] Otisk Rene <otisk(zv)misel(tec)cz> - 17.7.2002 07:07:45
Jenom jeste poznamenam
Ohledne rucni optimalizace treba joinu nebo kartezskych soucinu, tak u IB
jsem mohl ovlivnit rychlost v desitkach az stovkach procent cca 5 min vs.
1,2 sec (poradi tabulek, slozene indexy...), u MS SQL to tak drasticke
nikdy nebylo (lepe receno se mi to nikdy nestalo)
Sroub
> Delal jsem nekolik projektu v D3 na MSSQL resp. MSDE 1.0 pres
> ODBCe a vse bylo OK, takze neschopnost pripojit se k DB, vytvoreni
> metadat, sprava atd bych asi hledal nekde jinde....
OK, myslim, ze z cele debaty vyplyva, ze nic se neji tak horke,
jak se to uvari (snad s vyjimkou caje ;). uznava, ze v dobe, kdy
jsme vybirali nejaky vhodny a pro uzivatele cenove pristupny (nejlepe
zdarma) SQL server, jsem o praci se SQL servery vedel velky prd.
s tim prdem jsem v pohode nainstaloval MSDE i IB6, ale solidne
neco delat jsem zvladl jenom na IB6. mozna to bylo diky nativnim
komponentam pro IB6 primo v Delphach. ted uz si to presne nevybavim,
je to 2 roky zpatky. klonil bych se k tomu, abysme debatu ukoncili.
cele to zacalo tim, ze pro FB/IB je potreba dotazy optimalizovat
rucne, ale podle toho, co jsem cetl o MSSQL (mistrovstvi MSSQL 6.5),
tak je to dost podobny i na MSSQL, nevim, jak ted na serveru 7 ci 2000.
z ostatnich mejlu mam pocit, ze kazdy SQL server ma sva specifika a
vyzaduje znacnou znalost a praxi vyvojare. navic si myslim, ze jenom
malokdo ma dostatecne velke a srovnatelne zkusenosti s vice servery,
nez s tim svym, pripadne trochu jeste jeden. ale asi nikdo z nas nemuze
opravdu kvalifikovane porovnavat servery tak, ze by pro kazdy byl
schopen
zplodit stejnou databazi _maximalne_ optimalizovanou pro MSSQL, Oracle,
IB/FB (a ty se asi brzy dost rozjedou), SQLAnywhere, Informix....
ma potom smysl se takto dohadovat? prijde mi to tak trochu jako zabomysi
valka. predpokladam, ze kazdy je schopen si vybrat reseni, ktere mu
vyhovuje.
s nimz je spokojeny. novacek se bohuzel musi proplacat uvodnima
porodnima
bolestma a projit si svuj krest ohnem...
nejlepe si myslim bude, kdyz si nadale budem radit jak napsat dotaz lepe
na tom kterem serveru, protoze na konkretni jeden server se tu vzdy par
odborniku najde :o)
dekuji peca
Vykonani SP na FB
[*] Otisk Rene <otisk(zv)misel(tec)cz> - 17.7.2002 07:16:27
Mno jeste existuje takova berlicka pro MSDE jako je trivrstva architektura a
jak tady onehda padlo univerzaklni heslo do databaze a zabezpeceni na
stredni vrstve. Ja jsem kdysi zkousel 30 connections (separeconnect
TODBCQuery) z kazde z peti mashinek a jelo to rychlostne jako kdyby tam byl
z kazde connection jen jeden. Podle me MSDE bere odkud se ten klient hlasi
(z jake stanice), a pokud sosa data stredni vrstva z jedne mashinky...
Nicmene mi to pripada trosku ceske reseni a nikdy jsem se nedostal za ramec
zkouseni pripadne jestli to umoznuje licencni ujednani...
Sroub
> Ahoj,
> a ako je to u MSDE s licenciami?
> Neviem ci to este plati ale kedysi ked som sa o to zaujimal bola MSDE
> vpodstate vyvojarska zalezitost s tym , ze ten kto mal napr. Office
> developer, resp. iny nastroj mohol na tom vyvyjat aplikacie a pripadne
> tieto sirit avsak len pre najviac 5 uzivatelov. Pre viac ako tento pocet
> bolo treba uz riadnu MS SQL. (Ta verzia co bola s developerom ta sa vtej
> dobe urcite nesmela sirit - mala sluzit ciste na vyvoj a ta co bola s
Office
> Premium aleboi VisualStudiomta sa mohla aj sirit). Neviem ci to este plati
> ale takto to pred casom nejak bolo. Ak tieto podmienky este platia tak
potom
> debatovat o MSDE v porovnani s FB je absolutne bezpredmetne.
>
> Myslim ze debata o tom ci sa niekomu lepsie robi s MS SQL alebo FB tiez
nema
> zmysel. Kazdy bude trvat na tom ze lepsie je to s cim on pracuje a co ma
> nastudovane.
>
> miro
jak na WParam v D6
[*] Milan Tomes <milan.tomes(zv)haida(tec)cz> - 17.7.2002 07:55:28
Podivej se na strukturu recordu TWMNCPaint v unite Messages
S pozdravem
Milan Tomes
mailto:milan.tomes(zv)haida(tec)cz
> ano, a jak tedy vytahnout parametry te zpravy?
>
> Patrne mas namysli TWMNCPaint
>
> Petr Vones
>
>
Vykonani SP na FB
[*] Richard Kejval <kejval.delphi(zv)centrum(tec)cz> - 17.7.2002 08:22:31
> To je pravda. Mozna by to tvrzeni slo trochu zobecnit, je (pravdepodobne)
> vykonnejsi proto, ze je psan tak jak by psan byt mel - sity na miru
platforme
> na ktere bezi. To je myslim to o co tu slo, a ne o to jestli je od
Microsoftu
> nebo kohokoli jineho.
O to tady prave vubec neslo. Slo o to, ze pokud napr. moji zakaznici se
rozhodnou,
ze na serveru bude nainstalovan Linux, ktery poridi zdarma a FB bude bez
problemu
fungovat, tak jsem ochoten akceptovat i jakesi snizeni vykonu na platforme
win,
protoze to snizi dalsi naklady na pouziti meho softu a pokud zakaznik ma
radove
desitky serveru urcite uznas, ze jeho naklady se snizi celkem dosti vyrazne,
ale to
jaksi nekteri lidi od microsoftu neradi slysi. Az bude MS SQL server,
prepsan i pro
jinou platformu, pak se o tom muzeme dal bavit a je mi uplne jedno, jestli
investuje
do vyvoje tak, ze bude mit zdroje stejne pro vsechny platformy, nebo pro
kazdou
zvlast, ale to se asi trosku prodrazi, co ? ;-)
Vykonani SP na FB
[*] Richard Kejval <kejval.delphi(zv)centrum(tec)cz> - 17.7.2002 08:34:49
> MSDE dostanes povedzme k tomu Visual C#.Net Standard,
> hovori sa aj o tom, ze MSDE bude priamo sucastou Windows,
> ale zatial to tak nie je. MSDE je aj v .Net SDK,
> ktore je volne stiahnutelne ale predpokladam, ze
> toto MSDE sirit nie je mozne.
>
> > FB je zdarma i bez Delf a zapocitavat cenu delphi
> > k reseni s FB je dost nefer.
>
> ja na tom nevidim nic nefer. Zrejme zakaznikovi
> nestaci iba SQL server ale potrebuje aj program
> (klienta), takze podla mna je viac ferove uvadzat
> cenu celeho riesenia. Visual C#.Net a Delphi
> su podla mna porovnatelne riesenia. Este v tom
> nie je zapocitana cena programovania, ale tu
> vopred urcit neviem.
Co takhle propustit cely vyvojovy tym a prijmout nove programatory co
ovladaji
Visual C#.Net Standard, ale jaksi nevi nic o stavajicim projektu. Opravdu
skvostne
reseni ? ;-)
Jak je to u MSDE s max. poctem pripojenych uzivatelu, mel jsem za to, ze v
praxi pouzitelne
je to jen do 5, coz se mi zda, ale opravdu malo.
Vykonani SP na FB
[*] Richard Kejval <kejval.delphi(zv)centrum(tec)cz> - 17.7.2002 08:46:44
>
> > Zaver :
> > Pomer Cena / vykon u FB je zatim bezkonkurencni
>
> ??? z coho a ako robis taketo zavery je mi naozaj zahadou
Jak uz jsem tady uvedl pracujeme s rozsahlou DB v prirustku 1-2 G za rok
u nekterych zakazniku a protoze u FB cena = 0 a vykon i pro tuto DB zatim
velmi svizny (ikdyz na zacatku projektu byly mirne obavy), myslim ze si toto
tvrzeni mohu dovolit.
Sdileni tabulek ciselniku
[*] "Netu�il, Roman, Ing." - 17.7.2002 09:24:54
Panove, mam dotaz.
Podilim se na integraci systemu, ktery predstavuje nekolik do teto doby
vice-mene autonomnich databazovych aplikaci. Cilem je dosahnout maximalni
mozne miry integrace celeho systemu. Chci se dotazat na vasi zkusenost, zda
je lepsi tabulky se spolecnymi ciselniky sdilet vsemi ostatnimy systemy pro
dosazeni maximalni miry konzistence dat, nebo tyto tabulky pouzit pouze jako
zdrojove a data odtud importovat do ostatnich databazi pouze v pripade zmeny
ciselniku. Jak to bude s vykonem v pripade prvniho reseni?
Cely system je ne platforme MS SQL2000.
Roman
Vykonani SP na FB
[*] Z�le��k Tom� <tomas.zalesak(zv)lcs(tec)cz> - 17.7.2002 09:29:45
> Jak je to u MSDE s max. poctem pripojenych uzivatelu, mel
> jsem za to, ze v praxi pouzitelne je to jen do 5, coz se
> mi zda, ale opravdu malo.
vykopirovano z newsgrupy o MSDE na Microsoftim webu
(news://news.microsoft.com/microsoft.public.sqlserver.msde)
The nature of the MSDE workload governor is discussed in the following topic
in the SQL Server 2000 Books Online: SQL Server 2000 Databases on the
Desktop. The 'two editions' referenced in the text are Desktop Engine (aka
MSDE) and Personal Edition. The description is:
***************
A concurrent workload governor limits the performance of the database engine
in these two editions. The performance of individual Transact-SQL batches is
decreased when more than five batches are executed concurrently. The amount
each batch is slowed down depends on how many batches over the five-batch
limit are executing concurrently, and the amount of data retrieved by the
individual batches. As more batches are executed concurrently, and as more
data is retrieved by each batch, the more the governor slows down the
individual batches. You can use the DBCC CONCURRENCYVIOLATION statement to
report how often the concurrent workload governor is activated. For more
information, see DBCC CONCURRENCYVIOLATION.
*****************
You can have 10,000 connections and never invoke the governor so long as the
database engine never gets more than 5 batches execute at the same time.
Also, if you only go over the limit by a small number of batches, then the
performance will probably not drop a lot, especially of the batches do not
generate a lot of IO to the database files, either because they don't access
a lot of data, or the data is already in the buffer cache.
With this type of system, there is no hard and fast rule for who will see
performance drop off, and who won't. It depends on both how many batches
over 5 will be executed concurrently, and how much data those batches need
to read or write from disk. If you only have 6-8 concurrent batches that
don't access much data, then the effect is probably going to be light. If
you execute 50 batches at once and they all do heavy table scans, then
you'll likely see a performance drop off.
To same plati pro MSDE 1.0 (odvozeno z MSSQL7) az na to, ze MSDE1 nema
prikaz DBCC CONCURRENCYVIOLATION, kterym muzes sledovat statistiku
prekroceni limitu 5-ti (8-mi pro Personal Edition) soucasne bezicich davek.
Tomas Zalesak
databaze pro Free projekt
[*] Tomas Michalik <michalik(zv)proca(tec)cz> - 17.7.2002 08:43:45
Ahoj,
Petr Fejfar wrote:
>
> From: "Milan Tomes" <milan.tomes(zv)haida(tec)cz>
>
> > Zrovna nedavno jsem delal neco podobneho -
> > do tabulky na IB jsem vkladal 2,5
> > mil. zaznamu a trvalo to cca. 2hod. Mozna to bude vykonosti serveru
>
> Myslim, ze vykon server neni az tak vyznamny a ze ten cas bude daleko vic
> ovlivnovat pocet indexu - ja jich mel 10, 5 ascending a 5 descending.
Zejmena zalezi na selektivite indexu, budes-li mit index selektivni jako
primarni klic (1 zaznam v indexu=1 zaznam v tabulce), moc zdrzovat
nebude. Naopak index na sloupci, ve kterem se vyskytuji jen dve mozne
hodnoty, bude pri INSERT/UPDATE/DELETE operacich pusobit jako brzda.
Stale jeste jsem si sam pro sebe neudelal testovaci aplikaci, ale u
takovych indexu by melo pomoct pridani dalsiho pole tak, aby se
selektivita zlepsila.
Tom
=================================
Tomas Michalik
ProCA, s. r. o.
V Luzich 818, Praha 4
Czech Republic
e-mail: michalik(zv)proca(tec)cz
tel: +420 2 67283446
Vykonani SP na FB
[*] Lstiburek Pavel <Lstiburek(zv)ceb(tec)cz> - 17.7.2002 09:50:30
> From: Richard Kejval [mailto:kejval.delphi(zv)centrum(tec)cz]
> Jak je to u MSDE s max. poctem pripojenych uzivatelu, mel
> jsem za to, ze v
> praxi pouzitelne
> je to jen do 5, coz se mi zda, ale opravdu malo.
>
Pocet pripojeni neni omezen, omezen je pocet soucasne jedoucich jobu na 5
(pozor dva si alokuje sam server), ostatni musi cekat. Dle nasich zkusenosti
(a kupodivu i dle udaju ktere jsem videl v testech) je pokles vykonu pomerne
maly a MSDE muze snadno souperit s jednoprocesorovym serverem. Pri poctu
uzivatelu do cca 10-15 nejsou problemy. Nejvice omezuje mnozstvi prenasenych
dat.
Pavel
Rovnake formy v dvoch projektoch
[*] Roland Turcan <rolo(zv)sedas.sk> - 17.7.2002 10:03:09
Hello Delphi CZ konferencia!
Vyvijam dva programy, kde sa pouziva napr. jedno okno v 1. projecte
plnohodnostne, ale v 2. uz sa musi obmedzovat.
Moja predstava je ze ci sa da a ako nastavit nieco taketo:
If ProjectNo=1 then
begin
///Tu robim vsetko ako pre project 1
end else
begin
///Tu robim veci ako pre project 2
end;
To najjednodusie riesenie rozlisovat podla nazvu spustitelneho suboru
sa mi nepaci, skor ako directiva pre kompilator, ze by do kazdeho
projectu zaradil to co pouziva a nie obe varianty kodu.
Myslim, ze ani riesenie cez globalnu premennu tiez nie je prave
orechove.
Dakujem.
--
Best regards, TRoland
Sdileni tabulek ciselniku
[*] Ing. Pavel �ilinec����)b���zf���3 - 17.7.2002 10:06:48
Do ostatnich databazi....
Nejlepsi je pouzit jednu databazi a v ni pak neni problem, pze tam
bude prave jeden takovy ciselnik, na ktery budou vsechny ostatni
navazane.
Pokud bych to mel ve vice databazich, asi bych to spolecne nesdilel,
pze pak se pri nejake nahle zmene struktury daneho ciselniku musi
rychle prekopat vsechny dane databaze, aby to vsude porad fungovalo.
--------
ing. Pavel Zilinec
MailTo:zilinec(zv)email(tec)cz
Prog-Soft s.r.o. Plzen
Informacni system pro vyrobce
a distributory napoju
NRI> Panove, mam dotaz.
NRI> Podilim se na integraci systemu, ktery predstavuje nekolik do teto doby
NRI> vice-mene autonomnich databazovych aplikaci. Cilem je dosahnout maximalni
NRI> mozne miry integrace celeho systemu. Chci se dotazat na vasi zkusenost, zda
NRI> je lepsi tabulky se spolecnymi ciselniky sdilet vsemi ostatnimy systemy pro
NRI> dosazeni maximalni miry konzistence dat, nebo tyto tabulky pouzit pouze jako
NRI> zdrojove a data odtud importovat do ostatnich databazi pouze v pripade zmeny
NRI> ciselniku. Jak to bude s vykonem v pripade prvniho reseni?
NRI> Cely system je ne platforme MS SQL2000.
NRI> Roman
Rovnake formy v dvoch projektoch
[*] Petr Brant <brant(zv)dcomm(tec)cz> - 17.7.2002 10:13:27
Mam podobny problem a resil jsem ho k plne spokojenosti tak, ze jsem v tride
toho okna zavedl public promennou, jejiz hodnota znamenala volani z jednoho
nebo z druheho projektu. Na zaklade teto hodnoty se v tom formu provedlo to,
co je treba (disablovani nekterych controlu apod). Funguje to bez problemu.
RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
http://web.redbox(tec)cz/petr.brant
ICQ #68652380
D&COMM s.r.o.
Korunova�n� 6
170 00 Praha 7
> Subject: Rovnake formy v dvoch projektoch
>
> Vyvijam dva programy, kde sa pouziva napr. jedno okno v 1. projecte
> plnohodnostne, ale v 2. uz sa musi obmedzovat.
> Moja predstava je ze ci sa da a ako nastavit nieco taketo:
>
> If ProjectNo=1 then
> begin
> ///Tu robim vsetko ako pre project 1
> end else
> begin
> ///Tu robim veci ako pre project 2
> end;
>
> To najjednodusie riesenie rozlisovat podla nazvu spustitelneho suboru
> sa mi nepaci, skor ako directiva pre kompilator, ze by do kazdeho
> projectu zaradil to co pouziva a nie obe varianty kodu.
> Myslim, ze ani riesenie cez globalnu premennu tiez nie je prave
> orechove.
Rovnake formy v dvoch projektoch
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 17.7.2002 10:21:30
On 17 Jul 2002 at 10:03, Roland Turcan wrote:
> Hello Delphi CZ konferencia!
>
> Vyvijam dva programy, kde sa pouziva napr. jedno okno v 1. projecte
> plnohodnostne, ale v 2. uz sa musi obmedzovat. Moja predstava je ze ci
> sa da a ako nastavit nieco taketo:
>
> If ProjectNo=1 then
> begin
> ///Tu robim vsetko ako pre project 1
> end else
> begin
> ///Tu robim veci ako pre project 2
> end;
{$DEFINE Project1}
{$IFDEF Project1} ...
S pozdravem
Zbysek Hlinka
Vykonani SP na FB
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 17.7.2002 10:21:30
On 17 Jul 2002 at 7:16, Otisk Rene wrote:
> Mno jeste existuje takova berlicka pro MSDE jako je trivrstva
> architektura a jak tady onehda padlo univerzaklni heslo do databaze a
> zabezpeceni na stredni vrstve. Ja jsem kdysi zkousel 30 connections
> (separeconnect TODBCQuery) z kazde z peti mashinek a jelo to
> rychlostne jako kdyby tam byl z kazde connection jen jeden. Podle me
> MSDE bere odkud se ten klient hlasi (z jake stanice), a pokud sosa
> data stredni vrstva z jedne mashinky...
>
> Nicmene mi to pripada trosku ceske reseni
Napriklad takovy MIDAS byl sveho casu napsan prave z techto duvodu.
Jenze vyrobci databazi zmenili licencovani na obrazovku, namisto na
pripojeni, takze zakaznik pak v dusledku zaplatil sveho casu o 200
tacu navic za MIDAS.
S pozdravem
Zbysek Hlinka
OT: Disable routing na Windows NT 4.0 SERVER SP 6a
[*] Petr Mat�j��ek - Delphi <delphi(zv)kjm(tec)cz> - 17.7.2002 10:56:03
Zdravim,
nevite jak vypnout routing na WINDOWS NT 4.0 SERVER SP 6a ? Na WINDOWS NT
4.0 SERVER SP 5 vysel nejaky FIX (doufam, ze resi muj problem), ale na SP 6a
se mi to nedari zrusit, po restartu je routing zase zapnuty.
Diky
Petr Matejicek
Rovnake formy v dvoch projektoch
[*] Jan Krizek <krizek(zv)vitasw(tec)cz> - 17.7.2002 10:57:51
Lze pouzit podminenou kompilaci a to tak, ze u kazdeho projektu nastavis
(Project>Options>Directories/Conditionals) do policka Conditional
defines identifikator projektu (napr. Project1).
Ve zdrojaku pak pouzijes
{$IFDEF Project1}
....kod pro projekt 1
{$ELSE}
... kdo do ostatnich projektu
{$ENDIF}
Bohuzel v prostredi Delphi a jejich Formularu to ma par nevyhod
- zaprve nelze pouzit v DFM, tedy formular mas definovan stejne a
pripadne zmeny musis delat napr. v OnCreate
- zadruhe nelze pozdeji rozdelit aplikaci na balicky ve kterych by byly
ty spolecne formulare, protoze vsechno co das do balicku, tak musi pro
obe aplikace byt ze stejneho zdrojaku.
Takze ja napr. postupne prechazim u formularu na jejich rozdeleni do
Frame a ty mam spolecne (vetsinou pouze s udelanim property ReadOnly,
kterou nastavuji zda zrovna v tomto zobrazeni maji byt policka
editovatelna, nebo ne).
Honza +> -----Original Message-----
> From: Roland Turcan [mailto:rolo(zv)sedas.sk]
> Sent: Wednesday, July 17, 2002 10:03 AM
> To: Delphi CZ konferencia
> Subject: Rovnake formy v dvoch projektoch
>
>
> Hello Delphi CZ konferencia!
>
> Vyvijam dva programy, kde sa pouziva napr. jedno okno v 1. projecte
> plnohodnostne, ale v 2. uz sa musi obmedzovat.
> Moja predstava je ze ci sa da a ako nastavit nieco taketo:
>
> If ProjectNo=1 then
> begin
> ///Tu robim vsetko ako pre project 1
> end else
> begin
> ///Tu robim veci ako pre project 2
> end;
>
> To najjednodusie riesenie rozlisovat podla nazvu spustitelneho suboru
> sa mi nepaci, skor ako directiva pre kompilator, ze by do kazdeho
> projectu zaradil to co pouziva a nie obe varianty kodu.
> Myslim, ze ani riesenie cez globalnu premennu tiez nie je prave
> orechove.
>
> Dakujem.
> --
> Best regards, TRoland
>
>
Rovnake formy v dvoch projektoch
[*] Ondrej Kelle <O.Kelle(zv)digitalpublishing.de> - 17.7.2002 11:00:56
> Vyvijam dva programy, kde sa pouziva napr. jedno okno v 1. projecte
> plnohodnostne, ale v 2. uz sa musi obmedzovat.
> Moja predstava je ze ci sa da a ako nastavit nieco taketo:
>
> If ProjectNo=1 then
> begin
> ///Tu robim vsetko ako pre project 1
> end else
> begin
> ///Tu robim veci ako pre project 2
> end;
>
> To najjednodusie riesenie rozlisovat podla nazvu spustitelneho suboru
> sa mi nepaci, skor ako directiva pre kompilator, ze by do kazdeho
> projectu zaradil to co pouziva a nie obe varianty kodu.
Mozes pouzit direktivy pre podmienenu kompilaciu.
{$IFDEF PROJECT2}
// kod pre project 2
{$ELSE}
// kod pre project 1
{$ENDIF}
Premennu kompilatora PROJECT2 si mozes definovat v Project Options
"Conditional defines".
HTH
TOndrej
Celkovy pocet stranek v QuickReport-u
[*] Ing. Jiri SOKOL <JS-delphi(zv)seznam(tec)cz> - 17.7.2002 11:24:06
Ahoj,
da se nejakym zpusobem dopredu zjistit, kolik bude stranek celkem? Chtel
bych toto cislo dat do zapati kde je cislo stranky a chtel bych ho mit
lomene poctem stranek dokumentu.
Napadlo me reseni, kdyby slo udelat preview, ale bez toho, aby to videl
uzivatel a necekalo to na "Close". Ja si ta stranky pocitam sam, i kdyz to
lze resit komponentou z QR, a tak bych to mohl zjistit takhle, ale nevim
jak to udelat.
Diky za napady. Jirka
Ing. Jiri Sokol, js-delphi(zv)seznam(tec)cz, +420251431187
D6ProfSP2,WinNT
amatersky programator
______________________________________________________________________
Reklama:
WWW stranky zdarma na http://www.sweb(tec)cz
Vykonani SP na FB
[*] miromr <preas_w(zv)stonline.sk> - 17.7.2002 11:25:14
> > Jak je to u MSDE s max. poctem pripojenych
Mozno by bolo este dobre povedat, ze MSDE neni sirene podobne ako FB.
Sirit ho moze len majitelia urcitych proiduktov-takze najpr treba dany
produkt kupit a potom mozno sirit MSDE
viz napr:
http://www.microsoft.com/Cze/servers/sql/howtobuy/default.asp
miro
Celkovy pocet stranek v QuickReport-u
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 17.7.2002 11:32:16
Je treba napred zavolat Prepare a pak uz se to da zjistit z PageCount
--
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
17.7.2002 Ing. Jiri SOKOL:
> Ahoj,
> da se nejakym zpusobem dopredu zjistit, kolik bude stranek celkem? Chtel
> bych toto cislo dat do zapati kde je cislo stranky a chtel bych ho mit
> lomene poctem stranek dokumentu.
> Napadlo me reseni, kdyby slo udelat preview, ale bez toho, aby to videl
> uzivatel a necekalo to na "Close". Ja si ta stranky pocitam sam, i kdyz to
> lze resit komponentou z QR, a tak bych to mohl zjistit takhle, ale nevim
> jak to udelat.
Rovnake formy v dvoch projektoch
[*] Ondrej Kelle <O.Kelle(zv)digitalpublishing.de> - 17.7.2002 11:36:38
> {$DEFINE Project1}
>
> {$IFDEF Project1} ...
Problem s direktivou $DEFINE je ten, ze plati iba v ramci danej unity; od
riadku, kde je deklarovana, az po koniec unity alebo riadok obsahujuci
$UNDEF danej premennej.
Ak mas v jednej unite {$DEFINE Project1} tak od toho riadku kazde nasledovne
{$IFDEF Project1} sa vyhodnoti vzdy ako True, takze sa bude kompilovat vzdy
iba dana cast kodu.
Ak si to myslel tak, ze $DEFINE das niekam do inej unity (napriklad .dpr),
to zase neovplyvni ostatne unity, cize v druhych unitach sa $IFDEF vyhodnoti
vzdy ako False a kompilovat sa bude vzdy ta druha cast kodu.
Direktiva s platnostou pre cely projekt sa da definovat iba v Project
Options (zapise sa do .cfg projektu) alebo v command line pre dcc32.exe.
Dufam, ze sa nemylim. Ak ano, prosim vyvedte ma niekto z omylu. ;-)
TOndrej
Re[2]: Rovnake formy v dvoch projektoch
[*] Jakub Dusek <jdev(zv)seznam(tec)cz> - 17.7.2002 11:56:10
Dalsi moznost kterou ja pouzivam je pouzit include soubor.
Do kazde unity kde je potreba rozliseni projektu se prida treba:
{$I ProjectType.inc}
No a u projektu nebo kdekoliv v library path se vytvori soubor
ProjectType.inc,
ve kterem budou {$DEFINE} direktivy kompilatoru.
Jakub Dusek
-------------------------------------------
Homepage : http://dusek.zde(tec)cz
Phone : +420604615795
Sms email : jakub.dusek(zv)click(tec)cz
Icq : 86063232
Apps : Add/Remove Manager, Charmaper,
Sms GateKeeper
-------------------------------------------
Wednesday, July 17, 2002, 11:36:38 AM, you wrote:
>> {$DEFINE Project1}
>>
>> {$IFDEF Project1} ...
OK> Problem s direktivou $DEFINE je ten, ze plati iba v ramci danej unity; od
OK> riadku, kde je deklarovana, az po koniec unity alebo riadok obsahujuci
OK> $UNDEF danej premennej.
OK> Ak mas v jednej unite {$DEFINE Project1} tak od toho riadku kazde nasledovne
OK> {$IFDEF Project1} sa vyhodnoti vzdy ako True, takze sa bude kompilovat vzdy
OK> iba dana cast kodu.
OK> Ak si to myslel tak, ze $DEFINE das niekam do inej unity (napriklad .dpr),
OK> to zase neovplyvni ostatne unity, cize v druhych unitach sa $IFDEF vyhodnoti
OK> vzdy ako False a kompilovat sa bude vzdy ta druha cast kodu.
OK> Direktiva s platnostou pre cely projekt sa da definovat iba v Project
OK> Options (zapise sa do .cfg projektu) alebo v command line pre dcc32.exe.
OK> Dufam, ze sa nemylim. Ak ano, prosim vyvedte ma niekto z omylu. ;-)
OK> TOndrej
Jednotlive Bandy u QuickReportu
[*] Ing. Jiri SOKOL <JS-delphi(zv)seznam(tec)cz> - 17.7.2002 12:09:27
Ahoj,
mam dotaz k Bandum z QR. Je omezen jejich pocet? Jak jdou za sebou? Vim, ze jdou nejak takhle:
HeaderPage
Title
HeaderGroup
Detail
Sumary
FooterPage
ale pak tam jsou jeste nejaky subdetail a child + nejaky dalsi - nazvy jsem ted
zapomnel.
Jenze kdyz jsem se je snazil zapojit, tak se objevovaly nejak divne az pod
FooterPage a ja nevedel, kdy se budou tisknout.
Dotaz - muzu mit nekolik subdetailu pod sebou? Jak to udelat. V helphu k D6Prof jsem
nic ke QuickReportu nenasel.
Diky za rady a napady. Jirka
Ing. Jiri Sokol, js-delphi(zv)seznam(tec)cz, +420251431187
D6ProfSP2,WinNT
amatersky programator
______________________________________________________________________
Reklama:
Poctenicko pro kazdy den: http://www.novinky(tec)cz
Vykonani SP na FB
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 17.7.2002 12:23:32
Haj hou!
On 16 Jul 2002 at 16:33, Petr Vones wrote:
> From: "Richard Kejval" <kejval.delphi(zv)centrum(tec)cz>
> > kdyz prednasel o FB. Slo o to, ze skupina ruskych programatoru prepsala FB
> > jen pro platformu WinNT a vykon se mnohonasobne zvysil. Bohuzel to bylo na
>
> To je presne to o cem jsem tu psal. Pekna ukazka toho, jak je ono zaklinadlo
> multiplatformniho vyvoje ve skutecnosti problematicke a nevedouci k idealnimu
> reseni. Podobny priklad je treba i Qt a CLX.
Problem byl predevsim v pouziti assembleru. Ten je vazan na architekturu a
prekladac. Pomineme-li problem s portaci na Apple (PPC) a Sparc Solaris a
StrongARM WinCE, tak je problem jen s uspusobenim ASM prekladacum
dostupnym na ruznych platformach (mimochodem, na FB/IB take nemuzete
pouzit libovolny prekladac C/C++). Dalsim problemem bylo pouziti nekterych
knihoven, ktere nejsou zcela standardni ci shodne na vsech platformach, ale to
by se dalo vyresit. Kazdopadne vyvojari Yaffilu si proste s dalsimi platformami
nelamou hlavu, jim jde jen o Windows. Nektere veci by slo adaptovat i pro dalsi
platformy, jen si s tim nikdo nedal praci. Ale pouziti ASM je u FB zakazano
kolektivnim vynosem vyvojaru z duvodu udrzeni multiplatformnosti a relativni
snadnosti portace na nove platformy.
> > ukor toho, ze jiny operacni system nepodporovala a ta vylepseni se nedala do
> > Open Source FB pouzit, protoze je stanoveno, ze bude multiplatformni. Skoda
>
> Multiplatformni prece znamena, ze bezi na vice platformach. Na kazde platforme
> muze (musi ?) byt kod zcela odlisny, pouze navenek bude funkce stejna. Ano, je
> to daleko vic prace, ale zaroven je to jedine kvalitni reseni.
Pokud jde o C/C++, pak mas zamozrejme pravdu, i kdyz i zde dost hraje roli
build proces a nastaveni prekladace, pripadne jaky prekladac je pouzit. FB na
Windows je trochu lepsi diky optimalizacim v MSVC (preci jen GCC neni takovy
optimalizacni dabel). Je to ovsem take problem s knihovnami ktere se na
ruznych platformach lisi (i v kvalite implementace). V teto oblasti je to neustaly
proces, protoze OS i knihovny se vyvijeji a je treba se jim prizpusobovat. Napr.
ted jsou k dispozoci nove pthreads od IBM ktere jsou pry vyrazne lepsi nez stare
pthreads, ale FB je zatim na *nixech nepouziva.> > Pokud nekdo nepovazuje za dulezitou vlastnost to, ze DB bezi i na jinem
> > serverovem OS nez je Win, tak je to jeho problem, ale pro me je to
> > dulezitejsi nez nejake mouchy v optimalizaci SQL prikazu. Protoze o to v
>
> Zajimave je, ze tyhle "mouchy" se tu ne zridka probiraji, takze to asi tak
> nepodstatne nebude.
Multiplatformni vyvoj je vzdy problematicky, protoze jde o problem nejmensiho
spolecneho jmenovatele. FB 1 napr. umoznoval provoz i na platformach, ktere
nemely vubec thready, rozumnou komunikaci mezi procesy apod. Ono nejde jen
o to napsat to jinak, to je sranda v porovnani prizpusobit navrh tak, aby to bylo
optimalni i na odlisnych platformach. Vyvojari se to samozrejme snazi resit, ale
je to nikdy nekoncici proces a tudiz idealni stav je nedosazitelny.
S pozdravem
Pavel Cisar
Mobil: 0724 281429
http://www.ibphoenix(tec)cz
Vse co potrebujete pro Firebird a InterBase
Prirazeni behu aplikace k urcitemu procesoru
[*] Pesek Michal <Michal.Pesek(zv)MNUL.CZ> - 17.7.2002 12:34:28
Hi,
jak se da urcit, na jakem procesoru pobezi moje aplikace na viceprocesorovem
stroji (Win2000Server)?
Diky.
S pozdravem
Michal PEPR Pesek
http://www.peprsoft(tec)cz
ADO, MDB databaze
[*] Je� Draho� - 17.7.2002 12:42:47
Ahoj,
Pro napojeni na access databazi pouzivam ADO connection (ms jet 4.0 ole db
provider).
Connection string obsahuje celkem dost parametru. Jde k nim ziskat pristup i
jednotlive? Potreboval bych aby si uzivatel mohl zmenit cestu k databazi.
Potom by me zajimalo jaky mate nazor na toto pripojeni (ADO) a jake jsou
ostatni mozne zpusoby (krome BDE).
Diky za radu
cau
Ceske CHR fonty pro TP7
[*] VladaT <teplyv(zv)chrudim(tec)cz> - 17.7.2002 12:43:57
Nevite nekdo, kde by se daly sehnat?
VT
Problem s MessageBox
[*] Milan Tome� <milan.tomes(zv)haida(tec)cz> - 17.7.2002 12:55:20
Zdravim vsechny,
mam jeden obrovsky problem.
Udelal jsem si komponentu pro validovany vstup textu (TTypeEdit) a jeho
potomka TButtonTypeEdit a dalsiho TCisTypeEdit, ktery po stisknuti tlacitka
otevre prislusny ciselnik a prevezme prislusnou hodnotu do volajiciho
TCisTypeEditu.
Procedura pro otevreni vypada takto:
procedure TCisTypeEdit.ButtonClick(Sender: TObject);
var
CisForm: TG3WCisForm; //Formular, ktery se otevre pro vyber hodnoty
CanOpen: boolean; //Muze se otevrit formular
Params: TDynArray; //TDynArray = class(TCollection), predavane
parametry formulari CisForm
begin
if not Assigned(FCisFormClass) then //Zkontroluj, jestli je vubec
nastavena property
raise EG3Error.Create('Nen� poioazena to�da formul�oe pro otevoen�
!!!');
CanOpen := true;
DoBeforeCisOpen(CanOpen); //Vyvolani udalosti OnBeforeCisOpen
if not CanOpen then
exit;
CisForm := FCisFormClass.Create(getParentForm(self)); //Vytvoreni
formulare, parent je nutno predat, protoze se tim automaticky predava jeste
nekolik dalsich vlastnosti. Jedna se o vlastniho potomka TForm
try
Params := TDynArray.Create;
try
DoGetKey(Params); //Vyvolani udalosti OnGetKey
CisForm.Params := Params; //Predani parametru formulari
finally
freeAndNil(Params);
end;
CisForm.Open; //Provede select zaznamu z databaze, ktere odpovidaji
podmince
if CisForm.ShowModal = mrOK then //ShowModal je predefinovan u predka
(pouze drobne upravy kvuli MDI - prepinani FormStyle)
begin
//AsVariant - property, ktera nastavuje text editu
asVariant :=
CisForm.SelectedRecord.columnByName(FCisColumnName).asVariant;
---> if Assigned(CisTextLabel) and (Length(CisTextColumnName) <> 0) and
Assigned (CisForm.SelectedRecord.Columns.ColumnByName(CisTextColumnName))
then <---- A TADY TO POCHOPITELNE SPADNE !!!
CisTextLabel.Caption :=
CisForm.SelectedRecord.Columns.ColumnByName(CisTextColumnName).asCharacter;
SendMessage(GetParentForm(Self).Handle, WM_NEXTDLGCTL, 0, 0);
end;
finally
freeAndNil(CisForm);
end;
end;
na radku asVariant :=
CisForm.SelectedRecord.columnByName(FCisColumnName).asVariant; se
automaticky vyvola udalost OnChangeValue a ta vyvola metodu Validate. Metoda
Validate interne vyvola udalost OnValidate a vypada takto:
function TCisTypeEdit.Validate(const ACheckRequired: boolean = true; const
AOpenForm: boolean = true): boolean;
var
IsValid: boolean;
begin
Result := false;
try
if Length(Text) = 0 then
begin
if Length(getValueIfBlank) <> 0 then
begin
Text := getValueIfBlank;
DoChangeValue(Null);
end;
end;
DoValidate(ACheckRequired, AOpenForm);
if Assigned(FOnValidate) then
begin
IsValid := true;
FOnValidate(self, IsValid);
Result := IsValid;
end
else
Result := true;
except
on E: EValidateError do
begin
Self.SetFocus;
if Length(E.Message) <> 0 then
Application.MessageBox(PChar(E.Message), 'Chyba', MB_OK +
MB_ICONERROR);
end;
end;
if Result then
FLastValInValidate := asVariant
else
asVariant := FLastValInValidate;
end;
V jednom konkretnim pripade mam prirazenu obsluhu udalosti OnValidate takto:
procedure Tf_E_ZList.e_ID_ETSCORJ_DODValidate(Sender: TObject; var IsValid:
boolean);
begin
if Rec.DOD_ETSCORJ_Detail.EXTERNI.asBoolean then
begin
Application.MessageBox('Dodavatel nesm� b�t extern� organizace !!!',
'Chyba', MB_OK + MB_ICONERROR);
IsValid := false;
end;
end;
Jenze tady vznikne obrovsky problem. Na radku s volanim
Application.MessageBox je vse v poradku, ale jakmile se toto spusti, tak
(opravdu nevim proc) dojde k tomu, ze je zrusen formular CisForm (metoda
TCisTypeEdit.ButtonClick). K zadne vyjimce nedojde (alespon o ni vubec
nevim).
Prosim o pomoc - je to opravdu urgentni.........
S pozdravem
Milan Tomes
mailto:milan.tomes(zv)haida(tec)cz
Rovnake formy v dvoch projektoch
[*] Lstiburek Pavel <Lstiburek(zv)ceb(tec)cz> - 17.7.2002 13:15:54
Mam s timto velmi spatne zkusenosti, (domnivam se ) Delphi kontroluji pouze
ze zdroj (pas) je starsi nez jeho dcu. Potom, ale pri kompilaci projektu
nedojde k rekompilaci unity a nasazeni prepinacu je ignorovano.
Proto je nutno pouzivat Build, ale staci se uhmatnout (coz pri reseni
drobnosti neni problem) a pak se nestaci clovek divit. Skoro bych doporucil
radeji rozdelit Form na cast spolecnou pro oba projekty a to co se lisi v
kazdem projektu odvodit radeji dedenim od spolecneho predka (sablony).
Pavel
> From: Ondrej Kelle [mailto:O.Kelle(zv)digitalpublishing.de]
> > {$DEFINE Project1}
> >
> > {$IFDEF Project1} ...
>
> Problem s direktivou $DEFINE je ten, ze plati iba v ramci
> danej unity; od
> riadku, kde je deklarovana, az po koniec unity alebo riadok obsahujuci
> $UNDEF danej premennej.
> Ak mas v jednej unite {$DEFINE Project1} tak od toho riadku
> kazde nasledovne
> {$IFDEF Project1} sa vyhodnoti vzdy ako True, takze sa bude
> kompilovat vzdy
> iba dana cast kodu.
> Ak si to myslel tak, ze $DEFINE das niekam do inej unity
> (napriklad .dpr),
> to zase neovplyvni ostatne unity, cize v druhych unitach sa
> $IFDEF vyhodnoti
> vzdy ako False a kompilovat sa bude vzdy ta druha cast kodu.
>
> Direktiva s platnostou pre cely projekt sa da definovat iba v Project
> Options (zapise sa do .cfg projektu) alebo v command line pre
> dcc32.exe.
>
> Dufam, ze sa nemylim. Ak ano, prosim vyvedte ma niekto z omylu. ;-)
>
> TOndrej
>
ComboBox a databaze
[*] Sula Milos <milos.sula(zv)oku-su(tec)cz> - 17.7.2002 13:25:44
Cau
muzete mi nekdo poradit jak priradit v comboboxu ke stringum take poradova cisla z DB (mam hlavni tabulku ktera se pres poradove cislo odkazuje na data v jine tabulce ktera se zobrazuje prave v comboboxu) ? Mam to reseno zatim tak ze nactu do comboboxu data pres cb.Items.AddObject(string,TObject(integer)); tj. pretypovavam integer na TObject
Milos
ADO & Insert & Trigger
[*] Delphin <delphin(zv)post(tec)cz> - 17.7.2002 13:25:18
D5 SP2 MSSQL 2000
Predelavam starsi cast projektu do ADO a narazil jsem na problem s view.
Uzivatel pres dbgrid pridava, meni a maze zaznamy. S TQuery to bezi
normalne, bez problemu.
S TADOQuery dostanu chybu "Multiple-step operation generated error. Check
each status value".
V napovede jsem nasel, ze chyby v takovem pripade jsou v errors, jenze je
tam jenom jedna chyba a to 0.
Zjistil jsem, ze to dela sloupek autoinc. Jenze kdyz ho necham prazdny, tak
se tomu zase nelibi null. Do sloupku se samozrejme nepridava, v triggeru se
to osetri.
S TQuery staci dat do tohoto sloupku v afterinsert 0 a jede to bez problemu.
Nesetkal se s tim nekdo ?
Diky
Delphin
Jednotlive Bandy u QuickReportu
[*] Lstiburek Pavel <Lstiburek(zv)ceb(tec)cz> - 17.7.2002 13:26:20
Najdi si stranky vyrobce, na nich je velmi pekny manual vcetne prikladu.
www.qusoft.com.
Pavel
> From: Ing. Jiri SOKOL [mailto:JS-delphi(zv)seznam(tec)cz]
> Ahoj,
> mam dotaz k Bandum z QR. Je omezen jejich pocet? Jak jdou za
> sebou? Vim, ze jdou nejak takhle:
> HeaderPage
> Title
> HeaderGroup
> Detail
> Sumary
> FooterPage
>
> ale pak tam jsou jeste nejaky subdetail a child + nejaky
> dalsi - nazvy jsem ted
> zapomnel.
>
> Jenze kdyz jsem se je snazil zapojit, tak se objevovaly nejak
> divne az pod
> FooterPage a ja nevedel, kdy se budou tisknout.
>
> Dotaz - muzu mit nekolik subdetailu pod sebou? Jak to udelat.
> V helphu k D6Prof jsem
> nic ke QuickReportu nenasel.
>
> Diky za rady a napady. Jirka
>
> Ing. Jiri Sokol, js-delphi(zv)seznam(tec)cz, +420251431187
> D6ProfSP2,WinNT
> amatersky programator
>
> ______________________________________________________________________
> Reklama:
> Poctenicko pro kazdy den: http://www.novinky(tec)cz
>
ADO, MDB databaze
[*] Vagner Pavel <Vagner(zv)ceps(tec)cz> - 17.7.2002 13:35:40
jestli jsem to dobre pochopil, tak staci prece sestavit "rucne" connection
string s aktuale zvolenym souborm z OpenFileDialogu. Ja osobne pouzivam
jenom providera a Source a vsechno facha v pohode
ConnectionStr:= 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=';
ConnectionStr:=ConnectionStr+'C:\............';
a jedem
Pavel
//--------------------------------------------------
Ahoj,
Pro napojeni na access databazi pouzivam ADO connection (ms jet 4.0 ole db
provider).
Connection string obsahuje celkem dost parametru. Jde k nim ziskat pristup i
jednotlive? Potreboval bych aby si uzivatel mohl zmenit cestu k databazi.
Potom by me zajimalo jaky mate nazor na toto pripojeni (ADO) a jake jsou
ostatni mozne zpusoby (krome BDE).
Diky za radu
cau
Prirazeni behu aplikace k urcitemu procesoru
[*] Z�le��k Tom� <tomas.zalesak(zv)lcs(tec)cz> - 17.7.2002 14:01:21
> jak se da urcit, na jakem procesoru pobezi moje aplikace na
> viceprocesorovem stroji (Win2000Server) ?
podivej se na API funkci SetProcessAffinityMask()
http://msdn.microsoft.com/library/en-us/dllproc/prothred_63vv.asp
Tomas Zalesak
Vykonani SP na FB
[*] Erik Salaj <winsoft(zv)stonline.sk> - 17.7.2002 14:05:12
> a ako je to u MSDE s licenciami?
pokial viem tak je to urcene pre 5 sucasne pripojenych uzivatelov.
Mozes pripojit aj viac, ale cinnost servera sa potom (naschval) spomali.
Ked pouzijes .Net a disconnected model, tak takato situacia
nastane malokedy i pri daleko vyssom pocte uzivatelov.
> Neviem ci to este plati ale kedysi ked som sa o to zaujimal bola MSDE
> vpodstate vyvojarska zalezitost s tym , ze ten kto mal napr. Office
> developer, resp. iny nastroj mohol na tom vyvyjat aplikacie a pripadne
> tieto sirit avsak len pre najviac 5 uzivatelov. Pre viac ako tento pocet
> bolo treba uz riadnu MS SQL. (Ta verzia co bola s developerom ta sa vtej
> dobe urcite nesmela sirit - mala sluzit ciste na vyvoj a ta co bola s
Office
> Premium aleboi VisualStudiomta sa mohla aj sirit). Neviem ci to este plati
> ale takto to pred casom nejak bolo. Ak tieto podmienky este platia tak
potom
> debatovat o MSDE v porovnani s FB je absolutne bezpredmetne.
1. no povedz mi, co je to za firmu, ktora ma desiatky uzivatelov
(pracovnikov) a nema niekolko desattisic na SQL server? Pripada
mi to uplne absurdne.
2. a zoberme si iny priklad (netvrdim, ze typicky ;-) ), ze firma ma
dost financnych prostriedkov, prosperuje, uzivatelia i mnozstvo
udajov pribudaju a vykon FB jej nestaci. Co potom? V pripade
SQL servera je moznost upgradov na vykonnejsi system
(niekolko urovni).
Erik
Kurzor pro THintWindow
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 17.7.2002 14:13:28
Ahoj,
jak nastavim v THintWindow vlastni kurzor? Vzdycky tam ma defaultni !
Dekuji
Jaro B.
Vykonani SP na FB
[*] Erik Salaj <winsoft(zv)stonline.sk> - 17.7.2002 14:28:11
> O to tady prave vubec neslo. Slo o to, ze pokud napr. moji zakaznici se
> rozhodnou,
> ze na serveru bude nainstalovan Linux, ktery poridi zdarma a FB bude bez
> problemu
> fungovat, tak jsem ochoten akceptovat i jakesi snizeni vykonu na platforme
> win,
> protoze to snizi dalsi naklady na pouziti meho softu a pokud zakaznik ma
> radove
> desitky serveru urcite uznas, ze jeho naklady se snizi celkem dosti
vyrazne,
> ale to
druha vec je, ci je ochotny to znizenie vykonu na ukor multiplatformnosti
akceptovat aj zakaznik? Aku ma z toho vyhodu, ako to vyuzije?
> jaksi nekteri lidi od microsoftu neradi slysi. Az bude MS SQL server,
> prepsan i pro
> jinou platformu, pak se o tom muzeme dal bavit a je mi uplne jedno, jestli
> investuje
> do vyvoje tak, ze bude mit zdroje stejne pro vsechny platformy, nebo pro
> kazdou
> zvlast, ale to se asi trosku prodrazi, co ? ;-)
A co by sa vyriesilo tym, ze MS SQL server by bol k dispozicii
pre inu platformu? A konkretne pre aku platformu by mal
byt prepisany? Pre mna je momentalne aktualna .Net platforma,
tam je MS SQL server velmi dobre podporovany. Takze
uz je to v poriadku, co sa platforiem tyka, alebo nie?
Erik
Rovnake formy v dvoch projektoch
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 17.7.2002 14:39:43
> Mam s timto velmi spatne zkusenosti, (domnivam se ) Delphi
kontroluji pouze
> ze zdroj (pas) je starsi nez jeho dcu.
Pokud jsou DEFINEs v includovanem souboru, pak vzdy pri zmene toho
include filu
dojde k rekompilaci *.pas, ktere jej pouzivaji. Jediny problem c timto
resenim je, ze
include file hleda IDE jinde nez by clovek cekal (pokud se kompiluji
knihovny, ktere
jsou z jineho adresare/projektu).
Jak se chova IDE pokud jse DEFINEs ulozeny v nastani projektu
netusim - nikdy jsem
tuto variantu nepouzival - kvuli version control systemu)
>Potom, ale pri kompilaci projektu
> nedojde k rekompilaci unity a nasazeni prepinacu je ignorovano.
> Proto je nutno pouzivat Build, ale staci se uhmatnout (coz pri
reseni
> drobnosti neni problem) a pak se nestaci clovek divit. Skoro bych
doporucil
> radeji rozdelit Form na cast spolecnou pro oba projekty a to co se
lisi v
> kazdem projektu odvodit radeji dedenim od spolecneho predka
(sablony).
podmineny preklad je urcite lepsi reseni. I kdyz - pokud je tech
IFDEFu moc... :-)
D. Toman
Vykonani SP na FB
[*] Erik Salaj <winsoft(zv)stonline.sk> - 17.7.2002 14:52:58
> Co takhle propustit cely vyvojovy tym a prijmout nove programatory co
> ovladaji
> Visual C#.Net Standard, ale jaksi nevi nic o stavajicim projektu. Opravdu
> skvostne
> reseni ? ;-)
a co tak stavajuci vyvojovy tim vyskolit na C# a .Net?
Erik
ComboBox a databaze
[*] Otisk Rene <otisk(zv)misel(tec)cz> - 17.7.2002 16:07:27
Joo, a zpatky to dostanes
function GetUniqFromComboBoxt(ComboBox: TComboBox): Integer;
begin
if ComboBox.ItemIndex = -1 then
Result := -1
else
Result := Integer(ComboBox.Items.Objects[ComboBox.ItemIndex]);
end;
nebo si nejak osetris pretypovani v pripade, ze ItemIndex = -1
Mam to tak v nekolika projektech a reaguje to tak, jak si predstavuji...
Sroub
Cau
muzete mi nekdo poradit jak priradit v comboboxu ke stringum take poradova
cisla z DB (mam hlavni tabulku ktera se pres poradove cislo odkazuje na data
v jine tabulce ktera se zobrazuje prave v comboboxu) ? Mam to reseno zatim
tak ze nactu do comboboxu data pres
cb.Items.AddObject(string,TObject(integer)); tj. pretypovavam integer na
TObject
Milos
Interbase - vazne problemy s Windows XP
[*] <tomchal(zv)mybox(tec)cz> - 17.7.2002 18:18:25
Ahoj,
mam veliky problem s Interbase 6.0 a firebird na Windows XP.
Problem spociva v prihlaseni klienta na server. Trva to nekolik
desitek sekund. Vyzkousel jsem vsechny mozne rady z delhi
/odstranit restore, isb jen pro cteni, fast user switch. /.
Po vsech techto upravach se prihlaseni na serveru ze serveru
zrychlilo z 50s na ihned, ale na klientech je to stale nekonecne
dlouhe. Instalace na WinMe nebo Win2000 bezi bez problemu.
Muze nekdo pomoct. Dekuji
Tomas
-----
www.redbox(tec)cz - everything you need
jak na WParam v D6
[*] bleak <bleak(zv)atlas(tec)cz> - 17.7.2002 18:29:41
diky za odpoved, D6 uz Message.WParam prijme. Problem byl v tom, ze v sekci
uses byl unit qcontrols. Potom D6 hlasi: Undeclared identifier 'WParam'. To
me tedy fakt vyvedlo...
bleak
----- Original Message -----
From: "Milan Tomes" <milan.tomes(zv)haida(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
> Podivej se na strukturu recordu TWMNCPaint v unite Messages
Interbase - vazne problemy s Windows XP
[*] miromr <preas_w(zv)stonline.sk> - 17.7.2002 19:02:52
Ahoj, mam ten isty problem ale na W2000.
ak by si na nieco prisiel, prosim ta daj vediet.
miro
----- Original Message -----
From: <tomchal(zv)mybox(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, July 17, 2002 6:18 PM
Subject: Interbase - vazne problemy s Windows XP
> Ahoj,
>
> mam veliky problem s Interbase 6.0 a firebird na Windows XP.
> Problem spociva v prihlaseni klienta na server. Trva to nekolik
> desitek sekund. Vyzkousel jsem vsechny mozne rady z delhi
> /odstranit restore, isb jen pro cteni, fast user switch. /.
> Po vsech techto upravach se prihlaseni na serveru ze serveru
> zrychlilo z 50s na ihned, ale na klientech je to stale nekonecne
> dlouhe. Instalace na WinMe nebo Win2000 bezi bez problemu.
> Muze nekdo pomoct. Dekuji
>
> Tomas
> -----
> www.redbox(tec)cz - everything you need
>
OT: Oracle jobs na Linuxu
[*] Jakub Dusek <jdev(zv)seznam(tec)cz> - 17.7.2002 19:32:51
Sorry za OT ale potreboval bych vedet jestli je potreba neco nastavit
na Oraclu pokud chci aby se mi zpracovavali joby. Funkci
DBMS_JOB.submit je v pohode pridam, v DBA_JOBS jsou normalne videt,
ale nepusti se :)
Jakub Dusek
-------------------------------------------
Homepage : http://dusek.zde(tec)cz
Phone : +420604615795
Sms email : jakub.dusek(zv)click(tec)cz
Icq : 86063232
Apps : Add/Remove Manager, Charmaper,
Sms GateKeeper
-------------------------------------------
Interbase - vazne problemy s Windows XP
[*] Roland Turcan <rolo(zv)sedas.sk> - 17.7.2002 20:33:00
<<< 17. 7. 2002 20:25 - tomchal(zv)mybox(tec)cz "tomchal(zv)mybox(tec)cz" >>>
tmc> Ahoj,
tmc> mam veliky problem s Interbase 6.0 a firebird na Windows XP.
tmc> Problem spociva v prihlaseni klienta na server. Trva to nekolik
tmc> desitek sekund. Vyzkousel jsem vsechny mozne rady z delhi
tmc> /odstranit restore, isb jen pro cteni, fast user switch. /.
tmc> Po vsech techto upravach se prihlaseni na serveru ze serveru
tmc> zrychlilo z 50s na ihned, ale na klientech je to stale nekonecne
tmc> dlouhe. Instalace na WinMe nebo Win2000 bezi bez problemu.
tmc> Muze nekdo pomoct. Dekuji
Fungoval som na Win2000, fungujem na XP a ziadne problemy nie su ani
pri pripojeni z inych PC s lubovolnych MS Win. Asi to nebude MSWINXP
vs. FB/IB ale skor problem v niecom inom, IMHO (hardware vs. software)
Napr. Jedna firma si kupila jeden ekonomicky soft od jednej ceskej
firmy a od zaciatku sa stavaju take problemy, ze vypadavaju hlavicky
dokladov (faktur,predajok,...) a oni po dvoch tyzdnoch vyhlasili ze je
to problem SOFT vs. WinXP. Prisiel od nich technik a tvrdil, ze ak tam
bude Win2000 tak to bude na 99% OK. Microsoft povoluje downgrade z XP
na lubovolny < OS bez suhlasu Microsoftu, tak sme to preinstalovali a
problem nebol vyrieseny. Dalsie prislo do reci, ze je asi zla siet.
Tak sme zatazili velmi siet spustili sme tester packetov a ziadny
error. Tak este pre istotu sme po sieti tu suborovu databazu ani
nepouzivali a jemu sa stracali nadalej doklady. Od 10-19 hodiny sa
tomu venoval a na koniec odisiel so sklopenymi usami a problem stale
nie je vyrieseny. Aj programatori v Cechach tvrdia ze s takymto
problemom este nestretli. Pritom PC je slusny cisto novy stroj
DTK P4/1.6GHz, 256MB, 20GB, WinXP.
--
Best regards, TRoland
Interbase - vazne problemy s Windows XP
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 17.7.2002 20:49:08
From: "Roland Turcan" <rolo(zv)sedas.sk>
> error. Tak este pre istotu sme po sieti tu suborovu databazu ani
> nepouzivali a jemu sa stracali nadalej doklady. Od 10-19 hodiny sa
Pokud se jednalo o reseni se *souborovou* databazi po siti, tak to snad neni
treba ani komentovat ;-)
Petr Vones
Probl�m s DBF
[*] Filip Rozs�val <rozs(zv)volny(tec)cz> - 17.7.2002 21:49:10
Pot�eboval bych poradit s probl�mem s DBF v Delphi 5. M�m pom�rn� velkou DBF tabulku cca 40 000 z�znam� o velikosti 24MB a k tomu soubor index� (v�t�inou Expression), kter� maj� tak� asi 20MB. M�j probl�m je, �e pokud se pokus�m data zkop�rovat do stejn� strukturovan� tabulky s jin�m jm�nem p�es dbiAppendRecord(...) (fce BDEApi) v�e b�� OK a� asi do 11 000-ho z�znamu kdy program ozn�m� chybu v z�pisu do souboru kopie.dbf a v�e spadne. Jedin� mo�nost jak nechat kop�rov�n� dob�hnout do konce je zru�it indexy, ale vytvo�it je po kop�rov�n� znovu je zdlouhav� a divn�, a krom� toho jak vytvo��m za b�hu expression index?
Zkou�el r�zn� nucen� vyprazdnov�n� bufferu, dokonce i open p�ed p�id�n�m z�znamu a close po jeho ulo�en� a bylo to taky na nic.
Nesetkal se tu n�kdo s n���m podobn�m a je v�bec mo�n� pod BDE pracovat s tak objemn�ma datama nebo tam je n�jak� limit?
D�k za jakoukoliv radu �i n�pad.
Filip Rozs�val