Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
Jak spravne porovnavat hodnoty NULL?
[*] Michal Sefcik <sefcik(zv)benefitcz(tec)cz> - 20.6.2002 12:38:40
Pokud mohu v danem pripade pripustit i NULL = '', tak se radeji
vyhnu pouziti "or" operatoru ve WHERE klausuli, ktera prispiva
ke zpomaleni dotazu, napr.takto:
where
ISNULL(A, '') = ISNULL(B, '')
resp.
COALESCE(A, '') = COALESCE(B, '')
(nevim, jaky SQL server pouzivas)
> ke zjisteni, hodnoty null slouzi operator "is null"
> pokud testujes, zda jsou nejake hodnoty stejne a zajima te
> i pripad, kdy jsou obe null, pak:
> select
> A, B
> from
> T
> where
> A = B or A is null and B is null
>
> dekuji PeC(zv)
Univerzalne query a NULL
[*] Jaroslav Popluhar <delphi1(zv)acc.sk> - 20.6.2002 12:38:20
> Napadaju ma 2 cesty:
> 1. generovat WHERE klauzulu podal zadanych hodnot - neda sa setrit cas
> pomocou prepare, pokial sa casto menia zadane hodnoty 2. pouzit
> parametricky dotaz
> A. s klauzulou WHERE ((Field1 like :Parameter1) OR
> (:Parameter1
> is null)) AND ...
| Pouzivam metodu A, ale jen pro male tabulky, protoze zapis
| :parametr is null zpusobi projiti cele tabulky, bez ohledu na ostatni
| podminky.
|
|
Ako sa da zistit, ze IB prechadza celu tabulku?
S pozdravom
P.S.
J. Popluhar
Kodovani souboru
[*] miro mrazik <preas_w(zv)stonline.sk> - 20.6.2002 13:09:42
Ahoj,
> http://atrey.karlin.mff.cuni(tec)cz/~rk/rsa.shtml
neviem - myslim ze kolegovi nejde ani tak o studium ako o vyriesenie
zasifrovania suboru
chod napr. na www.torry.net a daj tam hladat komponentu cipher, alebo
TCipher a tam si nastav ktory algoritmus chces (myslim ze len symetricke
ponuka)
miro
SURNE - OLEAUT32
[*] Fabik Milan <kinekus(zv)nextra.sk> - 20.6.2002 13:35:01
Bol by som vdacny za DCOM95.EXE ak je to licencne v poriadku.
na sukr. mail : fabik(zv)nextra.sk
> > sposobene tym, ze je to urobene v D6 a spustane na W95 ?
>
> Ahoj,
>
> presne tim to je. Naprava: nainstalovat DCOM95.EXE. Nemas-li, mohu poslat.
>
> Karel Rys
>
>
Jak spravne porovnavat hodnoty NULL?
[*] <little_bobes(zv)centrum(tec)cz> - 20.6.2002 14:04:02
Zapomnel jsem poznamenat, ze pouzivam IB6.
Bob
>
> Taky muzes pouzit funkci ISNULL(SL1, 0), ktera zameni null za hodnotu
> druheho parametru - tady 0.
>
prace s GSM zarizenim
[*] likeapear <likeapear(zv)centrum(tec)cz> - 20.6.2002 14:30:00
Nevite nekdo o free (pripadne za rozumnou cenu) komponente nebo dll nebo ocx
nebo zdrojaku pro praci s GSM zarizenim jako je napr. Siemens M20. Staci mi
prace s SMS tj. odesilani/prijem. Zkousel jsem to pres AT prikazy, ale
narazil jsem na urcite problemy (ktere tady nechci rozvadet) a rad bych
pouzil neco hotoveho.
dekuji
likeapear
Jak zjistit jmeno komponenty u ktere jsem stiskt p
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 20.6.2002 14:57:11
From: "Kub��ek Daniel" <kubefra(zv)atlas(tec)cz>
> Chci se jeste zeptat jak lze zjistit jmeno butonu, kdyz mam u nej prirazen
Patrne to bude TPopupMenu.PopupComponent
Petr Vones
prace s GSM zarizenim
[*] Petr Brant <brant(zv)dcomm(tec)cz> - 20.6.2002 14:58:52
Jake problemy? Pou��val jsem pro komunikaci se zarizenim (GSM modem Falcom)
komponenty AsyncFree, AT prikazy a chodilo to OK.
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: prace s GSM zarizenim
>
> Nevite nekdo o free (pripadne za rozumnou cenu) komponente nebo dll nebo
ocx
> nebo zdrojaku pro praci s GSM zarizenim jako je napr. Siemens M20. Staci
mi
> prace s SMS tj. odesilani/prijem. Zkousel jsem to pres AT prikazy, ale
> narazil jsem na urcite problemy (ktere tady nechci rozvadet) a rad bych
> pouzil neco hotoveho.
Kodovani souboru
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 20.6.2002 15:15:41
Puvodni zprava, kterou napsal novos(zv)email(tec)cz dne 20 Jun 2002:
> nehodlam se prit ani hadat o slovicka. RSA rozhodne je jeden z
> nejbezpecnejsich algoritmu jak znepristupnit data tak aby je nekdo jiny
> neprecetl - o to asi slo. otazkou zustava jak moc chce tazatel tyto data
> skryt - o tom nepadlo v puvodni zprave ani slovo. take o rychlosti
> nepadlo v puvodni zprave ani slovo. cili na obecnou otazku jak neco
> zakodovat dostal jednu z obecnych odpovedi = RSA.
Jak neco zakodovat <> RSA.
Jak neco zakodovat = pouzit kodovaci tabulku.
RSA je asymetricky sifrovaci algoritmus, pouziva se na sifrovani klicu
(distribuci klicu) pro symetricke sifry a pro digitalni podpis. Prestoze
to lze, algoritmus RSA neni vhodny pro sifrovani dat (pokud to nejsou
velmi mala data), protoze je pomaly, stejne jako vsechny asymetricke
sifrovaci algoritmy. Pro sifrovani dat se pouzivaji symetricke sifrovaci
algoritmy jako napr. DES, 3DES, AES apod.
S pozdravem
Petr Zahradnik, pocitacovy expert
============================================================
Petr Zahradnik, Computer Laboratory
Obvodova 740/14, P.O. Box 15, 400 07 Usti nad Labem
Telefony: 047-5500610, 047-5501627, 0602-409601
Fax: 047-5511338
WWW: http://www.clexpert(tec)cz, http://www.zahradnik(tec)cz
E-Mail: clexpert(zv)clexpert(tec)cz, petr(zv)zahradnik(tec)cz
ICQ: 21215917
============================================================
Help o provozu site.
[*] Ludek ZITA <konference(zv)sales(tec)cz> - 20.6.2002 15:17:48
----- Original Message -----
From: "�EZN��EK David" <reznicek(zv)jakl(tec)cz>
Omlouvam se za silny OT, ale potreboval bych poradit nejaky web(y)
kde je mozno docist se neco (pokud mozno vsechno) o sitich.
Ahoj.
Treba http://www.practicallynetworked.com/
Ludek
---
Douf�m, �e odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.365 / Virov� b�ze: 202 - datum vyd�n�: 24.5.2002
Pocet vet v tabulce
[*] LUKES V�clav <lukes(zv)ans(tec)cz> - 20.6.2002 15:23:28
Muzu Te jeste o neco poprosit ?
Jak dosat data z tabulky - obdobnym zpusobem ???
Diky
Vasek
-----Original Message-----
From: Ben, Martin (CAP, GCF) [mailto:Martin.Ben(zv)gecapital.com]
Sent: Thursday, June 20, 2002 12:01 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: RE: Pocet vet v tabulce
Treba takto:
function PocetVet(const Tabulka: string): integer;
var
QPom: TIBQuery;
begin
QPom := TIBQuery.Create(nil);
try
QPom.Database := IBDatabase;
QPom.SQL.Clear;
QPom.SQL.Add('select count(*) from ' + Tabulka;
try
QPom.Open;
Result := QPom.Fields[0].AsInteger;
except
Result := -1;
end;
finally
QPom.Free;
end;
end;
Martin Ben
> -----Original Message-----
> From: LUKES V�clav [mailto:lukes(zv)ans(tec)cz]
>
> muzete me prosim nakopnout ? Pocet vet v tabulce v SQL zjistim takhle:
>
> SELECT COUNT(*) INTO ??? FROM tabulka
>
> Jak to bude prosim v Delphi ?
Jak zjistit, opakuji-li se mi 2 ci vice radku v IB
[*] <little_bobes(zv)centrum(tec)cz> - 20.6.2002 15:47:01
Zdravim,
mam tabulku v IB6, ve ktere by se mi mohly opakovat urcite hodnoty v urcitem
sloupci:
SL1 SL2
------------
4 1
5 1
1 2 \ tyto dva radky maji stejnou
3 2 / hodnotu ve sloupci SL1 *
6 3
1 5 \
2 5 tyto tri radky maji stejnou
3 5 / hodnotu ve sloupci SL1 ***
7 7
8 7
1 12 \ jako tyto dva radky *
3 12 /
9 18
1 25 \
2 25 jako tyto tri radky ***
3 25 /
Potrebuji nyni nejak zjistit pomoci SP (1-ano / 0-ne), jestli k tomu opravdu
doslo, ale nemohu prijit na spravny algoritmus.
Ma nekdo nejaky napad?
Diky Bob
Kodovani souboru
[*] novos(zv)email(tec)cz - 20.6.2002 14:48:02
nehodlam se prit ani hadat o slovicka. RSA rozhodne je jeden z
nejbezpecnejsich algoritmu jak znepristupnit data tak aby je nekdo
jiny neprecetl - o to asi slo.
otazkou zustava jak moc chce tazatel tyto data skryt - o tom
nepadlo v puvodni zprave ani slovo.
take o rychlosti nepadlo v puvodni zprave ani slovo.
cili na obecnou otazku jak neco zakodovat dostal jednu z
obecnych odpovedi = RSA.
jestli je RSA vhodny musi posoudit sam tazatel nebo musi upresnit
svuj dotaz.
dalsi poznamky prosim na soukromy email, nebudem zbytecne
zatezovat konferenci
<color><param>0100,0100,0100</param>On 20 Jun 2002, at 11:16, Petr Zahradnik wrote:<color><param>7F00,0000,0000</param>> Puvodni zprava, kterou napsal novos(zv)email(tec)cz dne 20 Jun 2002:
>
> > treba RSA algoritmem
>
> To tezko, minimalne ze dvou duvodu - (a) RSA neni algoritmus pro
> kodovani, ale pro sifrovani a digitalni podpis, (b) pokud jde o sifrovani
> dat, asymetricke sifrovaci algoritmy nejsou vhodne pro sifrovani dat z
> duvodu mnohem nizsi rychlosti nez algoritmy symetricke.
>
> S pozdravem
> Petr Zahradnik, pocitacovy expert
>
> ============================================================
> Petr Zahradnik, Computer Laboratory
> Obvodova 740/14, P.O. Box 15, 400 07 Usti nad Labem
> Telefony: 047-5500610, 047-5501627, 0602-409601
> Fax: 047-5511338
> WWW: http://www.clexpert(tec)cz, http://www.zahradnik(tec)cz
> E-Mail: clexpert(zv)clexpert(tec)cz, petr(zv)zahradnik(tec)cz
> ICQ: 21215917
> ============================================================
>
<nofill>
Jak zjistit, opakuji-li se mi 2 ci vice radku v IB
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 20.6.2002 15:56:11
Ahoj,
SELECT SL2, COUNT (*)
FROM TVOJETALBE
GROUP BY SL2
HAVING COUNT (*) > 1
Pokud to chces dale prochazet v SP, pak si to prepis na FOR select.
Slavek
> mam tabulku v IB6, ve ktere by se mi mohly opakovat urcite hodnoty v
> urcitem sloupci:
> Potrebuji nyni nejak zjistit pomoci SP (1-ano / 0-ne), jestli k tomu
> opravdu doslo, ale nemohu prijit na spravny algoritmus. Ma nekdo
> nejaky napad?
>
> Diky Bob
--------------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
--------------------------------------------------------
Udelejte to blbuvzdorne a zitra nekdo vymysli jeste vetsiho blba.
Jak zjistit, opakuji-li se mi 2 ci vice radku v IB
[*] Ben, Martin (CAP, GCF) <Martin.Ben(zv)gecapital(tec)com> - 20.6.2002 16:04:11
A co takhle v SP pouzit dotaz s GROUP BY a HAVING, neco jako:
select SL1, count(*) from TABULKA group by SL1 having count(*) > 1
Martin Ben
> -----Original Message-----
> From: little_bobes(zv)centrum(tec)cz [mailto:little_bobes(zv)centrum(tec)cz]
>
> Zdravim,
>
> mam tabulku v IB6, ve ktere by se mi mohly opakovat urcite
> hodnoty v urcitem
> sloupci:
>
> SL1 SL2
> ------------
> 4 1
> 5 1
> 1 2 \ tyto dva radky maji stejnou
> 3 2 / hodnotu ve sloupci SL1 *
> 6 3
> 1 5 \
> 2 5 tyto tri radky maji stejnou
> 3 5 / hodnotu ve sloupci SL1 ***
> 7 7
> 8 7
> 1 12 \ jako tyto dva radky *
> 3 12 /
> 9 18
> 1 25 \
> 2 25 jako tyto tri radky ***
> 3 25 /
>
> Potrebuji nyni nejak zjistit pomoci SP (1-ano / 0-ne), jestli
> k tomu opravdu
> doslo, ale nemohu prijit na spravny algoritmus.
> Ma nekdo nejaky napad?
Jedna aplikace, vice tlacitek v pruhu uloh
[*] mipr(zv)volny(tec)cz - 20.6.2002 16:26:13
Ahoj,
mam aplikaci, ktera ma vice nemodalnich oken, kde kazde ma sve
tlacitko v pruhu uloh, coz delam pomoci nastaveni parametru v
procedure CreateParams:
Params.ExStyle:=Params.ExStyle or WS_EX_APPWINDOW;
Params.WndParent:=GetDesktopWindow;
Problem nastava, pokud chci zobrazit modalni dialog prislusejici
jednomu z oken. Zaroven s dialogem, se totiz zobrazi pred danym oknem
i hlavni okno aplikace. Navic nefunguje spravne ani prepinani oken
pomoci tlacitek na pruhu uloh. (Testovano ve Win2000.) Poradite mi,
prosim, jak tyto nedostatky odstranit?
Dekuji
Michal Prokopec
prace s GSM zarizenim
[*] likeapear <likeapear(zv)centrum(tec)cz> - 20.6.2002 16:38:44
napr se mi stava, ze pri dotazu na vycteni SMS z urcite pozice tj. napr.
AT+CMGR=1 odpovedelo ERROR 321 (coz je podle dokumentace chyba, ze zadana
pozice neexistuje a to je divny, kdyz jich tam je 10). nebo pri odesilani
SMS pomoci AT+CMGS="+420XXXXXXXXX" text^Z mi to odpovedelo ERROR a nic
neposlalo. nekdy to funguje uplne bez problemu, nekdy ne. taky nevim, jak
zamezit tomu aby pri prijeti SMS modem nic neposilal po portu. stavalo se
mi, ze pokud pri odesilani SMS nejaka soucasne prisla, telefon se nejak
zakousl a vsechny prikazy odpovidaly ERROR.
dodavam, ze pouzivam W2K SP2, D5Ent, pro komunikaci AsyncProffesional,
Siemens M20 Terminal s tim novejsim firmware (presne si to nepamatuji
4.neco) a s SMS jsem pracoval v textovem rezimu (ne PDU)
likeapear
| Jake problemy? Pou��val jsem pro komunikaci se zarizenim (GSM modem
Falcom)
| komponenty AsyncFree, AT prikazy a chodilo to OK.
Jak zjistit, opakuji-li se mi 2 ci vice radku v IB
[*] Lstiburek Pavel <Lstiburek(zv)ceb(tec)cz> - 20.6.2002 16:49:01
Reseni je spravne, ale opakujici hodnoty jsou (pokud jsem to pochopil (;-))
ve sloupci SL2 !
select SL2, count(*) from TABULKA group by SL2 having count(*) > 1
Pavel
>
> A co takhle v SP pouzit dotaz s GROUP BY a HAVING, neco jako:
>
> select SL1, count(*) from TABULKA group by SL1 having count(*) > 1
>
> Martin Ben
>
>
> > -----Original Message-----
> > From: little_bobes(zv)centrum(tec)cz [mailto:little_bobes(zv)centrum(tec)cz]
> >
> > Zdravim,
> >
> > mam tabulku v IB6, ve ktere by se mi mohly opakovat urcite
> > hodnoty v urcitem
> > sloupci:
> >
> > SL1 SL2
> > ------------
> > 4 1
> > 5 1
> > 1 2 \ tyto dva radky maji stejnou
> > 3 2 / hodnotu ve sloupci SL1 *
> > 6 3
> > 1 5 \
> > 2 5 tyto tri radky maji stejnou
> > 3 5 / hodnotu ve sloupci SL1 ***
> > 7 7
> > 8 7
> > 1 12 \ jako tyto dva radky *
> > 3 12 /
> > 9 18
> > 1 25 \
> > 2 25 jako tyto tri radky ***
> > 3 25 /
> >
> > Potrebuji nyni nejak zjistit pomoci SP (1-ano / 0-ne), jestli
> > k tomu opravdu
> > doslo, ale nemohu prijit na spravny algoritmus.
> > Ma nekdo nejaky napad?
>
prace s GSM zarizenim
[*] Peter Surovy <psurovy(zv)uevora.pt> - 20.6.2002 16:36:43
Ahoj
----- Original Message -----
From: "likeapear" <likeapear(zv)centrum(tec)cz>
Sent: Thursday, June 20, 2002 3:38 PM
> napr se mi stava, ze pri dotazu na vycteni SMS z urcite pozice tj. napr.
> AT+CMGR=1 odpovedelo ERROR 321 (coz je podle dokumentace chyba, ze zadana
> pozice neexistuje a to je divny, kdyz jich tam je 10).
---ono to funguje tak ze prichodzia SMS sa ulozi na volnu
poziciu a v tej si potom existuje az kym ju nevymazes
to znamena ked mas na prvej SMS1 dostanes SMS2
ulozi sa na poziciu 2 potom SMS1 zmazes ale SMS2 zostane s
hodnotou pozicie 2 zato je nejaky AT co Ti vypise
zoznam aj s poziciami teraz neviem isto zeby AT+CMGL=?
nebo pri odesilani
> SMS pomoci AT+CMGS="+420XXXXXXXXX" text^Z mi to odpovedelo ERROR a nic
> neposlalo. nekdy to funguje uplne bez problemu, nekdy ne.
tak Ti to islo bez problemov alebo to neslo vobec teraz tomu nerozumiem :-(
Peter
OT: Tlacitka v Delphi
[*] Martin Kasman <martinkasman(zv)pobox.sk> - 20.6.2002 18:47:44
Potrebujete v Delphi vytvorit tlacitko a obrazky na CD Delphi Vam ani
nahodou nestacia? Potom potrebujete program Ikony 4.1, ktory Vam z obrazku
spravi tlacitko, ktore bude mat samozrejme priesvitne pozadie a bude mat aj
Disabled (not Enabled) tlacitko. A niekolko tisicok obrazkov pre tlacitka
najdete na stranke www.kasman.martin.as v sekcii Ikony s moznostou
stiahnutia.
Program Ikony 4.1 stiahnete z rovnakej stranky, zo sekcie Moje programy.
S pozdravom Martin Kasman.
Manualy k Stored Procedures
[*] Jaroslav Uher <moravia(zv)mbox.vol(tec)cz> - 20.6.2002 18:47:12
Ahoj.
On 20 Jun 2002 at 11:15, jtomecek wrote:
> Kde mohu prosim vas, sehnat manualy (postupy) ke stored proceduram, ktere se
> provadeji na strane Delphi?
pokud to ma byt k IB/FB, tak se podivej treba tady
http://www.ibphoenix.com/ibp_sps_delphi.html
Jarek Uher
Start FB v Win2000
[*] miro mrazik <preas_w(zv)stonline.sk> - 20.6.2002 20:08:39
Ktorym prikazom, alebo programom alebo klucom v registroch nastavim aby sa
mi po spusteni Win2000 automaticky nastartoval Firebird?
Nechcem pouzit instalacne skripty dostupne na www.
Diky
Miro
Jedna aplikace, vice tlacitek v pruhu uloh
[*] Zdenek Stepanek <zstepanek(zv)atlas(tec)cz> - 20.6.2002 20:42:03
Zdravim
Neukamenujte me, ale me kdyz se na monitor dostane aplikace se spoustou
tlacitek v taskbaru, tak silim. Uz tak jich tam je vzydcky plno. Na 800*600
je to znat (divily by jste se, kolik lidi jeste musi pouzivat tohle mizerny
rozliseni.) Jses si opravdu jisty, ze to tam musi byt?
Zdenek
----- Original Message -----
> mam aplikaci, ktera ma vice nemodalnich oken, kde kazde ma sve
> tlacitko v pruhu uloh, coz delam pomoci nastaveni parametru v
> procedure CreateParams:
>
> Params.ExStyle:=Params.ExStyle or WS_EX_APPWINDOW;
> Params.WndParent:=GetDesktopWindow;
>
> Problem nastava, pokud chci zobrazit modalni dialog prislusejici
> jednomu z oken. Zaroven s dialogem, se totiz zobrazi pred danym oknem
> i hlavni okno aplikace. Navic nefunguje spravne ani prepinani oken
> pomoci tlacitek na pruhu uloh. (Testovano ve Win2000.) Poradite mi,
> prosim, jak tyto nedostatky odstranit?
prosim o rady pro navrh struktury databaze
[*] bleak <bleak(zv)atlas(tec)cz> - 20.6.2002 21:30:18
diky, jde o to, ze se jedna mimo jine o pokladni system, za prepazkou stoji
fronta zakazniku a plati poplatky. Obsluha najde klientuv zaznam v databazi,
rychle se podiva na jeho balik sluzeb, vybere skuzbu a musi ihned videt
kolik ma zaplaceno a kolik se ma zplatit. Potom ulozi dalsi platby klienta a
vytiskne doklad.
Pokud by kazde kliknuti na jednu sluzbu znamenalo SQL dotaz do databaze,
obavam se, ze to bude zdrzujici. Musi to byt bleskove, pokud mozno zadne
cekani na zobrazeni udaju. No, ale zkusim si pohrat s TQuery.
bleak
----- Original Message -----
From: "miro mrazik" <preas_w(zv)stonline.sk>
> Ak budes v datasete drzat otvorenych 500 000 zaznamov tak len spustenie
> tejto aplikacie bude zdrzujuce nez sa toto vsetko nacita
> Neviem ako ine systemy ale napr. IBObjects ked prechadzas tabulkou, ktora
ma
> moc zaznamov tak stale ako keby dotahoval udaje (sudiac podla presypacich
> hodin). A ak to robi tak urcite pomocou selektu.
> Asi by predsa len stalo za uvahu vyskusat rychlost selektu.
> Ak by si napr. otvoril tabulku v ttable (ibotable) tato by sluzila len na
> prehliadanie a pomocou komponenty tquery (napr. RequestLive, alebo
> insertom ) pridas do tej istej tabulky zaznam, tak refresh tabulky v
ttable
> je podstatne rychlejsi ako prikaz select na zobrazovanu mnozinu zaznamov,
> resp. TQuery.Close a Open a nemusi to vyzerat az tak zle ako by sa zdalo.
> miro
Prepnutie rozlisenia v TImage
[*] Martin Kasman <martinkasman(zv)pobox.sk> - 20.6.2002 22:38:55
Chcem prepnut rozlisenie z toho dovodu, ze mam program, ktory uklada ikonu.
Vzhladom na to, ze Delphi to vie len v 16 farbach, musi byt aj zobrazena
tesne pred ulozenim len v 16 farbach a pred tym ju mam v Image.
----- Original Message -----
>
> V dobe, kdy jsou bezne 256ti barevne ikony je to IMHO zbytecne.
>
> Petr Vones
>
>
Pridani Fieldu za behu programu
[*] <idulgerov(zv)centrum.sk> - 20.6.2002 22:51:01
Zdravim .
Mam dve drobne otazocky.
1.Potrebujem pridat do TDbf jeden
novy field za behu programu.
Nemate niekto drobny priklad
ako na to ?
Uz sa to tu asi riesilo, ale nedari sa
mi s tym pohnut.
2.Druha vec sa tyka vytvarania tabulky
TDbf za behu programu.
Takze vytvorim tabulku , a potom
do nej sackujem fieldy, asi takto
FieldDefs.Clear;
FieldDefs.Add('Cislo', ftInteger, 0, True);
FieldDefs.Add('Firma', ftString, 50, False);
atd....
vsetko normalne slape az kym nevytvorim field
typu ftMemo.
Ked sa potom tuto tabulku pokusam otvorit
v Database Desktope hodi mi hlasku
" Corrupt table/ index header"
Preco ?
Zaujimave je ze v mojom programe takto
vytvorena tabulka normalne funguje.
Funguje aj v Database Desktope, ale
len bez fieldu ftMemo.
Co robim zle ?
Ivan Dulgerov
programator-amater, mladost v prdeli do penzie daleko
SLOVAK REPUBLIC
----------------------------------------------------------------
http://www.webpark.sk/novy-web.htm - Profesion�lny webhosting
prosim o rady pro navrh struktury databaze
[*] miro mrazik <preas_w(zv)stonline.sk> - 20.6.2002 23:05:34
Ahoj,
Viem ty myslis ze by si otvoril tabulku napr. v TTable, tym sa vsetky udaje
dotiahnu na klienta a uz sa budes pohybovat v iba nej.
Kym este pracujes s BDE (TTAble a TQuery) skus jednu vec s Firebirdom - mne
sa to prejavilo na sieti pri pouziti bde linku pre interbase - otvor tabulku
(aspon 1000 zaznamov) a zobraz si ju v dbgride. Potom skus na dbnavigatore
skok na posledny zaznam. Zistis ze tam okamzite neskoci ale zacne
zobrazobvat presypacie hodiny. Ked uz raz ale skocil na koniec uz potom
skakal na prvy a na posledny zaznam okamzite. Bolo mi to divne tak som dal
prikaz aby skocil napr o 250 zaznamov niekam a zase hodiny. Dalsi problem
bol ze som si na cisleniky - malo zaznamov - pouzil ttable a udaje do
hlavnej tabulky som zadaval pomocou dblookupcomboboxu. Tu bolo druhe
neprijemne zistenie - pri kazdom pokuse o otvorenie lookupkomboboxu sa
zobrazili tie hodiny a trvalo strasne dlho nez ma to pustilo nieco robit.
Na zaklade tychto skusenosti som link bde nahradil odbc ovladacom - nejakym
ruskym - doslo k podstatnemu zrychleniu, ale aj tak to bolo podstatne
pomalsie ako keby to bezalo na paradoxe.
Bolo to velmi pomale a kedze som chcel nadalej vyuzivat TDataset, kupil som
si IBODataset komponenty z IBObjetcts ale oplatilo sa je to radovo
rychlejsie - pracuje sa s tym presne rovnako ako s TTable a TQuery.
Skusam tu podobny problem mam asi 1200 zaznamov a nepoznam rozdiel v
rychlosti dotazu voci vyhladaniu v tabulke. Ked budes napr. drzat otvoreny
napr. menny zoznam zakaznikov kde budes mat natiahnute meno a ID a pri
vybere mu das dotaz s Where ID = presna hodnota, to by nemalo dlhsie trvat
ako ked stojis na mene zacinajucom na "A" a chces pri takom velkom mnozstve
zaznamov skocit na "Z".
U tabulky TTable treba pocitat aj s tym ze ak bude solo tak skoky budu
rychlejsie ako ked budes mat na nu zavesenu dalsiu tabulku v relacii tam
tiez dojde k zdrzaniu.
Mozno by bolo dobre ak by tu niekto kto uz spravuje taku velku databazu
napisal, ako asi dlho trva dotaz do takej velkej tabulky (statisice
zaznamov) ak z nej chcem vybrat jeden konkretny zaznam.
Miro
Delphi 6 RTL Update Pack
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 21.6.2002 01:19:16
Delphi 6 Updates for the RTL and Informix 9.2.1
http://community.borland.com/article/0,1410,28783,00.html
Petr Vones
Pridani Fieldu za behu programu
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 21.6.2002 06:33:04
20.6.2002 idulgerov(zv)centrum.sk:
> Mam dve drobne otazocky.
> 1.Potrebujem pridat do TDbf jeden
> novy field za behu programu.
> Nemate niekto drobny priklad
> ako na to ?
To nebude uplen jednoduche.
Puvodni tabulku si nekam odlozis
Press FieldDefs.Add si pole pridas
Pak presypes vety z te odlozene tabulky do te s novou strukturou
Proste nemas k dispozici BDE, abys pouzil SQL prikaz na Alter Table.
> 2.Druha vec sa tyka vytvarania tabulky
> TDbf za behu programu.
> Takze vytvorim tabulku , a potom
> do nej sackujem fieldy, asi takto
> FieldDefs.Clear;
> FieldDefs.Add('Cislo', ftInteger, 0, True);
> FieldDefs.Add('Firma', ftString, 50, False);
> atd....
> vsetko normalne slape az kym nevytvorim field
> typu ftMemo.
TDBF umi pracovat s MEMO pouze pro dBase4. Vlastne veskere nove
vytvarene tabulky z teto komponenty jsou ve formatu dBase4.
A mozna, ze jeste nejak podivne.
> Zaujimave je ze v mojom programe takto
> vytvorena tabulka normalne funguje.
> Funguje aj v Database Desktope, ale
> len bez fieldu ftMemo.
Kdyz to umi vytvorit, tak to taky zrejme umi i cist. Jen jde o to, zda
je to memo standardni...
--
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
FireBird Role a USER
[*] Ales Pavel <Aldik(zv)quick(tec)cz> - 21.6.2002 07:11:21
Ahoj kluci potreboval bych trochu administrovat FB a nevim jak mam vytvorit
uzivatelsky prava a jak se starat o pristup k tabulkam a jak osetrit chybny
pristup...
Hlavne jsem nevedel jak vytvorit usera nad DB a jak nastavit jeho
prava...moc diky za podrobny popis pro blbecka:-)
Ales Pavel
Delphi 6 Ent WXP
Connection lost v IB
[*] <little_bobes(zv)centrum(tec)cz> - 21.6.2002 07:12:01
----- Original Message -----
From: "Jaroslav Popluhar" <delphi1(zv)acc.sk>
> Oboje pouzivam. A zatial sa mi stalo iba, ze niektore nastroje
> (napr. IB Console) na tu diakritiku naozaj zajdu, ale pokial by vadila
> diakritika
> tak predpokladam, ze k problemom by doslo pocas generovania exceptions
> alebo mozno pri nejakom inom pristupe donejakej RDB$ kde su exceptions
> ulozene.
Ja si myslim, ze se mi to stalo nasledovne:
Do IB Console se normalne prihlasuji s Character Set: WIN1250.
Vzpominam si min. na jeden pripad, kdy jsem se tam (uz nevim proc) pripojil
pomoci Character set: NONE (!).
A pravdepodobne jsem tehdy vytvoril nektere EXCEPTIONS, ktere meli
diakritiku.
Jakmile jsem se pozdeji prihlasil s WIN1250, nemohl jsem si EXCEPTION
prohlednout, protoze %subject% a nebo klasicka zprava o tom, ze nemuze
zobrazit text, protoze je v jine character set.
> Pokial si to tam mal, ake chyby sa Ti tam objavovali?
Chyby se objevovaly pouze v IB Console, kdy jsem chtel pridavat (menit) SP,
triggery, ktere pouzivaji EXCEPTION.
Nastaval %subject%. Proto jsem je nejdrive nastavil na "" a potom na text
bez diakritiky.
V programu, ktery tuto gdb tabulku pouzival, se zadna chyba neobjevovala -
EXCEPTION se zobrazily spravne.
Potom byl take problem s BACKUP a RESTORE.
BACKUP probehl v poradku, ale RESTORE uz nebyl schopny ji zpetne nacist.
Bob
Jak zjistit, opakuji-li se mi 2 ci vice radku v IB
[*] <little_bobes(zv)centrum(tec)cz> - 21.6.2002 07:31:11
----- Original Message -----
From: "Lstiburek Pavel" <Lstiburek(zv)ceb(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
> Reseni je spravne, ale opakujici hodnoty jsou (pokud jsem to pochopil
(;-))
> ve sloupci SL2 !
> select SL2, count(*) from TABULKA group by SL2 having count(*) > 1
>
Diky, ale to jeste neni preste to, co bych si predstavoval.
Popisu to podrobneji:
SL1 SL2
------------
1 2 \ tyto dva radky maji stejnou
3 2 / hodnotu ve sloupci SL1
6 3
1 12 \ jako tyto dva radky
3 12 /
9 18
1 28 \ a jako tyto dva radky
3 28 /
Opakujici se mi radky jsou SL1: 1, 3.
Ja potrebuji, aby mi to (dotaz nebo SP) reklo, ze radky s hodnotou 1 a 3
(oba dva najednou, ne kazdy jednotlive) v SL1 se vyskytuji i na jinem miste
tabulky (s jinou hodnotou v SL2).
SL1 SL2 SL3
-------------------
1 7 2 \ tyto dva radky maji stejnou
3 7 2 / hodnotu ve sloupci SL1 a SL2
6 3 3
1 7 12 \ jako tyto dva radky
3 7 12 /
9 4 18
1 7 28 \ a jako tyto dva radky
3 7 28 /
A jak by to potom vypadalo, kdybych mel ty opakujici se hodnoty ve dvou
sloupcich (SL1, SL2)?
Diky Bob
W2K - chyba aplikace - znovu
[*] Petr Jansky <delphi(zv)amzdy(tec)cz> - 21.6.2002 07:47:40
Ahoj
Jiz jsem se na tento problem tady ptal.
Mam aplikaci, s ClientDataSetem a jednim QReportem na W98 funguje uplne
normalne,
a na W2K se po spusteni objevi dialog: "Aplikace zpusobila chybu......
System Windows vytvari protokol o chybach."
to hlasi, ale jen na nekterych stanicich, na jine to funguje bez problemu.
Postupne jsem vysledoval, ze to pada v TQREP.CREATE, na :
SetLength(qTX1,Form1.cdsAbs.RecordCount-2);
kde qTX1 je: array of TQRLabel;
a cdsAbs je TClientDataSet;
Jenze!!!!!
Nyni se mi tato chyba objevila u jine aplikace! A aby to nebylo tak
jednoduche, na jinem pocitaci s W2K to chybu nehlasi!
Myslite, ze mi pomuze, kdyz program zkompiluju na W2K???
S pozdravem
Ing. Petr J�nsk�
---
Odchoz� zpr�va mo�n� neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.370 / Virov� b�ze: 205 - datum vyd�n�: 5.6.2002
prace s GSM zarizenim
[*] likeapear <likeapear(zv)centrum(tec)cz> - 21.6.2002 07:48:26
| poziciu a v tej si potom existuje az kym ju nevymazes
| to znamena ked mas na prvej SMS1 dostanes SMS2
| ulozi sa na poziciu 2 potom SMS1 zmazes ale SMS2 zostane s
| hodnotou pozicie 2 zato je nejaky AT co Ti vypise
| zoznam aj s poziciami teraz neviem isto zeby AT+CMGL=?
dobre ale kdyz dam AT+CMGR=1 a pozice 1 je prazdna tak proc mi to nekdy
odpovi ERROR 321 a nekdy OK???
v pripade ze pozice jedna je obsazena zpravou, tak mi to nekdy odpovi textem
zpravy a nekdy ERROR 321.| tak Ti to islo bez problemov alebo to neslo vobec teraz tomu nerozumiem
:-(
plati jako u predchoziho: nekdy se to odeslalo (odpovedelo OK) a nekdy to
odpovedelo ERROR a nic neposlalo
celkove jsem z toho nemel dobry pocit. nevim jestli je problem nekde v HW
nebo u me v SW. proste to na me pusobilo tak nejak nespolehlive.
likeapear
SURNE - OLEAUT32
[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 21.6.2002 07:53:31
> > Pri spustani programu mi system vypisuje : Subor je propojen na
> > chybejici export OLEAUT32.dll.
pomuze nainstalovat IE5.x
peca
prace s GSM zarizenim
[*] Malecek Ondrej <ondrej.malecek(zv)radom-cz(tec)cz> - 21.6.2002 08:10:41
Nekolik doporuceni:
- Siemens M20 je docela smejd.
- je potreba dodrzovat minimalni casovou roztec mezi dvema AT prikazy, jinak
to hazi naprosto nahodne chyby (dopracovali jsme se na dobu okolo 1 s).
- to jak se modem chova znacne zalezi na SIM, zejmena pri praci s SMS a
dalsimi AT, pri kterych se modem odkazuje na SIM (zadavani PIN apod.) se v
zavislosti na SIM dost vyrazne meni cas odezvy modemu na prikaz => vzdy je
treba pockat na dokonceni predchoziho prikazu, bo rozjeti dalsiho "nedela
modemu dobre".
- pro cteni SMS pouzivame AT+CMGL=4 a z predaneho seznamu zprav si pak
bereme pouze ty, ktere jsou "neprectene" a nasledne pak mazeme.
Ondrej
> -----P�vodn� zpr�va-----
> | poziciu a v tej si potom existuje az kym ju nevymazes
> | to znamena ked mas na prvej SMS1 dostanes SMS2
> | ulozi sa na poziciu 2 potom SMS1 zmazes ale SMS2 zostane s
> | hodnotou pozicie 2 zato je nejaky AT co Ti vypise
> | zoznam aj s poziciami teraz neviem isto zeby AT+CMGL=?
>
> dobre ale kdyz dam AT+CMGR=1 a pozice 1 je prazdna tak proc mi to nekdy
> odpovi ERROR 321 a nekdy OK???
> v pripade ze pozice jedna je obsazena zpravou, tak mi to nekdy
> odpovi textem
> zpravy a nekdy ERROR 321.
>
> | tak Ti to islo bez problemov alebo to neslo vobec teraz tomu nerozumiem
> :-(
> plati jako u predchoziho: nekdy se to odeslalo (odpovedelo OK) a nekdy to
> odpovedelo ERROR a nic neposlalo
>
> celkove jsem z toho nemel dobry pocit. nevim jestli je problem nekde v HW
> nebo u me v SW. proste to na me pusobilo tak nejak nespolehlive.
>
> likeapear
>
Jak zjistit, opakuji-li se mi 2 ci vice radku v IB
[*] Martin Cajbik <cajbik(zv)sct.sk> - 21.6.2002 08:28:34
A co takto:
SELECT A.SL1
FROM Tabulka A
WHERE EXISTS(SELECT B.SL1
FROM Tabulka B
WHERE A.SL2 = B.SL2
AND A.SL1 <> B.SL1)
pripadne este s DISTINCT ak sa to nema opakovat.
MarCaNT (marcant(zv)sct.sk)> Diky, ale to jeste neni preste to, co bych si predstavoval.
> Popisu to podrobneji:
>
> SL1 SL2
> ------------
> 1 2 \ tyto dva radky maji stejnou
> 3 2 / hodnotu ve sloupci SL1
> 6 3
> 1 12 \ jako tyto dva radky
> 3 12 /
> 9 18
> 1 28 \ a jako tyto dva radky
> 3 28 /
>
> Opakujici se mi radky jsou SL1: 1, 3.
> Ja potrebuji, aby mi to (dotaz nebo SP) reklo, ze radky s hodnotou 1 a 3
> (oba dva najednou, ne kazdy jednotlive) v SL1 se vyskytuji i na jinem
miste
> tabulky (s jinou hodnotou v SL2).
>
> SL1 SL2 SL3
> -------------------
> 1 7 2 \ tyto dva radky maji stejnou
> 3 7 2 / hodnotu ve sloupci SL1 a SL2
> 6 3 3
> 1 7 12 \ jako tyto dva radky
> 3 7 12 /
> 9 4 18
> 1 7 28 \ a jako tyto dva radky
> 3 7 28 /
>
> A jak by to potom vypadalo, kdybych mel ty opakujici se hodnoty ve dvou
> sloupcich (SL1, SL2)?
>
> Diky Bob
W2K - chyba aplikace - znovu
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 21.6.2002 08:30:38
Obdobnou chybu hlasil muj program pouzivajici QR. Zaviselo to na tiskarne aktualne vychozi a poctu podporovanych formatu papiru. Pri mnozstvi vetsim jak 64 pretekla promenna a bud to spadlo nebo ne (zcela nahodne, zaviselo to asi na aktualnin natazeni do pameni). Pozdeji to QuSoft opravil a promennou predimenzoval. Kompilace pod W2K tomu zrejme nepomuze.
Jaro B.
-----Original Message-----
From: Petr Jansky [mailto:delphi(zv)amzdy(tec)cz]
Sent: Friday, June 21, 2002 7:48 AM
To: Delphi konference
Subject: W2K - chyba aplikace - znovu
a na W2K se po spusteni objevi dialog: "Aplikace zpusobila chybu......
System Windows vytvari protokol o chybach."
to hlasi, ale jen na nekterych stanicich, na jine to funguje bez problemu.
Postupne jsem vysledoval, ze to pada v TQREP.CREATE, na :
SetLength(qTX1,Form1.cdsAbs.RecordCount-2);
kde qTX1 je: array of TQRLabel;
a cdsAbs je TClientDataSet;
Jenze!!!!!
Nyni se mi tato chyba objevila u jine aplikace! A aby to nebylo tak
jednoduche, na jinem pocitaci s W2K to chybu nehlasi!
Ing. Petr J�nsk�
---
Odchoz� zpr�va mo�n� neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.370 / Virov� b�ze: 205 - datum vyd�n�: 5.6.2002
W2K - chyba aplikace - znovu
[*] Robert Suska <delphi(zv)korak.sk> - 21.6.2002 08:37:38
Ahojte!
Mam k tejto teme jednu otazku. Proste vyvijam informacny system a stojim
pred rozhodnutim ktore reporty pouzijem do toho systemu. Ci QReport alebo
ake??? Mam D6 Ent. a este jedna otazka ze v tejto verzii Delphi su ake
QReport dobre? alebo zle? ak to mozem tak definovat. Mam nainstalovany
Update Pack 1, 2.
Dakujem
Robo
Obdobnou chybu hlasil muj program pouzivajici QR. Zaviselo to na tiskarne
aktualne vychozi a poctu podporovanych formatu papiru. Pri mnozstvi vetsim
jak 64 pretekla promenna a bud to spadlo nebo ne (zcela nahodne, zaviselo to
asi na aktualnin natazeni do pameni). Pozdeji to QuSoft opravil a promennou
predimenzoval. Kompilace pod W2K tomu zrejme nepomuze.
Jaro B.
-----Original Message-----
From: Petr Jansky [mailto:delphi(zv)amzdy(tec)cz]
Sent: Friday, June 21, 2002 7:48 AM
To: Delphi konference
Subject: W2K - chyba aplikace - znovu
a na W2K se po spusteni objevi dialog: "Aplikace zpusobila chybu......
System Windows vytvari protokol o chybach."
to hlasi, ale jen na nekterych stanicich, na jine to funguje bez problemu.
Postupne jsem vysledoval, ze to pada v TQREP.CREATE, na :
SetLength(qTX1,Form1.cdsAbs.RecordCount-2);
kde qTX1 je: array of TQRLabel;
a cdsAbs je TClientDataSet;
Jenze!!!!!
Nyni se mi tato chyba objevila u jine aplikace! A aby to nebylo tak
jednoduche, na jinem pocitaci s W2K to chybu nehlasi!
Ing. Petr J�nsk�
---
Odchoz� zpr�va mo�n� neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.370 / Virov� b�ze: 205 - datum vyd�n�: 5.6.2002
Mizej�c� transakce
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 21.6.2002 08:55:26
Ahoj,
nevite nekdo, jak zajistit, aby z projektu nahodile nemizely
transakce? Proste clovek najednou po nejake dobe otevre projekt
postaveny na IBX, opravi nejakou prkotinu, prelozi a najednou se
zjisti ze na spouste datasetu chybi odkaz na transakci. Kdyz si tam
form zobrazit jako text, tak tam property Transaction u nekterych
datasetu vubec neni. A co je zvlastni, i v ramci jednoho formulare
jsou nektere datasety v poradku a jine bez transakce. Formulare
jsou primi potomci TForm, nejedna se o dedicnost formularu uvnitr
projektu. Takhle se fakt neda pracovat. Nevite o tom nekdo neco?
Dik.
David Lebeda
W2k, D5Pro + SP1, IBX 4.52 (vim, ze existuje novejsi, ale tenhle
vyhovuje)
W2K - chyba aplikace - znovu
[*] Milan Tome� <milan.tomes(zv)haida(tec)cz> - 21.6.2002 09:01:47
Vzhledem k velke chybovosti QReportu a spatne sprave vytvorenych sestav jsme
se pro nas IS rozhodli pouzit Sineu (www.sinea(tec)cz). Pro nas nejdulezitejsi
je moznost upravy sestav u zakaznika bez zdrojovych kodu programu.
S pozdravem
Milan Tomes
mailto:milan.tomes(zv)haida(tec)cz
> Behalf Of Robert Suska
> Mam k tejto teme jednu otazku. Proste vyvijam informacny system a stojim
> pred rozhodnutim ktore reporty pouzijem do toho systemu. Ci QReport alebo
> ake??? Mam D6 Ent. a este jedna otazka ze v tejto verzii Delphi su ake
> Robo
Internet explorer vs registry
[*] Martin Ferenc <superpage(zv)seznam(tec)cz> - 21.6.2002 09:13:46
Zdravim,
Nevite nahodou nekdo jak donutit Internet Explorer znovu nacist
nastaveni z registru aniz bych ho musel restartovat?
Mam spusteny IE zmenim nastaveni v registrech (napr.proxy) a
potrebuji
aby se tot nastaveni projevilo v IE aniz bych ho musel zavrit a opet
otevrit.
Diky za pripadnou odpoved nebo namet
Martin
______________________________________________________________________
Reklama:
Volkswagen nyni nabizi akcni model Golf Generation s bohatou nadstandardni vybavou. http://ad2.seznam(tec)cz/redir.cgi?instance=28673%26url=http://www.volkswagen(tec)cz/akcnigolf
prace s GSM zarizenim
[*] likeapear <likeapear(zv)centrum(tec)cz> - 21.6.2002 09:16:37
no to je pekny, zkusim co se s tim da delat. vidim, ze s tim mas zkusenosti.
zeptam se proto na vec o ktere jsem se jiz zminil:
1. jak zamezit tomu aby pri prijeti SMS modem nic neposilal po portu? ja si
prijate SMS zjistim sam. slysel jsem, ze existuje nejakej AT prikaz, kterym
to jde vypnout ale v dokumentaci jsem nic takoveho nenasel...
2. pouzivali ste textovy mod nebo PDU?
likeapear
| Nekolik doporuceni:
| - Siemens M20 je docela smejd.
| - je potreba dodrzovat minimalni casovou roztec mezi dvema AT prikazy,
jinak
| to hazi naprosto nahodne chyby (dopracovali jsme se na dobu okolo 1 s).
| - to jak se modem chova znacne zalezi na SIM, zejmena pri praci s SMS a
| dalsimi AT, pri kterych se modem odkazuje na SIM (zadavani PIN apod.) se v
| zavislosti na SIM dost vyrazne meni cas odezvy modemu na prikaz => vzdy je
| treba pockat na dokonceni predchoziho prikazu, bo rozjeti dalsiho "nedela
| modemu dobre".
| - pro cteni SMS pouzivame AT+CMGL=4 a z predaneho seznamu zprav si pak
| bereme pouze ty, ktere jsou "neprectene" a nasledne pak mazeme.
|
| Ondrej
W2K - chyba aplikace - znovu
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 21.6.2002 09:19:10
To je otazka...
Pouzivam QR proto, protoze byl dodan standardne k Delphi (ale musel jsem dokoupit update na Prof. abych mel zdrojaky a moh' opravovat chybky).
Pro sve soukrome veci jsem si koupil ACEreporter (mam ho uz 6 let, je to se zdroji a jsem s nim docela spokojeny, ale taky zadny zazrak).
A nakonec pouzivam zakladni objekt TPrinter a pisu/kreslim primo na canvas tiskarny. Je to pomerne pracne a neni vysledek hned videt - ale zas mas vsechno v ruce. Ted se poohlizim po nejakem preview, ktery by umoznil nahled pro takto vytvarene reporty (par jsem jich videl na torry).
V roce 1999 jsem pristoupil k projektu, ktery mel tisky zalozene a QR (tehdy verze 1, Byl zalozen v D1, rozvijen v D2 a ja ho premigroval do D3). Byl neobycejny problem (a hlavni kamen urazu) pri zachovani identickeho vzhledu prejit z Delphi 3 na Delphi 5, kde je QR verze 3.x . Existuje neco jako firemni konzervatismus a neni mozne ho nejak prekonat, je mozne se mu prizpusobit a pak ho (trosku) prihnout k obrazu svemu. Prave tisky oddalily prevedeni projektu do Delphi 5 o vice jak dva roky. Nove vyrobeni reportu by asi bylo jednodussi cestou, ale zase by doslo k zavleceni novych chyb...
Je asi nutne zvazit jake reporty budou tisknuty. Zda jen n�jak� v�pisy (na to se vcelku QR hodi) nebo formulare (dotazniky, smlouvy atp.) nebo booklety nebo jestli je pozadavek zakaznika na klientskou upravu tisku (sam si chce menit pole, nazvy, bandy atp.) nebo zda-li si preje skladovat otisky vytisku na disku treba v jpg. Pokud se jedna o maly projekt, tak to je mozne usmolit v QR, ale kdybych se mel poustet do nejakeho vetsiho, tak bych si to asi rozmyslel. Mam projekt, kde cast tisku byla realizovana v QR (myslel jsem ze to taky 'usmolim') a tam jsem zvolil oddeleni QR od aplikace - veskere tisky pro QR byly vlozeny do DLL a volalo se to pres procedury. Jako parametr jsem predal StringList s parametry pro tisk napr. 'QRLabel1_Caption=Smlouva o prodeji nemovitosti' a doplnil to programem do tisku. Fungovalo to a dokonce se to dalo volat i z jinych ne-Delphi programu (s malinkou upravou Stringlist se zmenil na filename a tam byl obsah stringlistu).
Otazkou ale zustava, zda-li bude QR vylepseny, videl jsem nastrel QR ver. 3.6, ale nic moc.
Pokud bych zacinal novy projekt, asi bych zvazil, co je to za projekt a podle toho vybiral tiskovy stroj.
Jaro B.
-----Original Message-----
From: Robert Suska [mailto:delphi(zv)korak.sk]
Sent: Friday, June 21, 2002 8:38 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: W2K - chyba aplikace - znovu
Ahojte!
Mam k tejto teme jednu otazku. Proste vyvijam informacny system a stojim
pred rozhodnutim ktore reporty pouzijem do toho systemu. Ci QReport alebo
ake??? Mam D6 Ent. a este jedna otazka ze v tejto verzii Delphi su ake
QReport dobre? alebo zle? ak to mozem tak definovat. Mam nainstalovany
Update Pack 1, 2.
Dakujem
Robo
prace s GSM zarizenim
[*] David Men��k <mensikd(zv)seznam(tec)cz> - 21.6.2002 09:45:30
Zajimalo by mne, ktery mobil podporuje textovy mod posilani SMS. Siemens C35
ma PDU....
Ozon
----- Original Message -----
> 2. pouzivali ste textovy mod nebo PDU?
prace s GSM zarizenim
[*] Ales Vasicek <vasicek(zv)ecommerce(tec)cz> - 21.6.2002 09:47:45
urcite NOKIA 7110 a 6210. Vyzkouseno.
Ales
> -----Original Message-----
> From: David Men��k [mailto:mensikd(zv)seznam(tec)cz]
>
> Zajimalo by mne, ktery mobil podporuje textovy mod posilani
> SMS. Siemens C35 ma PDU....
prace s GSM zarizenim
[*] Malecek Ondrej <ondrej.malecek(zv)radom-cz(tec)cz> - 21.6.2002 09:48:51
Ad1) Na nastaveni nevyzadanych hlaseni modemu tykajicich se SMS by melo jit
pouzit AT+CNMI, tvuj pripad by melo resit AT+CNMI=0,0,0,0,1 (kazdopadne v
dokumentaci je uvaden podrobny popis).
Ad2) PDU
Ondrej
> -----P�vodn� zpr�va-----
> no to je pekny, zkusim co se s tim da delat. vidim, ze s tim mas
> zkusenosti.
> zeptam se proto na vec o ktere jsem se jiz zminil:
>
> 1. jak zamezit tomu aby pri prijeti SMS modem nic neposilal po
> portu? ja si
> prijate SMS zjistim sam. slysel jsem, ze existuje nejakej AT
> prikaz, kterym
> to jde vypnout ale v dokumentaci jsem nic takoveho nenasel...
>
> 2. pouzivali ste textovy mod nebo PDU?
>
> likeapear
prace s GSM zarizenim
[*] Malecek Ondrej <ondrej.malecek(zv)radom-cz(tec)cz> - 21.6.2002 09:52:14
Siemens M20 neni mobil, ale "prumyslovy" modul & textovy mod sice umoznuje,
ale PDU je PDU.
Ondrej
> -----P�vodn� zpr�va-----
> Zajimalo by mne, ktery mobil podporuje textovy mod posilani SMS.
> Siemens C35
> ma PDU....
>
> Ozon
Klavesy
[*] tomsir1.edu(zv)mail.cez(tec)cz - 21.6.2002 09:55:04
Ahoj,
potreboval bych nejakym zpusobem vyresit nasledujici problem :
Na TScrollBox potrebuji umistit "neco" ve tvaru obdelniku, co by mi
simulovalo kurzor, ovladany z klavesnice, tj. reagovalo by to na stisk
sipek a treba mezerniku. Pouzil jsem na to TPanel. Funguje to vsak pouze v
pripade, ze vsem ostatnim komponentam /tlacitka, edity ../ ve formulari dam
vlastnost TabStop na false. Ale stejne pokud kliknu napr. na tlacitko,
prestanou byt zpravy o stisku klaves dorucovany "kurzoru"
Jak jednoduse zaridit, aby byly zpravy o stisku klaves byly zaslany vzdy,
nezavisle na tom, ktery prvek na formu je aktivni ??
Radek
MINIMALIZACIA MODALNEHO FORMULARA
[*] Peter Mojdis <mojdis(zv)colnicapo.sk> - 21.6.2002 9:22:56
Ahoj !
Potreboval by som minimalizovat celu aplikaciu, ak uzivatel minimalizuje modalne okno, ktore nie je
hlavnym oknom aplikacie. Neviete, ako na to ? Skusal som odchytavat spravu WM_SIZE s parametrom SIZE_MINIMIZED a naledne zavolat Application.Minimize, ale nefunguje to.
D5 Ent.Internet explorer vs registry
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 21.6.2002 10:22:28
VGV6a28uIFbsdHNpbmEgcHJvZ3JhbXUgc2kgcG9kb2JuZSB2ZWNpIG5hY3RlIHByaSBzdGFydHUg
YSBwYWsgdXogbmENCm5lIG5lYmVyZSBvaGxlZCAgOi0oDQoNCi0tIA0KaW5nLiBKYW4gRmlhbGEN
Cm1haWx0bzpqYW4uZmlhbGFAaW9sLmN6DQoNCjIxLjYuMjAwMiBNYXJ0aW4gRmVyZW5jOg0KPiBa
ZHJhdmltLA0KPiBOZXZpdGUgbmFob2RvdSBuZWtkbyBqYWsgZG9udXRpdCBJbnRlcm5ldCBFeHBs
b3JlciB6bm92dSBuYWNpc3QNCj4gbmFzdGF2ZW5pIHogcmVnaXN0cnUgYW5peiBieWNoIGhvIG11
c2VsIHJlc3RhcnRvdmF0Pw0KPiBNYW0gc3B1c3RlbnkgSUUgem1lbmltIG5hc3RhdmVuaSB2IHJl
Z2lzdHJlY2ggKG5hcHIucHJveHkpIGENCj4gcG90cmVidWppDQo+IGFieSBzZSB0b3QgbmFzdGF2
ZW5pIHByb2pldmlsbyB2IElFIGFuaXogYnljaCBobyBtdXNlbCB6YXZyaXQgYSBvcGV0DQo+IG90
ZXZyaXQuDQoNCj4gRGlreSB6YSBwcmlwYWRub3Ugb2Rwb3ZlZCBuZWJvIG5hbWV0DQo+IE1hcnRp
bg0KDQo+IF9fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19f
X19fX19fX19fX19fX19fX19fX18NCj4gUmVrbGFtYToNCj4gVm9sa3N3YWdlbiBueW5pIG5hYml6
aSBha2NuaSBtb2RlbCBHb2xmIEdlbmVyYXRpb24gcyBib2hhdG91IG5hZHN0YW5kYXJkbmkgdnli
YXZvdS4gaHR0cDovL2FkMi5zZXpuYW0uY3ovcmVkaXIuY2dpP2luc3RhbmNlPTI4NjczJTI2dXJs
PWh0dHA6Ly93d3cudm9sa3N3YWdlbi5jei9ha2NuaWdvbGYNCiA=
Klavesy
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 21.6.2002 10:25:58
Zkus treba ActionList, udelej si akce na jednotlive smery, prirad jim
horke klavesy...
--
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
21.6.2002 tomsir1.edu(zv)mail.cez(tec)cz:
> Ahoj,
> potreboval bych nejakym zpusobem vyresit nasledujici problem :
> Na TScrollBox potrebuji umistit "neco" ve tvaru obdelniku, co by mi
> simulovalo kurzor, ovladany z klavesnice, tj. reagovalo by to na stisk
> sipek a treba mezerniku. Pouzil jsem na to TPanel. Funguje to vsak pouze v
> pripade, ze vsem ostatnim komponentam /tlacitka, edity ../ ve formulari dam
> vlastnost TabStop na false. Ale stejne pokud kliknu napr. na tlacitko,
> prestanou byt zpravy o stisku klaves dorucovany "kurzoru"
> Jak jednoduse zaridit, aby byly zpravy o stisku klaves byly zaslany vzdy,
> nezavisle na tom, ktery prvek na formu je aktivni ??
> Radek
Jak zjistit, opakuji-li se mi 2 ci vice radku v IB
[*] <little_bobes(zv)centrum(tec)cz> - 21.6.2002 11:00:27
Ale to se tyka stale opakovani jednoho radku.
Jenze me zajima opakovani serie nekolika radku.
(to same jako PRIMARY KEY pro sloupce)
Mohlo by to vratit treba toto:
SL3 POCET
----------------
2 3
3 1
18 1
coz znamena, ze radky s hodnotou 2 v SL3 se vyskytuji v tabulce celkem 3x, s
hodnotou 3 pouze 1x.
Pak jeste pridat podminku > 1 a vysledek bude pouze:
SL3 POCET
----------------
2 3
A nyni bych potreboval vedet, jak tohoto vysledku dosahnout.
Bob
----- Original Message -----
From: "Martin Cajbik" <cajbik(zv)sct.sk>
> A co takto:
>
> SELECT A.SL1
> FROM Tabulka A
> WHERE EXISTS(SELECT B.SL1
> FROM Tabulka B
> WHERE A.SL2 = B.SL2
> AND A.SL1 <> B.SL1)
>
> pripadne este s DISTINCT ak sa to nema opakovat.
> SL1 SL2 SL3
> -------------------
> 1 7 2 \ tyto dva radky maji stejnou
> 3 7 2 / hodnotu ve sloupci SL1 a SL2
> 6 3 3
> 1 7 12 \ jako tyto dva radky
> 3 7 12 /
> 9 4 18
> 1 7 28 \ a jako tyto dva radky
> 3 7 28 /Tiff files
[*] Peter Laufer <laufer(zv)dmasys.sk> - 21.6.2002 11:14:33
Ahojte.
Potreboval by som nejaku dobru komponentu na pracu s tiffom... (hlavne aby
zvladala kompresiu G3,G3fax,G4 a multipage)...
Vdaka za pomoc...
Peter Laufer
MINIMALIZACIA MODALNEHO FORMULARA
[*] Jaroslav Bucek <bucek(zv)eskon(tec)cz> - 21.6.2002 11:19:40
Ja jsem tento problem vyresil nasledovne:
na MainForm zachyt udalost Application.Restore, muzes treba pouzit
ApplicationEvents ze zalozky Additional
procedure TMainForm.ApplicationEventsRestore(Sender: TObject);
begin
ShowWindow(Application.Handle, SW_SHOWNORMAL);
// pokud byla minimalizace volana z Modal window, pak ho "dones" dopredu
if ModalForm <> nil then
if ModalForm.Showed then
begin
SetForegroundWindow(ModalForm.Handle);
ModalForm.Minimized := False;
end;
end;
na ModalForm pridej zachyceni zpravy wm_SysCommand a promennou Showed,
kterou nastav na True pred ShowModal a na False hned po ShowModal. Tato
promenna slouzi k tomu, abys v udalosti na hlavnim formulari vedel, jestli
byla minimalizace volana z modalniho okna.
type TModalForm...
...
Showed : boolean;
procedure WMSysCommand(var Msg: TWMSysCommand); message wm_SysCommand;
...
end;
procedure TModalForm.WMSysCommand(var Msg: TWMSysCommand);
begin
if Msg.CmdType = SC_Minimize then
begin
ShowWindow(Application.Handle, SW_MINIMIZE);
Minimized := True;
end
else
inherited;
end;
procedure ModalFrm_ShowModal;
begin
ModalForm.Showed := True;
ModalForm.ShowModal;
ModalForm.Showed := False;
end;
Tento postup mam vyzkouseny na W2K a funguje spolehlive, ale pokud to budes
delat na jinem OS, tak bych ocenil, kdybys mi na muj soukromy mail napsal,
jestli funguje. Aspon mi tim usetris cas se zkousenim na dalsich OS (W95,
NT, ...). Diky.
Jarda
----- Original Message -----
From: "Peter Mojdis" <mojdis(zv)colnicapo.sk>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Friday, June 21, 2002 10:22 AM
Subject: MINIMALIZACIA MODALNEHO FORMULARA
> Ahoj !
>
> Potreboval by som minimalizovat celu aplikaciu, ak uzivatel minimalizuje
modalne okno, ktore nie je
> hlavnym oknom aplikacie. Neviete, ako na to ? Skusal som odchytavat spravu
WM_SIZE s parametrom SIZE_MINIMIZED a naledne zavolat Application.Minimize,
ale nefunguje to.
>
> D5 Ent.
>
>
prace s GSM zarizenim
[*] MarekFi <MarekFi(zv)centrum(tec)cz> - 21.6.2002 11:20:53
Pokud Ti nekdo posle zpravu treba z Nokia 3310, ktera je delsi
nez 160 znaku tak se rozdeli na vice SMS zprav a potom Ti tyto
casti i Nokia 7110 vychrli ve formatu PDU bez ohledu na to zda
mas nastaven TEXTOVY rezim A NEBO NE.
Marek Fiala
Ales Vasicek wrote:
> urcite NOKIA 7110 a 6210. Vyzkouseno.
>
> Ales
>
> > -----Original Message-----
> > From: David Men��k [mailto:mensikd(zv)seznam(tec)cz]
> >
> > Zajimalo by mne, ktery mobil podporuje textovy mod posilani
> > SMS. Siemens C35 ma PDU....
Simulacia okolnych pocitacov
[*] Lubos <ludan(zv)inMail.sk> - 21.6.2002 11:25:17
Ahoj!
Potrebujem testovat funkcnost mojho programu =28suborovy manag=
er=29 na okolnych pocitacoch=2E
Doma mam vsak len jeden pocitac=2E
=
Existuje nejaky sposob=2C ako by som si mohol v systeme vytvorit okol=
ne pocitace=3F
Mam Win2000 Cz Pro
Dik
Lubos
6 farebna ikona v tray bare
[*] Lubos <ludan(zv)inMail.sk> - 21.6.2002 11:37:30
Ahoj=2E
Mam v programe 256 farebnu ikonu=2E Chcem spravit=2C aby s=
a program minimalizoval do tray baru=2E
Avsak ak pouzijem hociktore =
komponenty tak sa ta ikona sice v trayi zobrazi=2C ale zmeni sa palet=
a na 16 farieb a vyzera to skaredo=2E
Je vobec mozne=2C aby sa ta ik=
ona zobrazovala v 256 farbach=2C alebo sa mam zmierit s tym=2C ze len=
v 16tich=3F
Lubos
MINIMALIZACIA MODALNEHO FORMULARA
[*] Ing. Pavel �ilinec����)b���zf���3 - 21.6.2002 11:48:36
Do private formulare si dej
procedure OnMinimize(var Message : TMessage); message WM_SysCommand;
a pak muzes napsat napr.:
if Message.Msg = WM_SYSCOMMAND then
case Message.WParam of
SC_Minimize : if Application.MainForm.WindowState <> wsMinimized then
Application.MainForm.WindowState := wsMinimized;
SC_Maximize : if Application.MainForm.WindowState = wsMinimized then
Application.MainForm.WindowState := wsMaximized;
SC_Restore : if Application.MainForm.WindowState <> wsNormal then
Application.MainForm.WindowState := wsNormal;
end;
--------
ing. Pavel Zilinec
MailTo:zilinec(zv)email(tec)cz
Prog-Soft s.r.o. Plzen
Informacni system pro vyrobce
a distributory napoju
PM> Ahoj !
PM> Potreboval by som minimalizovat celu aplikaciu, ak uzivatel minimalizuje modalne okno, ktore nie je
PM> hlavnym oknom aplikacie. Neviete, ako na to ? Skusal som odchytavat spravu WM_SIZE s parametrom SIZE_MINIMIZED a naledne zavolat Application.Minimize, ale nefunguje to.
PM> D5 Ent.
Internet explorer vs registry
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 21.6.2002 11:51:03
From: "Martin Ferenc" <superpage(zv)seznam(tec)cz>
> Nevite nahodou nekdo jak donutit Internet Explorer znovu nacist
> nastaveni z registru aniz bych ho musel restartovat?
> Mam spusteny IE zmenim nastaveni v registrech (napr.proxy) a
V registru by jsi nemel nic menit, od toho jsou API funkce, v tomto pripade
WinInet. Takhle presne vznikaji aplikace typu "Vzdyt me to ale fungovalo".
Petr Vones
Klavesy
[*] Jaroslav Bucek <bucek(zv)eskon(tec)cz> - 21.6.2002 11:57:16
> Jak jednoduse zaridit, aby byly zpravy o stisku klaves byly zaslany vzdy,
> nezavisle na tom, ktery prvek na formu je aktivni ??
>
property KeyPreview formulare nastav na True
Asociace pod User uctem
[*] Milan Schembera <milan(zv)missoftware(tec)cz> - 21.6.2002 12:01:20
Zdravim pri patku,
udelal jsem si aplikaci na prohlizeni QRP souboru s tim, ze ta aplikace si
priponu asociuje. Vse funguje OK, pokud je to na Win9x/ME nebo pod admin
uctem na WinNT/2000/XP. Ale pokud jsem na tech "bezpecnejsich" windozich
prihlasen jako user, nemam samozrejme pravo zapisovat do HKCR. Netusite
nekdo, jak by toto slo obejit ? Problem je totiz v tom, ze tu aplikaci si
stahuji nekdy uplny analfabeti a tezko jim vysvetlovat nektery veci (kdyz
prijde QRP mailem, ze si ho maji ulozit, pak spustit program a ten ulozeny
soubor otevrit, nebo se prihlasit jako admin, spustit program apod. - lepsi
jim rict, ze na to maji v mailu kliknout, co si budeme povidat).
Diky moc za jakoukoliv pomoc
M.Sch.
Simulacia okolnych pocitacov
[*] Radim Kunz <privat(zv)casestudio(tec)com> - 21.6.2002 12:07:44
Zkus vmware.
Radim
----- Original Message -----
From: "Lubos" <ludan(zv)inMail.sk>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Friday, June 21, 2002 11:25 AM
Subject: Simulacia okolnych pocitacov
Ahoj!
Potrebujem testovat funkcnost mojho programu (suborovy manager) na okolnych
pocitacoch.
Doma mam vsak len jeden pocitac.
Existuje nejaky sposob, ako by som si mohol v systeme vytvorit okolne
pocitace?
Mam Win2000 Cz Pro
Dik
Lubos
Jazyk v aplikaci
[*] Jane�ek Michael <michael.janecek(zv)spar-cr(tec)cz> - 21.6.2002 12:11:31
Zdrav�m,
Moment�ln� d�l�m aplikaci, kter� by m�la b�t zanedlouho aplikovan� na na�ich pobo�k�ch v cizin� ... ov�em do t�to chv�le jsem se tak n�jak vyka�lal na budoucnost jazykov� podpory ... m�m procedurku, do kter� po�lu string a ��slo jazyka a vr�t� se mi p�eklad ... ov�em jak m�m ud�lat, aby nap��klad label[2].text:=prelozeny-text; ???
Respektive technologie by m�la b�t takov�, abych mohl j�t komponentu po komponent� a jej� .captoin �i .text pos�lal na p�eklad ...
D�ky za jak�koliv info,
Michael Jane�ek
Michael Jane�ek
--------------------------------------------------------------
SPAR �esk� obchodn� spole�nost s r.o.
Programmer / Delphi developer
Tel. 02 / 67 155 156
Fax. 02 / 67 155 119
E-mail: michael.janecek(zv)spar-cr(tec)cz
http://www.interspar(tec)cz
6 farebna ikona v tray bare
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 21.6.2002 12:12:07
Nadefinuj si ikonu, ktera bude obsahovat vice formatu. Pro trayicon je 16x16 a windows deformuji puvodni (single) ikonu 32x32 (jak je to s barvami nevim, pouzivam vzdy jen 16 barev). Pouzij treba Microangelo, v nem to jde dobre.
Jaro B.
-----Original Message-----
From: Lubos [mailto:ludan(zv)inMail.sk]
Sent: Friday, June 21, 2002 11:38 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: 256 farebna ikona v tray bare
Ahoj.
Mam v programe 256 farebnu ikonu. Chcem spravit, aby sa program minimalizoval do tray baru.
Avsak ak pouzijem hociktore komponenty tak sa ta ikona sice v trayi zobrazi, ale zmeni sa paleta na 16 farieb a vyzera to skaredo.
Je vobec mozne, aby sa ta ikona zobrazovala v 256 farbach, alebo sa mam zmierit s tym, ze len v 16tich?
Lubos
Simulacia okolnych pocitacov
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 21.6.2002 12:42:41
>Potrebujem testovat funkcnost mojho programu (suborovy manager) na
okolnych pocitacoch.
>Doma mam vsak len jeden pocitac.
>Existuje nejaky sposob, ako by som si mohol v systeme vytvorit okolne
pocitace?
vytvorit si virtualni pocitace pomoci VMware atd,.
D. Toman
Jak zjistit, opakuji-li se mi 2 ci vice radku v IB
[*] Ben, Martin (CAP, GCF) <Martin.Ben(zv)gecapital(tec)com> - 21.6.2002 12:47:49
Priznam se, ze ti nerozumim. Dotaz
select SL3, count(*) from TABULKA group by SL3 having count(*) > 1
ti vrati seznam hodnot, ktere se ve sloupci SL3 vyskytuji vice nez
jedenkrat, a dale pocet jejich vyskytu.
To je podle mne presne to co chces. Pokud chces testovat jiny sloupec,
vhodne upravis dotaz, napr.
select SL1, count(*) from TABULKA group by SL1 having count(*) > 1
nebo
select SL2, count(*) from TABULKA group by SL2 having count(*) > 1
a nebo dokonce jejich kombinace
select SL1, SL2, count(*) from TABULKA group by SL1, SL2 having count(*) > 1
Vsechny mozne kombinace vhodne obalis SP. IB/FB znam pouze povrchne (zatim),
ale resil bych to asi nejak takto:
SET TERM !!;
CREATE PROCEDURE JE_DUPLICITA RETURNS (POCET_DUPL INTEGER) AS
DECLARE VARIABLE NALEZENO INTEGER;
BEGIN
NALEZENO = 0;
FOR SELECT SL1, COUNT(*)
FROM TABULKA
GROUP BY SL1
HAVING COUNT(*) > 1
DO
NALEZENO = NALEZENO + 1;
/* podobne pro vsechny pripady, ktere chces sledovat */
POCET_DUPL = NALEZENO;
END !!
SET TERM ;!!
Martin Ben
PS: Otazka pro znalce: umi IB/FB dynamicke dotazy?> -----Original Message-----
> From: little_bobes(zv)centrum(tec)cz [mailto:little_bobes(zv)centrum(tec)cz]
>
> Ale to se tyka stale opakovani jednoho radku.
> Jenze me zajima opakovani serie nekolika radku.
> (to same jako PRIMARY KEY pro sloupce)
>
> Mohlo by to vratit treba toto:
> SL3 POCET
> ----------------
> 2 3
> 3 1
> 18 1
> coz znamena, ze radky s hodnotou 2 v SL3 se vyskytuji v
> tabulce celkem 3x, s
> hodnotou 3 pouze 1x.
> Pak jeste pridat podminku > 1 a vysledek bude pouze:
> SL3 POCET
> ----------------
> 2 3
>
> A nyni bych potreboval vedet, jak tohoto vysledku dosahnout.
>
> Bob
>
> ----- Original Message -----
> From: "Martin Cajbik" <cajbik(zv)sct.sk>
>
> > A co takto:
> >
> > SELECT A.SL1
> > FROM Tabulka A
> > WHERE EXISTS(SELECT B.SL1
> > FROM Tabulka B
> > WHERE A.SL2 = B.SL2
> > AND A.SL1 <> B.SL1)
> >
> > pripadne este s DISTINCT ak sa to nema opakovat.
>
> > SL1 SL2 SL3
> > -------------------
> > 1 7 2 \ tyto dva radky maji stejnou
> > 3 7 2 / hodnotu ve sloupci SL1 a SL2
> > 6 3 3
> > 1 7 12 \ jako tyto dva radky
> > 3 7 12 /
> > 9 4 18
> > 1 7 28 \ a jako tyto dva radky
> > 3 7 28 /
>
>
>
>
>
>
Jazyk v aplikaci
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 21.6.2002 12:49:23
On 21 Jun 2002 at 12:11, Jane�ek Michael wrote:
> Moment�ln� d�l�m aplikaci, kter� by m�la b�t zanedlouho aplikovan� na
> na�ich pobo�k�ch v cizin� ... ov�em do t�to chv�le jsem se tak n�jak
> vyka�lal na budoucnost jazykov� podpory ... m�m procedurku, do kter�
> po�lu string a ��slo jazyka a vr�t� se mi p�eklad ... ov�em jak m�m
> ud�lat, aby nap��klad label[2].text:=prelozeny-text; ???
>
> Respektive technologie by m�la b�t takov�, abych mohl j�t komponentu
> po komponent� a jej� .captoin �i .text pos�lal na p�eklad ...
Ja to delam tak, ze napisu cely program v anglictine, vsechny
"bezprizorni" texty deklaruji jako resourcestring (nikdy jako const a
uz vubec je nedavam dovnitr programu), a pak to jen prozenu
Lokalizatorem.
S pozdravem
Zbysek Hlinka
Jazyk v aplikaci
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 21.6.2002 13:08:19
podivej se po knihovne VGLib - tam byl pokus jak nenasilne resit vicejazycne verze jednoho programu. Preklady byly, tusim, ulozeny v nejake forme INI souboru.
Jaro B.
-----Original Message-----
From: Jane�ek Michael [mailto:michael.janecek(zv)spar-cr(tec)cz]
Sent: Friday, June 21, 2002 12:12 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Jazyk v aplikaci
Zdrav�m,
Moment�ln� d�l�m aplikaci, kter� by m�la b�t zanedlouho aplikovan� na na�ich pobo�k�ch v cizin� ... ov�em do t�to chv�le jsem se tak n�jak vyka�lal na budoucnost jazykov� podpory ... m�m procedurku, do kter� po�lu string a ��slo jazyka a vr�t� se mi p�eklad ... ov�em jak m�m ud�lat, aby nap��klad label[2].text:=prelozeny-text; ???
Respektive technologie by m�la b�t takov�, abych mohl j�t komponentu po komponent� a jej� .captoin �i .text pos�lal na p�eklad ...
D�ky za jak�koliv info,
Michael Jane�ek
Michael Jane�ek
--------------------------------------------------------------
SPAR �esk� obchodn� spole�nost s r.o.
Programmer / Delphi developer
Tel. 02 / 67 155 156
Fax. 02 / 67 155 119
E-mail: michael.janecek(zv)spar-cr(tec)cz
http://www.interspar(tec)cz
MCI -MIDI
[*] Nagy Dusan <dnagy(zv)inomacomp.sk> - 21.6.2002 13:23:39
Nevie niekto ako prehravat alebo vytvarat zvuky
ktore nebudu mat oneskorenie pri spustani.
Bolo by celkom dobre aby sa dali spustat i sucastne
ale zatial to nie je potrebne.
Teraz pouzivam MIDI a prehravanie suborov ma oneskorenie
ktore mi nevihovuje da sa ho nejako zbavit.
Potrebujem to dost surne. Staci aspon naznacit smer.
Dik.
DelphiX a WinXP
[*] Peter Surovy <psurovy(zv)uevora.pt> - 21.6.2002 12:52:12
Ahoj
mam aplikaciu napisanu s DelphiX
komponentami resp s potomkami
problem je: na WinXP tato aplikacia
inak celkom rychla bezi evidentne
cca 30-40% pomalsie neviete v com by mohol
byt problem?
Dik
Peter Surovy
Dokumentace
[*] M.J.H. <hrach(zv)iiprg(tec)cz> - 21.6.2002 13:32:20
Dokazete mi nekdo poradit kvalitni knihu, podle ktere bych se mohl naucit programovat v Delphi? Programuji vcelku obstojne v Pascalu, ale v delphi jsem naprosty zacatecnik
Diky Kubatko
DelphiX a WinXP
[*] Zdenek Stepanek <zstepanek(zv)atlas(tec)cz> - 21.6.2002 14:50:51
Zdravim
Sezen si stroj s W2K a vyzkousej to na nem. Pokud to bude taky pomalejsi,
tak je chyba na strane systemu. Rika se, ze NT jadro je v tomhle ohledu
pomalejsi, ale nezda se mi, ze by tak vyrazne. Pokud je to pod W2K v
poradku, zkus v XP povypinat vsechny ty graficke nesmysly (tento
pocitac/vlastnosti/upresnit/vykon-nastaveni/optimalizovat pro vykon). I kdyz
to samozrejme nema primy vliv na aplikaci, dost drasticky to zatezuje cely
system a rezie systemu tak leze do neuveritelnych hodnot.
Pokud tam mas nejaky meric vykonu te aplikace (framerate nebo tak nejak),
zkus mi to poslat, mam XP, treba je to chyba spoluprace driveru. Ale mam S3
savage4 16MB, takze pokud tam je milion polygonu, tak se nechytam.
Zdenek
----- Original Message -----
> mam aplikaciu napisanu s DelphiX
> komponentami resp s potomkami
> problem je: na WinXP tato aplikacia
> inak celkom rychla bezi evidentne
> cca 30-40% pomalsie neviete v com by mohol
> byt problem?
Simulacia okolnych pocitacov
[*] Zdenek Stepanek <zstepanek(zv)atlas(tec)cz> - 21.6.2002 14:54:02
Zdravim
To je IMHO na nic, jak tyhle pocitace prosimte propojis sitovym kabelem???
Spis by pomohlo nainstalovat si TCP/IP protokol, nasdilet jednotky atd.
Potom by ses mel videt v okolni pocitace/mojeworkgroup/mujpocitac. Sice
budes v siti sam, ale melo by to stacit. Mas pak i dve sitove adresy, jednu
localhostovou 127.0.0.1 a vlastni sitovou vetsinou 192.168.0.1. To by melo
stacit.
Zdenek
----- Original Message -----
> >Potrebujem testovat funkcnost mojho programu (suborovy manager) na
> okolnych pocitacoch.
> >Doma mam vsak len jeden pocitac.
> >Existuje nejaky sposob, ako by som si mohol v systeme vytvorit okolne
> pocitace?
> vytvorit si virtualni pocitace pomoci VMware atd,.
Dokumentace
[*] Petr Turek <petr.turek(zv)unimontex(tec)cz> - 21.6.2002 15:22:01
Ahoj.
Ja jsem mel podobny problem, kdyz jsem prechazel z Pascalu na Delphi a hodne
mi pomohlakniha Mistrovstvi v Delphi 2 od Marca Cantu. Je to sice pro Delphi
2, ale da se to uspesne pouzit i na vyssi verze.
Petr Turek
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of M.J.H.
Sent: Friday, June 21, 2002 2:32 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Dokumentace
Dokazete mi nekdo poradit kvalitni knihu, podle ktere bych se mohl naucit
programovat v Delphi? Programuji vcelku obstojne v Pascalu, ale v delphi
jsem naprosty zacatecnik
Diky Kubatko
Vytvorenie editora formularov 2.generacie :)
[*] Robert Suska <delphi(zv)korak.sk> - 21.6.2002 15:50:12
Ahojte!
>
> Potrebujem urobit program v ktorom bude nejaka lista komponent ako TEdit,
> TComboBox, TTreeView, TChart ... atd a potrebujem urobit taku srandu ze
bude
> tam cisty form na ktory si naklikam tieto komponenty potrebujem pouzit
> nejake ich property, popripade ich naplnit aj default datami a toto vsetko
> potrebujem ulozit do formatu aky robi Delphi ked si klikente pravym
buttonom
> na Form a vyberiete View as Text. Viem ze je to velmi zlozite ale musim to
> urobit viete mi pomoct kde a co by som si mohol nastudovat, alebo resp. ci
> nieje take nieco urobene alebo rozrobene. Alebo niekto nieco take nerobi.
> Mam urobenu uplne "perfektnu" spatnu apl. a to tak ze vsetko je ulozene na
> serveri na clientovi su len proceduri a moj vlastny cmd interpreter ktory
to
> vsetko obsluhuje. Je tam este velmi vela prace ale uvital by som keby sa
> niekto nasiel ze by sme si cas os casu vymeli info. Verim ze mam co
> ponuknut. A prosim nepiste mi ze tam mozem zrovna nainstalovat Delphi lebo
presne take nieco chcem urobit. Samozrejme jednoduhsie.
>
> Dakujem
>
> Robo
prosim o rady pro navrh struktury databaze
[*] bleak <bleak(zv)atlas(tec)cz> - 21.6.2002 15:58:47
urcite nepouziju BDE, spise IBExpres - ten nema dataset? Kolik stoji dataset
z IBObjects? Zatim to testuji na ibTable z komponent IBZeos, ale ten pracuje
interne s SQL dotazy, jak jsem pochopil ze zdrojaku. Kdyz u tohoto pouziju
skok na konec tabulky, je to temer okamzite.
Zkousel jsem relace v datasetech, jsou pomale, kdyz pouziju index je to
rychle. Indexy zase zpomaluji otvirani tabulky.
Vidim to tak, ze tabulka klientu bude otevrena v datasetu, ostatni udaje
jako platby, nebo platebni prikazy se budou zobrazovat pomoci SQL dotazu.
Ano, bylo by zajimave, kdy by nekdo napsal, jak dlouho muze trvat provedeni
dotaz do tabulky s napr. 300 000 zaznamy, kdyz chci vybrat napr. pouze 12
zaznamu podle ID klienta a ID sluzby....
A jak dlouho trva zapis do takove tabulky? To by snad melo byt okamzite.
Zatim jsem zkousel vyber 1 konkretniho zaznamu z cca 6000 zaznamu, vyber
trva cca 0,8 vteriny.
bleak
----- Original Message -----
From: "miro mrazik" <preas_w(zv)stonline.sk>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, June 20, 2002 11:05 PM
Subject: Re: prosim o rady pro navrh struktury databaze
> Ahoj,
> Viem ty myslis ze by si otvoril tabulku napr. v TTable, tym sa vsetky
udaje
> dotiahnu na klienta a uz sa budes pohybovat v iba nej.
> (aspon 1000 zaznamov) a zobraz si ju v dbgride. Potom skus na dbnavigatore
> skok na posledny zaznam. Zistis ze tam okamzite neskoci ale zacne
> zobrazobvat presypacie hodiny.
> Bolo to velmi pomale a kedze som chcel nadalej vyuzivat TDataset, kupil
som
> si IBODataset komponenty z IBObjetcts ale oplatilo sa je to radovo
> rychlejsie - pracuje sa s tym presne rovnako ako s TTable a TQuery.
> Skusam tu podobny problem mam asi 1200 zaznamov a nepoznam rozdiel v
> U tabulky TTable treba pocitat aj s tym ze ak bude solo tak skoky budu
> rychlejsie ako ked budes mat na nu zavesenu dalsiu tabulku v relacii tam
> tiez dojde k zdrzaniu.
Instalacia komponenty TDBF
[*] Martin Kasman <martinkasman(zv)pobox.sk> - 21.6.2002 16:40:39
Stiahl som si komponentu TDBF zo stranky http://tdbf.casdb.com/
Pri instalacii som nasledoval podla navodu:
1, rozbalil som program
2, otvoril som ho v Delphi 6
3, zkompiloval som ho
a pri instalacii mi Delphi napisal Cannot load package 'tdbf5_d6'. It
contains unit 'UDbfIndexFile', which is also contained in package
'CPortLib6'. Co s tym?
Vdaka za kazdu radu.
nefunguje udalost OnChange Editu, SpinEditu pri Pa
[*] Blazek Jaroslav <Jaroslav.Blazek(zv)access-it(tec)cz> - 21.6.2002 17:03:40
Ahoj,
proc prestanou reagovat udalosti OnChange, jakmile nastavim Editu nebo SpinEditu parent StringGrid ?
S pozdravem
Bc. Jaroslav Blazek
Access-IT Ceska Lipa
mailto:jaroslav.blazek(zv)access-it(tec)cz
http://www.access-it(tec)cz
ICQ : 133673990
+420605/813644
nucene volani OnDrawCell
[*] Pavel Kubal <kubal.p(zv)seznam(tec)cz> - 21.6.2002 18:42:44
Dobry den,
potrebuju nejakym elegantnim zpusobem vyresit zavolani OnDrawCell u
StringGridu kdy budu potrebovat....muze nekdo poradit? Predem dik...
--
S pozdravem
Pavel Kubal mailto:kubal.p(zv)seznam(tec)cz
prosim o rady pro navrh struktury databaze
[*] miro mrazik <preas_w(zv)stonline.sk> - 21.6.2002 18:55:38
Ahoj,> urcite nepouziju BDE, spise IBExpres - ten nema dataset?
Mam taky dojem ze aj ten pouziva dataset.
Kolik stoji dataset z IBObjects?
len komponentz pre dataset cca. $100 je to na www.ibojbects.com
Zatim to testuji na ibTable z komponent IBZeos, ale ten pracuje
> interne s SQL dotazy, jak jsem pochopil ze zdrojaku. Kdyz u tohoto pouziju
> skok na konec tabulky, je to temer okamzite.
To co som ti spominal to robil BDE Link na Interbase co bol s Delphi.
Oni vsetky komponenty pracuju s SQL dotazmi. SQL server ani inu komunikaciu
nepozna - zrejme. Len tieto komponenty pracuju tak, ze ked ty mas napr. v
dbgride zobrazene zaznamy a jeden z nich upravis a das refresh, tak on
netaha celu tabulku, da dotaz na ten jeden konkretny zmeneny zaznam a ten
potom do mnoziny zaznamov ktore drzi niekde v pameti upravi a tebe zobrazi.
Uzivatelovi sa to javi ako keby sa tabulka zaktualizovala. Takze neni
potrebne tahat koli jednemu zaznamu celu tabulku. Ale udaje zo servera aj v
tomto pripade prichadzaju na zaklade sql dotazu. Takto nejak urcite pracuje
aj komponenta table. Cely figel je v tom ze autori komponet zapuzdrili
volania SQL prikazov tak, ze nam sa to javi ako TTAble z lokalneho paradox
systemu.
Len ta neni taka variabilna ako query - myslim tym ziskavanie udajov z
viacerych tabuliek - relacia to sice zabezpeci ale moj dojem je ze dotaz je
rychlejsi.
Kolegovia tu pred nedavnom debatovali o tom, ze ked das nejake zlozitejsie
podmienky alebo triedenie, viacnasobne dotazy a pod. ze vtedy to server
vykonava trochu dlhsie. Preto si myslim ze dotazy by si mal veselo pouzivat,
ale pri navrhu by si mal zohladnit to aby si nebol nuteny tieto zlozitosti
pouzivat - snazit sa im vyhnut.
> A jak dlouho trva zapis do takove tabulky? To by snad melo byt okamzite.
Zapis by mal byt rychly tam problem asi nebude. Len potom ak by si dal Close
a Open, resp. dotaz na celu tabulku aby si zobrazil mnozinu zaznamov aj s
tym pridanym by mohol trvat dlho, pokial nepouzijes Refresh.
> Zatim jsem zkousel vyber 1 konkretniho zaznamu z cca 6000 zaznamu, vyber
> trva cca 0,8 vteriny.
Preto by bolo dobre keby niekto kto ma skusenosti s velkou DB Firebirdu
napisal svopje skusenosti s tymi casmi - aspon orientacne. Par tisic
zaznamov mi pracuje rychlejsie ako lokal paradox - to sa mi nikdy verit
nechcelo (ako ani to ze mam prastit s BDE) , ale trochu mam obavy az to
pojde do statisicov a milionov zaznamov, ci sa nedockam neprijemneho
prekvapenia / myslim tym spomalenie / aby potom jedina rada nebola - prejst
na iny DB vykonnejsi server alebo pod.
Miro
> bleak
>
> ----- Original Message -----
> From: "miro mrazik" <preas_w(zv)stonline.sk>
> To: <delphi-l(zv)clexpert(tec)cz>
> Sent: Thursday, June 20, 2002 11:05 PM
> Subject: Re: prosim o rady pro navrh struktury databaze
>
>
> > Ahoj,
> > Viem ty myslis ze by si otvoril tabulku napr. v TTable, tym sa vsetky
> udaje
> > dotiahnu na klienta a uz sa budes pohybovat v iba nej.
> > (aspon 1000 zaznamov) a zobraz si ju v dbgride. Potom skus na
dbnavigatore
> > skok na posledny zaznam. Zistis ze tam okamzite neskoci ale zacne
> > zobrazobvat presypacie hodiny.
> > Bolo to velmi pomale a kedze som chcel nadalej vyuzivat TDataset, kupil
> som
> > si IBODataset komponenty z IBObjetcts ale oplatilo sa je to radovo
> > rychlejsie - pracuje sa s tym presne rovnako ako s TTable a TQuery.
> > Skusam tu podobny problem mam asi 1200 zaznamov a nepoznam rozdiel v
> > U tabulky TTable treba pocitat aj s tym ze ak bude solo tak skoky budu
> > rychlejsie ako ked budes mat na nu zavesenu dalsiu tabulku v relacii tam
> > tiez dojde k zdrzaniu.
>
>
Jazyk v aplikaci
[*] miro mrazik <preas_w(zv)stonline.sk> - 21.6.2002 18:56:50
> > ud�lat, aby nap��klad label[2].text:=prelozeny-text; ???
Ahoj,
ja som si na to urobil programik, ktory mi vytiahne vsetky retazce zo
suborov pas a dfm (dfm musia byt ulozene v textovom formate) tieto mi ulozi
do tabulky, ktora ma 4 stlpce kazdy pre iny jazyk.
Zobrazi mi to v dbgride, kde mam moznost si retazce, ktore sa nemaju
prekladat (napr. sql prikazy) vymazem. Potom len vedla vyrazuj v jednom
jazyku napisem v jazyku inom. Dam to prelozit - on mi do zlozky napr. EN
ulozi prelozene PAS a DFM subory a hotovo.
Neviem ci bvy ti to pomohlo ak ano ozvi sa na sukromny mail poslem ti
zdrojaky.
Miro
Tiff files
[*] miro mrazik <preas_w(zv)stonline.sk> - 21.6.2002 18:56:16
Ahoj
ak to nepotrebujes na Win XP tak pouzi ActiveX Imaging z ms windows.
miro
----- Original Message -----
From: "Peter Laufer" <laufer(zv)dmasys.sk>
To: <Delphi-l(zv)clexpert(tec)cz>
Sent: Friday, June 21, 2002 11:14 AM
Subject: Tiff files
> Ahojte.
> Potreboval by som nejaku dobru komponentu na pracu s tiffom... (hlavne aby
> zvladala kompresiu G3,G3fax,G4 a multipage)...
> Vdaka za pomoc...
>
> Peter Laufer
>
Jazyk v aplikaci
[*] Jan Neuzil <neuzil.jan(zv)post(tec)cz> - 21.6.2002 19:09:41
Neni take spatna komponenta TTranslator, adresu si vyhledej, nemam ji. Honza
> podivej se po knihovne VGLib - tam byl pokus
> jak nenasilne resit vicejazycne verze jednoho
> programu. Preklady byly, tusim, ulozeny v
> nejake forme INI souboru.
> Jaro B.
>
> -----Original Message-----
> From: Jane�ek Michael
> [mailto:michael.janecek(zv)spar-cr(tec)cz]
> Sent: Friday, June 21, 2002 12:12 PM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: Jazyk v aplikaci
>
>
> Zdrav�m,
>
> Moment�ln� d�l�m aplikaci, kter� by m�la b�t
> zanedlouho aplikovan� na na�ich pobo�k�ch v
> cizin� ... ov�em do t�to chv�le jsem se tak
> n�jak vyka�lal na budoucnost jazykov� podpory
> ... m�m procedurku, do kter� po�lu string a
> ��slo jazyka a vr�t� se mi p�eklad ... ov�em
> jak m�m ud�lat, aby nap��klad
> label[2].text:=prelozeny-text; ???
>
> Respektive technologie by m�la b�t takov�,
> abych mohl j�t komponentu po komponent� a jej�
> .captoin �i .text pos�lal na p�eklad ...
>
> D�ky za jak�koliv info,
>
> Michael Jane�ek
>
>
> Michael Jane�ek
> -----------------------------------------------
> --------------
> SPAR �esk� obchodn� spole�nost s r.o.
> Programmer / Delphi developer
> Tel. 02 / 67 155 156
> Fax. 02 / 67 155 119
> E-mail: michael.janecek(zv)spar-cr(tec)cz
> http://www.interspar(tec)cz
>
Jazyk v aplikaci
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 21.6.2002 22:24:08
21.6.2002 Jan Neuzil:
> Neni take spatna komponenta TTranslator, adresu si vyhledej, nemam ji. Honza
Ale pokud nebudes aplikaci, ktera TTranslator pouzije sirit vcetne
zdrojoveho kodu, prijde te min. na $200 :-(
TTranslator spada pod GPL licencing
--
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
Tiff files
[*] Zdenek Stepanek <zstepanek(zv)atlas(tec)cz> - 22.6.2002 02:03:29
Zdravim
Na to ale musis mit nainstalovanou aplikaci Imaging. A neznam nikoho, kdo by
si ji instaloval, protoze ji potrebuje. Je to program naprosto na nic,
malokdo ho ma nainstalovany. Jeho pouzitim, bys nadelal uzivatelum hoodne
starosti.
A nepodporovat Win XP je vcelku posetile, je to kupodivu velice zdarily
system. I ja sam jsem byl zaprisahly odpurce NT systemu, ale po objeveni
UserPortu a prekousnuti par chybicek na to nedam dopustit.
Zdenek
----- Original Message -----
> ak to nepotrebujes na Win XP tak pouzi ActiveX Imaging z ms windows.
> ----- Original Message -----
> > Potreboval by som nejaku dobru komponentu na pracu s tiffom... (hlavne
> > aby zvladala kompresiu G3,G3fax,G4 a multipage)...
prosim o rady pro navrh struktury databaze
[*] bleak <bleak(zv)atlas(tec)cz> - 22.6.2002 10:49:59
OK, diky za informace, ted menim subject ohledne rychlost FB
bleak
----- Original Message -----
> To co som ti spominal to robil BDE Link na Interbase co bol s Delphi.
> Oni vsetky komponenty pracuju s SQL dotazmi. SQL server ani inu
komunikaciu
> nepozna - zrejme.
> Kolegovia tu pred nedavnom debatovali o tom, ze ked das nejake zlozitejsie
> podmienky alebo triedenie, viacnasobne dotazy a pod. ze vtedy to server
> vykonava trochu dlhsie. Preto si myslim ze dotazy by si mal veselo
pouzivat,
> ale pri navrhu by si mal zohladnit to aby si nebol nuteny tieto zlozitosti
> pouzivat - snazit sa im vyhnut.
Rychlost FB?
[*] bleak <bleak(zv)atlas(tec)cz> - 22.6.2002 10:54:04
zdravim,
Ma nekdo zkusenosti s dotazy do velkych (>300000 rec) tabulek na FB? Jak
dlouho muze trvat jednoduchy SQL dotaz, neco jako SELECT * FROM table WHERE
ID1=3569 AND ID2=56 AND ROK=2000?
Rad bych vedel, zda ma Firebird nejake omezeni v poctu zaznamu na jednu
tabulku. Muzu tam nasazet nekolik milionu zaznamu, nebo je lepsi tabulky
delit?
bleak
FB rychle vkladani zaznamu
[*] bleak <bleak(zv)atlas(tec)cz> - 22.6.2002 11:58:56
zdravim,
jak muzu maximalne urychlit vkladani velkeho mnozstvi zaznamu do tabulky
databaze FireBird?
Lze pouzit davkove vkladani?
Nebo pouzit transakci?
bleak
prubeh kopirovani streamu do streamu
[*] Milan ��ek - 22.6.2002 17:30:28
ahoj,
potreboval bych co nejjednoduseji zkopirovat obsah zdrojoveho streamu do
ciloveho a prubeh zobrazovat progressbarem. Jde o obsah souboru, takze by
bylo asi nejlepsi pouzit nejaky buffer, jehoz velikost by se nastavila podle
velikosti zdrojoveho streamu. Bohuzel se mi to ale nedari timto zpusobem
napsat. Mate nekdo neco podobneho? Diky.
S pozdravem Milan Cizek, amatersky programator, D6 Ent (SP2)
Win2k (SP2) a Win98 SE, cizek.milan(zv)seznam(tec)cz, ICQ: 59826637
Simulacia okolnych pocitacov
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 22.6.2002 19:01:18
> Zdravim
>
> To je IMHO na nic, jak tyhle pocitace prosimte propojis sitovym kabelem???
zrejme netusis co VMware dovede.
Pomoci VMware muzes spustit nekolik virtualnich pocitacu na jednom
skutecnem. Kazdy z nich ma svoji virtualni sitovku, ktera je na urovni
packetu (ala bridge) propojena s fyzickou sitovkou (resp VMware do sitove
vrstvy Windows ty paclety protlaci). To znamena, ze virtualni pocitac muze
nabizet prostredky ke sdileni fyzickemu pocitaci a naopak.
Virtualni pocitace mohou kazdy pouzivat jiny OS (jinou verzi Windows, DOS,
Linux, atd). Dobre se s tim pracuje - potrebujes neco ladit, spustis si
VMware okno s prislusnou verzi OS. Potrebujes praci prerusit - uspis OS v
session a priste behem par sekund muzes pokracovat tam kde skoncis...
D. Toman
Tiff files
[*] miro mrazik <preas_w(zv)stonline.sk> - 22.6.2002 20:13:15
Ahoj
Nemal som ani tak na mysli aplikaciu imaging ale jej komponenty. Prehliadac
potom mozes urobit uplne iny ak ti ten co tam je nevyhovuje.
Komponenty ktore sa vyrovnaju tym z Imagingu vo funkcnosti (cca. 200
strankova dokumentcia) zrejme pod $200-500 asi nezozenies.
okolo 50 $ su napr>
http://www.witsends.com
ale tie nedoporucujem sam som sa na nich obabral. Nieco ide nieco pada a ked
padne tak len reset. Autor sa pekne bavi len pokial nezaplatis.
Slusne vzyera
http://www.intervalsoftware.com/envision.html
ale ked chces presuvat poradie stranok v tife a pod. tak to yatial nedokaze.
v podobnej relacii je ImageN
http://web.tiscalinet.it/encomps/
Lacne spravidla nedokazu nielen pracovat s jednotlivymi obrazkami v tife -
menit poradie stranok ale tiez spravidla maju problem s vkladanim anotacii,
ktore sa stali oficialnou sucastou formatu tiff a v document imagingu je to
popri ocr dost zaujimava fiunkcnost.
Drahsie su napr.
okolo $200 napr.
http://www.imagelib.com/
ale funkcnostou podla mna este nedosahuju Imagingovych funkcnosti. Prilis sa
venuju aj inym formatom. Radsej keby document imaging oddelili od
spracovania foto a multimedii.
Spolocnym menovatelom je problem s citanim niektorych tiff formatov
vyrobenych inou aplikaciou.
Niekdy sa stane ze vyrobis napr. G4 a je akysi dlhy potom ten istry obraz
urobis v KodakImagingu, alebo v inom programe a ten je o poznanie mensi =
vlastnosti ukazuju ze je to skutocne G4 - ale je?.
Nad $500 su uz spravidla vyborne komponenty.
Komponentov je dost len nez nejake si clovek vyberie musi sa poriadne zo
vsetkych stran preklepnut - tif je velmi zlozity format a aj napr. Adsee,
Irfan ale aj komercne produkty maju s niektorymi subormi tif problemy. Toto
je v pripade document imagingu dost problem. Lebo ked organizacia pouziva na
ukladanie skenovanych dokumentov format tiff tak by to mala byt taka odroda,
ktora ma co najmenej problemov s okolim. Je potom dost zle ked niekomu
uzivatel posle dokument a ten ho neprecita, lebo v jeho pocitaci neni ziaden
program, ktorxy by dokazal tuto"odrodu" tifu precitat.
Z tohoto dovodu sa mal podla mojho nazoru kodak imaging ujat. Uzivatel MS
Windows by potom mohol bez rizika komunikovat s inym uzivatelom MS Windovs.
Potom dalsie riesenie je najst si DLL kniznice. Podla mna najlepsia je
libtiff.dll. Ibaze na nu este nikto nenapisal headre pre delphi ale podla
toho kto ju napisal a co vnutri ma sudim ze sa jedna o velmi kvalitnu
kniznicu.
Dalsi autor DLL je pan Jan Patera
patera(zv)pictview.com
ktory v sucasnej dobe dokoncil kniznicu dll, kztora mnoho funkcii
implementuje, ale zatial nema este G4 a moznost menit poradie stranok a
neviem ci aj vymazavanie stranok este nema.
Kvalitou a funkcnostou tie z windows by som osobne zaradil do kategorie
medzi 200-500.
Ked pracne clovek zisti co ktory robi a co ktory nedokaze, tak Kodak
Imaging zostava ako jedno z najlepsich rieseni a je ho velka skoda ak nebude
dalej podporovany (aby som nezabudol tak aj tento imaging existuje vo verzii
PROFi- ale tam sa tusim licencuje kazda jedna instalacia, ma aj ocr ale mam
taky dojem ze nepodporuje diakritiku).
miro
Delphi a resources II.
[*] Benjamin <benxp(zv)atlas(tec)cz> - 22.6.2002 20:15:55
Podobny problem jsem tu pred nekolika mesici take nadhodil, ale nakonec jsem
se stejne zadneho racionalniho vysledku nedockal. Pro urcite situace asi ani
neexistuje.
Proste si k memu programu na win 9.x (-30% res.) moc aplikaci navic nepusti
(natoz tento cely kolos vice jak trikrat).
Moje aplikace je asi podobneho typu - form s hodne TEdit, TLabel, ktery se
snazi napodobit kartotecni list a jsou vsechny naskladane pekne vedle sebe.
Jako reseni me jedine napada pouziti jedne komponenty napr. tabulky, ovsem
za cenu prehlednosti a vzhledu programu.
Nebo si pockat az budou mit vsichni Win NT, 2k, XP a bude zase o neco min
starosti.
Benjamin
FB rychle vkladani zaznamu
[*] Ing. Marek Kocan <kocan(zv)ebchod(tec)cz> - 22.6.2002 20:19:20
Nebo pouzit taransakci? ta musi byt vzdy ... Jednou z moznosti urychleni je
vypnuti/deaktivace indexu ... KER
----- Original Message -----
From: "bleak" <bleak(zv)atlas(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Saturday, June 22, 2002 11:58 AM
Subject: FB rychle vkladani zaznamu
> zdravim,
> jak muzu maximalne urychlit vkladani velkeho mnozstvi zaznamu do tabulky
> databaze FireBird?
> Lze pouzit davkove vkladani?
> Nebo pouzit transakci?
> bleak
Tvorba napovedy
[*] Jan Neuzil <neuzil.jan(zv)post(tec)cz> - 22.6.2002 23:04:23
Nevite nekdo o necem jednoduchem, prehlednem, free na tvorbu napovedy? Oasis SE se mi moc neosvedcil. Diky Honza
Tiff files
[*] Zdenek Stepanek <zstepanek(zv)atlas(tec)cz> - 22.6.2002 23:12:43
Zdravim
No, priznam se, ze jsem to jen tak odhadnul, ale ze zkusenosti vim, ze MS to
v tehle pripadech dela tak,. ze cely program napise jako ActiveX komponentu
a vlastni program (Imaging) je pouze obaleni teto komponenty o tlacitka.
Stejne tak je napsany IExplorer (taky je do Delphi importovany jako ActiveX
komponenta). Takze pokud chces samotnou ActiveX komponentu Imagingu, musis
mit nainstalovany Imaging samotny.
Zdenek
----- Original Message -----
> Nemal som ani tak na mysli aplikaciu imaging ale jej komponenty.
Prehliadac
> potom mozes urobit uplne iny ak ti ten co tam je nevyhovuje.
> Komponenty ktore sa vyrovnaju tym z Imagingu vo funkcnosti (cca. 200
> strankova dokumentcia) zrejme pod $200-500 asi nezozenies.
Tiff files
[*] miro mrazik <preas_w(zv)stonline.sk> - 22.6.2002 23:34:11
Ahoj
jasne musim mat nainstalovany. Lenze ked pri instalacii nic nevypnes tak sa
ti nainstaluje ci chces alebo nie - je sucastou standartnej instalacie. Su
to 4 ActiveX prvky
jeden je ImageEdit - zobrazenie, ImageThumb - thumbnails, ImgScan -
skenovanie, ImgAdmin - ukladanie do suborov, prehadzovanie stranok medzi
sebou, vymazy stranok atd.
ImgEdit,ImgAdmin a ImgScan maju stovky roznych vlastnosti a metod, ktorymi
pokryjes v podstate vsetky rozhodujuce funkcie dokumentimagingu.
V MSDE ale aj inde je k tomu more dokumentacie.
Je to s nim rovnake ako s ostatnymi aplikaciami ten Imaging co je v
prislusenstve je len slaby odvar toho co sa s tym da dokazat. Len otazka je
ci sa to oplati do buducnosti vobec studovat a trapit sa s tym.
Miro
----- Original Message -----
From: "Zdenek Stepanek" <zstepanek(zv)atlas(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Saturday, June 22, 2002 11:12 PM
Subject: Re: Tiff files
> Zdravim
>
> No, priznam se, ze jsem to jen tak odhadnul, ale ze zkusenosti vim, ze MS
to
> v tehle pripadech dela tak,. ze cely program napise jako ActiveX
komponentu
> a vlastni program (Imaging) je pouze obaleni teto komponenty o tlacitka.
> Stejne tak je napsany IExplorer (taky je do Delphi importovany jako
ActiveX
> komponenta). Takze pokud chces samotnou ActiveX komponentu Imagingu, musis
> mit nainstalovany Imaging samotny.
>
> Zdenek
> ----- Original Message -----
>
> > Nemal som ani tak na mysli aplikaciu imaging ale jej komponenty.
> Prehliadac
> > potom mozes urobit uplne iny ak ti ten co tam je nevyhovuje.
> > Komponenty ktore sa vyrovnaju tym z Imagingu vo funkcnosti (cca. 200
> > strankova dokumentcia) zrejme pod $200-500 asi nezozenies.
>
Tvorba napovedy
[*] miro mrazik <preas_w(zv)stonline.sk> - 22.6.2002 23:35:51
http://www.danish-shareware.dk/soft/shelpmbeta/index.html
----- Original Message -----
From: "Jan Neuzil" <neuzil.jan(zv)post(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Saturday, June 22, 2002 11:04 PM
Subject: Tvorba napovedy
> Nevite nekdo o necem jednoduchem, prehlednem, free na tvorbu napovedy?
Oasis SE se mi moc neosvedcil. Diky Honza
>
prubeh kopirovani streamu do streamu
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 22.6.2002 23:47:53
From: "Milan ��ek" <cizek.milan(zv)seznam(tec)cz>
> potreboval bych co nejjednoduseji zkopirovat obsah zdrojoveho streamu do
> ciloveho a prubeh zobrazovat progressbarem. Jde o obsah souboru, takze by
Pokud te netrapi ze to nepujde na Win95 tak pouzij API funkci CopyFileEx.
Petr Vones
nucene volani OnDrawCell
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 22.6.2002 23:52:35
From: "Pavel Kubal" <kubal.p(zv)seznam(tec)cz>
> potrebuju nejakym elegantnim zpusobem vyresit zavolani OnDrawCell u
> StringGridu kdy budu potrebovat....muze nekdo poradit? Predem dik...
OnDrawCell se vola kdykoli je potreba bunku prekreslit, o tom rozhoduje vzdy
operacni system. Pomoci metody Invalidate nebo API funkce InvalidateRect s
uvedenim prislusne oblasti ziskane pomoci metody CellRect muzes systemu
sdelit, ze je treba pri nejblizsi prilezitosti vyvolat prekresleni dane bunky.
Petr Vones
ExtractIconEx
[*] Zden�k �t�p�nek�����^��ޏ����� - 22.6.2002 23:53:05
Zdravim
Potreboval jsem informace u funkci ExtractIconEx a tak jsem si je nasel v
MSDN.
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/winui/winui
/windowsuserinterface/resources/icons/iconreference/iconfunctions/extractico
nex.asp
Na konci v poznamkach je napsano, ze ikonu ziskanou touto funkci musim
pomoci funkce DestroyIcon zase zrusit. Je to mozna zacatecnicka otazka, ale
pomoci funkce ExtractIconEx dostanu ikonu do promenne TIcon. Kdyz na konci
zavolam free, tak to nestaci? Nebo se to vztahuje k C++, kde jam znamo
programator musi tyto veci osetrovat sam, narozdil od Delphi?
Diky za vysvetleni
Zdenek
ExtractIconEx
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 23.6.2002 00:34:01
From: "Zden�k �t�p�nek" <zstepanek(zv)atlas(tec)cz>
> Na konci v poznamkach je napsano, ze ikonu ziskanou touto funkci musim
> pomoci funkce DestroyIcon zase zrusit. Je to mozna zacatecnicka otazka, ale
Presne tak.
> pomoci funkce ExtractIconEx dostanu ikonu do promenne TIcon. Kdyz na konci
> zavolam free, tak to nestaci? Nebo se to vztahuje k C++, kde jam znamo
Pokud pouzijes tridu TIcon a priradis takto ziskane HICON do TIcon.Handle, tak
se o to nemusis dale starat, protoze pri uvolneni TIcon se vola DestroyIcon.
> programator musi tyto veci osetrovat sam, narozdil od Delphi?
To neni vec Delphi nebo C++ ale pouziteho reseni. Stejne tak i v Delphi muzes
pracovat jen pomoci API funkci bez vyuziti VCL.
Petr Vones
prubeh kopirovani streamu do streamu
[*] Milan ��ek - 23.6.2002 00:47:42
> Pokud te netrapi ze to nepujde na Win95 tak pouzij API funkci CopyFileEx.
Potrebuji to aplikovat primo na stream, do ktereho si pomoci ZLIB rozbaluji
soubory... Diky
S pozdravem Milan Cizek, amatersky programator, D6 Ent (SP2)
Win2k (SP2) a Win98 SE, cizek.milan(zv)seznam(tec)cz, ICQ: 59826637
Tvorba napovedy
[*] Jiri Kratochvil <jiri.kratochvil(zv)webzin(tec)cz> - 23.6.2002 03:50:41
> Nevite nekdo o necem jednoduchem, prehlednem, free na tvorbu napovedy?
Vyzkousej
http://www.builder(tec)cz/art/delphi/help.html
S pozdravem
Jiri Kratochvil
Dne sobota, 22. �erven. 2002 23:04 jste napsal(a):
> Oasis SE se mi moc neosvedcil. Diky Honza
FB rychle vkladani zaznamu
[*] bleak <bleak(zv)atlas(tec)cz> - 23.6.2002 08:52:08
Pro upresneni - jedna se o konverzi z formatu DBF. Vkladam pomoci datasetu,
takze jestli je pouzita transakce, udela to dataset... Indexy nepouzivam a
snazim se jim vyhnout, pokud je to mozne.
Zatim probehne vlozeni cca 50000 zaznamu asi za 10 minut (priblizne), vcetne
zpracovani udaju pro vlozeni. Ke konci cyklu, ve kterem probiha vkladani, se
to mirne, ale znatelne, zpomali. Pouzivam ibTable.InsertRecord. Myslel jsem,
ze by to slo nejak urychlit, ale to uz asi ne.
bleak
----- Original Message -----
From: "Ing. Marek Kocan" <kocan(zv)ebchod(tec)cz>
> Nebo pouzit taransakci? ta musi byt vzdy ... Jednou z moznosti urychleni
je
> vypnuti/deaktivace indexu ... KER
> ----- Original Message -----
> > jak muzu maximalne urychlit vkladani velkeho mnozstvi zaznamu do tabulky
> > databaze FireBird?
> > Lze pouzit davkove vkladani?
> > Nebo pouzit transakci?
prubeh kopirovani streamu do streamu
[*] Karel Kral <kralkonf(zv)purus(tec)cz> - 23.6.2002 09:27:16
Podivej se, jak je napsana funkce TStream.CopyFrom. Kdyz tam pridas
ProgressBar, je to presne to, co potrebujes.
Milan ��ek wrote:
>
> > Pokud te netrapi ze to nepujde na Win95 tak pouzij API funkci CopyFileEx.
>
> Potrebuji to aplikovat primo na stream, do ktereho si pomoci ZLIB rozbaluji
> soubory... Diky
>
> S pozdravem Milan Cizek, amatersky programator, D6 Ent (SP2)
> Win2k (SP2) a Win98 SE, cizek.milan(zv)seznam(tec)cz, ICQ: 59826637
--
______________________________________________________
Karel Kral, vyvojar IT / IT developer
Purus, s.r.o., Cezavy 627, 664 56 Blucina, CZ
Tel: 05/47235000, 0602/552432, Fax: 05/47231203
E-Mail: mailto:kral(zv)purus(tec)cz, WWW: http://www.purus(tec)cz
______________________________________________________
FB rychle vkladani zaznamu
[*] Ing. Marek Kocan <kocan(zv)ebchod(tec)cz> - 23.6.2002 10:44:55
No, na uvod otazku - proc se snazis vyhnout indexum? Ale k veci:
Mozna by pomohlo prevadet data pomoci lokalniho SQL a sestavovat insert pro
FB a komitovat to prubezne, treba po 100 ci 1000 zaznamech.To by mohl byt
duvod (opak), proc se to na konci zpomaluje. Co je to zpracovani udaju po
vlozeni? KER
----- Original Message -----
From: "bleak" <bleak(zv)atlas(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Sunday, June 23, 2002 8:52 AM
Subject: Re: FB rychle vkladani zaznamu
> Pro upresneni - jedna se o konverzi z formatu DBF. Vkladam pomoci
datasetu,
> takze jestli je pouzita transakce, udela to dataset... Indexy nepouzivam a
> snazim se jim vyhnout, pokud je to mozne.
> Zatim probehne vlozeni cca 50000 zaznamu asi za 10 minut (priblizne),
vcetne
> zpracovani udaju pro vlozeni. Ke konci cyklu, ve kterem probiha vkladani,
se
> to mirne, ale znatelne, zpomali. Pouzivam ibTable.InsertRecord. Myslel
jsem,
> ze by to slo nejak urychlit, ale to uz asi ne.
> bleak
>
> ----- Original Message -----
> From: "Ing. Marek Kocan" <kocan(zv)ebchod(tec)cz>
> > Nebo pouzit taransakci? ta musi byt vzdy ... Jednou z moznosti urychleni
> je
> > vypnuti/deaktivace indexu ... KER
>
> > ----- Original Message -----
> > > jak muzu maximalne urychlit vkladani velkeho mnozstvi zaznamu do
tabulky
> > > databaze FireBird?
> > > Lze pouzit davkove vkladani?
> > > Nebo pouzit transakci?
>
ExtractIconEx
[*] Zdenek Stepanek <zstepanek(zv)atlas(tec)cz> - 23.6.2002 14:58:57
Zdravim
Ted se musim omluvit, uz jsem zapomel jak se s tim pracuje a mystifikoval
jsem. TIcon v tom vubec neni. Pouzivam tuto proceduru, je to v poradku?
procedure TSetupForm.PaintActIcon(Sender : TObject);
var Ikona1,Ikona2: HIcon;
begin
ExtractIconEx(Pchar(program1), Round(RxSpinEdit1.Value),Ikona2,Ikona1,1);
Image1.Picture.Icon.Handle := Ikona1;
end;
P.S.: Round tam je pro prevedeni Extended na Integer, urcite je lepsi
reseni, ale nemel jsem cas ho hledat. Nevite o necem?
Zdenek
----- Original Message -----
> > pomoci funkce ExtractIconEx dostanu ikonu do promenne TIcon. Kdyz na
konci
> > zavolam free, tak to nestaci? Nebo se to vztahuje k C++, kde jam znamo
>
> Pokud pouzijes tridu TIcon a priradis takto ziskane HICON do TIcon.Handle,
tak
> se o to nemusis dale starat, protoze pri uvolneni TIcon se vola
DestroyIcon.
Delphi a resources II.
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 23.6.2002 15:32:05
From: "Benjamin" <benxp(zv)atlas(tec)cz>
> Proste si k memu programu na win 9.x (-30% res.) moc aplikaci navic nepusti
> (natoz tento cely kolos vice jak trikrat).
> Moje aplikace je asi podobneho typu - form s hodne TEdit, TLabel, ktery se
> snazi napodobit kartotecni list a jsou vsechny naskladane pekne vedle sebe.
A ktere prostredky presne klesnou ? Je to opravdu jen temi TEdit ? Ted jsem
zkusil aplikaci s cca 200 TEdit, System a User prostredky klesly asi o 10% na
Windows 95.
> Jako reseni me jedine napada pouziti jedne komponenty napr. tabulky, ovsem
> za cenu prehlednosti a vzhledu programu.
Co treba pouzit TDrawGrid, kde nektere bunky budou predstavovat TLabel a jine
pak TEdit. Podle nejake mapy pak vytvoris i pohyb po polozkach. Editace bunek
uz je v te komponente vyresena.
> Nebo si pockat az budou mit vsichni Win NT, 2k, XP a bude zase o neco min
> starosti.
Jiste, to by bylo idealni (bohuzel vsak ne prilis realne) reseni vetsiny
problemu.
Petr Vones
Volanie dll
[*] Ing. Keder Vladimir <vkeder(zv)iol.sk> - 23.6.2002 17:49:03
Ahoj
Pri prerabani programu pre rozne verzie OS som narazil na problem ako
volat kniznicu dll ktora v danej verzii nie je. Uz raz ste mi pomohli ako
ziskat cas na stanici na ktorej je spusteny program. Tento kod bezi na Win
2K, XP ale nie na Win9X. Tam som to vyriesil konzolovym volanim Net time.
Kedze na niektorych strojoch preinstalovali na Win2K, potrebuju aby sa cas
na servri ziskal bez ohladu na OS. Opat som sa vratil k funkcii
NetRemoteTOD. Ibaze pri spusteni programu na Win9X samozrejme spadne
vzhladom na to, ze tato funkcia v tomto systeme nie je podporovana. Cez JCL
ziskam verziu OS a rozhodnem sa ktory sposob ma byt pouzity. Ale ako
zabezpecit deklaraciu ? Toto je kus kodu ktory mu vadi. (Cely unit je v
konferencii vyhladavanie cez klucove slovo NetRemoteTOD)
const
netapi32 = 'netapi32.dll';
function NetApiBufferFree(Buffer : Pointer) : Integer; stdcall;
function NetRemoteTOD(UNCServerName : PWideChar; Info : Pointer) :Integer;
stdcall;
function ServerTime(const UNCServer : String; var Stamp : TDateTime)
:Integer;
implementation
function NetApiBufferFree; external netapi32 name 'NetApiBufferFree';
function NetRemoteTOD; external netapi32 name 'NetRemoteTOD';
Za pomoc vopred dakujem
Vlado
FB rychle vkladani zaznamu
[*] bleak <bleak(zv)atlas(tec)cz> - 23.6.2002 17:52:33
diky za tip. Mam dojem ze indexy zpomaluji vkladani zaznamu a ted je zrovna
nepotrebuji. Zpracovani udaju pro vlozeni je cteni ze stare DBF a pripadne
typove konverze.
Mohl byste mi naznacit jak se sestavi insert a "komituje" se? Mam zkusenosti
pouze s MySQL, a tam je jina
syntaxe.
bleak
----- Original Message -----
From: "Ing. Marek Kocan" <kocan(zv)ebchod(tec)cz>
> No, na uvod otazku - proc se snazis vyhnout indexum? Ale k veci:
> Mozna by pomohlo prevadet data pomoci lokalniho SQL a sestavovat insert
pro
> FB a komitovat to prubezne, treba po 100 ci 1000 zaznamech.To by mohl byt
> duvod (opak), proc se to na konci zpomaluje. Co je to zpracovani udaju po
> vlozeni? KER
FB rychle vkladani zaznamu
[*] Ing. Marek Kocan <kocan(zv)ebchod(tec)cz> - 23.6.2002 18:29:07
Ano, indexy urcite zpomaluji vkladani, ale daji se deaktivovat, k tomu take
smerovala ta ma prvni rada. Naznaceni:
1) pres BDE a l�kalni SQL vytahnout data z DBF (nebo pomoci Table)
2) v cyklu sestavovat pri prochazeni (1) INSERT
3) INSERT ziskany z (2) v tomtez cyklu posilat pres IBSQL do FB
Na transackce slouzi IBTransaction, je treba ji zahajit a napriklad po 100
zaznamech (tedy INSERTECH v cyklu (2), kde provadis (3) ) vyvolat commit
(IBTransaction.commit).
Je to zkratkovite, snad to bude stacit. KER
----- Original Message -----
From: "bleak" <bleak(zv)atlas(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Sunday, June 23, 2002 5:52 PM
Subject: Re: FB rychle vkladani zaznamu
> diky za tip. Mam dojem ze indexy zpomaluji vkladani zaznamu a ted je
zrovna
> nepotrebuji. Zpracovani udaju pro vlozeni je cteni ze stare DBF a pripadne
> typove konverze.
> Mohl byste mi naznacit jak se sestavi insert a "komituje" se? Mam
zkusenosti
> pouze s MySQL, a tam je jina
> syntaxe.
> bleak
>
> ----- Original Message -----
> From: "Ing. Marek Kocan" <kocan(zv)ebchod(tec)cz>
> > No, na uvod otazku - proc se snazis vyhnout indexum? Ale k veci:
> > Mozna by pomohlo prevadet data pomoci lokalniho SQL a sestavovat insert
> pro
> > FB a komitovat to prubezne, treba po 100 ci 1000 zaznamech.To by mohl
byt
> > duvod (opak), proc se to na konci zpomaluje. Co je to zpracovani udaju
po
> > vlozeni? KER
>
Vnoreny dotaz v InterBase/Firebird ?
[*] Jaroslav Popluhar <delphi1(zv)acc.sk> - 23.6.2002 19:19:58
Je mozne pouzit vnoreny dotaz v casti FROM?
Ak ano, mozete poslat demo?
Prip. ako na toto: (- toto chodi dobre:-)
----------------------------------------
select Meno, count (Meno) as Pocet from Zakaznik
where Meno > ''
group by Meno
union all
select Meno, count (Meno) as Pocet from Pracovnik
where Meno > ''
group by Meno
order by 1;
ALE, potrebujem este na zaver urobit:
--------------------------------------
select Meno, sum (Pocet) as Pocet from ("PredoslySelect")
group by Meno order by Pocet;
Aby sa ostranili duplicity mien z jednotlivych tabuliek
a spocitala sa celkova pocetnost mien v oboch tabulkach.
(Samozrejme potom by z povodneho dotazu vypadlo order by 1)
S pozdravom
J. Popluhar
Ako vypreparovat DAY, MONTH, YEAR zo stplca DATE a
[*] Jaroslav Popluhar <delphi1(zv)acc.sk> - 23.6.2002 19:20:33
Vdaka, IB greenhorn...
J. Popluhar
P.S
Som uz zistil (na Firebird 1.0), takze pre tych, koho by to zaujimalo:
/* Extrahovanie dna, mesiaca, roku z datumu */
select extract (day from PlatbaPlan) as "Den",
extract (month from PlatbaPlan) as "Mesiac",
extract (year from PlatbaPlan) as "Rok"
from Zaloha;
==============================================
ALE, (v docs k IB 6, ani release docs k FB 1.0 som to nenasiel...)
mohol by mi niekto poslat link na dokument, kde sa to da dozvediet,
zrejme by tam boli aj dalsie UZITOCNE zaujimavosti...
==============================================
IBSQLQuery
[*] Ales Pavel <Aldik(zv)quick(tec)cz> - 23.6.2002 20:56:10
Ahoj mam select v IBSQLQuery tabulka a 3 joiny, kde se snazim naplnit Grid
za pomoci IBSQLQuery tak mi to nejde..delam neco spatne????Nevite co?Zatim
jsem pouzival jen BDE a prechod na IB je pro me utrpenim:-)))
Dekuji moc
Aldik Pavel
D6 Ent WXP
TabStop a zmena reakce na tab
[*] Ales Pavel <Aldik(zv)quick(tec)cz> - 23.6.2002 23:05:07
Ahoj potreboval bych zamenit automaticke posouvani na zaklade stisku klavesy
tab...chci i nadale preskakovat pole ale na zaklade klavesy enter nevite jak
na to???
Ales Pavel
WXP D6 Ent
Optimalizace db FB
[*] bleak <bleak(zv)atlas(tec)cz> - 23.6.2002 23:08:34
jak lze optimalizovat databazi FireBird?
pakovat, uvolnit misto po smazanych zaznamech?
asi tady ted budu davat otazky casteji...
bleak
!!! Problem s komponentou ActiveX !!!
[*] Frantisek Mlcoch <frantisek.mlcoch(zv)vsb(tec)cz> - 23.6.2002 23:36:23
Naimportoval jsem do Delphi komponentu ActiveX (pripona OCX). Nevim jak
pracovat s treti parametrem procedury "varBuffer" typu OleVariant. Parametr
by mel predstavovat pole bajtu v nemz jsou obsazeny data (obrazek jpg).
Muze mi nekde poradit jakou promennou mam nadefinovat, aby jsem se dostal k
dotycnemu poli bajtu. Idealni by bylo dostat to bud primo do TJpegImage nebo
aspon do TMemoryStream.
Ve Visual Basicu, tam predavaji promennou typu pole bajtu, ktere je
nadimenzovano na patricnou velikost "nBuffSize".
procedure TRye.GetPreview(nCamNo: Integer; nBuffSize: Integer; varBuffer:
OleVariant);
begin
DefaultInterface.GetPreview(nCamNo, nBuffSize, varBuffer);
end;
F.
Asociace pod User uctem
[*] Miroslav Ondrisek <ondrisek(zv)atlas(tec)cz> - 24.6.2002 07:06:51
Zdravim pri pondelku, :)
rekl bych, ze user MA prava psat do HKCR (pokud to nema nekde explicitne
adminem vypnute, ale s tim jsem se zatim nesetkal...). Alespon u me to jde
(a nejsem ani Power User). Zakazana vetev registru je HKLM (local machine).
Nebo slo o preklep a myslel jsi HKLM? Pokud ne, tak bys to mel asi zkusit.
Mira Ondrisek
BONNEL TECHNOLOGIE
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
> Behalf Of Milan Schembera
> Sent: Friday, June 21, 2002 12:01 PM
> To: 'Konference DELPHI'
> Subject: Asociace pod User uctem
>
>
> Zdravim pri patku,
>
> udelal jsem si aplikaci na prohlizeni QRP souboru s tim, ze ta aplikace si
> priponu asociuje. Vse funguje OK, pokud je to na Win9x/ME nebo pod admin
> uctem na WinNT/2000/XP. Ale pokud jsem na tech "bezpecnejsich" windozich
> prihlasen jako user, nemam samozrejme pravo zapisovat do HKCR. Netusite
> nekdo, jak by toto slo obejit ? Problem je totiz v tom, ze tu aplikaci si
> stahuji nekdy uplny analfabeti a tezko jim vysvetlovat nektery veci (kdyz
> prijde QRP mailem, ze si ho maji ulozit, pak spustit program a ten ulozeny
> soubor otevrit, nebo se prihlasit jako admin, spustit program
> apod. - lepsi
> jim rict, ze na to maji v mailu kliknout, co si budeme povidat).
>
> Diky moc za jakoukoliv pomoc
>
> M.Sch.
>
>
>
Rychlost FB?
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 24.6.2002 07:38:23
> Ma nekdo zkusenosti s dotazy do velkych (>300000 rec) tabulek na FB?
> Jak dlouho muze trvat jednoduchy SQL dotaz, neco jako SELECT * FROM
> table WHERE ID1=3569 AND ID2=56 AND ROK=2000?
>
Ahoj,
pokud bude na ID1, ID2 a ROK index, budes mit odpoved prakticky okamzite - tady
na tomto dotazu, tak jak jsi ho uvedl. Obecne vyhledani zaznamu podle indexu v
takovemto nekomplikovanem dotazu je rychle. Budes mit ale problem pri:
- joinech v pripade, ze se musi nejprve sestavit join nad celou tabulkou a teprve z
nej podminka where neco vybere. Tam bude problem uz nad nekolika desetitisici
zaznamu (bohuzel overeno v praxi)
- order by nad velkou mnozinou dat
Chce to proto nad konkretnimi komplikovanymi dotazy laborovat - prohazovat poradi
tabulek apod., aby se dosahlo rozumneho efektu. To ale zrejme neni problem jen
FireBirdu.
David Lebeda
Instalacia komponenty TDBF
[*] Milan Tome� <milan.tomes(zv)haida(tec)cz> - 24.6.2002 08:03:10
Napada me toto reseni:
z balicku tdbf5_d6 odstran unitu UDBFIndexFile6 a do sekce requires pridej
balicek CPortLib6. Otazkou je zda to bude spravne fungovat. Jeste muzes
zkusit pouzit direktivu {$WEAKPACKAGEUNIT ON/OFF} (viz. help)
S pozdravem
Milan Tomes
mailto:milan.tomes(zv)haida(tec)cz
> Behalf Of Martin Kasman
> a pri instalacii mi Delphi napisal Cannot load package 'tdbf5_d6'. It
> contains unit 'UDbfIndexFile', which is also contained in package
> 'CPortLib6'. Co s tym?
Asociace pod User uctem
[*] Milan Schembera <milan(zv)missoftware(tec)cz> - 24.6.2002 08:20:12
Nene, ja jsem psal HKCR - HKEY_CLASSES_ROOT
Potrebuju asociovat priponu...
> -----Original Message-----
> From: Miroslav Ondrisek
>
> Zdravim pri pondelku, :)
> rekl bych, ze user MA prava psat do HKCR (pokud to nema nekde
> explicitne
> adminem vypnute, ale s tim jsem se zatim nesetkal...).
> Alespon u me to jde
> (a nejsem ani Power User). Zakazana vetev registru je HKLM
> (local machine).
> Nebo slo o preklep a myslel jsi HKLM? Pokud ne, tak bys to
> mel asi zkusit.
>
> Mira Ondrisek
> BONNEL TECHNOLOGIE
>
>
> > -----Original Message-----
> > From: delphi-l-owner(zv)clexpert(tec)cz
[mailto:delphi-l-owner(zv)clexpert(tec)cz]On
> Behalf Of Milan Schembera
> Sent: Friday, June 21, 2002 12:01 PM
> To: 'Konference DELPHI'
> Subject: Asociace pod User uctem
>
>
> Zdravim pri patku,
>
> udelal jsem si aplikaci na prohlizeni QRP souboru s tim, ze ta aplikace si
> priponu asociuje. Vse funguje OK, pokud je to na Win9x/ME nebo pod admin
> uctem na WinNT/2000/XP. Ale pokud jsem na tech "bezpecnejsich" windozich
> prihlasen jako user, nemam samozrejme pravo zapisovat do HKCR. Netusite
> nekdo, jak by toto slo obejit ? Problem je totiz v tom, ze tu aplikaci si
> stahuji nekdy uplny analfabeti a tezko jim vysvetlovat nektery veci (kdyz
> prijde QRP mailem, ze si ho maji ulozit, pak spustit program a ten ulozeny
> soubor otevrit, nebo se prihlasit jako admin, spustit program
> apod. - lepsi
> jim rict, ze na to maji v mailu kliknout, co si budeme povidat).
>
> Diky moc za jakoukoliv pomoc
>
> M.Sch.
>
>
>
Lokalizovane Delphi 6 VCL resourcestrings
[*] mipr(zv)volny(tec)cz - 24.6.2002 08:35:08
Vazeni pratele,
jsou nejak dostupne lokalizovane Delphi 6 VCL resourcestrings (do
cestiny, polstiny, madarstiny, nemciny..) - bez toho abych musel
kupovat nejaky lokalizacni nastroj? Dekuji za odpoved
Michal
Jedna aplikace, vice tlacitek v pruhu uloh
[*] mipr(zv)volny(tec)cz - 24.6.2002 08:37:53
No, uzivatel to chce tak to ma (zatim si nestezuje...). Znate nekdo
pricinu, proc se to takto chova? Alespon domenku, popostrceni urcitym
smerem... Diky
Michal
> Zdravim
>
> Neukamenujte me, ale me kdyz se na monitor dostane
> aplikace se spoustou tlacitek v taskbaru, tak silim.
> Uz tak jich tam je vzydcky plno. Na 800*600 je to znat (divily by
jste > se, kolik lidi jeste musi pouzivat tohle mizerny rozliseni.)
Jses si > opravdu jisty, ze to tam musi byt?
>
> Zdenek
>
----- Original Message -----
>
> mam aplikaci, ktera ma vice nemodalnich oken, kde kazde ma sve
> tlacitko v pruhu uloh, coz delam pomoci nastaveni parametru v
> procedure CreateParams:
>
> Params.ExStyle:=Params.ExStyle or WS_EX_APPWINDOW;
> Params.WndParent:=GetDesktopWindow;
>
> Problem nastava, pokud chci zobrazit modalni dialog prislusejici
> jednomu z oken. Zaroven s dialogem, se totiz zobrazi pred danym
oknem > i hlavni okno aplikace. Navic nefunguje spravne ani prepinani
oken > pomoci tlacitek na pruhu uloh. (Testovano ve Win2000.)
Poradite mi, > prosim, jak tyto nedostatky odstranit?OT: jak udelat select z databaze
[*] Vymazal Milan <vymazal.milan(zv)seznam(tec)cz> - 24.6.2002 08:41:01
Zdravim
Mam vytvorenou databazi v accessu (*.mdb). Pripojil jsem ji pres ODBC.
A chci si napsat programek ktery s ni bude pracovat a chci to napsat v
delphi. Jak Aplikuji SQL dotaz na tu databazi a jak muzu pracova s
temi vysledky. Nechci pouzivat nijak DBGrid chci skratka vypsat
vysledky z treba nejakeho selectu.\
Diky moc v Databaze jsem nikdy v delphi neprogramoval
S pozdravem Honza
Volanie dll
[*] Tomas Bihary <delphi(zv)wige-mic(tec)cz> - 24.6.2002 08:45:12
Ahoj,
asi ti to na W95 pada pri startu s dialogem, ze se program
odkazoval na neexistujici export z DLL nebo tak nejak, ze?
Musis pouzit linkovani za behu. Na NT nahrat knihovnu
pomoci LoadLibrary (eventualne SafeLoadLibrary),
najit funkci pomociGetProcAddres
a uvolnit pomoci FreeLibrary
Tomas Bihary
----- Original Message -----
From: "Ing. Keder Vladimir" <vkeder(zv)iol.sk>
> Pri prerabani programu pre rozne verzie OS som narazil na problem ako
> volat kniznicu dll ktora v danej verzii nie je. Uz raz ste mi pomohli ako
> const
> netapi32 = 'netapi32.dll';
>
> function NetApiBufferFree(Buffer : Pointer) : Integer; stdcall;
> function NetRemoteTOD(UNCServerName : PWideChar; Info : Pointer) :Integer;
> stdcall;
> function ServerTime(const UNCServer : String; var Stamp : TDateTime)
> :Integer;
>
> implementation
>
> function NetApiBufferFree; external netapi32 name 'NetApiBufferFree';
> function NetRemoteTOD; external netapi32 name 'NetRemoteTOD';
>
> Za pomoc vopred dakujem
> Vlado
Tvorba napovedy
[*] Vaclav Riha - Soft Consult <vaclav_riha(zv)softconsult(tec)cz> - 24.6.2002 08:53:34
Help&Manual, neni free, ale je vyborny.
http://www.helpandmanual.com
S pozdravem Vaclav Riha
-----P�vodn� zpr�va-----
Od: Jan Neuzil [SMTP:neuzil.jan(zv)post(tec)cz]
Odesl�no: 22. �ervna 2002 23:04
Komu: delphi-l(zv)clexpert(tec)cz
P�edm�t: Tvorba napovedy
Nevite nekdo o necem jednoduchem, prehlednem, free na tvorbu napovedy? Oasis SE se mi moc neosvedcil. Diky Honza
Rychlost FB?
[*] Skopalik Slavomir <skopalik(zv)hlubocky.del(tec)cz> - 24.6.2002 09:02:46
Hledej problem nekde kolem indexu a hlavne primarnich klicu.
Z toho co jsi napsal nelze nic poznat, je treba poslat UPLNOU
definici tabulky VCETNE indexu a ocekavanych kardinalit
a symetrie techte kardinalit.
Slavek
> zdravim,
>
> Ma nekdo zkusenosti s dotazy do velkych (>300000 rec) tabulek na FB? Jak
> dlouho muze trvat jednoduchy SQL dotaz, neco jako SELECT * FROM table WHERE
> ID1=3569 AND ID2=56 AND ROK=2000?
>
> Rad bych vedel, zda ma Firebird nejake omezeni v poctu zaznamu na jednu
> tabulku. Muzu tam nasazet nekolik milionu zaznamu, nebo je lepsi tabulky
> delit?
>
> bleak
>
>
>
Jak zjistit, opakuji-li se mi 2 ci vice radku v IB
[*] <little_bobes(zv)centrum(tec)cz> - 24.6.2002 09:04:44
----- Original Message -----
From: "Ben, Martin (CAP, GCF)" <Martin.Ben(zv)gecapital.com>> Priznam se, ze ti nerozumim. Dotaz
>
> select SL3, count(*) from TABULKA group by SL3 having count(*) > 1
>
> ti vrati seznam hodnot, ktere se ve sloupci SL3 vyskytuji vice nez
> jedenkrat, a dale pocet jejich vyskytu.
> To je podle mne presne to co chces.
Bohuzel ne, protoze to mi vraci pocet vyskytu jednoho jedineho radku.
Ja potrebuji vedet, kolikrat se mi v tabulce objevuji urcite treba tri radky
jedne skupiny:
SL1 SL2 SL3
-------------------
1 7 2
3 7 2
tyto dva radky (1 - 7, 3 - 7), ktere jsou vymezeny hodnotou 2 ve sloupci
SL3,
1 3 3
1 7 12
3 7 12
se mi vyskytuji jeste tady s hodnotou 12 ve sloupci SL3
3 4 18
1 7 28
3 7 28
a tady s hodnotou 28 ve sloupci SL3.
Takze vysledek je, ze hodnoty sloupcu SL1 a SL2 vymezene poprve hodnotou 2
ve sloupci SL3 se mi vyskytuje v tabulce 3x (SL3 = 2, 12, 28).
Myslim, ze to se jednim dotazem nedokaze.
Bob
FB rychle vkladani zaznamu
[*] Skopalik Slavomir <skopalik(zv)hlubocky.del(tec)cz> - 24.6.2002 09:10:41
> Lze pouzit davkove vkladani?
Ano, lze, ale jen z jine tabulky.
INSERT intio xxx select from yyy.
> Nebo pouzit transakci?
Bez transakce nelze preci s DB pracovat.
Pokud je pozadavek POUZE na rychle vkladani, tak smensit pocet cache pro DB,
asi tak na 500 - 1000. Obecne to vsak NEDOPORUCUJI.
Dale pokud do tabulky hodne vkladas, tak omez indexy na nezbytne nutne minimum,
pripadne je deaktivuj.
Slavek
Rychlost FB?
[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 24.6.2002 09:15:41
bleak dne 22 Jun 2002 v 10:54:
> Ma nekdo zkusenosti s dotazy do velkych (>300000 rec) tabulek na FB?
> Jak dlouho muze trvat jednoduchy SQL dotaz, neco jako SELECT * FROM
> table WHERE ID1=3569 AND ID2=56 AND ROK=2000?
Ahoj,
tyto dotazy budou velice rychle, pokud hledas podle indexovanych poli; doporucuji vyzkouset, ale
kdyz na ID1 budes mit index, bude to podle me bleskove...
> Rad bych vedel, zda ma Firebird nejake omezeni v poctu zaznamu na
> jednu tabulku. Muzu tam nasazet nekolik milionu zaznamu, nebo je lepsi
> tabulky delit?
Omezeni jsou popsana v dokumentaci, cisla si nepamatuju, ale miliony zaznamu by mela zvladnout v
pohode; limitujici mozna bude spis velikost .GDB souboru (2 GB...), pak bys musel delit na vic
souboru, ale podle dokumentace je to zalezitost snadna a nijak neovlivni Tvuj program - jedna se
jen o par radku pri vytvareni databaze. Deleni tabulek bych se snazil vyhnout, dost by Ti to
komplikovalo v budoucnu vyhledavani (patral bys v prvni tabulce, nenasel, tak bys zacal patrat v
dalsi...).
Karel Rys
Lokalizovane Delphi 6 VCL resourcestrings
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 24.6.2002 09:16:48
On 24 Jun 2002 at 8:35, mipr(zv)volny(tec)cz wrote:
> Vazeni pratele,
> jsou nejak dostupne lokalizovane Delphi 6 VCL resourcestrings (do
> cestiny, polstiny, madarstiny, nemciny..) - bez toho abych musel
> kupovat nejaky lokalizacni nastroj? Dekuji za odpoved Michal
Muzes si koupit nemecke, francouzke a spanelske Delphi. S ostatnimi
jazyky to bude trosku horsi. :-)))
S pozdravem
Zbysek Hlinka
FB rychle vkladani zaznamu
[*] Skopalik Slavomir <skopalik(zv)hlubocky.del(tec)cz> - 24.6.2002 09:19:34
NIKDY nepouzivej IBTABLE !
Pouzij ibsql a transakci typu readcommited pro rychlost, nebo snapshot pro bezpecnost.
Ja jsem zkousel vkladat do tabulky jeden string v ulozne procedure a rychlost byla
>> 10000 zaznamu za sekundu (2xPIII(zv)1GHz,512MB RAM, 5xSCSI 10K otacek RADI 5).
Dale hodne zalezi na HW, ktery je pouzit, vzhledem k tomu, ze urcite pouzivas
forced write, tak je treba mit baterii zalohovan write back cache, toto ti poskytne
vetsina RAID 5 radicu.
Dalsi urychleni dosahnes, jestlize budes pouzivat parametry misto prime tvorby SQL.
Slavek
> Pro upresneni - jedna se o konverzi z formatu DBF. Vkladam pomoci datasetu,
> takze jestli je pouzita transakce, udela to dataset... Indexy nepouzivam a
> snazim se jim vyhnout, pokud je to mozne.
> Zatim probehne vlozeni cca 50000 zaznamu asi za 10 minut (priblizne), vcetne
> zpracovani udaju pro vlozeni. Ke konci cyklu, ve kterem probiha vkladani, se
> to mirne, ale znatelne, zpomali. Pouzivam ibTable.InsertRecord. Myslel jsem,
> ze by to slo nejak urychlit, ale to uz asi ne.
> bleak
>
> ----- Original Message -----
> From: "Ing. Marek Kocan" <kocan(zv)ebchod(tec)cz>
> > Nebo pouzit taransakci? ta musi byt vzdy ... Jednou z moznosti urychleni
> je
> > vypnuti/deaktivace indexu ... KER
>
> > ----- Original Message -----
> > > jak muzu maximalne urychlit vkladani velkeho mnozstvi zaznamu do tabulky
> > > databaze FireBird?
> > > Lze pouzit davkove vkladani?
> > > Nebo pouzit transakci?
>
>
FB rychle vkladani zaznamu
[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 24.6.2002 09:23:54
> jak muzu maximalne urychlit vkladani velkeho mnozstvi zaznamu
> do tabulky databaze FireBird?
pokud potrebujes vlozit hromadu dat,
ktere jsi schopen nachystat do nejakyho
txt a mit je na serveru, tak lze pouzit
externi tabulky. jedna se v podstate o
txt s fixnimi sloupci a zpracujes to pak
insert into tabulka (hodnota1{, hodnotaN...})
select
*
from
externi_tabulka
viz dokumentace:
CREATE TABLE table [EXTERNAL [FILE] 'filespec']....
peca
Rychlost FB?
[*] Alex Cherednichenko <cherednichenko(zv)wo(tec)cz> - 24.6.2002 09:27:45
Hello, bleak!
You wrote:
b> Ma nekdo zkusenosti s dotazy do velkych (>300000 rec) tabulek na FB? Jak
b> dlouho muze trvat jednoduchy SQL dotaz, neco jako SELECT * FROM table
b> WHERE ID1=3569 AND ID2=56 AND ROK=2000?
Pokud mas index pro tuto podminku WHERE, tak to fuguje okamzite.
Cas 10..100 ms.
b> Rad bych vedel, zda ma Firebird nejake omezeni v poctu zaznamu na jednu
b> tabulku. Muzu tam nasazet nekolik milionu zaznamu, nebo je lepsi tabulky
b> delit?
Omezeni je asi 2 000 000 000 zaznamu na tabulku.
With best regards, Alex Cherednichenko.
Napoveda u aplikace spoustene z CD
[*] Ing. Igor Vodi�ka <vodicka(zv)sagit(tec)cz> - 24.6.2002 09:28:29
Zdravim vsechny Delfiny!
Potreboval bych poradit z jednim problemkem. Mam aplikaci, ktera je
spustitelna z CD a ma svoji uzivatelskou napovedu (soubor HELP.HLP). Kdyz po
spousteni aplikace z CD, chci vyvolat napovedu dostanu hlasku Soubor
HELP.HLP nebyl nalezen. Zkuste soubor najit sami. Samozrejme soubor napovedy
je na CD, je na stejnem miste jako soubor EXE. Navic v OnCreateFormu mam kod
CurDir := ExtractFilePath(Application.ExeName);
Application.HelpFile := CurDir+'HELP.HLP';
Navite jak zaridit, aby to fungovalo stejne jako pri spousteni z hardu po
instalaci.
Diky
Ing. Igor Vodicka
informacni systemy
Nakladatelstvi Sagit
Tel.: 069 6786 001
HTTP://www.sagit(tec)cz/
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.371 / Virov� b�ze: 206 - datum vyd�n�: 13.6.2002
Napoveda u aplikace spoustene z CD
[*] Vymazal Milan <vymazal.milan(zv)seznam(tec)cz> - 24.6.2002 09:31:47
Hello Ing,
Monday, June 24, 2002, 9:28:29 AM, you wrote:
IIV> Zdravim vsechny Delfiny!
IIV> Potreboval bych poradit z jednim problemkem. Mam aplikaci, ktera je
IIV> spustitelna z CD a ma svoji uzivatelskou napovedu (soubor HELP.HLP). Kdyz po
IIV> spousteni aplikace z CD, chci vyvolat napovedu dostanu hlasku Soubor
IIV> HELP.HLP nebyl nalezen. Zkuste soubor najit sami. Samozrejme soubor napovedy
IIV> je na CD, je na stejnem miste jako soubor EXE. Navic v OnCreateFormu mam kod
IIV> CurDir := ExtractFilePath(Application.ExeName);
IIV> Application.HelpFile := CurDir+'HELP.HLP';
IIV> Navite jak zaridit, aby to fungovalo stejne jako pri spousteni z hardu po
IIV> instalaci.
IIV> Diky
Zdravim a neni to tim ze kdyz se spusti soubor .hlp tak se automaticky
vytvori .grp nebo jak se to jmenuje. A vzhledem k tomu ze je to na CD
tak tam nejde zapis ?
IIV> Ing. Igor Vodicka
IIV> informacni systemy
IIV> Nakladatelstvi Sagit
IIV> Tel.: 069 6786 001
IIV> HTTP://www.sagit(tec)cz/
IIV> ---
IIV> Odchoz� zpr�va neobsahuje viry.
IIV> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
IIV> Verze: 6.0.371 / Virov� b�ze: 206 - datum vyd�n�: 13.6.2002
--
Best regards,
Vymazal mailto:vymazal.milan(zv)seznam(tec)cz
Aplikace s balicky
[*] Martin Radvansky <delphicz(zv)stereo(tec)cz> - 24.6.2002 08:36:51
Zdravim,
potrebobval bych nakopnout spravnym smerem.
Mam aplikaci ktera pouziva balicky.
V centralni aplikaci mam nektere funkce a pripadne i datove tabulky ci
formulare, ktere bych potreboval
vyvolat z jednotlivych balicku, ci zapisovat do spolecnych tabulek, tak,
abych mel pristupne vypoctene udaje atd.
Zatim jsem nenansel jinou metodu, nez findcomponent a vratit nalezeny
objekt.
Existuje nejaka schudnejsi cesta?
Dekuji
Martin Radvansky
W2K - chyba aplikace - znovu
[*] Richard Kejval <kejval.delphi(zv)centrum(tec)cz> - 24.6.2002 09:37:01
Ahoj,
nedavno jsem resil podobny problem, ktery report pouzit.
Pozadavek znel :
1. Uzivatelska editace reportu
2. Nepouzivat BDE
3. Ukladat report do databaze
4. Export sestav minimalne do Wordu
Po prostudovani vetsiho mnozstvi reportu jsem zvolil kombinaci QReportu
profesional + nastavbu QRDesigner a musim zatim zatukat, ze s vetsimi
problemi jsem se zatim nesetkali. Pri srovnani se reportu od fy. Sinea si
myslim, ze pri slozitesich reportech je tato kombinace prece jen
univerzalnejsi, uz proto, ze QR designer ma svuj skriptovaci jazyk, vystupy
do ruznych formatu vcetne Wordu a Excelu. Takze jsem asi jeden z mala, kdo
je zatim (az na par malickosti) s QR reportem spokojen.
> Mam k tejto teme jednu otazku. Proste vyvijam informacny system a stojim
> pred rozhodnutim ktore reporty pouzijem do toho systemu. Ci QReport alebo
> ake??? Mam D6 Ent. a este jedna otazka ze v tejto verzii Delphi su ake
> QReport dobre? alebo zle? ak to mozem tak definovat. Mam nainstalovany
> Update Pack 1, 2.
Asociace pod User uctem
[*] Ji�� Binder <j.binder(zv)albacon(tec)cz> - 24.6.2002 10:00:29
Ahoj,
take jsem to nedavno potreboval, snazil jsem se neco nalezt na MSDN, ale nejak jsem moc neuspel.
Z toho co jsem nalezl jsem vyrozumel (pokud se pletu, tak me prosim opravte), tak moznost asociace
pouze pro uzivatele je az u XP.
Prislusne klice se zapisuji doHKCR\classes, ale zapis musi byt (v pripade XP) i v
HKCR\Software\Microsoft\Windows\CurrentVersion\Explorer\FileExts
Kdyby mel nekdo odkazy na MS dokumentaci nebo rozumny popis,
byl bych docela vdecny za informaci.
Ocekaval bych ze na takovou operaci by mela byt API fce a ne se hrabat primo
v registrech, ale nic takoveho jsem nenasel ..
Zdravi Jiri Binder
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.372 / Virov� b�ze: 207 - datum vyd�n�: 20.6.2002
Napoveda u aplikace spoustene z CD
[*] Ing. Igor Vodi�ka <vodicka(zv)sagit(tec)cz> - 24.6.2002 10:00:28
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
> Behalf Of Vymazal Milan
> IIV> Potreboval bych poradit z jednim problemkem. Mam aplikaci, ktera je
> IIV> spustitelna z CD a ma svoji uzivatelskou napovedu (soubor
> HELP.HLP). Kdyz po
> IIV> spousteni aplikace z CD, chci vyvolat napovedu dostanu hlasku Soubor
> IIV> HELP.HLP nebyl nalezen. Zkuste soubor najit sami. Samozrejme
> soubor napovedy
> IIV> je na CD, je na stejnem miste jako soubor EXE. Navic v
> OnCreateFormu mam kod
>
> IIV> CurDir := ExtractFilePath(Application.ExeName);
> IIV> Application.HelpFile := CurDir+'HELP.HLP';
>
> IIV> Navite jak zaridit, aby to fungovalo stejne jako pri
> spousteni z hardu po instalaci.
>
> Zdravim a neni to tim ze kdyz se spusti soubor .hlp tak se automaticky
> vytvori .grp nebo jak se to jmenuje. A vzhledem k tomu ze je to na CD
> tak tam nejde zapis ?
>
Mne se vytvari soubor typu GID. Tento soubor jsem take umistil na CD.
Neexistuje nejake API funkce nebo neco, ktera mi to vyresi?
Kdyz ten soubor napovedy rucne najdu na CD, tak pak mi to uz funguje. Nekde
se to musi zapisovat, do registru nebo ... Jo, projevuje se to na vsech OS.
Ing. Igor Vodicka
informacni systemy
Nakladatelstvi Sagit
Tel.: 069 6786 001
HTTP://www.sagit(tec)cz/
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.371 / Virov� b�ze: 206 - datum vyd�n�: 13.6.2002
Re[2]: Napoveda u aplikace spoustene z CD
[*] Vymazal Milan <vymazal.milan(zv)seznam(tec)cz> - 24.6.2002 10:06:32
Hello Ing,
Monday, June 24, 2002, 10:00:28 AM, you wrote:
>> -----Original Message-----
>> From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
>> Behalf Of Vymazal Milan
>> IIV> Potreboval bych poradit z jednim problemkem. Mam aplikaci, ktera je
>> IIV> spustitelna z CD a ma svoji uzivatelskou napovedu (soubor
>> HELP.HLP). Kdyz po
>> IIV> spousteni aplikace z CD, chci vyvolat napovedu dostanu hlasku Soubor
>> IIV> HELP.HLP nebyl nalezen. Zkuste soubor najit sami. Samozrejme
>> soubor napovedy
>> IIV> je na CD, je na stejnem miste jako soubor EXE. Navic v
>> OnCreateFormu mam kod
>>
>> IIV> CurDir := ExtractFilePath(Application.ExeName);
>> IIV> Application.HelpFile := CurDir+'HELP.HLP';
>>
>> IIV> Navite jak zaridit, aby to fungovalo stejne jako pri
>> spousteni z hardu po instalaci.
>>
>>
>> Zdravim a neni to tim ze kdyz se spusti soubor .hlp tak se automaticky
>> vytvori .grp nebo jak se to jmenuje. A vzhledem k tomu ze je to na CD
>> tak tam nejde zapis ?
>>
IIV> Mne se vytvari soubor typu GID. Tento soubor jsem take umistil na CD.
IIV> Neexistuje nejake API funkce nebo neco, ktera mi to vyresi?
sorry je to .gid . nevedel jsem to presne a tak jsem to strihl od oka
:). Kazdopadne ja jsem se s timto problemem jeste nesetkal. Co takhle
chm help ?
IIV> Kdyz ten soubor napovedy rucne najdu na CD, tak pak mi to uz funguje. Nekde
IIV> se to musi zapisovat, do registru nebo ... Jo, projevuje se to na vsech OS.
IIV> Ing. Igor Vodicka
IIV> informacni systemy
IIV> Nakladatelstvi Sagit
IIV> Tel.: 069 6786 001
IIV> HTTP://www.sagit(tec)cz/
IIV> ---
IIV> Odchoz� zpr�va neobsahuje viry.
IIV> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
IIV> Verze: 6.0.371 / Virov� b�ze: 206 - datum vyd�n�: 13.6.2002
--
Best regards,
Vymazal mailto:vymazal.milan(zv)seznam(tec)cz
Napoveda u aplikace spoustene z CD
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 24.6.2002 10:26:13
To se mi stalo taky, musel jsem na CD vypalit i soubor *.GID (ale nevim proc) a hlaska zmizela...
Cesty k helpu jsem mel v poradku (ChangeFileExt(ParamStr(0),'.hlp')).
Jaro B.
-----Original Message-----
spustitelna z CD a ma svoji uzivatelskou napovedu (soubor HELP.HLP). Kdyz po
spousteni aplikace z CD, chci vyvolat napovedu dostanu hlasku Soubor
HELP.HLP nebyl nalezen. Zkuste soubor najit sami. Samozrejme soubor napovedy
je na CD, je na stejnem miste jako soubor EXE. Navic v OnCreateFormu mam kod
CurDir := ExtractFilePath(Application.ExeName);
Application.HelpFile := CurDir+'HELP.HLP';
Navite jak zaridit, aby to fungovalo stejne jako pri spousteni z hardu po
instalaci.
Diky
Ing. Igor Vodicka
Delphi a resources II.
[*] bardon <bardon(zv)akord-soft(tec)cz> - 24.6.2002 10:49:10
Stovky editacnich poli se na obrazovku nevejdou. Jedno z rozumnych reseni je
dat je na zalozky. Takze kolega tento problem resil tak, ze si nadelal
framy, zalozky a ty framy dynamicky creatoval a freeoval pri prepinani
zalozek. Stovky editu pak zabraly minimum zdroju a uzivatel vubec netusi, ze
na obrazovce vlastne nejsou.
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Zbysek Hlinka
Sent: Thursday, June 20, 2002 9:20 AM
> Tady ale nejde o nejake glyph ale o mnozstvi editacnich poli (radove
> stovky), ktere jsou formou dorazniku stale videt (asi jako hooodne
> velky formular v exploreru) aby mel urednik pocit ze porad vidi ten
> svuj papirovy formular - to je pozadavek zadavatele !!!, to je realita
> o ktere se proste diskutovat nedalo. To konzumuje stovky handlu a neni
> je mozne nejak konzervovat. A reknete urednikovi, ze nemuze program
> spustit vice jak petkrat :-)) , nerespektuje to (se slovy 'to nechapu'
> az po 'co je to, proboha, za program ?'). No a na 95/98 dochazi k
> problemum.... A kdyz jsem povolil pouze jednu instanci programu, tak z
> toho byl takovej pr.ser, ze si to snad nedovedete ani predstavit :-( .IBSQLQuery
[*] Skopalik Slavomir <skopalik(zv)hlubocky.del(tec)cz> - 24.6.2002 10:56:24
TIBSQLQuery neexistuje.
Bud pouzivas TIBQuery, to je komtatibilni s datasetem, takze dal postupujes stejne jako u BDE,
nebo pouzivas TIBSQL, to NENI kompatibilni s datasetem a pak si musis vse doprogramovat sam.
Na tvem miste bych pouzil TIBDataSet (IBTable a IBquery jsou jen do poctu) a dotaz napsat
do select SQL.
Slavek
> -----P�vodn� zpr�va-----
> Od: Ales Pavel [SMTP:Aldik(zv)quick(tec)cz]
> Odesl�no: 23. �ervna 2002 20:56
> Komu: delphi
> P�edm�t: IBSQLQuery
>
> Ahoj mam select v IBSQLQuery tabulka a 3 joiny, kde se snazim naplnit Grid
> za pomoci IBSQLQuery tak mi to nejde..delam neco spatne????Nevite co?Zatim
> jsem pouzival jen BDE a prechod na IB je pro me utrpenim:-)))
>
> Dekuji moc
>
> Aldik Pavel
> D6 Ent WXP
>
Jak zjistit, opakuji-li se mi 2 ci vice radku v IB
[*] Ben, Martin (CAP, GCF) <Martin.Ben(zv)gecapital(tec)com> - 24.6.2002 11:13:17
Jednim dotazem se to udelat neda, to je jasne. Proto jsem ti taky radil
resit to v ulozene procedure (SP) s vystupnimi parametry. Ostatne ti to tak
prede mnou radil i Slavek Rydval. V teto SP se bude nekolikrat opakovat
podobna sekce s vhodnymi dotazy:
FOR select sl1, sl2, sl3, count(*) cislo from tabulka group by sl1, sl2, sl3
having count(*) > 1
DO
BEGIN
param1 = SL1;
param2 = SL2;
param3 = SL3;
pocet = cislo;
SUSPEND;
END;
FOR select sl1, sl2, count(*) cislo from tabulka group by sl1, sl2 having
count(*) > 1
DO
BEGIN
param1 = SL1;
param2 = SL2;
pocet = cislo;
SUSPEND;
END;
FOR select sl1, sl3, count(*) cislo from tabulka group by sl1, sl3 having
count(*) > 1
DO
BEGIN
param1 = SL1;
param3 = SL3;
pocet = cislo;
SUSPEND;
END;
Je to jen naznak reseni, dopracovat to musis sam podle svoji konkretni
situace.
Ale znovu opakuji, ze IB/FB moc neznam a tak je docela mozne, ze se to da
resit i jinak. Tohle mne napadlo po asi 1/4 hodine koukani do helpu.
Martin Ben
> -----Original Message-----
> From: little_bobes(zv)centrum(tec)cz [mailto:little_bobes(zv)centrum(tec)cz]
>
> Myslim, ze to se jednim dotazem nedokaze.
>
> Bob
Tvorba napovedy
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 24.6.2002 11:14:35
Ahoj,
XML DocBook --> HTML Help.
Pokud bys to nemohl rozchodit, napis.
Slavek
> Nevite nekdo o necem jednoduchem, prehlednem, free na tvorbu napovedy?
> Oasis SE se mi moc neosvedcil. Diky Honza
--------------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
--------------------------------------------------------
Udelejte to blbuvzdorne a zitra nekdo vymysli jeste vetsiho blba.
COM technologie v Delphi
[*] <ekonf(zv)atlas(tec)cz> - 24.6.2002 12:31:03
Nevite o nejake literature nebo clanku na internetu popisujici problematiku COM, DCOM v Delphi (vytvareni COM objektu atd).
pouziti BPL (z C++ Builderu)
[*] PeJaSoft <pejasoft(zv)volny(tec)cz> - 24.6.2002 13:03:40
Mohl by mi nekdo poradit s nasledujicim problemem?
Mam sadu trid v C++ v nekolika *.cpp souborech. Tyhle tridy potrebuju pouzit
v Delphi, ale nevim jak na to.
Kdyz jsem v C++ zalozil BPL a komponentu, v Delphi ji zaregistruju, ale
nemuzu pouzit, protoze Delphi nemuze najit ani *.pas ani *.dcu v uses.
A kdyz jsem v Delphi zalozil abstraktni tridu, kterou jsem prepsal v C++,
ztroskotal jsem na registraci teto tridy. (nevim jak zavolat v C++
RegisterClass, hlasi mi to chyby).
Predem mnohokrat dekuji
S pozdravem
Petr Jakrovsky
pejasoft(zv)post(tec)cz
DelphiX a WinXP
[*] Peter Surovy <psurovy(zv)uevora.pt> - 24.6.2002 12:30:15
Ahoj
tak problem bol ze som mal zly ovladac karty mal som
pre Win9x.
Co je ale zaujimave:
na win98 sa mi vykreslovali DIB-y takpovediac
nie dokonale* na winXP boli s ovladacom karty pre
98 viditelne lepsie=dokonale ale bolo to zas pomale
-s ovladacom pre XP je to rychle ale zas to nie je dokonale :-(
predpokladam ze to je chyba toho driveru.ci nie?
Peter Surovy
*dokonale- pri nastaveni priehladnej farby napr.
bielej sa mi niektore biele pixely stale zobrazovali
aj ked som ich kontroloval vo photoshope
a podla RGB boli 255,255,255 .
----- Original Message -----
From: "Zdenek Stepanek" <zstepanek(zv)atlas(tec)cz>
Sent: Friday, June 21, 2002 1:50 PM
> Sezen si stroj s W2K a vyzkousej to na nem. Pokud to bude taky pomalejsi,
> tak je chyba na strane systemu. Rika se, ze NT jadro je v tomhle ohledu
> pomalejsi, ale nezda se mi, ze by tak vyrazne. Pokud je to pod W2K v
> poradku, zkus v XP povypinat vsechny ty graficke nesmysly (tento
> pocitac/vlastnosti/upresnit/vykon-nastaveni/optimalizovat pro vykon). I
kdyz
> to samozrejme nema primy vliv na aplikaci, dost drasticky to zatezuje cely
> system a rezie systemu tak leze do neuveritelnych hodnot.