Archív konference Delphi

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

D5-Trail-Licence

[*] Jaro <jaro(zv)sinea(tec)cz> - 7.12.1999 22:41:56 -0800

To ID ti posle automat mailem do tve dorucene posty.
Musis nejdrive opovedet na plno dotazu a nakonec obdrzis ID
Jaro

> Dobry den
>
> Nainstaloval jsem si D5 trial z PCW10/99, pokousim se
> registrovat na www ale tam chteti nejake ID.
> Nevite nekdo kde toto sezenu, nejak tomu nerozumim
>
> Dekuji za kazdou radu
>
> -----------------------------
> - Vojtech Albrecht -
> - supervisor(zv)unicontrols(tec)cz -
> - ICQ 33995541 -
> -----------------------------

Demo Interbase 2

[*] Jaro <jaro(zv)sinea(tec)cz> - 7.12.1999 22:47:16 -0800

Heslo je spravne. Problem muze byt v tom, ze IB tuto hlasku
poskytuje i v jinych pripadech, kdy se nelze nakonektovat, napr.
chybne zadana cesta nebo jmeno v Alias, chybny pristup na vzaleny pocitac,
spatny WinSock a pod. Ta hlaska muze byt matouci a muze znamenat i neci
jineho.
Jaro

> |
> |> Zdravim.
> |> Neumim otevrit databazi dema InterBase.
> |> Pod Delphi 4 v adresari DEMOS\DB\CSDEMOS je demo pro InterBase.
> |> Delphi mi pise nezname jmeno nebo heslo.
> |> (SYSDBA / heslo MASTERKEY)
> |> ale neni spravne ??? !!!
> |> Poradte
> |> Diky,
> |> Martin Pavera
> |> letal(zv)integrodat(tec)cz
>
>

D5-Trail-Licence

[*] Jaro <jaro(zv)sinea(tec)cz> - 7.12.1999 22:51:16 -0800

Zajiste ... bez toho to nespustis a od okamziku registrace
ti to odpocitava cas ... tusim 60 dni. Na tentyz disk to znova jiz
nezaregistrujes. Chytre, ale otravne. Kup si rovnou ostrou verzi.
Je dobra.
Jaro

> Jejda, ony se daji registrovat i Trial verze?
>
> > Dobry den
> >
> > Nainstaloval jsem si D5 trial z PCW10/99, pokousim se
> > registrovat na www ale tam chteti nejake ID.
> > Nevite nekdo kde toto sezenu, nejak tomu nerozumim
>
>

Istalace D5Pro

[*] Jaro <jaro(zv)sinea(tec)cz> - 7.12.1999 22:52:44 -0800

Co s D2, kdyz mas D5?
Jaro

> Ahoj,
>
> chtel jsem se otazat, zda mohu mit na jenom stoji (Celeron 400, 128 MB
RAM)
> nainstalovan D2 i D5 zaroven, aniz by doslo ke kolizim a mohl jsem stale
> pouzivat i D2?
> Diky
> Jaro
>

OT: InstallShield CZ

[*] Jaro <jaro(zv)sinea(tec)cz> - 7.12.1999 23:09:09 -0800

Protoze doslo k nekolika nedorozumeni ohledne lokalizace IS,
podavam kratkou informaci i touto cestou.

Ti, kdoz si u nas jiz jednou zakoupili sluzbu lokalizace IS, nemusi
objednavat totez znovu pro Delphi 5.
Lokalizovane soubory, ktere jste ziskali pro IS D4 jsou kompatibilni
a beze zmeny pouzitelne i pro IS dodavany s D5.
Neni tedy potreba zadny upgrade.

Stejnym zpusobem postupujeme i pri prechodu na D5 ohledne
generatoru sestav Sinea. Zde sice neexistuje kompatibilita, ale
majitelum generatoru pro D4 poskytujeme verzi pro D5 bezplatne.
Mam informaci od nekterych zakazniku, ze nas server www.sinea(tec)cz
je v posledni dobe pretizen a ze lze z neho obtizne stahovat.
Pokud ma nekdo jakekoliv problemy, napiste si o novou verzi primo
na muj e-mail jaro(zv)sinea(tec)cz
Poskytovatel nas ubezpecil, ze se jedna o kratkodobou zalezitost
Jaro

Indexy

[*] Tom�s Vesel�������+?n(��?r� - 8.12.1999 08:37:57

Jedna se o tabulku na Access97, pristupuji k ni pomoci nativniho driveru
Delphi 4.0.
Na tabulce je cca. 7 indexu, a append jedocela pomaly - hlavne kdyz se
appenduje velike mnozstvi dat. Ale tato moznost by me zajimala i u Pdox -
tez pres BDE.

Diky

Tomas Vesely

-----Original Message-----
From: novacek(zv)vanicek(tec)cz <novacek(zv)vanicek(tec)cz>
To: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Date: 8. prosince 1999 4:51
Subject: Re: Indexy


Dne 6 Dec 99 v 8:21, napsal Tom�s Vesel�:

> daji se nejak vypnout vsechny indexy na tabulce a potom zase zapnout ?
V jaky tabulce (Pdx, IB, ...), jak k ni pristupujes (BDE, SQL, ...)?
Dopln informace.

Zdar a silu.


Vladimir Novacek

VANICEK SOFTWARE, spol. s r.o. tel.: 05-747267
Zborovska 15 fax+BBS: 05-41240246
616 00 Brno e-mail: novacek(zv)vanicek(tec)cz
Ceska Republika http://www.vanicek(tec)cz


Delphi 4 nebo 5

[*] Tom�s Vesel�������+?n(��?r� - 8.12.1999 08:39:26

Nerozmislej se a kup D5. D4 ma bohuzel dost chybek i po 3 patchy.
-----Original Message-----
From: H�jek <hajek(zv)mbox.mrp(tec)cz>
To: Konference Delphi <delphi-l(zv)fwd(tec)cz>
Date: 8. prosince 1999 0:05
Subject: Delphi 4 nebo 5


Zdr�v�m,

m��ete mi n�kdo poradit, jestli je lep�� si koupit
Delphi 4 Standard nebo Delphi 5 Standard.
V Delphi jsem za��te�n�k a teprve se v�echno
u��m a nev�m, co je pro m� lep��.
Zat�m je�t� nepou��v�m datab�ze,
ale v budoucnu bych se tak�
k nim cht�l dostat.

D�ky za radu.

Tom� H�jek


ATX

[*] Bednar��k Dalibor - 8.12.1999 08:47:47


Ahoj

Poradite mi nekdo jak uspat ATX s Delphi?

packages in EXE

[*] Mirek Junek <mjunek(zv)uo.fairnet(tec)cz> - 8.12.1999 08:48:58

Ahoj,
pro Delphi 3 jsem si stahnul freeware Pfinder, ktery umel vypsat seznam
*.dpl, ktere jsou pouzity (potreba) v danem EXE souboru.

Bohuzel jsem zapomnel jmeno autoru a v programu neni nikde uvedeno.
Potreboval bych podobnou utilitku, ktera by pracovala i s EXE soubory
generovanymi Delphi5. Poradi mi nekdo ?

Diky, Mirek


Ukonceni externi aplikace

[*] Daniel Rott <roxton(zv)atlas(tec)cz> - 8.12.1999 09:13:25

> Petr Vones napsal
> > Aplikaci muzes ukoncit napr. pomoci
> > PostThreadMessage(hThread,WM_QUIT,0,0)
> ^^^^^^^
> Tady musis dat ProcessInfo.dwThreadId. Problem ale je, jakym zpusobem chces
> tu aplikaci ukoncit. Tim ze do ni posles WM_QUIT se obejde pripadne ulozeni
> souboru a podobne, takze se aplikace neuzavre "korektne". Na druhe strane
> se pouzitim WM_QUIT vyresi problem, kdy je aplikace v "modalnim stavu", a
> pouziti WM_CLOSE selhava.

Samozrejme tam ma byt ThreadId, nikoliv hThread, ale na principu to nic nemeni.
Nevim jak jsi myslel to s tim ulozenim souboru. Kdyz notepadu poslu WM_QUIT,
tak se mne zepta zda chci zmeny ulozit ci nikoliv.

Daniel Rott


packages in EXE

[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 8.12.1999 09:17:36

Haj hou!

From: Mirek Junek <mjunek(zv)uo.fairnet(tec)cz>
> pro Delphi 3 jsem si stahnul freeware Pfinder, ktery umel vypsat seznam
> *.dpl, ktere jsou pouzity (potreba) v danem EXE souboru.
>
> Bohuzel jsem zapomnel jmeno autoru a v programu neni nikde uvedeno.
> Potreboval bych podobnou utilitku, ktera by pracovala i s EXE soubory
> generovanymi Delphi5. Poradi mi nekdo ?

Pokud je to tvoje aplikace (muzes ji prelozit), pak staci po kompilaci
vyvolat Info dialog o projektu. V D5 je tam i seznam vsech balicku, ktere
dany projekt (EXE/DLL) pouziva.

Hodne zdaru


Pavel Cisar <pcisar(zv)atlas(tec)cz>
Delphree.org CEO
http://delphree.clexpert.com
Nexus project coordinator
http://delphree.clexpert.com/pages/projects/nexus/default.htm


SQL Report Builder 1.5

[*] TUNGLI Jan <tungli(zv)pvt.sk> - 8.12.1999 09:26:57

SQL Report Builder 1.5 naidete na http://free.netlap.hu/4321/

Verzia 1.5 umoznuje prekonvertovat reporty vytvorene v Delphi s QuickReport.
Idealne pre tych, ktory prechadzaju z QR1 > QR2 > QR3


TUNGLI J�nos
EMail: jan.tungli(zv)seznam(tec)cz
My Home Page: http://free.netlap.hu/4321/
or: http://freeweb.coco(tec)cz/tungli/

Propojeni nekde je, nekde neni...

[*] Jirka <juraj.nagy(zv)nh-trans(tec)cz> - 8.12.1999 09:35:17

Mam aplikaci napsanou v Delphi 1, format tabulek Paradox 5, vsechna data na siti, sit Novell IntranetWare, asi 40 uzivatelu (provoz aplikace nastesti speje ke konci :-)), BDE 2.52.

Vykytl se velice zajimavy problem. Zjednodusene receno, vezmu x pocitacu se stejnou konfiguraci sitoveho klienta, BDE, aliasu, dokonce mohou byt i identicke typy. Spustim na vsech svoji aplikaci. Na nekolika z nich se ukazuje, ze k zaznamu v tabulce T1 jsou propojene zaznamu v tabulce T2. Ale na nekolika se ukazuje, jako kdyby nic propojeneho neexistovalo!
Myslel jsem si, ze je to nahodny proces, ale ouha. Druhy den po novem zapnuti pocitacu je situace uplne stejna. Pocitace, kdy se propojeni ukazalo vcera, je i dnes, kde se neukazalo, neni ani dnes.

Chyba byla samozrejme v spatnem indexu (mimochodom, jedna kontrola pomoci Paradoxu 8 prosla v pohode, druha hlasila, ze je nejaky Warning - tj. spatny index).

Ale vysvetlete mi, jak se muze stat, ze ze stejnych tabulek na siti sestavi stejny program za stejnych okolnosti ruzne pohledy na tytez data????

Pokud nekdo z vas zna pricinu, budu mu za ni velice vdecny.

Jirka


Spolecny posun nekolika okny najednou

[*] Vladimir Sladky <sladky_vladimir(zv)hotmail(tec)com> - 08.12.1999 08:37:29 cet

Tak uz to funguje a i bez "DragFullWindows" (mam radeji, kdyz se
posouva jen ramecek - IE5.0 nemam). Je to urcite elegantnejsi, nez
to moje odchytavani "OnMove", ale protoze to vypada take, jako kdyz
se posune jedno okno a ostatni "prilepi", nevis, jsetli by se to jeste
nedalo nejak upravit, abyt to uz pri kliknuti mysi vypadalo, ze jsou
vybrana vsechna okna a posouvaly se uz i ty jejich "vyberove ramecky",
aby to opravdu vypadalo, ze je to "jedno okno" ?
(asi tak, jako to dela napr. AtiPlayer, pokud ho nahodou znas)

Dik

Vlada

______________________________________________________
Get Your Private, Free Email at http://www.hotmail.com


par komponent

[*] Milos Sula <crkstrobe(zv)geocities(tec)com> - 8.12.1999 09:49:41

no zvuk (komponenty pro kompresi vyuzivajici kodeky ve windows) a pro jeho
prehravani,dale tcpip, udp,z programu potom irc bot na posilani sms z IRC,
potom ICQ spoofer pro ICQ99x, telefon pres internet atd. atd., pripravuju
ICQ clienta - ale jednoduse se staci podivat :)) vse je freeware

----- P�vodn� zpr�va -----
Od: David Lebeda <david.lebeda(zv)comarr(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 7. prosince 1999 11:31
P�edm�t: Re: par komponent


> > umistil jsem tady par komponent (no nic moc, ale snad to bude treba
nekdo
> > nekdy neco takoveho potrebovat).
> > www.geocities.com/crkstrobe/
>
> Napis aspon, ceho se tykaji, z jake jsou oblasti.
>
> David Lebeda
>

Delphi 4 nebo 5

[*] Milink Otakar <otam(zv)tdat(tec)cz> - 8.12.1999 09:52:40

Pozor ale na to, ze D5Std nema VUBEC ZADNOU DATABAZOVOU podporu, zatimco v
D4Std lze pracovat alespon s DBase a Paradoxem (pripadne pres TDataset
kompatibilni
komponenty od jinych vyrobcu i s dalsimi...)

Otakar Milink

>Nerozmislej se a kup D5. D4 ma bohuzel dost chybek i po 3 >patchy.>>Zdr�v�m,
>>
>>m��ete mi n�kdo poradit, jestli je lep�� si koupit
>>Delphi 4 Standard nebo Delphi 5 Standard.
>>V Delphi jsem za��te�n�k a teprve se v�echno
>>u��m a nev�m, co je pro m� lep��.
>>Zat�m je�t� nepou��v�m datab�ze,
>>ale v budoucnu bych se tak�
>>k nim cht�l dostat.
>>
>>D�ky za radu.
>>
>>Tom� H�jek


TMemo, Begin..EndUpdate neaktualizuje pozici kurzo

[*] Karel Kral <kral(zv)purus(tec)cz> - 08.12.1999 10:03:48

Diky moc! Stacilo pridat tvoje SendMessage(Handle, EM_SCROLLCARET, 0,0)
_ZA_ Lines.EndUpdate a uz to funguje i s TMemo krasne.

Petr Vones wrote:
>
> Zkus pouzit TRichEdit, ten nema tak moc omezenou kapacitu. U neho mi to
> funguje takhle:
>
> procedure TForm1.AddLogLine(const S: String);
> begin
> with RichEdit1 do
> begin
> Lines.BeginUpdate;
> try
> while Lines.Count > 20 do Lines.Delete(0);
> Lines.Add(S);
> SendMessage(Handle, EM_SCROLLCARET, 0,0);
> finally
> Lines.EndUpdate;
> end;
> end;
> end;
>

--
______________________________________________________
Karel Kral, informatik
Purus, s.r.o., Cezavy 627, 664 56 Blucina
Tel: 05/47235000, 0602/552432, Fax: 05/47231203
E-Mail: mailto:kral(zv)purus(tec)cz, WWW: http://www.purus(tec)cz
______________________________________________________


Indexy

[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 8.12.1999 10:13:23


----- Original Message -----
From: Tom�s Vesel� <veselyt(zv)bigfoot.com>>Jedna se o tabulku na Access97, pristupuji k ni pomoci nativniho driveru
>Delphi 4.0.
>Na tabulce je cca. 7 indexu, a append jedocela pomaly - hlavne kdyz se
>appenduje velike mnozstvi dat. Ale tato moznost by me zajimala i u Pdox -
>tez pres BDE.

Nejake tzv. vypnuti indexu neexistuje. Pokud jsou indexy mainained, cili
automaticky udrzovane, aktualizuji se ti pri jakemkoliv pridavani ci mazani v
tabulce.
Ve tvem pripade zkus pouvazovat na tom, zda by nebylo vyhodnejsi pred
appendovanim indexy zrusit a po appendovani je vytvorit. Nekdy to vyjde casove
lepe. Podminkou je otevreni tabulky exclusivne. To by ti ovsem pomohlo i ve tvem
pripade bez jakych koliv dalsich uprav, pokud je to mozne.
Dalsi moznosti je optimalizace kodu programu. pokud pouzivas napr. v cyklu
Append, prirazeni, Post, zkus se podivat na komponentu BatchMove nebo primo
metodu TTable.BatchMove.

Jan Fiala


D5-Trial

[*] supervisor(zv)unicontrols(tec)cz - 8.12.1999 09:14:19

> Jejda, ony se daji registrovat i Trial verze?

No asi jsem se spatne vyjadril, jde o to ze pri instalaci je
vyzadovano heslo ktere je generovano na webu.
No a tady je problem, nebot instalace ktera je na cd-cku
PCW10/99 me negeneruje ID ktere je nutno zadat na web stranku.
Ale uz jsem to vyresil tim ze jsem si downloadnul verzi od
Borlandu a ta tento generator ma. Ale je tu dalsi problem
a to ohledne 60 deni verze. Protoze jakmile zmeni datum (rok) na
pocitaci tak se tato verze prepne ze je uz prosla a pri opetovnem
narovnani data se to dohromady uz neda a nepomuze ani preinstalace.
Takze zaver je takovy ze me to moc nepotesilo

Takze diky za ochotu


-----------------------------
- Vojtech Albrecht -
- supervisor(zv)unicontrols(tec)cz -
- ICQ 33995541 -
-----------------------------


D5 - ano ci ne ?

[*] Robert Kindl <rob(zv)exec(tec)cz> - 8.12.1999 10:27:54

> > Tak to oprav primo v grids.pas a hlavne to bugreportuj...
> > treba se jednoho dne dockame.
> To neni dobra cesta, protoze pri nejblizsi zaplate, kde nebude
> chyba odstranena, prijdu o celou praci.

Zatimco kdyz si udelas uplne vlastni grid tak budes pri nejblizzi
zaplate v pohode. Problem je ze ty sam budes zaplatovat
ten svuj grid jeste pristi vanoce :-)

> > No, mas nejaky konkretni napad jak pichnout
> > do toho Borlandiho hnizda, aby se daly veci
> > do pohybu?
> Netusim, ja sam jsem zkousel ruzne cesty a vsechno vysumelo do
> ztracena.

No presne to je ten problem.
Takova je i ma zkusenost: vysumi to do ztracena :-(

> > Zda se iniciativa PS (programatori sobe) alias
> > Delphree nejak nefunguje nebo
> > alespon zaostava za ocekavanim :-(
> :-) Delphree je zavisle na ucasti mnoha programatoru. Pokud v tom
> bude delat jen par lidi a ostatni budou pouze ocumovat, nic se
> nepohne.

To je sice pravda, ale to je asi jako s tim
gridem. Vlastni grid je schopno napsat 1% zdejsich ucastniku
a jen 1% z techto ma cas se do toho pustit.
Tudiz jediny kdo to udelal jsi ty Zbysku :-)
Tedy pro 99% lidi neni-li k dispozici nejaky zaklad,
ktery by mohli zkusit pouzivat, tak budou jen "ocumovat".

Rob

Zjistovani propustnosti seriovych kanalu

[*] Petr Fejfar <callnet(zv)telecom(tec)cz> - 8.12.1999 10:27:46

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

> Jinak ohledne ztraceni dat by mohlo pomoci
> nastaveni protokolu RTS/CTS.
> Ale pokud je pocitac extra pomaly,
> tak asi ani to.

Samozrejme: pouzivam HW handshake, ale pokud si to pamatuju jeste z dob DOSu, tak ten u vetsiny modemu fungoval jen jednosmerne: modem signalizuje stav BUSY, ale na signalizaci BUSY ze strany pocitace prdi.> Pocitace se starym UARTem patri spis na skladku,
> ono to pri vyssich rychlostech opravdu muze tezko
> fungovat bez nejakeho maleho bufferu.

Kdyz prodavas SW ve vetsim mnozstvi, tezko muzes ovlivnit, na jakej shit si ho kdo nainstaluje. Dnes to resim tak, ze kvuli nim limituji DTE speed u vsech instalaci, ale rad bych to delal adaptivne. > Se ztracenim mam i jednu zkusenost, kdysi se mi po instalaci modemu
> stale ztracely data i pri nizsich rychlostech (38400). Po rade ruznych
> experimentu se ukazalo, ze pricinou bych stary driver videokarty. Po
> jeho aktualizaci problem naprosto zmizel.

BTW, existuje napr. cela rada notebooku, ktera ma integrovany UART 16450 a jsou to napr. P/100 s 800x600, ktere firmy odepisi az v pristim roce.


bye pf, Petr.Fejfar(zv)callnet(tec)cz

Zjistovani propustnosti seriovych kanalu

[*] V�clav Janou�ek <VJanousek(zv)seznam(tec)cz> - 08.12.1999 11:40:15

Ahoj,
mam jednu zacatecnickou otazku:

type
Plos = ^los;

los = record
ukaz: Plos;
hodnota : integer;
end;

var
P,L: Plos;

a dynamicky alokuji P:

for i:=1 to pocet do
begin
L:=P;
Getmem(P,Sizeof(L^));
P^.ukaz:=L;
P^.poradi:=i;
end;

Da se nejak pohybovat v dynamicky alokovane promenne jinak nez napr. (P^.ukaz)^.ukaz?
Bohuzel, zda se, ze syntaxe typu (P-2)^ funguje jen pro netypovany ukazatel (nebo PChar), coz neni muj pripad. Jak na to v pripade typovaneho ukazatele?

Jaky je rozdil mezi GetMem a New?

diky za odpoved
Vaclav

-- http://email.seznam(tec)cz
-- email zdarma na cely zivot


Tisk

[*] Petr Voborn�k <vobornik(zv)ssakhk(tec)cz> - 8.12.1999 11:20:46

Tak abych to shrnul
- RichEdit nezarovnava text do boku (a kdyz jsem z nej zkousel tisknout, tak
mi kazdy slovo vytisk na novej radek!)
- sam si do boku umim zarovnat jenom text s fontem Courier New nebo neco v
tom stylu, ze ma vsechny znaky stejne siroky. Jenze ja behem jednoho
odstavce zmenim font nekolikrat.
- je me jedno, jestli budu tisknout znakove nebo graficky, hlavne kdyz to
pujde

A jako bonus dalsi problem: Kdyz mezi ten text chci vytisknout obrazek, tak
musim nejdriv ukoncit tisk textu a zacit tisk obrazku, coz mi zakonci
stranku a nabere novou a to rozhodne nechci.
Takze asi bude lepsi ten graficky tisk, jenze jak na to? Urcite to pujde
jinak, nez kupovat komponentu od nejaky pochybny firmy.

Petr Vobornik
vobornik(zv)ssakhk(tec)cz


----- P�vodn� zpr�va -----
Od: Martin Fron�k <FRONEK(zv)zznslany(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 7. prosince 1999 8:40
P�edm�t: RE: Tisk


> Tady stale nekdo nepochopil, ze tomu cloveku jde o ZNAKOVY tisk (patrne
> na jehlickove tiskarne), nikoliv o grafiku.
> V takovem pripade si musis budto udelat vsechno sam, a nebo pouzit neco
> od SINEA SW, videl jsem to a neni to spatne, ma to jen jednu vadu -
> kupodivu za to chteji penize :-)
> Takze ja sam tohle resim vystupem do souboru a naslednym kopirovanim na
> tiskarnu (muzes pouzit i UNC).
>
> Martin Fron�k
> ZZN Slan� a.s.
> Pra�sk� 1579, 274 49, Slan�
> tel. +420-314-522986
> e-mail: fronek(zv)zznslany(tec)cz
>
> > -----P�vodn� zpr�va-----
> > Od: bures [SMTP:bures(zv)ssakhk(tec)cz]
> > Odesl�no: 06. prosince 1999 15:10
> > Komu: delphi-l(zv)fwd(tec)cz
> > P�edm�t: Re: Tisk
> >
> > komponenta Richedit to umi... RichEdit1.Print ...
> >
> > Vlada
> >
> >
> >
> > Jenze jak to mam udelat, aby to tisklo
> > 1) text zarovnany do boku
> > 2) zarovnane sloupce
> > 3) vycenrovany text
> > (a to jeste hodlam menit fonty)
> >
> > ???
> >
> >
> > Pitr - Petr Vobornik
> >
>

D5 - ano ci ne ?

[*] Robert Kindl <rob(zv)exec(tec)cz> - 8.12.1999 11:22:34

> Haj hou!
>
> From: Robert Kindl <rob(zv)exec(tec)cz>
> >No, mas nejaky konkretni napad jak pichnout
> >do toho Borlandiho hnizda, aby se daly veci
> >do pohybu?
>
> Borlandi Newsy. Borlandi je ctou (od spicek po bezne programatory) a
aktivne
> odpovidaji. Rovnez se rozjely Chaty na ruzna temata. Neni pravda, ze
Borland
> nenasloucha pozadavkum vyvojaru a nic nedela. Jiste, minuly rok byla
situace
> dost mizerna, ale nelze soudit posle jednoho roku, ale v sirsim kontextu.
> Borlandi v Delphi ve verzich 1, 2 a 3 zakomponovali radu pozadavku
> (abstrakce datasetu apod.). Jiste, jsou trochu pomalejsi, nez by vsichni
> chteli, ale to se snad da pochopit, ne ? Kdyz sleduji na NG co vsechno
lidi
> po Borlandech chteji, tak je vazne lituji (uz jenom ten cas straveny
ctenim
> a posuzovanim) a obdivuji jejich statecnost a trpelivost. Loni si to u
> vyvojaru dost zavarili, a kdyz se rozhodli k radikalnim zmenam, museli si
> projit dost tezkou fazi vycitek, spilani, neduvery atd. Tento rok je ve
> znameni obratu k lepsimu (vysledkem je D5, podpora Linuxu a vyrazne
posileni
> kontaktu s vyvojarskou komunitou). Uvidime, co prinese rok 2000.

Hmm, ze by se neco zmenilo?
Moje zkusenost byla takova, ze jsem na borlandich
newsech polozil otazku ohledne nejake chyby
a neobdrzel jsem bud zadnou odpoved
nebo odpoved, ze nekdo ma ten problem taky.
Jednou jedinkrat se mi ozval nekdo z TeamB,
ze chybu je schopen reprodukovat
a at to BugReportuju na www.borland.com.
Tak jsem mu napsal, ze to jsem jiz udelal dvakrat
v rozmezi 6 mesicu a bez odpovedi.
Prislibil, ze report udela sam a pravdou je,
ze v D5 je jiz chyba opravena.

Takze suma sumarum po roce a pul
(chyba se tahla z Delphi 3) jsem docilil
(a to kdovi jestli jsem to byl ja) opravy
jedne chyby shodou okolnosti te, ktera
mne vubec netrapila a nastavala jednou
za ten rok a pul (byla v MenuDesigneru v IDE).

> >Zda se iniciativa PS (programatori sobe) alias
> >Delphree nejak nefunguje nebo
> >alespon zaostava za ocekavanim :-(
>
> Nefunguje ? Funguje docela dobre (s prihlednutim k poctu zaangazovanych).
A
> pokud zaostava za necim ocekavanim, neni to jeji problem. Kazdy ma moznost
> se zapojit a naplnit tak svoje ocekavani.

Nefunguje ve smyslu donutit Borland k tomu
aby vylepsil stavajici produkty. Tak jsem
to myslel.
A presto. Delphree sleduji pravidelne (obdendva),
ale hlavne kvuli novinkam a linkum na dalsi projekty.
To skutecne funguje a je dobre.
Ale vlastni vyvoj?

Nesliboval nekdo demo k Nexusu? Nebo mi to uniklo?
Takze jeste stale mi neni jasne k cemu mi ten Nexus muze
byt vlastne dobry :-(

Ty Zbyskovy OLE DB komponenty jsou zatim
pri nejlepsi vuli nenasaditelne :-(
A to hlavne kvuli tom, ze jak spravne psal Eric Salaj,
kdyz jsou pro VCL mely by do VCL zapadnout.
To se o OLE DB komponentach rici neda.
Ted navic Zbysek zacal delat vlastni grid,
ktery s nimi asi bude fungovat, ale uz asi s nicim jinym.
Navic nez se dostane alespon na uroven toho co
je ve stavajicim VCL a nez by jsem si
tam doplnil to o co jsem stavajici VCL rozsiril
tak budou pristi vanoce.
Podle meho nazoru je to proste
kompletni predelavka a nikoliv vylepseni stavajiciho.
To mne a asi spoustu dalsich lidi odrazuje.
Tim je to pro mne slepa a neperspektivni vetev.
Proste lide ocekavaji, ze naleznou reseni pro sve
problemy a nikoliv, ze se budou lopotit
s vyvojem od nuly. Na tom je napr. zalozen
uspech RXLib. Tam je nabidnuto reseni
tech problemu, ktere trapi tu programatorskou
masu (napr. jak obarvit radek v gridu).
Tedy kdyby na Delphree byl treba i blboucky
TDfGrid resp. TDfDBGrid
(ale dedicove TCustomGridu a TCustomDBGrid
aby je bylo mozno snadno zamenit)
tak by se mozna nasli lide, kteri by je pouzili
a vylepsovali resp. vznaseli navrhy na vylepseni.
Jen ten spravce projektu chybi...
Ale neni to zbytecne delat dalsi RXLib?
A nechteji neco takoveho delat u Jedi-ComponentBuilderu?

A to ostatni na Delphree?
Ciste subjektivne to neni moje parketa takze nevim.

Rob

OnNeedData QR1.1

[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 8.12.1999 11:23:25

Ahoj,

narazil jsem na problem pri pouziti QR1.1. Na formulari mam tri Bandy typu
rbDetail. Kdyz do jednoho (je prostreni) z nich pridavam data pres
OnNeedData, aby se mi duplikoval, zmizi mi pri tisku vsechny tri a v preview
je stranka prazdna (tedy, prazdna neni, mam
tam titulek). Jakeho typu musi byt ostatni BandType, aby mi nezmizely?

Diky za kazdou radu
Jaro B.

Jak ladit ISAPI knihovnu?

[*] Jan Fryscak <fryscak(zv)scio(tec)cz> - 8.12.1999 12:02:47

Zdravim vsechny,
nevite nekdo jak ladit (trasovat) ISAPI knihovny (a asi dll obecne)?
Chce to po me nejakou hostitelskou aplikaci, cemuz se nelze divit, ale jakou
mam zvolit?
Pokud je to nejaka trivialita, tak se omlouvam, ale je to vubec moje prvni
aplikace v Delphi.

Diky Honza


Nelogicka matematika - deji se zazraky KONEC

[*] Honza <delphi(zv)mis-net(tec)cz> - 8.12.1999 12:02:43

Ahoj

Z Vasich prispevku jsem pochopil jsem, �e chyba vznik� zpusobem ulozeni
cisla s plovouci desetinnou carkou, a nepresnosti zaokrouhlovani se po
pouziti 2x "Frac" funkce vyhroti v problem.

Nejde mi o prevedeni takoveho cisla na text hned.
V 1 komponente jsem potreboval zaokrouhlit VELIKE realne cislo na ruzny
pocet des. mist.
To znamena patricne vynasobit zminene cislo, "uriznout" desetinnou cast a
zase vydelit.
Abych timto nasobenim neztratil presnost, tak se to cislo hned na zacatku
rozpulilo na 2 casti a ta desetinna slozka mela byt nasledne
zaokrouhlena/useknuta.

RESENI PROBLEMU :
Diky Vam za "osviceni".
Snizil jsem svuj cil a nebudu se zaobirat ztratou presnosti pri roznasobeni.

V te zaokrouhlovaci funkci ted stacim s 1x "Frac" a to je jeste vse v
poradku.


Diky vsem

........Honza

>Radoslav Krehl�k wrote:
>>
>> > > begin
>> > > a := 4.56;
>> > > b := Frac(a)*10;
>> > > b := Frac(b);
>> > > ShowMessage(FloatToStr(b));
>>
>> kazdopadne problem neni v tech vypoctech, ale v te konverzni funkcni
>> FloatToStr
>
>Ahoj,
>
>Presne tak, lze pouzit jine formatovaci funkce:
>
>procedure TForm1.Button1Click(Sender: TObject);
>var a : Double;
> b : Extended;
>begin
> a := 4.56;
> b := Frac(a)*10;
> b := Frac(b);
>
> ShowMessage(FloatToStrF(B, ffNumber, 10, 2));
>// nebo
> ShowMessageFmt('%-10.2n', [B]);
>
>end;
>

Delphi 4 nebo 5

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 8.12.1999 12:04:38

H�jek wrote:

> m��ete mi n�kdo poradit, jestli je lep�� si koupit
> Delphi 4 Standard nebo Delphi 5 Standard.
> V Delphi jsem za��te�n�k a teprve se v�echno
> u��m a nev�m, co je pro m� lep��.
> Zat�m je�t� nepou��v�m datab�ze,
> ale v budoucnu bych se tak�
> k nim cht�l dostat.

Kvuli chybovosti D4 bych doporucoval radeji D5. Co se tyce
databazi, je treba pouzit pristupy, ktere se neodvolavaji na
TDataSet, tedy napriklad Delphree OLE DB komponenty. Zatim to
vsak neni ve stavu pro zacatecniky. :-(


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


ATX

[*] bures <bures(zv)ssakhk(tec)cz> - 8.12.1999 12:11:41

zkus tuto WinApi
SetSystemPowerState(true,true);

Vlada
----- Original Message -----
From: Bednar��k Dalibor
To: forum
Sent: Wednesday, December 08, 1999 8:47 AM
Subject: ATX
Ahoj

Poradite mi nekdo jak uspat ATX s Delphi?

Dynamicke volani (generovani) procedur (jako ve FA

[*] Richard Valny <Richard.Valny(zv)oku-st(tec)cz> - 08.12.1999 12:29:02

Ahojky pratele,
otravuji s takovou blbosti, co by mi dost pomohla.
Konkretni prklad:
Chci si vytvorit podle seznamu (napr. ListBoxu) TSringListy pojmenovane podle polozek v seznamu.
Pak potrebuji do techto StringListu zapisovat s tim, ze pochopitelne v dobe psani procedury neznam jejich jmeno, pak je ulozit do textovych souboru a nakonec je znicit (Free).

Napriklad asi tak

for i := 0 to CheckListBox.Items.Count -1 do
CheckListBox.items[i] := TstringList.create.;
Vim, ze tak jak jsem to napsal to nemuze fungovat, ale co s tim.
Pro prirazovani do techto StringListu chci pristupovat podle potreby (ne vzdy v cyklu)

Jeste jeden dotaz:
jake je omezeni delky TSringListu?

Diky moc, snad jsem se vyjadril alespon trochu pochopitelne.
=========================================
Richard Valny richard.valny(zv)oku-st(tec)cz
Okresni urad Strakonice tel. 0342-441 l. 216
Smetanova 533 fax. 0342-21208
386 22 STRAKONICE FiDoNet 2:423/35
=========================================

Dynamicke volani (generovani) procedur (jako ve FA

[*] TUNGLI Jan <tungli(zv)pvt.sk> - 8.12.1999 13:10:25

delka stringlistu je 32KB

TUNGLI J�nos
EMail: jan.tungli(zv)seznam(tec)cz
My Home Page: http://free.netlap.hu/4321/
or: http://freeweb.coco(tec)cz/tungli/

-----P�vodn� zpr�va-----
Od: Richard Valny <Richard.Valny(zv)oku-st(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 8. december 1999 13:05
P�edm�t: Dynamicke volani (generovani) procedur (jako ve FANDu)>Ahojky pratele,
>otravuji s takovou blbosti, co by mi dost pomohla.
>Konkretni prklad:
>Chci si vytvorit podle seznamu (napr. ListBoxu) TSringListy pojmenovane
podle polozek v seznamu.
>Pak potrebuji do techto StringListu zapisovat s tim, ze pochopitelne v dobe
psani procedury neznam jejich jmeno, pak je ulozit do textovych souboru a
nakonec je znicit (Free).
>
>Napriklad asi tak
>
>for i := 0 to CheckListBox.Items.Count -1 do
> CheckListBox.items[i] := TstringList.create.;
>Vim, ze tak jak jsem to napsal to nemuze fungovat, ale co s tim.
>Pro prirazovani do techto StringListu chci pristupovat podle potreby (ne
vzdy v cyklu)
>
>Jeste jeden dotaz:
>jake je omezeni delky TSringListu?
>
>Diky moc, snad jsem se vyjadril alespon trochu pochopitelne.
>
>
>=========================================
>Richard Valny richard.valny(zv)oku-st(tec)cz
>Okresni urad Strakonice tel. 0342-441 l. 216
>Smetanova 533 fax. 0342-21208
>386 22 STRAKONICE FiDoNet 2:423/35
>=========================================
>
>

Tisk

[*] Lukas Voborsky <xvobl03(zv)vse(tec)cz> - 8.12.1999 13:25:01

On Wed, 8 Dec 1999, [iso-8859-2] Petr Voborn�k wrote:

> Tak abych to shrnul
> - RichEdit nezarovnava text do boku (a kdyz jsem z nej zkousel tisknout, tak
> mi kazdy slovo vytisk na novej radek!)
> - sam si do boku umim zarovnat jenom text s fontem Courier New nebo neco v
> tom stylu, ze ma vsechny znaky stejne siroky. Jenze ja behem jednoho
> odstavce zmenim font nekolikrat.
> - je me jedno, jestli budu tisknout znakove nebo graficky, hlavne kdyz to
> pujde

Ahoj,
lepsi asi bude na to jit graficky, jinak bys musel delat zarovnavani do
bloku, jak to delala t602, coz je samo o sobe dost osklivy.
Nechce se mi ted vubec koukat do helpu, ale existuje fce, ktera ti rekne,
kolik mista zabere ten ktery text. Kdyz to bude sirsi, nez dana sirka
bloku, tak posledni slovo hodis na dalsi radku (nebo rozdelis :-)).
V opacnem pripade, rozsiris vzdalenosti mezi znakama, coz urcite nejak
trivialne jde.
Lukas

-==============================================================-
mailto: voborsky(zv)menza.mff.cuni(tec)cz ICQ: 21084410
www: http://come.to/voborsky tel. 8551040-9 l. 393
-==============================================================-
PGP podporovano


Tisk

[*] Vaclav Krmela <krmela(zv)pecomp(tec)cz> - 8.12.1999 13:27:09

From: Petr Voborn�k <vobornik(zv)ssakhk(tec)cz>

> A jako bonus dalsi problem: Kdyz mezi ten text chci vytisknout obrazek,
tak
> musim nejdriv ukoncit tisk textu a zacit tisk obrazku, coz mi zakonci
> stranku a nabere novou a to rozhodne nechci.

Pres AssignPrn to rozhodne nepujde.
Mozny postup je pres BeginDoc, Printer.Canvas.TextOut..., EndDoc

> Takze asi bude lepsi ten graficky tisk, jenze jak na to? Urcite to pujde
> jinak, nez kupovat komponentu od nejaky pochybny firmy.
>
Nemusis hned kupovat, muzes vyzkouset demo.

Vaclav Krmela


ComboBox a DropDown (was: none)

[*] Jaroslav ��pek <jaroslav.sipek(zv)idea(tec)cz> - 8.12.1999 13:33:53

Ahoj,

Metoda DropDown se vola jako reakce na oznamovaci zpravu Windows. Jejim
predefinovanim tomu nezabranis. Co to ma vlastne presne delat ?

--

Petr Vones, amatersky programator

Ahoj,
vytvarim graficke rozhrani nad objektovou datab�zi Cache (nad e je carka).
Pro zadavani hodnot do vlastnosti, ktere jsou typu persistentni objekt vytvarim
komponentu odvozenozu od TComboBoxu. Na udalost OnDropDown, chci misto
standardniho seznamu, ktery umoznuje zobrazit pouze jeden sloupec v seznamu,
zobrazovat vlastni seznam, u nehoz bude navic moznost postupneho nacitani hodnot.

Problem, ktery jsem mel, jsem nakonec vyresil nasledovne. Nevim do jake miry je to
korektni, ale zatim to funguje bez problemu.

unit PokusCombo;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;

type
TPokusCombo = class(TComboBox)
private
{ Private declarations }
protected
{ Protected declarations }
public
{ Public declarations }
procedure DropDown; override;
published
{ Published declarations }
end;

procedure Register;

implementation

procedure Register;
begin
RegisterComponents('Samples', [TPokusCombo]);
end;

procedure TPokusCombo.DropDown;
begin
ShowMessage('DropDown'); <- zde zobrazim vlastni seznam
PostMessage(Handle, WM_CANCELMODE, 0, 0);
PostMessage(Handle, CB_SHOWDROPDOWN, 0, 0);
end;

end.

Funguje to i bez PostMessage(Handle, WM_CANCELMODE, 0, 0) , ale neco mi rika,
ze by to tam melo byt. Blize viz. zdrojak TCustomComboBox.CNCommand.

S pozdravem
Jaroslav ��pek
E-mail: jaroslav.sipek(zv)idea(tec)cz

Tisk

[*] Martin Fron�k <FRONEK(zv)zznslany(tec)cz> - 8.12.1999 13:41:31

Tak to asi pletes pate pres devate, nejdriv predvadis kod na tisk ZNAKU
a pak si predstavujes obrazky. Takze, pokud budes tisknout graficky, tak
musis ziskat HDC tiskarny a tisknou pomoci standartnich funkci API. To
je trivialni zalezitost. Zarovnavat si musis samozrejme sam, od API se
dozvis jen delku zamysleneho tisku, a rozhodni sam, jestli to vytisknes
cele, nebo si to rozdelis. Jednoduchy zpusob neni.


Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz

> -----P�vodn� zpr�va-----
> Od: Petr Voborn�k [SMTP:vobornik(zv)ssakhk(tec)cz]
> Odesl�no: 08. prosince 1999 11:21
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Tisk
>
> Tak abych to shrnul
> - RichEdit nezarovnava text do boku (a kdyz jsem z nej zkousel
> tisknout, tak
> mi kazdy slovo vytisk na novej radek!)
> - sam si do boku umim zarovnat jenom text s fontem Courier New nebo
> neco v
> tom stylu, ze ma vsechny znaky stejne siroky. Jenze ja behem jednoho
> odstavce zmenim font nekolikrat.
> - je me jedno, jestli budu tisknout znakove nebo graficky, hlavne kdyz
> to
> pujde
>
> A jako bonus dalsi problem: Kdyz mezi ten text chci vytisknout
> obrazek, tak
> musim nejdriv ukoncit tisk textu a zacit tisk obrazku, coz mi zakonci
> stranku a nabere novou a to rozhodne nechci.
> Takze asi bude lepsi ten graficky tisk, jenze jak na to? Urcite to
> pujde
> jinak, nez kupovat komponentu od nejaky pochybny firmy.
>
> Petr Vobornik
> vobornik(zv)ssakhk(tec)cz
>
>
> ----- P�vodn� zpr�va -----
> Od: Martin Fron�k <FRONEK(zv)zznslany(tec)cz>
> Komu: <delphi-l(zv)fwd(tec)cz>
> Odesl�no: 7. prosince 1999 8:40
> P�edm�t: RE: Tisk
>
>
> > Tady stale nekdo nepochopil, ze tomu cloveku jde o ZNAKOVY tisk
> (patrne
> > na jehlickove tiskarne), nikoliv o grafiku.
> > V takovem pripade si musis budto udelat vsechno sam, a nebo pouzit
> neco
> > od SINEA SW, videl jsem to a neni to spatne, ma to jen jednu vadu -
> > kupodivu za to chteji penize :-)
> > Takze ja sam tohle resim vystupem do souboru a naslednym kopirovanim
> na
> > tiskarnu (muzes pouzit i UNC).
> >
> >
> > Martin Fron�k
> > ZZN Slan� a.s.
> > Pra�sk� 1579, 274 49, Slan�
> > tel. +420-314-522986
> > e-mail: fronek(zv)zznslany(tec)cz
> >
> > > -----P�vodn� zpr�va-----
> > > Od: bures [SMTP:bures(zv)ssakhk(tec)cz]
> > > Odesl�no: 06. prosince 1999 15:10
> > > Komu: delphi-l(zv)fwd(tec)cz
> > > P�edm�t: Re: Tisk
> > >
> > > komponenta Richedit to umi... RichEdit1.Print ...
> > >
> > > Vlada
> > >
> > >
> > >
> > > Jenze jak to mam udelat, aby to tisklo
> > > 1) text zarovnany do boku
> > > 2) zarovnane sloupce
> > > 3) vycenrovany text
> > > (a to jeste hodlam menit fonty)
> > >
> > > ???
> > >
> > >
> > > Pitr - Petr Vobornik
> > >
> >

Jak ladit ISAPI knihovnu?

[*] Pavel �im��ek - 8.12.1999 14:19:27

Musis si pouzit nebo si udelat aplikaci ktera bude pouzivat tu tvoji DLL.
Pavel

-----P�vodn� zpr�va-----
Od: Jan Fryscak <fryscak(zv)scio(tec)cz>
Komu: 'delphi-l(zv)fwd(tec)cz' <delphi-l(zv)fwd(tec)cz>
Datum: 8. prosince 1999 13:31
P�edm�t: Jak ladit ISAPI knihovnu?>Zdravim vsechny,
>nevite nekdo jak ladit (trasovat) ISAPI knihovny (a asi dll obecne)?
>Chce to po me nejakou hostitelskou aplikaci, cemuz se nelze divit, ale
jakou
>mam zvolit?
>Pokud je to nejaka trivialita, tak se omlouvam, ale je to vubec moje prvni
>aplikace v Delphi.
>
>Diky Honza


Delphi 4 nebo 5

[*] Ji�� Kr�l jr. - 8.12.1999 14:23:16


Rozhodne kup D5, D4 je sice mocne zalatana, ale i tak je tam spousta
otravnych bugu.
Mam D5 a zatim ani moc nenadavam...

Jura

Dynamicke volani (generovani) procedur (jako ve FA

[*] Slavomir Skopalik <skopalik(zv)atlas(tec)cz> - 8.12.1999 13:52:28 -0000

[Slavomir Skopalik] To snad jen u Mema, jinak 2GB, pokud me pamet neklame.
Slavek

delka stringlistu je 32KB


>
>Jeste jeden dotaz:
>jake je omezeni delky TSringListu?
>
>Diky moc, snad jsem se vyjadril alespon trochu pochopitelne.
>
>
>=========================================
>Richard Valny richard.valny(zv)oku-st(tec)cz
>Okresni urad Strakonice tel. 0342-441 l. 216
>Smetanova 533 fax. 0342-21208
>386 22 STRAKONICE FiDoNet 2:423/35
>=========================================
>
>

Dynamicke volani (generovani) procedur (jako ve FA

[*] Pavel �im��ek - 8.12.1999 15:26:29

ListBox ma property Items: TStrings a ty obsahuji jak Strings tak Objects.
Takze potom pridani objektu do ListBoxu:

ListBox.Items.AddObject(JmenoStringListu, TStringList.Create);

No a zapis do StringListu bude potom asi nejlepsi pres index polozky v
ListBoxu
(nevim jak urcujes do ktereho StringListu chces zapisovat, ale predpokladam
ze do toho
na jehoz polozce v ListBoxu zrovna jsi):

TStringList(ListBox.Items.Object[ListBox.ItemIndex]).Add('Retezec');

A uvolneni bych udelal takto:

for I:= 0 to ListBox.Items.Count - 1 do
begin
TStringList(ListBox.Items.Object[I]).Clear;
TStringList(ListBox.Items.Object[I]).Free;
end;
ListBox.Items.Clear;

Doufam ze jsem neudelal nekde nejakou krpu
Ahoj Pavel


-----P�vodn� zpr�va-----
Od: Richard Valny <Richard.Valny(zv)oku-st(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 8. prosince 1999 14:31
P�edm�t: Dynamicke volani (generovani) procedur (jako ve FANDu)>Ahojky pratele,
>otravuji s takovou blbosti, co by mi dost pomohla.
>Konkretni prklad:
>Chci si vytvorit podle seznamu (napr. ListBoxu) TSringListy pojmenovane
podle polozek v seznamu.
>Pak potrebuji do techto StringListu zapisovat s tim, ze pochopitelne v dobe
psani procedury neznam jejich jmeno, pak je ulozit do textovych souboru a
nakonec je znicit (Free).
>
>Napriklad asi tak
>
>for i := 0 to CheckListBox.Items.Count -1 do
> CheckListBox.items[i] := TstringList.create.;
>Vim, ze tak jak jsem to napsal to nemuze fungovat, ale co s tim.
>Pro prirazovani do techto StringListu chci pristupovat podle potreby (ne
vzdy v cyklu)
>
>Jeste jeden dotaz:
>jake je omezeni delky TSringListu?
>
>Diky moc, snad jsem se vyjadril alespon trochu pochopitelne.
>
>
>=========================================
>Richard Valny richard.valny(zv)oku-st(tec)cz
>Okresni urad Strakonice tel. 0342-441 l. 216
>Smetanova 533 fax. 0342-21208
>386 22 STRAKONICE FiDoNet 2:423/35
>=========================================
>

Zakaz zapisu do registru

[*] Jan Rychtar <hojan(zv)sin.cvut(tec)cz> - 8.12.1999 16:19:10

> if OpenKey('\Software\Microsoft\MS Setup (ACME)\User
Info',false) then
...
> Parametr false v OpenKey znamena jen cteni, true znamena: neni-li, vytvori
se

To prave neni pravda.. pokud budete mit v
\Software\Microsoft\MS Setup (ACME)\User Info
nastavena prava jen pro cteni, OpenKey jej neotevre vubec,
protoze se VZDYCKY snazi otevrit klic s parametrem REG_ALL_ACCESS.

Jan Rychtar

D5 - ano ci ne ?

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 8.12.1999 17:46:50

Robert Kindl wrote:

> > > Tak to oprav primo v grids.pas a hlavne to bugreportuj...
> > > treba se jednoho dne dockame.
> > To neni dobra cesta, protoze pri nejblizsi zaplate, kde nebude chyba
> > odstranena, prijdu o celou praci.
>
> Zatimco kdyz si udelas uplne vlastni grid tak budes pri nejblizzi
> zaplate v pohode. Problem je ze ty sam budes zaplatovat ten svuj grid
> jeste pristi vanoce :-)

:-))) O to nemam nejmensi obavy. Budu ho zaplatovat v okamziku,
kdy bude treba.

> > > No, mas nejaky konkretni napad jak pichnout
> > > do toho Borlandiho hnizda, aby se daly veci
> > > do pohybu?
> > Netusim, ja sam jsem zkousel ruzne cesty a vsechno vysumelo do
> > ztracena.
>
> No presne to je ten problem.
> Takova je i ma zkusenost: vysumi to do ztracena :-(

Padlo zde, ze casy se meni. Ve verzi 5 zustala jeste rada chyb (a
nektere nove vznikly :-( ). Uvidime, s cim prijde prvni zaplata.

> > > Zda se iniciativa PS (programatori sobe) alias
> > > Delphree nejak nefunguje nebo
> > > alespon zaostava za ocekavanim :-(
> > :-) Delphree je zavisle na ucasti mnoha programatoru. Pokud v tom
> > bude delat jen par lidi a ostatni budou pouze ocumovat, nic se
> > nepohne.
>
> To je sice pravda, ale to je asi jako s tim
> gridem. Vlastni grid je schopno napsat 1% zdejsich ucastniku
> a jen 1% z techto ma cas se do toho pustit.
> Tudiz jediny kdo to udelal jsi ty Zbysku :-)

A to je zde jeste problem, ze jsem naklonoval a upravil
TCustomGrid a TDBGrid, a nez to pustim, si budu muset jeste
ujasnit, s jak velkymi predelavkami to je mozne (tedy odkdy to
bude uz novy grid).

> Tedy pro 99% lidi neni-li k dispozici nejaky zaklad,
> ktery by mohli zkusit pouzivat, tak budou jen "ocumovat".

Pro urychleni mohou navstivit kurzy Delphi + tvorba komponent. :-)


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


Kdy bude zaplata D5?

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 8.12.1999 18:10:44

Preji vsem pekneho,

> Padlo zde, ze casy se meni. Ve verzi 5 zustala jeste rada chyb
> (a nektere nove vznikly :-( ). Uvidime, s cim prijde prvni zaplata.
****Dost casto se tu temer jako k bohu vsichni modli k zaplate na
D5, ale vi nekdo neco vice? Kdy bude, co bude opravovat a
podobne?

Diky za odpoved(i)

Slavek


-------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
-------------------------------------------------


D5 - ano ci ne ?

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 8.12.1999 20:09:54

Robert Kindl wrote:

> A presto. Delphree sleduji pravidelne (obdendva),
> ale hlavne kvuli novinkam a linkum na dalsi projekty.
> To skutecne funguje a je dobre.
> Ale vlastni vyvoj?
>
> Ty Zbyskovy OLE DB komponenty jsou zatim
> pri nejlepsi vuli nenasaditelne :-(

:-) Mno, nasaditelne jsou, ja je uz pouzivam pro ostrou aplikaci.
Ovsem je treba se zcela zbavit zvyku z BDE komponent. Tedy,
pokud data rychle vyctes a ulozis si je nekam, zmeny budes
provadet vyhradne pres SQL prikazy nebo ulozene procedury, a to
jeste ke vsemu nad MS SQL 7, a nebudes pouzivat bloby, pak by
nemel byt vaznejsi duvod ke stiznostem. :-))

> To se o OLE DB komponentach rici neda.

Proc ne? Ze jsou pojate uplne jinak nez BDE komponenty, vubec
neznamena, ze nezapadaji do VCL, ze? :-)

> Ted navic Zbysek zacal delat vlastni grid,
> ktery s nimi asi bude fungovat, ale uz asi s nicim jinym.

Kupodivu, bude ho mozne pouzit na (temer) libovolna data. Ovsem
pouze tak, ze data se do gridu nacpou a dalsi prace uz bude
vyhradne nad gridem. Zato grid bude umet tridit nahoru a dolu,
umozni sahnout na bunku pri vykreslovani (obarvit, prepsat text, ...)
a podobne opicarny.

A snad to nebude proti nicemu, kdyz ted prozradim, ze mam
rozjednanou podporu tiskovych sestav Sinea. Uz jsem to na sve
urovni rozbehal, takze uz se v podstate ceka na rozhodnuti o
licencni politice ze strany Siney, a pripadne bude ve hre preklad do
anglictiny.

> Navic nez se dostane alespon na uroven toho co
> je ve stavajicim VCL a nez by jsem si
> tam doplnil to o co jsem stavajici VCL rozsiril
> tak budou pristi vanoce.

Pokud to budu delat cele vicemene sam, tak ano. Ostatne, pro to,
co potrebuji, to chodi skvele. Nikomu vsak nebranim, aby tam
zahrnul dalsi vlastnosti.

> Podle meho nazoru je to proste
> kompletni predelavka a nikoliv vylepseni stavajiciho.

Ne tak docela, komponenty jsou udelany zcela nove, predelavka se
tyka spise jen gridu, a to predevsim k obrazu memu. Nemam zatim
kdy delat v tom upravy pro potreby jinych, ale uvitam, kdyz je
dotycni dodelaji sami.

> To mne a asi spoustu dalsich lidi odrazuje.

Coz nakonec neni muj problem... :-))) Ja davam svou praci zdarma,
a je na kazdem, jak si s tim poradi. Kazdopadne jsou OLE DB
komponenty perspektivni DB alternativou pro Delphi Standard. No a
protoze jsem pri vyvoji komponent zjistil radu uzitecnych veci,
muzu nabidnout konzultace a skoleni, aby se mi aspon nejak
vratily vlozene naklady... :-)

> Tim je to pro mne slepa a neperspektivni vetev.
> Proste lide ocekavaji, ze naleznou reseni pro sve

Ano, _ocekavaji_. V tom je cely zakopany pes.

> Tedy kdyby na Delphree byl treba i blboucky
> TDfGrid resp. TDfDBGrid
> (ale dedicove TCustomGridu a TCustomDBGrid
> aby je bylo mozno snadno zamenit)

To by ovsem nesmely byt v TCustomGridu zavrtane chyby v private
sekci...

> tak by se mozna nasli lide, kteri by je pouzili
> a vylepsovali resp. vznaseli navrhy na vylepseni.
> Jen ten spravce projektu chybi...
> Ale neni to zbytecne delat dalsi RXLib?

Pokud vim, tak na Delphree se nic takoveho nedeje. Prave proto,
ze tam jsou komplexni projekty, a casto delane od sameho
pocatku, vznika (nebo muze vzniknout) zcela nova uzitna hodnota.


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


Jak ladit ISAPI knihovnu?

[*] V�clav Janou�ek <VJanousek(zv)seznam(tec)cz> - 08.12.1999 21:10:16

nic psat nemusis, uz to samozrejme nekdo napsal.
Rikaji tomu Intrabob (altavista jiste najde ..)
Je to celkem vymakane...
Vaclav

PS: osobni zkusenost s ISAPI: radsi od toho dal.
staci spatne ci prilis dlouhe hlavicky a hrave to schazuje server. Neni nad ciste CGI.

-- http://email.seznam(tec)cz
-- email zdarma na cely zivot


packages in EXE

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 08.12.1999 23:31:26

Mirek Junek wrote:
> pro Delphi 3 jsem si stahnul freeware Pfinder, ktery umel vypsat seznam
> *.dpl, ktere jsou pouzity (potreba) v danem EXE souboru.

Ahoj,

Pro Delphi5 je to treba tady (Required v5.0):

http://www.drbob42.com/tools/

--

Petr Vones, amatersky programator

Jak ladit ISAPI knihovnu?

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 08.12.1999 23:31:17

Jan Fryscak wrote:
> nevite nekdo jak ladit (trasovat) ISAPI knihovny (a asi dll obecne)?
> Chce to po me nejakou hostitelskou aplikaci, cemuz se nelze divit, ale jakou
> mam zvolit?

Ahoj,

Neco na ladeni ISAPI (a nejen toho) je tady, ale nijak jsem to nezkousel:

http://www.drbob42.com/tools/intrabob.htm

--

Petr Vones, amatersky programator

Spolecny posun nekolika okny najednou

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 08.12.1999 23:31:10

Vladimir Sladky wrote:

> Tak uz to funguje a i bez "DragFullWindows" (mam radeji, kdyz se
> posouva jen ramecek - IE5.0 nemam). Je to urcite elegantnejsi, nez

Ahoj,
staci i IE4, ale to cele posuovani oken vypada opravdu pekne. Upravena
verze toho prikladu je tady:

ftp://ftp.mlp(tec)cz/pub/misc/Delphi/konference/D5/Other/Example_MoveFormsUPDATE.zip

> to moje odchytavani "OnMove", ale protoze to vypada take, jako kdyz
> se posune jedno okno a ostatni "prilepi", nevis, jsetli by se to jeste
> nedalo nejak upravit, abyt to uz pri kliknuti mysi vypadalo, ze jsou
> vybrana vsechna okna a posouvaly se uz i ty jejich "vyberove ramecky",

To uz je horsi, musel by jsi vykreslovat vsechny ty ramecky "rucne", prave
pouzitim "DragFullWindows" se to zjednodusi. Staci pridat do registru:

[HKEY_CURRENT_USER\Control Panel\desktop]
"FontSmoothing"="2"
"DragFullWindows"="1"

--

Petr Vones, amatersky programator

Ukonceni externi aplikace

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 08.12.1999 23:31:46

Daniel Rott wrote:

> Nevim jak jsi myslel to s tim ulozenim souboru. Kdyz notepadu poslu WM_QUIT,
> tak se mne zepta zda chci zmeny ulozit ci nikoliv.

Ahoj,

Me prave ne :-) Kdyz mu poslu WM_QUIT, tak se ukonci vzdy (Win95), viz
priklad:

procedure TForm1.StartBtnClick(Sender: TObject);
var
StartupInfo: TStartupInfo;
ProcessInfo: TProcessInformation;
begin
ZeroMemory((zv)StartupInfo, Sizeof(StartupInfo));
ZeroMemory((zv)ProcessInfo, Sizeof(ProcessInfo));
StartupInfo.cb := Sizeof(StartupInfo);
if not CreateProcess(nil, 'notepad.exe', nil, nil, False,
NORMAL_PRIORITY_CLASS, nil, nil, StartupInfo, ProcessInfo) then
RaiseLastWin32Error;
FNotepadTID := ProcessInfo.dwThreadId;
CloseHandle(ProcessInfo.hProcess);
CloseHandle(ProcessInfo.hThread);
end;

procedure TForm1.CloseBtnClick(Sender: TObject);
begin
PostThreadMessage(FNotepadTID, WM_QUIT, 0, 0);
end;

--

Petr Vones, amatersky programator

Zjistovani propustnosti seriovych kanalu

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 08.12.1999 23:32:53

Petr Fejfar wrote:
> Samozrejme: pouzivam HW handshake, ale pokud si to pamatuju jeste z dob
> DOSu, tak ten u vetsiny modemu fungoval jen jednosmerne: modem signalizuje
> stav BUSY, ale na signalizaci BUSY ze strany pocitace prdi.

Tak to je spatny, potom vicemene uspokojive reseni, krome pouziti extremne
nizke rychlosti (19200), neexistuje. V dobach 386ek jsem videl reseni za
pomoci pridavneho bufferu (zarizeni s jednocipem), nic jineho se asi delat
nedalo.

> BTW, existuje napr. cela rada notebooku, ktera ma integrovany UART 16450
> a jsou to napr. P/100 s 800x600, ktere firmy odepisi az v pristim roce.

Jiste, nekde se stale pouzivaji i derne pasky :-) Urcita moznost je pouzit
funkci GetSystemMetrics(SM_SLOWMACHINE), kde pak bity v navratove hodnote
znamenaji (pro Win95):

0x0001 - CPU is a 386
0x0002 - low memory machine (less than 5 megabytes)
0x0004 - slow (nonaccerated) display card

Ohledne nastaveni UARTu, ve Windows95 je to v registru:
HKEY_LOCAL_MACHINE\Enum\BIOS\*PNP0501\..
Pricemz:
PNP0500 Standard PC COM port (a patrne i 16450)
PNP0501 16550A-compatible COM port

viz: http://msdn.microsoft.com/library/books/pc99/serialdevices.htm

Nastaveni velikosti bufferu UARTu bude patrne v polozce "Settings", ale
jakykoliv blizsi popis se mi uz nepodarilo najit (jako obykle u M$).

--

Petr Vones, amatersky programator

Dynamicke volani... -> omezeni StringListu

[*] Tom� Br�dle������i�^����? - 8.12.1999 23:39:03

Zdravim,

Mozna se ptam dost blbe, ale z ceho prameni to omezeni, neni to pozustatek z
16 bit. aplikaci ?

Diky

Tomas Bradle


-----P�vodn� zpr�va-----
Od: TUNGLI Jan <tungli(zv)pvt.sk>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 8. prosince 1999 13:25
P�edm�t: Re: Dynamicke volani (generovani) procedur (jako ve FANDu)>delka stringlistu je 32KB
>

Delphi 4 nebo 5

[*] Jaro <jaro(zv)sinea(tec)cz> - 8.12.1999 18:45:27 -0800

Tez souhlasim. Dnes kupovat D4 je blbost. Kup si D5 a prejdi zaroven na
W2000 RC2
Jaro

>
> Rozhodne kup D5, D4 je sice mocne zalatana, ale i tak je tam spousta
> otravnych bugu.
> Mam D5 a zatim ani moc nenadavam...
>
> Jura
>

Istalace D5Pro

[*] Jaro <jaro(zv)sinea(tec)cz> - 8.12.1999 18:58:43 -0800

D4 se snasi s D3 a D5 se snasi dobre s D4.
Ovsem D3/D2, tam byly nejvetsi problemy. Pamatuji si, ze mi nefungovaly
helpy a myslim, ze byl konflikt i v BDE.
D2/D5 bys musel vyzkouset, ale bude to asi stejne, jako treba D2/D4.
Ja bych ti doporucil jedno reseni, pokud na to mas dobre zelozo.
Rozdel disk na dve partision. Na C: dej Fat32 a Win 95/98
Na D: dej NTFS a W2000.
W2000 ti umozni multiboot. Pod W95/98 provozuj D2 a pod W2000 D5.
Tento system je totiz pro D5 nepomerne vhodnejsi z hlediska velke narocnosti
D5 na systemove zdroje. Takto se neovlivni vubec
Jaro


> Petr Vones wrote:
>
> > Nemel by byt problem mit nainstalovane vsechny verze Delphi, akorat je
> > dobre je instalovat postupne od te nejstarsi. Pak jeste muzes odmazat
> > nektere duplicitni adresare (napriklad BDE bylo v D2 umistene jinde
> > nez v dalsich verzich a podobne).
>
> Co si tak matne pamatuji, tak tusim 3 se nesnesla s 2.
>
> S pozdravem
>
> Zbysek Hlinka
> E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
> Phones: 02/795 29 56; GSM: 0603 551 282
> Krystofova 1016, 149 00 Praha 4
> CZ
>

Zakaz zapisu do registru

[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 9.12.1999 05:56:41


----- Original Message -----
From: Jan Rychtar <hojan(zv)sin.cvut(tec)cz>> > if OpenKey('\Software\Microsoft\MS Setup (ACME)\User
> Info',false) then
> ...
> > Parametr false v OpenKey znamena jen cteni, true znamena: neni-li, vytvori
> se
>
> To prave neni pravda.. pokud budete mit v
> \Software\Microsoft\MS Setup (ACME)\User Info
> nastavena prava jen pro cteni, OpenKey jej neotevre vubec,
> protoze se VZDYCKY snazi otevrit klic s parametrem REG_ALL_ACCESS.

V D5 je nova implementace API funkce RegOpenKeyEx s nazvem OpenKeyReadOnly, kde
se klic otevira skutecne jen pro cteni - cili i kdyz nemas pravo pro zapis do
registru.

function TRegistry.OpenKeyReadOnly(const Key: String): Boolean;
var
TempKey: HKey;
S: string;
Relative: Boolean;
begin
S := Key;
Relative := IsRelative(S);

if not Relative then Delete(S, 1, 1);
TempKey := 0;
Result := RegOpenKeyEx(GetBaseKey(Relative), PChar(S), 0,
KEY_READ, TempKey) = ERROR_SUCCESS;
if Result then
begin
FAccess := KEY_READ;
if (CurrentKey <> 0) and Relative then S := CurrentPath + '\' + S;
ChangeKey(TempKey, S);
end;
end;


Jan Fiala


TServerSocket, TClientSocket

[*] kchodl(zv)atlas(tec)cz - 9.12.1999 07:24:59

Muj SERVER (TServerSocket) listuje a pri pripojeni na nej vytvarim dynamicky klienta TClientSocket, ALE potrebuju cekat nez se klient uspesne napoji na vzdaleny SERVER a az potom povolit memu SERVERu prijimat data.

Progr-Amather -Kchodl-� 1989-1999


Dynamicke volani... -> omezeni StringListu

[*] Daniel Rott <roxton(zv)atlas(tec)cz> - 9.12.1999 08:17:45

> >delka stringlistu je 32KB

Omezen neni TStringList, ale TMemo.Lines, a to jeste jen po Win9x.

Daniel

----- P�vodn� zpr�va -----
Od: Tom�s Br�dle <t.bradle(zv)pvtnet(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 8. prosince 1999 23:39
P�edm�t: Re: Dynamicke volani... -> omezeni StringListu


> Zdravim,
>
> Mozna se ptam dost blbe, ale z ceho prameni to omezeni, neni to pozustatek z
> 16 bit. aplikaci ?
>
> Diky
>
> Tomas Bradle

Nastroj pro reporty bez BDE, nahrada QR

[*] Petr.Motlicek(zv)bcbrno(tec)cz - 9.12.1999 08:49:17

Zdrav�m Delphisty,

potrebuji poradit. Pouzivame pro sestavy
QuickReport 2 standardne dodavany s Delphi 3,
jenze jsou s nim takove problemy v zakladnich
trivialnich vecech, ze je cas je vymenit.

Problemi s trivialnimi vecmi (co si zrovna
vzpominam):

- nelze jednoduse kreslit svisle cary (ci shapy
vubec - je potreba oramovat, ale ne pomoci
framu, ktere jsou vzdy pres celou stranku)
podle velikosti bandu - jelikoz ten se muze
roztahnout behem tisku. Jde to sice
doprogramovat (rucne si ty shapy roztahnout
podle velikosti bandu, ale v mnohych pripadech
QR vyplivne nejaky paskvil, a jsou mnohe
situace, kdy to proste nejde vyresit bez toho,
aniz bych si to vsechno "rucne" nevytiskl na
QRPrinter.Canvas)

- nastaveni barvy pozad� pro stranku
- transparentn� image
- nedostatecna dokumentace


Tedy muzete mi doporucit nejaky jiny nastroj
(komponenty), ktery ovsem:

- neni zavisly na BDE, tedy pracuje nad data
setem, pokud mozno bez ODBC
-linkuje se do EXE -ace, zadne podpurne
DLL,OCX apod
-bezvadne by bylo, kdyby si sestavy nacital
jako sablony napr. jako Crystal Report

Diky za kazdou vasi reakci

Petr Motlicek


BDE

[*] Tibor Galik <tgalik(zv)vsz.sk> - 09.12.1999 08:57:38

Ahoj chlapci, (damy som tu este nevidle)

ak ste uz vstali, chcem sa spytat ako sa daju nastavit parametre v BDE v mojej aplikacii. Chcem vzdy pri spusteni nastavocat BDE. Prilozil som aj priklad.
Pr.:
.
.
.

type
TForm1 = class(TForm)
Table1: TTable;
DataSource1: TDataSource;
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.FormCreate(Sender: TObject);
procedure fDbiSetDateFormat;

var
fDate : FMTDate;
begin
fDate.szDateSeparator := '.'; { }
fDate.iDateMode := 1;
fDate.bFourDigitYear := TRUE;
fDate.bYearBiased := False;
fDate.bMonthLeadingZero := False;
fDate.bDayLeadingZero := False;

Check(DbiSetDateFormat(fDate));
end;
begin
fDbiSetDateFormat;
end;
.
.
.
Vzdy mi to padne na chybe:" An error occured while attempting to initialize the BDE"

Inac, tato zmena v BDE je trvala ? Treba vratit po ukonceni aplikacie (tak ako to slusnost hovori) vsetky nastavenia na povodne hodnoty ?

dakujem

tg


S pozdravom/Regards

Tibor Galik
tgalik(zv)vsz.sk

MSExcel

[*] Fi�er Ji�� - 9.12.1999 09:22:03

Jsem zacatecnik a potreboval bych poradit, jak konkretne nacist data ze souboru vytvorenem v MSExcelu, aniz bych MSExcel otevrel.

Poradi mi nekdo ????

Predem dekuji !!! Jirka.

Nastaveni rozliseni Windows

[*] Brabec Tom� <brabec(zv)nym.pvt(tec)cz> - 9.12.1999 09:49:49

Ahojky lidi, mel bych prosbicku.
Lze nejakou (asi) API fci pred spustenim aplikace nastavit rozliseni Windows
na treba 800*600, treba:

frmMuj.FormCreate(..);
begin
...
Zde bych potreboval nastavit rozliseni obrazovky na 800*600
...
end;

Budu rad za kazdou radu nebo nakopnuti ... Tom

Delphi 5Prof, W95

Tom� Brabec
PVT Nymburk, a.s.
e_mail: Tomas.Brabec(zv)pvt(tec)cz
brabec(zv)nym.pvt(tec)cz
tel: 0325/519639


OT Re: BDE

[*] Ren� Otisk - 9.12.1999 10:06:31

Si slep. Jedna tu onehda (a myslim ze dosud) v konferenci byla. A na delphi
logu je tez jedna (teda druha). A ted sem zahlid na TV Nova stupidni serial,
ale zaujalo me, ze (po)hlavni hrdinka se zove Delphina a rikaji ji Delphi.
Ale nevim v jake je verzi.

Sroub
> Ahoj chlapci, (damy som tu este nevidle)
>
> ak ste uz vstali, chcem sa spytat ako sa daju nastavit parametre v BDE v
mojej aplikacii. Chcem vzdy pri spusteni nastavocat BDE. Prilozil som aj
priklad.

Nastroj pro reporty bez BDE, nahrada QR

[*] No Comment Group, s.r.o. / Bohdan Pomsahar <bpomsahar(zv)nocomment.sk> - 9.12.1999 10:21:50


----- Original Message -----
From: <Petr.Motlicek(zv)bcbrno(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, December 09, 1999 8:49 AM
Subject: Nastroj pro reporty bez BDE, nahrada QR


> Tedy muzete mi doporucit nejaky jiny nastroj
> (komponenty), ktery ovsem:
>
> - neni zavisly na BDE, tedy pracuje nad data
> setem, pokud mozno bez ODBC
> -linkuje se do EXE -ace, zadne podpurne
> DLL,OCX apod
> -bezvadne by bylo, kdyby si sestavy nacital
> jako sablony napr. jako Crystal Report
>
> Diky za kazdou vasi reakci
>
> Petr Motlicek

Skus Report Builder na http://www.digital-metaphors.com/

Bohdan


D5 - ano ci ne ?

[*] Robert Kindl <rob(zv)exec(tec)cz> - 9.12.1999 10:28:46

Dovolil jsem si odpovedetna dva emaily od Zbyska najednou.

> > > > No, mas nejaky konkretni napad jak pichnout
> > > > do toho Borlandiho hnizda, aby se daly veci
> > > > do pohybu?
> > > Netusim, ja sam jsem zkousel ruzne cesty a vsechno vysumelo do
> > > ztracena.
> >
> > No presne to je ten problem.
> > Takova je i ma zkusenost: vysumi to do ztracena :-(
>
> Padlo zde, ze casy se meni. Ve verzi 5 zustala jeste rada chyb (a
> nektere nove vznikly :-( ). Uvidime, s cim prijde prvni zaplata.

To je zase typicke chovani programatoru
a bohuzel i podpory od Borlandu:
"Pockame co prinese najblizzi zaplata".
A tak nektere mne zname chyby v Delphi 3.0 cekaly
na zaplatu 3.01
na zaplatu 3.02
na nove Delphi 4.0
na zaplatu 4.01
na zaplatu 4.02
na zaplatu 4.03
na nove Delphi 5.0
nyni cekaji na zaplatu 5.01
a budou cekat dal...

> > Tedy pro 99% lidi neni-li k dispozici nejaky zaklad,
> > ktery by mohli zkusit pouzivat, tak budou jen "ocumovat".
> Pro urychleni mohou navstivit kurzy Delphi + tvorba komponent. :-)

Prosim te. Myslis, ze kurzy DOOPRAVDY nekoho neco nauci.
Tady mluvime o zkusenych programatorech s praxi.
Kurz ti da predstavu jak na to, ale do taju VCL+WinAPI
musis bolestne proniknout sam.
Ja taky na vejsce navstevoval predmet "Operacni systemy"
a ziskal jsem predstavu jak takovy poradny OS funguje.
Vim tedy jak zacit OS programovat, ale kupodivu Linux ze mne nevypadl.
Pravda mohl bych Microsoftu poradit, ze Win9X nejsou tak
dobry OS jako Unix, ale poslouchal by to nekdo? A je tu
vubec nekdo kdo to nevi i bez kurzu?

> > A presto. Delphree sleduji pravidelne (obdendva),
> > ale hlavne kvuli novinkam a linkum na dalsi projekty.
> > To skutecne funguje a je dobre.
> > Ale vlastni vyvoj?
> > Ty Zbyskovy OLE DB komponenty jsou zatim
> > pri nejlepsi vuli nenasaditelne :-(
> :-) Mno, nasaditelne jsou, ja je uz pouzivam pro ostrou aplikaci.
> Ovsem je treba se zcela zbavit zvyku z BDE komponent. Tedy,
> pokud data rychle vyctes a ulozis si je nekam, zmeny budes
> provadet vyhradne pres SQL prikazy nebo ulozene procedury, a to
> jeste ke vsemu nad MS SQL 7, a nebudes pouzivat bloby, pak by
> nemel byt vaznejsi duvod ke stiznostem. :-))

Zmeny provadime vyhradne pres SQL prikaze nebo ulozene procedury
a to ke vsemu na MSSQL 7, ale
- bloby pouzivame.
- aplikace, ktera docte data z query az dokonce a cpe
je do pameti i kdyz se na ne uzivatel nikdy nepodiva
a ona sama je na nic nepotrebuje je spatna (pomala, pametove
narocna atd.) a mozna reknes, ze spatne navrzena,
ale rekni jak uzivateli branit aby si nenastavil filtr na vsechny
zaznamy a pak je prohlizel. A proc ho nutit aby si natahl
vsech 10000 recordu do pameti a pak teprve mohl zjistit,
ze ten filtr je asi blbe.

> > To se o OLE DB komponentach rici neda.
> Proc ne? Ze jsou pojate uplne jinak nez BDE komponenty, vubec
> neznamena, ze nezapadaji do VCL, ze? :-)

Nejede s nimi nic stavajiciho z original VCL ani meho (kohokoliv)
ani od tretich stran. Sam pises o dva odstavce jak dodelavas
podporu pro Sinea.

> > Ted navic Zbysek zacal delat vlastni grid,
> > ktery s nimi asi bude fungovat, ale uz asi s nicim jinym.
>
> Kupodivu, bude ho mozne pouzit na (temer) libovolna data. Ovsem
> pouze tak, ze data se do gridu nacpou a dalsi prace uz bude
> vyhradne nad gridem. Zato grid bude umet tridit nahoru a dolu,
> umozni sahnout na bunku pri vykreslovani (obarvit, prepsat text, ...)
> a podobne opicarny.

Toto vsechno co jsi uvedl umi i muj RDBGridu i
muj RTreeGrid. A mnohem vic.
Trideni by mohl lepe zvladnou SQL server.
Pokud to dela klient jde to presne proti modernim pozadavkum doby.
Podle tveho popisu usuzuji take, ze grid nepodporuje VirtualView,
to je take dost zavazna chyba ponekud znehodnocujici databazove
nasazeni jako DBGrid viz. vyse natahovani do pameti

> A snad to nebude proti nicemu, kdyz ted prozradim, ze mam
> rozjednanou podporu tiskovych sestav Sinea. Uz jsem to na sve
> urovni rozbehal, takze uz se v podstate ceka na rozhodnuti o
> licencni politice ze strany Siney, a pripadne bude ve hre preklad do
> anglictiny.

To je presne a pak jeste podporu pro Quickreport, Report builder,
ACE a ve finale jeste vlastni reportovaci tool, nebot
v Report builderu (od DM) maji taky private nebo nevirtual procedury
a maji tam chyby (vim ze je nastesti i opravuji)
a tudiz je lepsi to cele napsat od nuly, ze...
Sorry asi nejsem konstruktivni a asi jsem dost pesimisticky,
ale ja nerad vidim, kdyz lide mrhaji svym potencialem na podle
mne spatne reseni. Je to samozdrejme jejich rozhodnuti,
ale to mi nemuze branit v tom abych ho kritizoval :-)

> > Navic nez se dostane alespon na uroven toho co
> > je ve stavajicim VCL a nez by jsem si
> > tam doplnil to o co jsem stavajici VCL rozsiril
> > tak budou pristi vanoce.
> Pokud to budu delat cele vicemene sam, tak ano. Ostatne, pro to,
> co potrebuji, to chodi skvele. Nikomu vsak nebranim, aby tam
> zahrnul dalsi vlastnosti.
> > Podle meho nazoru je to proste
> > kompletni predelavka a nikoliv vylepseni stavajiciho.
> Ne tak docela, komponenty jsou udelany zcela nove, predelavka se
> tyka spise jen gridu, a to predevsim k obrazu memu. Nemam zatim
> kdy delat v tom upravy pro potreby jinych, ale uvitam, kdyz je
> dotycni dodelaji sami.
> > To mne a asi spoustu dalsich lidi odrazuje.
> Coz nakonec neni muj problem... :-))) Ja davam svou praci zdarma,
> a je na kazdem, jak si s tim poradi. Kazdopadne jsou OLE DB
> komponenty perspektivni DB alternativou pro Delphi Standard. No a
> protoze jsem pri vyvoji komponent zjistil radu uzitecnych veci,
> muzu nabidnout konzultace a skoleni, aby se mi aspon nejak
> vratily vlozene naklady... :-)
> > Tim je to pro mne slepa a neperspektivni vetev.
> > Proste lide ocekavaji, ze naleznou reseni pro sve
> Ano, _ocekavaji_. V tom je cely zakopany pes.

V poradku je to tvoje rozhodnuti.
Ale zamyslis-li se, tak jak je mozne, ze jsi za vice nez 3/4 roku
nebyl schopen pro svuj projekt najit spolupracovniky,
kteri by opravdu neco delali
(v history.txt sice nejaci jsou, ale ve vlastnich komponentach
neni o nich ani zminka).
V tom, ze by jsi mel spatny projekt to neni.
Problem je, ze jsi podle meho nazoru zvolil
spatnou zakladni koncepci RESENI projektu :-(
Proste jdes proti proudu. O tom to cele je. O tom tady pisu.
Sorry nechci te nastvat. Chci jen upozornit
na velky problem, ktery zabiji tuto cast Delphree.
Nechci tu mluvit za nikoho jineho.
Ja ti jen rikam sve zkusenosti sve poznatky.
Ja sam tve OLE DB (zpocatku ADO, pak
OLEDB nad datasetem a ted samostatne OLEDB)
sleduji peclive, take jsem ti zpocatku nabizel spolupraci.
A proc z toho nic neni? Kvuli spatne koncepci.

> > Tedy kdyby na Delphree byl treba i blboucky
> > TDfGrid resp. TDfDBGrid
> > (ale dedicove TCustomGridu a TCustomDBGrid
> > aby je bylo mozno snadno zamenit)
> To by ovsem nesmely byt v TCustomGridu zavrtane chyby v private
> sekci...

Uf uz zase...
To proste neni duvod k tomu napsat vlastni grid od zacatku...

> > tak by se mozna nasli lide, kteri by je pouzili
> > a vylepsovali resp. vznaseli navrhy na vylepseni.
> > Jen ten spravce projektu chybi...
> > Ale neni to zbytecne delat dalsi RXLib?
> Pokud vim, tak na Delphree se nic takoveho nedeje. Prave proto,
> ze tam jsou komplexni projekty, a casto delane od sameho
> pocatku, vznika (nebo muze vzniknout) zcela nova uzitna hodnota.

A neni to chyba?
Zcela skvely produkt s nulovym (jednotkovym) poctem nasazeni
je neperspektivni a dlouho se neudrzi (a hlavne jeho autori).
Masovemu nasazeni pritom brani mnou jiz uvedene duvody.
Proto se bojim, ze jinak dobra iniciativa Delphree umre (resp. jeji casti).
Proto do toho stouram...

Rob

Precteni hesla Paradoxu

[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 9.12.1999 11:05:21

Ahojte,

nevite nekdo, jak precist heslo z Paradox tabulky? V archivu jsem
nalezl zpusob pro *.mdb, ale mne jde o *.db.
Nepotrebuji najit zpusob, jak heslo obejit - vim, ze to neni
problem. Chci ho opravdu presne nacist.

A jeste jedna vec. Restrukturalizace tabulky umoznuje nastavit
vlastni heslo. Pokud jiz tabulka byla zaheslovana predtim,
znamena to, ze puvodni heslo se tim bez jakychkoli strachu
prepise, aniz by se na nej nekdo ptal?

Dik.
David Lebeda
Lebeda(zv)comarr(tec)cz


WinBase Database Engine info

[*] Ivan Turcan <iturcan(zv)gamo.sk> - 9.12.1999 11:41:00




Ak pouzivate WinBase z prostredi Delphi 3,4,5 alebo C++Buildra 3,4 na webe je
posledna verzia komponent

adresa je: www.software602(tec)cz/wde


Ivan Turcan

Pristup k datum, Delphree a vubec was: D5 - ano ci

[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 9.12.1999 11:45:30

Haj hou!

From: Robert Kindl <rob(zv)exec(tec)cz>
>
> Zmeny provadime vyhradne pres SQL prikaze nebo ulozene procedury
> a to ke vsemu na MSSQL 7, ale
> - bloby pouzivame.
> - aplikace, ktera docte data z query az dokonce a cpe
> je do pameti i kdyz se na ne uzivatel nikdy nepodiva
> a ona sama je na nic nepotrebuje je spatna (pomala, pametove
> narocna atd.) a mozna reknes, ze spatne navrzena,
> ale rekni jak uzivateli branit aby si nenastavil filtr na vsechny
> zaznamy a pak je prohlizel. A proc ho nutit aby si natahl
> vsech 10000 recordu do pameti a pak teprve mohl zjistit,
> ze ten filtr je asi blbe.

Zalezi na tom, jak je to cele implementovano. Rozdeleni prace mezi server a
klienta je vzdy problematicke, protoze obeti je vzdy vykon. Neexistuje
jedine univerzalni dobre reseni, existuje nekolik dobrych reseni pro ruzne
pripady. Pravdu tedy mate oba, ale jen castecnou, neb ve skutecnosti lezi
nekde uprostred. Skutecny problem je v tom, ze Delphi standardne nabizi
jediny model prace s databazi, ktery nevyhovuje (vykonem, vlastnostmi,
metodikou pouziti) vsem BEZNE resenym problemum. Jsem presvedcen, ze jak
lpeni na Delphi modelu tak proste nahrazeni jeho casti problem nevyresi.
Chce to zmenu v celkove koncepci. Coz neni nic jednoducheho, prirozene. Jsou
sice jiste naznaky, ze Inprise pracuje na novem modelu, ale nic konkretniho
na cem by se dalo stavet nyni k dispozici nemame. Rekl bych, ze je to
idealni problem pro kolektivni projekt ktery by mohl mit uspech (neb pali
vice ci mene kazdeho bez vyjimky).

> Nejede s nimi nic stavajiciho z original VCL ani meho (kohokoliv)
> ani od tretich stran. Sam pises o dva odstavce jak dodelavas
> podporu pro Sinea.

Presne. To je bohuzel zasadni problem jakehokoliv alternativniho reseni k
soucasnemu modelu pouzitem v Delphi/BCB. Jakykoliv novy model musi prekonat
tuto barieru aby byl pouzitelny. Proto mam Borlandum za zle, ze nemaji
otevrenejsi model propojeni vizualnich prvku se zdroji dat (je vazany na
potomky TDataSet).

> Sorry asi nejsem konstruktivni a asi jsem dost pesimisticky,
> ale ja nerad vidim, kdyz lide mrhaji svym potencialem na podle
> mne spatne reseni. Je to samozdrejme jejich rozhodnuti,
> ale to mi nemuze branit v tom abych ho kritizoval :-)

Kazdy resi primarne sve vlastni problemy a to jeste navic v ramci svych
omezenych zdroju. Konec koncu, za tim ucelem vznikla iniciativa Programatori
sobe (zmutovana do sirsiho Delphree), aby jsme spojili sily k reseni
problemu, ktere jsou mimo moznosti jednotlivce nebo male skupiny. Problem je
v tom, ze programatori radsi koduji nez premysli a diskutuji (az na vyjimky
a/nebo vyjmecne situace :o) Vetsina projektu na Delphree vznikla tak, ze si
nekdo sednul a napsal nejaky kod pro svou vlastni potrebu a pak ho
zverejnil. To vesmes nefunguje (obzlaste neni-li produkt hotov a
pouzitelny). Vetsina uspesnych projektu je kolektivnim dilem uz od sameho
zacatku (napr. mwEdit, DGP, GExperts po prechodu na open source).

> Ale zamyslis-li se, tak jak je mozne, ze jsi za vice nez 3/4 roku
> nebyl schopen pro svuj projekt najit spolupracovniky,
> kteri by opravdu neco delali
> (v history.txt sice nejaci jsou, ale ve vlastnich komponentach
> neni o nich ani zminka).
> V tom, ze by jsi mel spatny projekt to neni.
> Problem je, ze jsi podle meho nazoru zvolil
> spatnou zakladni koncepci RESENI projektu :-(
> Proste jdes proti proudu. O tom to cele je. O tom tady pisu.

Problem je v tom, ze Zbysek s OLE DB primarne uspokojuje sve vlastni
potreby. je prima, ze se s ostatnimi z darma podeli o vysledky sve prace,
ale tezko mu to prinese spolupracovniky, protoze tehle zpusob pritahne jen
takove, kteri take potrebuji vyresit stejny problem (a to este ne vsechny,
protoze rada o Zbyskove projektu vubec nevi, a dalsi mohou mit jinou
predstavu a nachteji se handrkovat). Zcela opomiji ty, kteri by se treba
podileli na OLE DB ackoliv ho k nicemu nepotrebuji, ale radi by pracovali na
necem uzitecnem, velkem, zabavnem (zkratka fun & challenging). A navim,
Zbysek jako typicky vyvojar zcela podcenuje vyznam medii :o)))), staci se
podivat na stranky projektu OLE DB.

Ale to jen tak na okraj, kdyz uz tady sijeme do Zbyska :o)) Nic osobniho, of
course. Zbysek je porad jeden z nejaktivnejsich vyvojaru ochotnych pracovat
pro spolecnou vec.

> Sorry nechci te nastvat. Chci jen upozornit
> na velky problem, ktery zabiji tuto cast Delphree.

K tomu se pripojuji :o)

> > To by ovsem nesmely byt v TCustomGridu zavrtane chyby v private
> > sekci...
>
> Uf uz zase...
> To proste neni duvod k tomu napsat vlastni grid od zacatku...

Jako zaminka to fakt neni ono (individualni cile), ale coz takhle zalozit
projekt na vytvoreni perfektniho gridu ? Projekt mwEdit vznikl prave takhle
("schvalne, jestli to dokazeme lip nez Borland a Microsoft") a vysledek je
vice nez dobry (BTW, prave je na svete nova verze 0.9). Dnes je mwEdit temer
standardni soucasti vsech free&open source nastroju a rady projektu (sami ho
v praci pouzivame). Tak proc nezkusit to same s gridem ?

> A neni to chyba?
> Zcela skvely produkt s nulovym (jednotkovym) poctem nasazeni
> je neperspektivni a dlouho se neudrzi (a hlavne jeho autori).
> Masovemu nasazeni pritom brani mnou jiz uvedene duvody.
> Proto se bojim, ze jinak dobra iniciativa Delphree umre (resp. jeji
casti).
> Proto do toho stouram...

A ja bych se toho zase nebal. Kdyz neco umre, tak to umre, bude neco jineho.
Podstatne je, aby jsme se z kazdeho neuspechu poucili. :o)

BTW, ma tu nekdo zajem podiskutovat o optimalni koncepci otevreneho
aplikacniho jadra ?


Hodne zdaru vsem
Doufam ze se sejdeme v hojnem pozctu v Belohrade (www.haes(tec)cz)

Pavel Cisar <pcisar(zv)atlas(tec)cz>
Delphree.org CEO
http://delphree.clexpert.com
Nexus project coordinator
http://delphree.clexpert.com/pages/projects/nexus/default.htm

BDE

[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 9.12.1999 11:49:02


----- Original Message -----
From: Tibor Galik <tgalik(zv)vsz.sk>> Ahoj chlapci, (damy som tu este nevidle)
>
> ak ste uz vstali, chcem sa spytat ako sa daju nastavit parametre v BDE v mojej
aplikacii. Chcem vzdy pri spusteni nastavocat BDE. Prilozil som aj priklad.

> Vzdy mi to padne na chybe:" An error occured while attempting to initialize
the BDE"

Musis napred inicializovat BDE

dbiInit(nil);

Jan Fiala


mwEdit+zmena Lines za chodu

[*] Jan Tomsa <tomsa(zv)NOTIA.CZ> - 9.12.1999 12:07:41

nazdar,

mam problem, mam na formu mwEdit a na zaklade vyberu
v TreeView v nem zobrazuji text. Kdyz ale pouziju scrollbar
a posunu se v mwEditu dolu, tak pak pri dalsim vyberu,
tj. pri naplneni mwEditu jinym textem mi to hlasi chybu
Index seznamu mimo meze.
Pravdepodobne by bylo poteba vzdy pred plnenim jinym textem
ten scrollbar posunout na pocatek.
Otazka: Jak na to?

btw: nemate nekdo neco jako TmwSQLSyn, to vite, mohl bych tomu venovat
treba den abych vyzkoumal vsechny souvislosti a pak si to udelat sam,
ale jsem linej a zatim pouzivam TmwGeneralSyn, ale kdybyste to nekdo
nahodou mel a chtel se o to podelit, mel bych zajem. Resp. jeste
upresnim,
na samotne SQL by TmwGeneralSyn jeste docela stacilo (kdyz si
nevymejslim
moc velky ptakovinky), ale ja bych konkretne chtel Oracle PL/SQL.

predem diky za to ci ono ci oboji

-- Jan Tomsa (Tomy) tomsa(zv)notia(tec)cz
-- Notia Informacni Systemy s.r.o., V Olsinach 709/45, 100 00 Praha
-- TEL +42-02-67313764 FAX +42-02-67313752 http://www.notia(tec)cz


Interbase + Delphi

[*] Pavel Medek <Pavel.Medek(zv)talema(tec)cz> - 9.12.1999 12:17:47

Delphi 5 prof, IB 5.5, komponenty IBExpress

Pri pouziti autoincrementu v IB t.j. Generator + Trigger je vse v poradku do
doby nez takovyto Field vylistuji v IBtable. Pak to zacne po insertu hlasit,
ze nema hodnotu atd.
Nepomaha ani nastaveni AutoGenerateValue = arAutoInc.
Pokud ji, ale schovam je vse zase ok.


Tusite kde je problem ?

Diky

Pavel

TMemoField

[*] Ren� Otisk - 9.12.1999 12:33:16

Hi,

W95, D1, Pdox, Rx2.6

Poreboval bych prosim dostat data (text) z MemoFieldu do Mema a jsem nejak mimo provoz. Zkousel jsem GetData a SetTextBuf a Delphi vyhralo ("Operation not aplicable"). Jak na to? Nechci tam davat TDBMemo (CopyToClipbrd...). A asi bych to nechtel ani pres Stream ovsem pokud to jinak nepujde...

Sroub


Image Listy

[*] Radek KALA <Kala(zv)atlas(tec)cz> - 9.12.1999 12:44:35

Hi
Mam problem s D4

Mam na formulari nekolik ImageListu a v nich ruzne obrazky, ktere
za runtime vykresluji. Obcas se stane, ze se tam ty obrazky zmrsi.
Musim Imagelist vyprazdnit a vzpomenout si jake tam byly a kde
jsem je vzal a znovu je tam nahrat.

Nevite nekdo cim to muze byt.

Dekuji.

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


Delphi x Gupta SQL Base Server

[*] Khol Martin <Martin.Khol(zv)merlin(tec)cz> - 9.12.1999 12:52:27

Neznate nekdo rozumny zpusob, jak se lze pripojit ke Gupta SQLBase Serveru?
Diky za kazde info.
Martin


MWEdit

[*] Hole�ek Radek <holecek.radek(zv)seznam(tec)cz> - 09.12.1999 13:06:41

Keywords: SQL, highlight

>btw: nemate nekdo neco jako TmwSQLSyn, to vite, mohl bych tomu venovat
>treba den abych vyzkoumal vsechny souvislosti a pak si to udelat sam,
>ale jsem linej a zatim pouzivam TmwGeneralSyn, ale kdybyste to nekdo
>nahodou mel a chtel se o to podelit, mel bych zajem. Resp. jeste
>upresnim,
>na samotne SQL by TmwGeneralSyn jeste docela stacilo (kdyz si
>nevymejslim
>moc velky ptakovinky), ale ja bych konkretne chtel Oracle PL/SQL.

V MWEdit085 jsem objevil Twmsqlsyn. Slouzi to k tomu, co by jsi
potreboval,
ale podarilo se mi zjistit a i z toho duvodu upustit od MWEdit:
- ignoruje klicova slova s podtrzitkem (napr.TO_DATE)
- ikdyz asi zadny SQL dotaz nezacina ceskym pismenem, tak v pripade, ze
jsem
zacal psat do mweditu od prvni pozice pismena s diakritikou, tak se
vubec nezobrazily.


--
Zaslal : Radek Hole�ek
e-mail : holecek.radek(zv)seznam(tec)cz
ICQ : 45610992
Telefon : 0658 / 412 213

Delphi x Gupta SQL Base Server

[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 9.12.1999 13:13:06

Haj hou!

> Neznate nekdo rozumny zpusob, jak se lze pripojit ke Gupta SQLBase
Serveru?
> Diky za kazde info.

Na Torry v sekci DB Access jsou komponenty pro primy pristup k SQLBase. mam
ale pocit, ze je to shareware.


Hodne zdaru

Pavel Cisar <pcisar(zv)atlas(tec)cz>
Delphree.org CEO
http://delphree.clexpert.com
Nexus project coordinator
http://delphree.clexpert.com/pages/projects/nexus/default.htm


mwEdit+zmena Lines za chodu

[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 9.12.1999 13:19:18

Haj hou!

From: Jan Tomsa <tomsa(zv)NOTIA.CZ>
> Pravdepodobne by bylo poteba vzdy pred plnenim jinym textem
> ten scrollbar posunout na pocatek.
> Otazka: Jak na to?

To bych povazoval za chybu mwEditu. Mozna je opravena v nove verzi 0.9 (z
dnesniho dne !)
http://www.eccentrica.org/gabr/mw/mwedit.htm

> btw: nemate nekdo neco jako TmwSQLSyn, to vite, mohl bych tomu venovat

Ten je prece soucasti mwEditu (alespon verze 0.9) mwEdit ma nyni 20 syntax
highliteru.

Hodne zdaru

Pavel Cisar <pcisar(zv)atlas(tec)cz>
Delphree.org CEO
http://delphree.clexpert.com
Nexus project coordinator
http://delphree.clexpert.com/pages/projects/nexus/default.htm


MWEdit

[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 9.12.1999 13:21:08

Haj hou!

From: Hole�ek Radek <holecek.radek(zv)seznam(tec)cz>
>V MWEdit085 jsem objevil Twmsqlsyn. Slouzi to k tomu, co by jsi
>potreboval,
>ale podarilo se mi zjistit a i z toho duvodu upustit od MWEdit:
>- ignoruje klicova slova s podtrzitkem (napr.TO_DATE)
>- ikdyz asi zadny SQL dotaz nezacina ceskym pismenem, tak v pripade, ze
>jsem
> zacal psat do mweditu od prvni pozice pismena s diakritikou, tak se
>vubec nezobrazily.

A napsal jsi o tom autorum ? Pokud ano, pak uz je to mozna opravene, pokud
ne...$%^$#^!(zv)!!!!!

Hodne zdaru

Pavel Cisar <pcisar(zv)atlas(tec)cz>
Delphree.org CEO
http://delphree.clexpert.com
Nexus project coordinator
http://delphree.clexpert.com/pages/projects/nexus/default.htm

TMemoField

[*] Pavel ZIDEK <kopr(zv)kopr(tec)cz> - 9.12.1999 13:45:07

Zkus jednoduse
Memo1.text := DBMemo1.text;

Pavel
----- Original Message -----
From: Ren� Otisk
To: delphi-l(zv)fwd(tec)cz
Sent: Thursday, December 09, 1999 12:33 PM
Subject: TMemoField


Hi,

W95, D1, Pdox, Rx2.6

Poreboval bych prosim dostat data (text) z MemoFieldu do Mema a jsem nejak mimo provoz. Zkousel jsem GetData a SetTextBuf a Delphi vyhralo ("Operation not aplicable"). Jak na to? Nechci tam davat TDBMemo (CopyToClipbrd...). A asi bych to nechtel ani pres Stream ovsem pokud to jinak nepujde...

Sroub


Ukonceni externi aplikace

[*] Petr Voborn�k <vobornik(zv)ssakhk(tec)cz> - 9.12.1999 14:31:39

To ukoncovani aplikaci je super, ale jak by se dal zjistit seznam vsech
bezicich aplikaci (jejich caption a ID cislo potrebne k vypynani)???

Pitr - Petr Vobornik
MIKMIK company
vobornik(zv)ssakhk(tec)cz
ICQ# 23132120
www.ssakhk(tec)cz/home/vobornik/


----- P�vodn� zpr�va -----
Od: Petr Vones <pvones(zv)mbox.vol(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 8. prosince 1999 23:31
P�edm�t: Re: Ukonceni externi aplikace


> Daniel Rott wrote:
>
> > Nevim jak jsi myslel to s tim ulozenim souboru. Kdyz notepadu poslu
WM_QUIT,
> > tak se mne zepta zda chci zmeny ulozit ci nikoliv.
>
> Ahoj,
>
> Me prave ne :-) Kdyz mu poslu WM_QUIT, tak se ukonci vzdy (Win95), viz
> priklad:
>
> procedure TForm1.StartBtnClick(Sender: TObject);
> var
> StartupInfo: TStartupInfo;
> ProcessInfo: TProcessInformation;
> begin
> ZeroMemory((zv)StartupInfo, Sizeof(StartupInfo));
> ZeroMemory((zv)ProcessInfo, Sizeof(ProcessInfo));
> StartupInfo.cb := Sizeof(StartupInfo);
> if not CreateProcess(nil, 'notepad.exe', nil, nil, False,
> NORMAL_PRIORITY_CLASS, nil, nil, StartupInfo, ProcessInfo) then
> RaiseLastWin32Error;
> FNotepadTID := ProcessInfo.dwThreadId;
> CloseHandle(ProcessInfo.hProcess);
> CloseHandle(ProcessInfo.hThread);
> end;
>
> procedure TForm1.CloseBtnClick(Sender: TObject);
> begin
> PostThreadMessage(FNotepadTID, WM_QUIT, 0, 0);
> end;
>
> --
>
> Petr Vones, amatersky programator
>
>

NH-TRANS, zadost o "konzultaci"

[*] Jirka <jnagy(zv)nh-trans(tec)cz> - 9.12.1999 14:32:16

[P��loha v souboru: Prenos-FI.doc]
Pane Andrasko,

preji Vam dobry den a chci Vas zaroven pozadat, jestli by jste nemohl
zastavit pristi tyden u nas ve firme NH-TRANS ohledne kozultace a
vyreseni nasledujicich problemu:

1) Od ledna prechazime na celofiremni informacni system v SAP R/3 a
potrebovali bychom prenest stavy uctu do noveho systemu. Cely pristi
tyden budou u nas konzultanti, kteri nam novy system zavadeji, takze
by bylo dobre, kdyby jste se spolu domlouvili na moznostech a
formatech. Prosim Vas, oznamte mne, nebo sl. Kotulove, kdy by jste se
mohl zastavit. V priloze Vam posilam (zatim predbezne) pozadavky na
prenosy.

2) Holky v uctarne (konkretne pani Volakova) se stezuji, ze maji
nejaky problem se zpracovanim bankovnich veci. Chtely by ty problemy
co nejrychleji vyresit. Pro konkretni informace se prosim obratte na
pani Volakovou.

Nevim, kdo z Vas ma na starosti uvedeny zalezitosti, proto Vas prosim,
aby jste pripadne predal otci, co by mohl resit on.

Dekuji Vam a jeste jednou preji hezky den a prijemny vikend.

Juraj Nagy, informatik NH-TRANS


Dynamicke volani (generovani) procedur (jako ve FA

[*] Richard Valny <Richard.Valny(zv)oku-st(tec)cz> - 09.12.1999 14:39:23

Zkusil jsem to takto (modifikoval jsem snad jen mirne radu od p. Pavla Simicka):

procedure TZpracovaniLoguF.Button9Click(Sender: TObject);
var i:integer;
begin
for i:=1 to CheckListBox1.Items.Count - 1 do
begin
CheckListBox1.Items.AddObject(IntToStr(i),TStringList.Create);
{*} TStringList(CheckListBox1.Items.Objects[CheckListBox1.ItemIndex]).Add('objekt'+IntToStr(i));
{*} TStringList(CheckListBox1.Items.Objects[CheckListBox1.ItemIndex]).SaveToFile(IntToStr(i)+'.txt');
end;
for i:=1 to CheckListBox1.Items.Count - 1 do
begin
{*} TStringList(CheckListBox1.Items.Objects[CheckListBox1.ItemIndex]).Clear;
{*} TStringList(CheckListBox1.Items.Objects[CheckListBox1.ItemIndex]).Free;
end;
end;

U radek s * to skonci behovou chybou Out of index (-1) a to mi nejde do hlavy. To je od indexu TstringList? Vzdyt u CheckListBox1 je bran index presne podle for.

Dekuji za rady :-)

=========================================
Richard Valny richard.valny(zv)oku-st(tec)cz
Okresni urad Strakonice tel. 0342-441 l. 216
Smetanova 533 fax. 0342-21208
386 22 STRAKONICE FiDoNet 2:423/35
=========================================

Jak ladit ISAPI knihovnu?

[*] V�clav Muchna <apscomp(zv)seznam(tec)cz> - 09.12.1999 15:08:54

Zdravim

tak ja take prispeji se svou troskou do mlyna:

> nevite nekdo jak ladit (trasovat) ISAPI knihovny (a asi dll obecne)?
> Chce to po me nejakou hostitelskou aplikaci, cemuz se nelze divit, ale jakou
> mam zvolit?

Za prve: pokud mas IIS server na stejnem pocitaci jako ladenou
ISAPI DLL, tak do Run/Parameters, zalozka local vypln:

WinNT:

Host Application: c:\winnt\system32\inetsrv\inetinfo.exe
Run Parameters: -e w3svc

Win95

Host Application: c:\Program Files\websvc\system\inetsw95.exe
Run Parameters: -w3svc

Pak aplikaci normalne spustis. Provedou se initialize a nic
dit nebude. Zabrejkuj si to, co potrebujes a pust si
prohlizec. Zavolej tu isapi knihovnu z prohlkizece a
pokud kod pujde pres break, delphi se ti automaticky
hodej do popredi a normalne ladis.

Pokud nemas server na stejnem pocitaci, doporucuji,
aby sis jej pro testovaci ucely naistaloval, jinak
to lze resit tak, ze na pocitaci s IIS serverem
naistalujes a pustis sluzbu Borland Remote Debugger
Service a v delphi vyse uvedene parametry vyplnis
do zalozky remote. Take by bylo vhodne zaskrtnout
checkbox "Remote debug". No a dale je postup stejny,
s tim rozdilem, ze nelze debugovat kodu, ale
debugujes asemblerovy kod. A to neni nic pekneho :-)).

Zdarvi a mnoho uspechu pri debugovani ISAPI knihoven
preje

Vasek Muchna

P.S. Jinak v helpu doporucuji tema
"Debugging ISAPI and NSAPI applications"

--
Vaclav Muchna
APS computer
sekce internetova/intranetova podnikova reseni
tel. +420 603 475653
email: apscomp(zv)seznam(tec)cz
muchna(zv)apscomputer(tec)cz

APS computer
Frantiska divise 105
Praha 10 - Uhrineves
tel.: 02/677 10 368

verejny pgp klic: http://www.apscomputer(tec)cz/vasek/pubring.html


Jak ladit ISAPI knihovnu?

[*] V�clav Muchna <apscomp(zv)seznam(tec)cz> - 09.12.1999 15:12:01

V�clav Janou�ek wrote:

> PS: osobni zkusenost s ISAPI: radsi od toho dal.
> staci spatne ci prilis dlouhe hlavicky a hrave to schazuje server.

Ja tyto zkusenosti nemam, pro jednoho zakaznika jsem psal docela
rozsahlou aplikaci v ISAPI a bezi to jak po masle.
Nutno uznat, ze ISAPI asi neni uplne idealni reseni pro psani
aplikaci, ale diskuze na toto tema tu jiz byla a je tak trochu
offtopic.

> Neni nad ciste CGI.
A unixovy server i skripty :-))

--
Vaclav Muchna
APS computer
sekce internetova/intranetova podnikova reseni
tel. +420 603 475653
email: apscomp(zv)seznam(tec)cz
muchna(zv)apscomputer(tec)cz

APS computer
Frantiska divise 105
Praha 10 - Uhrineves
tel.: 02/677 10 368

verejny pgp klic: http://www.apscomputer(tec)cz/vasek/pubring.html


tisky

[*] dusan <volcik(zv)meritum(tec)cz> - 9.12.1999 15:55:13

This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.

Vazeni, poradte mi, prosim, jakym zpusobem mohu vytisknout obsah formulare,
resp. jenom panelu (TPanel) umisteneho ve formulari. Protoze moje znalosti
Delphi jsou zatim male, privital bych i jednoduchy prikladek. A dale bych
potreboval poradit, jak vytisknout obrazek (i s moznosti upravy jeho
velikosti, aby se vesel na tistenou stranku), ktery je ulozen na disku
(*.JPG), a k nemu pripojit (dotisknout) doprovodny text.

Dekuji za kazdou radu, Dusan


Delphi 5 Prof, Debuger Kernel BORDBK50.DLL ...

[*] Ondrej Jaura <jaura(zv)datalock.sk> - 9.12.1999 16:04:01

Zdravim :)

Po uspesnom nainstalovani Delphi 5 Professional a pri pokuse spustit
jednoduchy program (formular + TButton :))) doslo k chybe "Debuger Kernel
BORDBK50.DLL is missing or not registered".

Nas subor BORDBK50.DLL sa nachadza v adresari "C:\Program Files\Common
Files\Borland Shared\Debugger".

Operacny system je MS W95.

Za zachranne kolesa vopred dakujem...

Ondrej
------
Ondrej Jaura
Datalock a.s.
jaura(zv)datalock.sk
------ :)

ShellExecute

[*] TUNGLI Jan <tungli(zv)pvt.sk> - 9.12.1999 16:12:11

V ktory unit treba deklarovat na volanie ShellExecute v D2
Compilator mi hlasi ze ShellExecute nepozna.

TUNGLI J�nos
EMail: jan.tungli(zv)seznam(tec)cz
My Home Page: http://free.netlap.hu/4321/
or: http://freeweb.coco(tec)cz/tungli/

Dynamicke volani (generovani) procedur (jako ve FA

[*] martin.falta(zv)obi(tec)cz - 9.12.1999 16:33:14



Tak zkus CheckListBox1.ItemIndex nahradit tim i.

Martin


Von: Richard.Valny(zv)oku-st(tec)cz am 09.12.99 13:39 GMT

Bitte antworten an delphi-l(zv)fwd(tec)cz


An: delphi-l(zv)fwd(tec)cz
Kopie: (Blindkopie: Martin Falta/OBI/CZ)
Thema: Re: Dynamicke volani (generovani) procedur (jako ve FANDu)


Zkusil jsem to takto (modifikoval jsem snad jen mirne radu od p. Pavla Simicka):

procedure TZpracovaniLoguF.Button9Click(Sender: TObject);
var i:integer;
begin
for i:=1 to CheckListBox1.Items.Count - 1 do
begin
CheckListBox1.Items.AddObject(IntToStr(i),TStringList.Create);
{*}
TStringList(CheckListBox1.Items.Objects[CheckListBox1.ItemIndex]).Add('objekt'+IntToStr(i));

{*}
TStringList(CheckListBox1.Items.Objects[CheckListBox1.ItemIndex]).SaveToFile(IntToStr(i)+'.txt');

end;
for i:=1 to CheckListBox1.Items.Count - 1 do
begin
{*} TStringList(CheckListBox1.Items.Objects[CheckListBox1.ItemIndex]).Clear;
{*} TStringList(CheckListBox1.Items.Objects[CheckListBox1.ItemIndex]).Free;
end;
end;

U radek s * to skonci behovou chybou Out of index (-1) a to mi nejde do hlavy.
To je od indexu TstringList? Vzdyt u CheckListBox1 je bran index presne podle
for.

Dekuji za rady :-)

=========================================
Richard Valny richard.valny(zv)oku-st(tec)cz
Okresni urad Strakonice tel. 0342-441 l. 216
Smetanova 533 fax. 0342-21208
386 22 STRAKONICE FiDoNet 2:423/35
=========================================

InOutRes mrtvy nebo zivy

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 9.12.1999 16:49:48

DD,

D5 nedovoluji pouziti promenne InOutRes zatimco IOResult zustal zachovan. Prijde mi to jako pekna zlomyslnost. Nebo jsem nekde neco prehledl (Help od Trial verze mlci jako hrob).

Doufam, ze v D5 Professional je dostatek zdrojaku, abych si mohl InOutRes zase zverejnit :-)


Zdravi
D. Toman

ShellExecute

[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 9.12.1999 16:55:06

shellapi
Jaro B.

> -----P�vodn� zpr�va-----
> Od: TUNGLI Jan [SMTP:tungli(zv)pvt.sk]
> Odesl�no: 9. prosince 1999 16:12
> Komu: Panda; DELPHI Distribution List
> P�edm�t: ShellExecute
>
> V ktory unit treba deklarovat na volanie ShellExecute v D2
> Compilator mi hlasi ze ShellExecute nepozna.
>
> TUNGLI J�nos
> EMail: jan.tungli(zv)seznam(tec)cz <mailto:jan.tungli(zv)seznam(tec)cz>
> My Home Page: <http://free.netlap.hu/4321/>
> or: <http://freeweb.coco(tec)cz/tungli/>
>

D5 - ano ci ne ?

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 9.12.1999 17:34:36

Robert Kindl wrote:

> > Padlo zde, ze casy se meni. Ve verzi 5 zustala jeste rada chyb (a
> > nektere nove vznikly :-( ). Uvidime, s cim prijde prvni zaplata.
>
> To je zase typicke chovani programatoru
> a bohuzel i podpory od Borlandu:
> "Pockame co prinese najblizzi zaplata".
> A tak nektere mne zname chyby v Delphi 3.0 cekaly
> na zaplatu 3.01
> na zaplatu 3.02
> na nove Delphi 4.0
> na zaplatu 4.01
> na zaplatu 4.02
> na zaplatu 4.03
> na nove Delphi 5.0
> nyni cekaji na zaplatu 5.01
> a budou cekat dal...

:-) Vetsina chyb je ci byla Borlandu nahlasena. Tou ci onou cestou.
Dokud Borland nebude dodavat zdrojaky i k vyvojovemu prostredi,
nic jineho nez cekat na zaplaty nam nezbyde. Do VCL take neni
radno stourat, kdyz nemohu prekompilovat standardni balicky (a
tim padem by se mi rozjelo chovani pri navrhu a za behu programu).

> > > Tedy pro 99% lidi neni-li k dispozici nejaky zaklad,
> > > ktery by mohli zkusit pouzivat, tak budou jen "ocumovat".
> > Pro urychleni mohou navstivit kurzy Delphi + tvorba komponent. :-)
>
> Prosim te. Myslis, ze kurzy DOOPRAVDY nekoho neco nauci.

Nemyslim. Ale ukazi cestu a urychli tezke zacatky.

> Tady mluvime o zkusenych programatorech s praxi.
> Kurz ti da predstavu jak na to, ale do taju VCL+WinAPI
> musis bolestne proniknout sam.

Mno, zde by se mohli ozvat lidi, kteri byli na mych kurzech, jak jim
to pomohlo. Samotneho by me to zajimalo.

> > > Ty Zbyskovy OLE DB komponenty jsou zatim
> > > pri nejlepsi vuli nenasaditelne :-(
> > :-) Mno, nasaditelne jsou, ja je uz pouzivam pro ostrou aplikaci.
> > Ovsem je treba se zcela zbavit zvyku z BDE komponent. Tedy, pokud
> > data rychle vyctes a ulozis si je nekam, zmeny budes provadet
> > vyhradne pres SQL prikazy nebo ulozene procedury, a to jeste ke
> > vsemu nad MS SQL 7, a nebudes pouzivat bloby, pak by nemel byt
> > vaznejsi duvod ke stiznostem. :-))
>
> Zmeny provadime vyhradne pres SQL prikaze nebo ulozene procedury
> a to ke vsemu na MSSQL 7, ale
> - bloby pouzivame.

Ja ne, proto jsem to zakonzervoval. :-)

> - aplikace, ktera docte data z query az dokonce a cpe
> je do pameti i kdyz se na ne uzivatel nikdy nepodiva
> a ona sama je na nic nepotrebuje je spatna (pomala, pametove
> narocna atd.) a mozna reknes, ze spatne navrzena,
> ale rekni jak uzivateli branit aby si nenastavil filtr na vsechny
> zaznamy a pak je prohlizel. A proc ho nutit aby si natahl vsech 10000
> recordu do pameti a pak teprve mohl zjistit, ze ten filtr je asi blbe.

Nikde neni psano, ze musim nacist cely balik, ktery se mi
dotazem vytvori. To za prve. Nejsme v BDE, v OLE DB neni zadny
problem zjistit predem pocet vet (a pripadne uzivatele varovat
predem), ktere se mi nabizeji. Neni ani zadny problem nacist jen
urcity pocet vet, a to jak od zacatku, prostredka nebo i konce,
zepredu i zezadu. Kdykoliv mohu podle potreby sahnout do
datasetu, nastavit se kam potrebuji, a docist dalsi cast dat. Takze
to zavisi vyhradne na mne, co s tim udelam, a nikoliv na
komponentach, jaky postup mi vnuti.

Podivej se napriklad na ADO objekty (ty od MS). Podle toho, jak
se chovaji, tak si nacitaji take data do sveho bufferu (s moznosti
nastavit limit poctu vet).

> > > To se o OLE DB komponentach rici neda.
> > Proc ne? Ze jsou pojate uplne jinak nez BDE komponenty, vubec
> > neznamena, ze nezapadaji do VCL, ze? :-)
>
> Nejede s nimi nic stavajiciho z original VCL ani meho (kohokoliv) ani
> od tretich stran. Sam pises o dva odstavce jak dodelavas podporu pro
> Sinea.

Nejde, a ani nevidim duvod, aby slo. Jiste, muze to mit sve
nevyhody, zejmena kdyz nekdo chce pouzivat trebas DBEdit (brrrr,
jeho pouziti prinasi vic problemu nez pohodli). Co se tyka Siney,
tak ta je nastesti udelana tak, ze prevod je v podstate hrackou.
Stravil jsem tim asi den, vcetne studia toho, co vlastne Sinea umi.
Ted ladim uz jen detaily.

> > > Ted navic Zbysek zacal delat vlastni grid,
> > > ktery s nimi asi bude fungovat, ale uz asi s nicim jinym.
> >
> > Kupodivu, bude ho mozne pouzit na (temer) libovolna data. Ovsem
> > pouze tak, ze data se do gridu nacpou a dalsi prace uz bude vyhradne
> > nad gridem. Zato grid bude umet tridit nahoru a dolu, umozni sahnout
> > na bunku pri vykreslovani (obarvit, prepsat text, ...) a podobne
> > opicarny.
>
> Toto vsechno co jsi uvedl umi i muj RDBGridu i
> muj RTreeGrid. A mnohem vic.
> Trideni by mohl lepe zvladnou SQL server.

Pokud chci nechat uzivatele, aby si kliknul na sloupec, podle
ktereho chce tridit, tak to urcite nebudu sverovat serveru. Protoze
to by znamenalo zavrit set, preformulovat select, a znovu otevrit (a
tim padem prinutit server vytvorit nove kurzory).

> Pokud to dela klient jde to presne proti modernim pozadavkum doby.

Jake jsou moderni pozadavky doby? Pretezovani serveru, aby se
odlehcilo klientu? :-)

> Podle tveho popisu usuzuji take, ze grid nepodporuje VirtualView, to
> je take dost zavazna chyba ponekud znehodnocujici databazove nasazeni
> jako DBGrid viz. vyse natahovani do pameti

Co konkretne mas na mysli VirtualView?

> To je presne a pak jeste podporu pro Quickreport, Report builder, ACE
> a ve finale jeste vlastni reportovaci tool, nebot v Report builderu
> (od DM) maji taky private nebo nevirtual procedury a maji tam chyby
> (vim ze je nastesti i opravuji) a tudiz je lepsi to cele napsat od
> nuly, ze... Sorry asi nejsem konstruktivni a asi jsem dost
> pesimisticky, ale ja nerad vidim, kdyz lide mrhaji svym potencialem na
> podle mne spatne reseni. Je to samozdrejme jejich rozhodnuti, ale to
> mi nemuze branit v tom abych ho kritizoval :-)

:-) Ano, je to moje rozhodnuti, protoze ho nepovazuji za spatne
reseni. Nevidim duvod, proc bych mel mrhat casem predelavkami
QR a dalsich, pokud najdu sestavy, ktere splni me potreby, pro me
aplikace. Nikdy jsem netvrdil, ze chci ja sam vytvorit vseobsahujici
komponenty, ktere budou umet minimalne to co umeji BDE
komponenty. To klidne a rad prenecham jinym.

Moje potreby jsou nasledujici: vyhnout se BDE, pracovat s MS
SQL Serverem, vykon, optimalni rozlozeni zateze mezi klientem a
serverem. Delal jsem si vytezovaci testy, kdy jsem prenesl zatez
na server, a rychle jsem od teto myslenky utekl.

> > > Tim je to pro mne slepa a neperspektivni vetev.
> > > Proste lide ocekavaji, ze naleznou reseni pro sve
> > Ano, _ocekavaji_. V tom je cely zakopany pes.
>
> V poradku je to tvoje rozhodnuti.
> Ale zamyslis-li se, tak jak je mozne, ze jsi za vice nez 3/4 roku
> nebyl schopen pro svuj projekt najit spolupracovniky, kteri by opravdu
> neco delali (v history.txt sice nejaci jsou, ale ve vlastnich
> komponentach neni o nich ani zminka).

1. Jadro je preci jen narocnejsi vec, zdaleka ne kazdy se orientuje
v OLE DB interfejsech.
2. Fatalne mi chybi dokumentace, takze efektivne to umim pouzit
zatim jen ja.

> V tom, ze by jsi mel spatny
> projekt to neni. Problem je, ze jsi podle meho nazoru zvolil spatnou
> zakladni koncepci RESENI projektu :-( Proste jdes proti proudu. O tom
> to cele je. O tom tady pisu. Sorry nechci te nastvat. Chci jen
> upozornit na velky problem, ktery zabiji tuto cast Delphree. Nechci tu
> mluvit za nikoho jineho. Ja ti jen rikam sve zkusenosti sve poznatky.
> Ja sam tve OLE DB (zpocatku ADO, pak OLEDB nad datasetem a ted
> samostatne OLEDB) sleduji peclive, take jsem ti zpocatku nabizel
> spolupraci. A proc z toho nic neni? Kvuli spatne koncepci.

To je vec pohledu. BDE komponenty maji dobrou koncepci
vzhledem k BDE, ale uz to neplati vuci OLE DB. Filosofie DBLib a
OLE DB ma tolik rozdilu, ze nelze rozumne napasovat OLE DB
pres DBLib.

> > > Tedy kdyby na Delphree byl treba i blboucky
> > > TDfGrid resp. TDfDBGrid
> > > (ale dedicove TCustomGridu a TCustomDBGrid
> > > aby je bylo mozno snadno zamenit)
> > To by ovsem nesmely byt v TCustomGridu zavrtane chyby v private
> > sekci...
>
> Uf uz zase...
> To proste neni duvod k tomu napsat vlastni grid od zacatku...

To jiste ne. Ale lze vzit hotovy grid, a prizpusobit ho.

> > > tak by se mozna nasli lide, kteri by je pouzili
> > > a vylepsovali resp. vznaseli navrhy na vylepseni.
> > > Jen ten spravce projektu chybi...
> > > Ale neni to zbytecne delat dalsi RXLib?
> > Pokud vim, tak na Delphree se nic takoveho nedeje. Prave proto, ze
> > tam jsou komplexni projekty, a casto delane od sameho pocatku,
> > vznika (nebo muze vzniknout) zcela nova uzitna hodnota.
>
> A neni to chyba?

:-) Tato uvaha mi pripomina rozumovani stare zhruba 100 let: na co
je pomaly, hlucny, drahy a smrduty automobil, kdyz s konem a
povozem udelam vic prace (tedy prave dnes), levneji a v klidu? :-)

> Zcela skvely produkt s nulovym (jednotkovym) poctem nasazeni
> je neperspektivni a dlouho se neudrzi (a hlavne jeho autori).

:-) Ja mam tuhy korinek...

> Masovemu nasazeni pritom brani mnou jiz uvedene duvody.

To, ze jsem komponenty nabidl k volnemu pouziti, jeste
neznamena, ze na masovem nasazeni trvam...

> Proto se bojim, ze jinak dobra iniciativa Delphree umre (resp. jeji
> casti). Proto do toho stouram...

Ale to je prece riziko jakehokoliv projektu. Budto se uchyti nebo ne.

Uf, to je dlouhe plkani. :-)


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


DBMpeg prehravac

[*] Honza <delphi(zv)mis-net(tec)cz> - 9.12.1999 18:14:42

Ahoj,

Chci se zeptat, jestli nekdo nevite, jak prehrat *.mpeg (video), ale ne soubor,
nybrz blok dat, ktery vytahnu z databaze.
(temporary adr. nebrat! :-))

Jedine, co jsem nasel na prehravani je MediaPlayer, ale ten snad umi prehrat jenom soubor z disku.

Predem diky za tip

.............Honza

PS: pripadne komp. muzete prosim poslat primo na delphi(zv)mis-net(tec)cz


instalace komponent najednou

[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 9.12.1999 20:03:37

Ahoj,

nainstaloval jsem si D5 a potreboval bych tam dat komponenty, ktere
standardne pouzivam. Je jich kolem padesatky a tak se ptam, zda-li nejde je
nainstalovat nejak najednou (kazda ma svoji reg. proceduru), pres nejaky
script ?

Diky

Jaro B.

Nastaveni rozliseni Windows

[*] p. Jirman <jim.design(zv)iol(tec)cz> - 9.12.1999 20:53:26

Cau,

Uz se to tady jednou probiralo, mrkni na

http://www.borland.com/devsupport/delphi/faq/FAQ735D.html


----- Original Message -----
From: Brabec Tom� <brabec(zv)nym.pvt(tec)cz>
To: 'DELPHI-Konference' <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, December 09, 1999 9:49 AM
Subject: Nastaveni rozliseni Windows


Ahojky lidi, mel bych prosbicku.
Lze nejakou (asi) API fci pred spustenim aplikace nastavit rozliseni Windows
na treba 800*600, treba:

frmMuj.FormCreate(..);
begin
...
Zde bych potreboval nastavit rozliseni obrazovky na 800*600
...
end;

Budu rad za kazdou radu nebo nakopnuti ... Tom

Delphi 5Prof, W95

Tom� Brabec
PVT Nymburk, a.s.
e_mail: Tomas.Brabec(zv)pvt(tec)cz
brabec(zv)nym.pvt(tec)cz
tel: 0325/519639

ShellExecute

[*] p. Jirman <jim.design(zv)iol(tec)cz> - 9.12.1999 21:32:29

Ja misto ShellExecute poustim WinExec

priklad:

WinExec(PChar('cesta k souboru'), 1);

ale pod D3 sem nikdy nesel

----- Original Message -----
From: TUNGLI Jan
To: Panda ; DELPHI Distribution List
Sent: Thursday, December 09, 1999 4:12 PM
Subject: ShellExecute


V ktory unit treba deklarovat na volanie ShellExecute v D2
Compilator mi hlasi ze ShellExecute nepozna.

TUNGLI J�nos
EMail: jan.tungli(zv)seznam(tec)cz
My Home Page: http://free.netlap.hu/4321/
or: http://freeweb.coco(tec)cz/tungli/

OnNeedData QR1.1

[*] p. Jirman <jim.design(zv)iol(tec)cz> - 9.12.1999 21:34:30

Muze to byt zavineno tim ze nektery z BANDu typu rbDetail
presahuje pres okraj, ale nevim co proc tam mas 3 typu rbDetail?

----- Original Message -----
From: Bene� Jaroslav <JBenes(zv)cpoj(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, December 08, 1999 11:23 AM
Subject: OnNeedData QR1.1


> Ahoj,
>
> narazil jsem na problem pri pouziti QR1.1. Na formulari mam tri Bandy typu
> rbDetail. Kdyz do jednoho (je prostreni) z nich pridavam data pres
> OnNeedData, aby se mi duplikoval, zmizi mi pri tisku vsechny tri a v
preview
> je stranka prazdna (tedy, prazdna neni, mam
> tam titulek). Jakeho typu musi byt ostatni BandType, aby mi nezmizely?
>
> Diky za kazdou radu
> Jaro B.
>
>

Fastreport

[*] Gabulya Jozef <gabulya(zv)seznam(tec)cz> - 9.12.1999 22:16:15

Ahojte


Nevie niekto heslo FASTREPORT-u

...reg.zip


dakujem


instalace komponent najednou

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 09.12.1999 22:56:16

Bene� Jaroslav wrote:
> nainstaloval jsem si D5 a potreboval bych tam dat komponenty, ktere
> standardne pouzivam. Je jich kolem padesatky a tak se ptam, zda-li nejde je
> nainstalovat nejak najednou (kazda ma svoji reg. proceduru), pres nejaky
> script ?

Ahoj,

Vytvor si vlastni balicek (File -> New -> Package) a do neho si pridej ty
komponenty. Ohledne registrace, je nutne dodrzovat rozdeleni runtime a
designtime kodu, takze pokud tam mas napriklad nejake property editory a
podobne, tak je musis umistit do samostatneho unitu, kde bude i registrace
vsech komponent.

--

Petr Vones, amatersky programator

InOutRes mrtvy nebo zivy

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 09.12.1999 22:56:19

Dalibor Toman wrote:
> D5 nedovoluji pouziti promenne InOutRes zatimco IOResult zustal zachovan.
> Prijde mi to jako pekna zlomyslnost. Nebo jsem nekde neco prehledl (Help
> od Trial verze mlci jako hrob).

Ahoj,

Promenna InOutRes se ve zdrojacich vyskytuje, ale v implementation sekci
System.pas. Jinak muzes pouzit vyjimku EInOutError.

--

Petr Vones, amatersky programator

Image Listy

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 09.12.1999 22:57:46

Radek KALA wrote:
> Mam problem s D4
>
> Mam na formulari nekolik ImageListu a v nich ruzne obrazky, ktere
> za runtime vykresluji. Obcas se stane, ze se tam ty obrazky zmrsi.

Ahoj,

Mas nainstalovany UpdatePack#3 pro D4 a jakou mas verzi IE ?

--

Petr Vones, amatersky programator

MSExcel

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

> Fi�er Ji�� wrote:
>
> Jsem zacatecnik a potreboval bych poradit, jak konkretne nacist data
> ze souboru vytvorenem v MSExcelu, aniz bych MSExcel otevrel.

Ahoj,

Moc moznosti nemas. Nekde na DSP jsem tusim videl komponenty, ktere udajne
umi zapisovat a cist Excel format (otazka ja jake verze). Nebyly free.
Jinak muzes v nouzi zkusit ActiveX komponentu TF1Book, kterou mas v Delphi.
Lze ji pouzit pro castecne cteni Excelu 4 a 5.

--

Petr Vones, amatersky programator

dynamicke seznamy (was: none)

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 09.12.1999 23:06:34

V�clav Janou�ek wrote:
> mam jednu zacatecnickou otazku:
>
> type
> Plos = ^los;
>
> los = record
> ukaz: Plos;
> hodnota : integer;
> end;
>
> var
> P,L: Plos;
>
> a dynamicky alokuji P:
>
> for i:=1 to pocet do
> begin
> L:=P;
> Getmem(P,Sizeof(L^));
> P^.ukaz:=L;
> P^.poradi:=i;
> end;
>
> Da se nejak pohybovat v dynamicky alokovane promenne jinak nez napr. (P^.ukaz)^.ukaz?

Ahoj,

Mozna by jsi mel jednodussi pouzit tridu TList, do ktere muzes ukladat
seznamy ukazatelu.

> Jaky je rozdil mezi GetMem a New?

GetMem alokuje blok o velikosti ktery si zadas. New si zjisti potrebnou
velikost sam.

--

Petr Vones, amatersky programator

SQL View

[*] Ladislav Nagy <lnag7384(zv)mail.kolej.mff.cuni(tec)cz> - 9.12.1999 23:31:24

Ahoj

Jen poznamecka: Vytvoreni toho pohledu muze znamenat vyhodu v podobe nastavitelnosti prav k jednotlivym zaznamum.
Je vsak treba si uvedomit, ze tim nedocilis zadneho zrychleni. Zaznamy ve VIEW fyzicky neexistuji. Ja si predstavuji, ze nejenom u MS SQL serveru VIEW = text "SELECT bla bla bla". Jakykoliv dotaz nad View je pak serverem skombinovan s defnici VIEW -> server interne ziska novy dotaz (napr. "SELECT bla bla bla AND MOJE PODMINKY)".

Pokud budes vytvaret VIEW pres nejakou ulozenou proceduru, tak v ni musis testovat, zda jiz VIEW neexistuje (VIEW zustane v DB i po ukonceni spojeni).

Nevim nad jak velkymi DB to chces provozovat, ale vyhodnoceni dotazu s like nemusi byt nejrychlejsi. Mozna by stalo za to definovat novy atribut a nad nim nejaky index.

S pozdravem, Ladislav Nagy

===========================================
Mgr. Ladislav Nagy
MFF UK & Baader Computer spol. s r.o.
tel. : 02 / 24941962, -63, -65 fax : -64
lnag7384(zv)mail.kolej.mff.cuni(tec)cz , Ladislav.Nagy(zv)bcpraha(tec)cz
ICQ: 40948953

Nazdar Delphisti,
D5,NT4;
Opet prosim o radu.
SITUACE: Telefoni spojeni se servrem
IDEA: pomoci StoredProc vytvorit z klienta na serveru VIEW:
CREATE PROCEDURE FIND
AS
(zv)Sloupec varchar(20)='',
(zv)Promena varchar(20)=''
GO
CREATE VIEW FINDFIRMY
AS
SELECT Nazev
FROM FIRMY
WHERE (zv)Sloupec LIKE (zv)Promena+'%'
GO

a podat klientovi 'x' zaznamu a informovat ho o skutecnem poctu.
VYSLEDEK: Nezna a nechce pouzit parametry.
OTAZKA: Lze takto tvorit parametrizovane VIEW?
Diky moc za kazde postrceni.
Vlasta


Pristup k datum, Delphree a vubec was: D5 - ano ci

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 09.12.1999 23:38:33

Pavel Cisar wrote:
> Jako zaminka to fakt neni ono (individualni cile), ale coz takhle zalozit
> projekt na vytvoreni perfektniho gridu ? Projekt mwEdit vznikl prave takhle
> ("schvalne, jestli to dokazeme lip nez Borland a Microsoft") a vysledek je
> vice nez dobry (BTW, prave je na svete nova verze 0.9). Dnes je mwEdit temer
> standardni soucasti vsech free&open source nastroju a rady projektu (sami ho
> v praci pouzivame). Tak proc nezkusit to same s gridem ?

Ahoj,

Jasne, "My to dokazeme !" :-) Zkusit by se to urcite mohlo, ale uz pocatek
asi (narozdil od mwEditu) nebude tak snadny. Grid (at jiz s napojenim na
data, treba i pres ten "hrozny" TDataSet nebo jen jako virtualni) nabizi
pomerne dost ruznych reseni a jeste vice moznych pozadavku. Nejde jen o
ruzne grupovani, trideni, ale i o moznost vkladani "inplace" controlu do
bunek, dynamicke velikosti radku/sloupcu v zavislosti na datech, rozume
rychle a pritom "ciste" vykreslovani, drag&drop vcetne ruznych grafickych
ptakovin ala Microsoft atd. Zkratka tim chci rict, ze uz jen definovat ten
"perfektni grid" muze byt pekny orisek. Pokud by se tedy toto podarilo
(bez ohledu na existenci implementace), byl by to jiste uspech. Pri tom
je taky dobre vzit v uvahu, ze nektere "perfektni" specifikace byly tak
dobre, ze se je nikdy nepodarilo plne implementovat (treba ISO/OSI :-)
Takze, jdeme na to .....

--

Petr Vones, amatersky programator

MWEdit

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 09.12.1999 23:39:56

> From: Hole�ek Radek <holecek.radek(zv)seznam(tec)cz>
> >V MWEdit085 jsem objevil Twmsqlsyn. Slouzi to k tomu, co by jsi
> >potreboval,
> >ale podarilo se mi zjistit a i z toho duvodu upustit od MWEdit:
> >- ignoruje klicova slova s podtrzitkem (napr.TO_DATE)
> >- ikdyz asi zadny SQL dotaz nezacina ceskym pismenem, tak v pripade, ze
> >jsem
> > zacal psat do mweditu od prvni pozice pismena s diakritikou, tak se
> >vubec nezobrazily.

Ahoj,

mwEdit ma svuj mail-list, takze to tam muzes poslat. Blize na:

http://www.eccentrica.org/gabr/mw/mwedit.htm

--

Petr Vones, amatersky programator

Seznam bezicich procesu na W9x i NT (Was:Ukonceni

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 09.12.1999 23:40:08

Petr Voborn�k wrote:
>
> To ukoncovani aplikaci je super, ale jak by se dal zjistit seznam vsech
> bezicich aplikaci (jejich caption a ID cislo potrebne k vypynani)???

Ahoj,

Dal, problem je akorat v tom, ze pro Win9x a NT se k tomu pouzivaji uplne
jine funkce a kazde z nich vraci jinou mnozinu informaci. Uz se to tady
nekolikrat probiralo, ze by se to vyplatilo udelat tak, aby bylo mozne
ziskat alespon nejmensi spolecnou mnozinu informaci v obou pripadech. Tak
jsem se do toho ted nakonec pustil :-) ke stazeni je to tady:

http://www.volweb(tec)cz/pvones/download/PvComponents.zip

Jedna se o komponentu TPvProcessList, vraci ProcessName, PID a FileName
jak u Win9x i NT. Zaroven bych chtel pozadat o odzkouseni i na dalsich
verzich, Win98 a W2000 (Petr Zahradnik uz mi to zkousel na NT4). Demo je
v \Examples\ProcessListExample.dpr

--

Petr Vones, amatersky programator


OT: "Kontrola. Dejte sem ty zdrojaky !"

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 10.12.1999 00:02:59

Ahoj,

Vim ze OT do konference nepatri, ale tohle se vlastne tak trochu programovani
tyka. Vetsina z vas si uz asi vsimla, ze zijeme ve state pripominajicim spise
Kocourkov. Tohle je opet jedna z veselych veci, ktera se muze stat skutecnosti

http://www.novinky(tec)cz/Index/Internet/3247.html?from=hp

Pokud vam prijde clanek moc dlouhy, staci si precist posledni cast s nazvem:
"Co mohou d�lat kontrolo�i?"

--

Petr Vones, amatersky programator


OnNeedData QR1.1 - vyreseno

[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 10.12.1999 06:06:45

Myslim ze jsem problem vyresil. Band typu rbDetail muze byt v takovem tisku
jen jeden. Proto vsechny bandy pred nim musi byt jako rbTitle a vsechny za
nim rbSummary (samozrejme s vyjimkou tech, ktere jsou urceny rbPageXXX pro
nastaveni jedne tiskove stranky)
Diky vsem
Jaro B.
> -----P�vodn� zpr�va-----
> Od: p. Jirman [SMTP:jim.design(zv)iol(tec)cz]
> Odesl�no: 9. prosince 1999 21:35
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: OnNeedData QR1.1
>
> Muze to byt zavineno tim ze nektery z BANDu typu rbDetail
> presahuje pres okraj, ale nevim co proc tam mas 3 typu rbDetail?
>
> ----- Original Message -----
> From: Bene� Jaroslav <JBenes(zv)cpoj(tec)cz>
> To: <delphi-l(zv)fwd(tec)cz>
> Sent: Wednesday, December 08, 1999 11:23 AM
> Subject: OnNeedData QR1.1
>
>
> > Ahoj,
> >
> > narazil jsem na problem pri pouziti QR1.1. Na formulari mam tri Bandy
> typu
> > rbDetail. Kdyz do jednoho (je prostreni) z nich pridavam data pres
> > OnNeedData, aby se mi duplikoval, zmizi mi pri tisku vsechny tri a v
> preview
> > je stranka prazdna (tedy, prazdna neni, mam
> > tam titulek). Jakeho typu musi byt ostatni BandType, aby mi nezmizely?
> >
> > Diky za kazdou radu
> > Jaro B.
> >
> >
> >

Dynamicke volani (generovani) procedur (jako ve FA

[*] Richard Valny <Richard.Valny(zv)oku-st(tec)cz> - 10.12.1999 07:16:26

To jsem zkusil a vysledek je jeste hosi.
Acces violation at addres 00467670 in module ... Read of addres 00000000

Jeste jsem zacal koumat kolik mam Count - 30

=========================================
Richard Valny richard.valny(zv)oku-st(tec)cz
Okresni urad Strakonice tel. 0342-441 l. 216
Smetanova 533 fax. 0342-21208
386 22 STRAKONICE FiDoNet 2:423/35
=========================================

>>> <martin.falta(zv)obi(tec)cz> 9.12.99 16:33 >>>


Tak zkus CheckListBox1.ItemIndex nahradit tim i.

Martin


Zkusil jsem to takto (modifikoval jsem snad jen mirne radu od p. Pavla Simicka):

procedure TZpracovaniLoguF.Button9Click(Sender: TObject);
var i:integer;
begin
for i:=1 to CheckListBox1.Items.Count - 1 do
begin
CheckListBox1.Items.AddObject(IntToStr(i),TStringList.Create);
{*}
TStringList(CheckListBox1.Items.Objects[CheckListBox1.ItemIndex]).Add('objekt'+IntToStr(i));

{*}
TStringList(CheckListBox1.Items.Objects[CheckListBox1.ItemIndex]).SaveToFile(IntToStr(i)+'.txt');

U radek s * to skonci behovou chybou Out of index (-1) a to mi nejde do hlavy.
To je od indexu TstringList? Vzdyt u CheckListBox1 je bran index presne podle
for.

MSExcel

[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 10.12.1999 07:18:54



> -----P�vodn� zpr�va-----
> Od: Petr Vones [mailto:pvones(zv)mbox.vol(tec)cz]
> > Jsem zacatecnik a potreboval bych poradit, jak
> konkretne nacist data
> > ze souboru vytvorenem v MSExcelu, aniz bych MSExcel otevrel.
>
> Ahoj,
>
> Moc moznosti nemas. Nekde na DSP jsem tusim videl komponenty,
> ktere udajne
> umi zapisovat a cist Excel format (otazka ja jake verze). Nebyly free.
> Jinak muzes v nouzi zkusit ActiveX komponentu TF1Book, kterou
> mas v Delphi.
> Lze ji pouzit pro castecne cteni Excelu 4 a 5.
>

Dalsi moznost je pristup pres ODBC. To ovsem nelze pouzit obecne
pro libovolny soubor xls, soubor musi splnovat urcita kriteria
a musi pro nej byt nakonfigurovan DSN v ODBC. Je to zpusob moznosti
prace se soubory Excelu, z puvodni otazky neni jasne, jestli
by tento pristup mohl byt vyhovujici.

Jura


TMemoField

[*] Ren� Otisk - 10.12.1999 07:19:33

Hi,
Nechci tam davat TDBMemo. Navic by to orezalo na 255 znak�.
Sroub


Zkus jednoduse
Memo1.text := DBMemo1.text;

Pavel

Hi,

W95, D1, Pdox, Rx2.6

Poreboval bych prosim dostat data (text) z MemoFieldu do Mema a jsem nejak mimo provoz. Zkousel jsem GetData a SetTextBuf a Delphi vyhralo ("Operation not aplicable"). Jak na to? Nechci tam davat TDBMemo (CopyToClipbrd...). A asi bych to nechtel ani pres Stream ovsem pokud to jinak nepujde...

Sroub


ShellExecute

[*] Ren� Otisk - 10.12.1999 07:27:11

Hi,
myslim ze ShellAPI.
Sroub
V ktory unit treba deklarovat na volanie ShellExecute v D2
Compilator mi hlasi ze ShellExecute nepozna.

TUNGLI J�nos
EMail: jan.tungli(zv)seznam(tec)cz
My Home Page: http://free.netlap.hu/4321/
or: http://freeweb.coco(tec)cz/tungli/

Pristup k datum, Delphree a vubec was: D5 - ano ci

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 10.12.1999 07:56:56

Pavel Cisar wrote:

> > (pomala, pametove narocna atd.) a mozna reknes, ze spatne navrzena,
> > ale rekni jak uzivateli branit aby si nenastavil filtr na vsechny
> > zaznamy a pak je prohlizel. A proc ho nutit aby si natahl vsech
> > 10000 recordu do pameti a pak teprve mohl zjistit, ze ten filtr je
> > asi blbe.
>
> Zalezi na tom, jak je to cele implementovano. Rozdeleni prace mezi
> server a klienta je vzdy problematicke, protoze obeti je vzdy vykon.
> Neexistuje jedine univerzalni dobre reseni, existuje nekolik dobrych
> reseni pro ruzne pripady. Pravdu tedy mate oba, ale jen castecnou, neb
> ve skutecnosti lezi nekde uprostred.

Jak uz to v zivote byva, co clovek, to nazor. :-) Jak vlastne sam
natukavas, pro kazde reseni je nutne najit ten spravny model.
Potrebuji-li pracovat s daty mohutne, tedy na mnoha klientech se
bude dit listovani, prohlizeni, trideni, tisk a kdovico jeste, je dost
riskantni vsemi temito vecmi zatezovat server. Pak se vyplati
prenest co nejvetsi zatez na klienta, protoze pretizeny server
rychle ztraci vykon. Naopak, pokud mi na pocitaci pobezi narocne
procesy a na data obcas jen tuknu, pak nema smysl zatezovat
klienta. No a mezi tim je nepreberne mnozstvi realnych situaci. :-)

> Skutecny problem je v tom, ze
> Delphi standardne nabizi jediny model prace s databazi, ktery
> nevyhovuje (vykonem, vlastnostmi, metodikou pouziti) vsem BEZNE
> resenym problemum. Jsem presvedcen, ze jak lpeni na Delphi modelu tak
> proste nahrazeni jeho casti problem nevyresi. Chce to zmenu v celkove
> koncepci.

To se projevuje uz u ADOExpress komponent. Postupy vhodne pro
DBLib uz nejsou tak vhodne pro OLE DB. Krome problemu s
vykonem zde dochazi i ke ztrate rady vlastnosti. Jako jednu ze
snadno viditelnych bych nastinil problem cele zoologicke zahrady
navzajem nezamenitelnych XxxxFieldu. Tento system je z pohledu
OLE DB primo kastratofalni - mno - urcite neni dobry. :-)

> > Ale zamyslis-li se, tak jak je mozne, ze jsi za vice nez 3/4 roku
> > nebyl schopen pro svuj projekt najit spolupracovniky, kteri by
> > opravdu neco delali (v history.txt sice nejaci jsou, ale ve
> > vlastnich komponentach neni o nich ani zminka). V tom, ze by jsi mel
> > spatny projekt to neni. Problem je, ze jsi podle meho nazoru zvolil
> > spatnou zakladni koncepci RESENI projektu :-( Proste jdes proti
> > proudu. O tom to cele je. O tom tady pisu.
>
> Problem je v tom, ze Zbysek s OLE DB primarne uspokojuje sve vlastni
> potreby.

:-) Je to logicke. Musim se predevsim necim zivit, moje potreby
tedy maji prednost. A protoze se mi nepodarilo najit pro spolupraci
nekoho na zacatku, je vysledek nutne poplatny mym potrebam.

> je prima, ze se s ostatnimi z darma podeli o vysledky sve
> prace, ale tezko mu to prinese spolupracovniky, protoze tehle zpusob
> pritahne jen takove, kteri take potrebuji vyresit stejny problem (a to
> este ne vsechny, protoze rada o Zbyskove projektu vubec nevi, a dalsi
> mohou mit jinou predstavu a nachteji se handrkovat). Zcela opomiji ty,
> kteri by se treba podileli na OLE DB ackoliv ho k nicemu nepotrebuji,
> ale radi by pracovali na necem uzitecnem, velkem, zabavnem (zkratka
> fun & challenging). A navim, Zbysek jako typicky vyvojar zcela
> podcenuje vyznam medii :o)))), staci se podivat na stranky projektu
> OLE DB.

Prace s vice lidmi znamena hodne komunikace - vsak to sam viz z
Nexusu. Nejsem si tak jist, zda bych mohl, spolehaje na jine lidi,
delat uz vlastni projekt, ve kterem sve komponenty pouzivam. Na
druhe strane je treba rict, ze vynalozene usili uz zacina pomalu
prinaset i jine efekty - staci se treba podivat na seznam prednasek
v Laznich Belohrad, ziskane znalosti uspesne uplatnuji na
skolenich, chystam se, ze bych casem mohl prednaset i OLE DB
a ADO samostatne. Ale zase, je to o mych potrebach. :-)

> BTW, ma tu nekdo zajem podiskutovat o optimalni koncepci otevreneho
> aplikacniho jadra ?

Jiste. Co te trapi? :-)


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


Sorry za OT

[*] Doller.Jozef(zv)zsr.sk - 10.12.1999 08:08:50

Vopred sa ospravedlnujem

Ale potrebujem poradit nejaky program, co zisti frekvenciu procesora (P II,
P III, Celeron)
Bolo by super, keby ho nebolo treba instalovat.
Restartovat to takisto nemozem, su to servery.

Vdaka za tip.

> Jozef Doller
> �SR Stredisko informatiky, Kov��ska 3, 832 06 Bratislava
> tel.: 07 / 5058 5431
> mailto:doller.jozef(zv)zsr.sk
>

Delphi 5 Prof, Debuger Kernel BORDBK50.DLL ...

[*] Nikodem <nikodem(zv)kh-kinetic(tec)cz> - 10.12.1999 08:26:53

Ahoj,

toto se mi stalo jiz u Delphi 4 Std. Ale chyba byla u me, po instalaci
Delphi jsem neprovedl restart PC coz jsem mel. Pak jiz bylo vse Ok, ale
nevim jestli je to i v tvem pripade.
Jindrich Nikodem

-----P�vodn� zpr�va-----
Od: Ondrej Jaura <jaura(zv)datalock.sk>
Komu: Delphi <delphi-l(zv)fwd(tec)cz>
Datum: 9. prosince 1999 16:52
P�edm�t: Delphi 5 Prof, Debuger Kernel BORDBK50.DLL ...> Zdravim :)
>
> Po uspesnom nainstalovani Delphi 5 Professional a pri pokuse spustit
>jednoduchy program (formular + TButton :))) doslo k chybe "Debuger Kernel
>BORDBK50.DLL is missing or not registered".
>
> Nas subor BORDBK50.DLL sa nachadza v adresari "C:\Program Files\Common
>Files\Borland Shared\Debugger".
>
> Operacny system je MS W95.
>
> Za zachranne kolesa vopred dakujem...
>
> Ondrej
> ------
> Ondrej Jaura
> Datalock a.s.
> jaura(zv)datalock.sk
> ------ :)

Sorry za OT

[*] Pavol Kaka�ka <paka(zv)aktis(tec)cz> - 10.12.1999 08:33:02

Pozri na http://mujweb(tec)cz/www/overclock/

v sekcii "Download" je programcek: "WCPUID 66 KB V�born� program pro
otestov�n� vlastnost� CPU"

Pavol Kaka�ka
paka(zv)aktis(tec)cz



Vopred sa ospravedlnujem

Ale potrebujem poradit nejaky program, co zisti frekvenciu procesora (P II,
P III, Celeron)
Bolo by super, keby ho nebolo treba instalovat.
Restartovat to takisto nemozem, su to servery.

Vdaka za tip.

> Jozef Doller
> �SR Stredisko informatiky, Kov��ska 3, 832 06 Bratislava
> tel.: 07 / 5058 5431
> mailto:doller.jozef(zv)zsr.sk
>

Kolik ma mesic dni?

[*] Vladimir Ponechal <Vladimir_Ponechal(zv)tesco-europe(tec)com> - 10.12.1999 08:55:06

Preji hezky den vsem,

mel bych jednu otazku... Mam databaze, ktere se neustale nafukuji a
obsahuji dost polozek, coz samo o sobe potom spomaluje praci. Ja to chci
vyresit tak, ze uzivatel si vybere kolik dni stare polozky se maji
zobrazovat v dbgrid a tim padem i v editaci. Vety, ktere jsou starsi nez
vybrane stari se automaticky pri nabehu presunou za pomoci BatchMove do
zalozne databaze, aby v pripade potrebi byly k dispozici. Jenze mam jeden
problem. Jak automaticky zjistit, ktery mesic ma kolik dni? Existuje na to
neco?

Mam D3.

_________________________________________________

Vladimir Ponechal
Systems and Network specialist
European Support and Operations

E-mail: Vladimir_Ponechal(zv)tesco-europe.com

_________________________________________________

Rychlost

[*] Tomas Folprecht <tomas.folprecht(zv)iol(tec)cz> - 10.12.1999 09:18:44

Dobry den,

mam pomerne slozitou aplikaci, je MDI, ma asi 5 automaticky
vytvarenych formu a
2 vytvarene dynamicky, jsou tam 2 paralelni thready.
Ted jsem pridal do programu jeden jednoduchy form (velmi jednoduchy
neco jako aboutbox)
a cela aplikace se FATALNE zpomalila. Zkoro v tom nejde pracovat.
Nevite nekdo cim to je?
Nemate nejake tipy, jak urychlit aplikaci?

Dekuji

Tomas FOLPRECHT


Rychle prolejzani databaze

[*] tmara(zv)itsys(tec)cz - 10.12.1999 09:21:35

Mam databazi vyrobku. A potrebuji vypsat, kolik podrizenych vyrobku je t�eba
na vyrobeni toho vrcholoveho.

Pr. Mame auto. Auto se sklada t�eba z�kol a sedacek (staci, at to nen� vic
slozity :o)). Kola se skladaji z�rafku, plastu a sroubu. Plaste se skladaji
z�gumy a latky. Sedacka se sklada z�kostry a potahu. A ja potrebuji vypsat,
kolik sroubu je t�eba na jedno auto. Takze na jedno kolo potrebuji 4 srouby.
Kola jsou u auta 4. Takze 16 sroubu na 1 auto. A takto to potrebuji vypsat
u v�ech polozek. Ale nevim, kolik t�chto urovni je. Kdy� bych vzal t�eba
motor, tak bych se klidne mohl dostat tam, ze t�eba loziska se kladaji
z�kulicek. A mohla by to byt t�eba 148 uroven. Poradite mi, jak toto udelat
a aby to bylo co nejrychlejsi? Hlavne ta rychlost je dost dulezita. Jeden
zpusob jsem vymyslel, ale byl opravdu pomaly. Proto se obracim na opravdove
programatory. Tnx a lot.

AUTO
-KOLA - SROUBY
-PLASTE - GUMA
- LATKA

-SEDACKY- POTAH
- KOSTRA


P.S. sem to ale trubka. U kazdeho vyrobku je tzv. kusovnik, kde jsou jmena
v�ech podrizenych na dal�� urovni. Ale pouze na te pristi. Takze u "KOLA" je
kusovnik, kde jsou uvedeny "SROUBY" a "PLASTE". A nic vic. U "PLASTE" je
zase uvedena "GUMA" a "LATKA".
Klidne je mozne pouzit nejakou dal�� TmpTabulku pro docasne ulozeni zaznamu.
To ale asi nebude nejrychlejsi. Ale uvidime.
Potrebuji to co nejrychleji (odpoved i beh programu :o)) Nedelam to
v�Delphi, ale priklady v�nem klidne byt mohou (a asi budou). To je v�pohode.


Za ka�d� napad je�t� jednou moc dik.

-tma-


Kolik ma mesic dni?

[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 10.12.1999 10:01:48



> -----P�vodn� zpr�va-----
> Od: Vladimir Ponechal [mailto:Vladimir_Ponechal(zv)tesco-europe.com]
> mel bych jednu otazku... Mam databaze, ktere se
> neustale nafukuji a
> obsahuji dost polozek, coz samo o sobe potom spomaluje praci.
> Ja to chci
> vyresit tak, ze uzivatel si vybere kolik dni stare polozky se maji
> zobrazovat v dbgrid a tim padem i v editaci. Vety, ktere jsou
> starsi nez
> vybrane stari se automaticky pri nabehu presunou za pomoci
> BatchMove do
> zalozne databaze, aby v pripade potrebi byly k dispozici.
> Jenze mam jeden
> problem. Jak automaticky zjistit, ktery mesic ma kolik dni?
> Existuje na to
> neco?

Treba odectenim dvou datumu (napr. 1.duben 2000 minus 1. brezen 2000).

Mam ale pocit, ze k vyreseni sveho problemu nepotrebujes vedet, kolik ma
mesic dni.
Kdyz uzivatel zada, ze chce nechavat udaje ne starsi nez 30 dni, na co
potrebujes
pocet dni v mesici?

Jura


okraje tlace

[*] Ing. J�n Kuch�r�����!j��G - 10.12.1999 10:18:12

caute

vo svojom programe pouzivam tlac na atramentovej tlaciarni, pri pouziti programu
povedzme WORD zvladne tlaciaren dolny okraj na strane o velkosti 1 cm, ale v mojom pripade sa stranka odstrankuje pri okraji 2,5 cm, pricom prave ten pol
centimeter by mi zachranil zivot, preto sa pytam ci z Vas niekto nevie ako nastavit
ten dolny okraj na ten 1 cm, pouzivam tlac pomocou prikazu ASSIGNPRN.

DIK



Ing. J�n Kuch�r
KIaR SjF TU Ko�ice
Park Komensk�ho 9
040 01 Ko�ice
tel. 095/602 2589, mobil : 0905 229542
e-mail: kuchar(zv)tuke.sk

Kolik ma mesic dni?

[*] bures <bures(zv)ssakhk(tec)cz> - 10.12.1999 10:33:02

Ahoj pokud jem dobre problem pochopil potrebujes vybrat zaznamy treba 10 dni
stare
a ty zobrazis treba: zkus to odfiltrovat pomoci komponety TQuery do jine
tabulky
a datum pred deseti dny zjitis treba - ShowMessage(DateToStr(date - 10));

Vlada


----- Original Message -----
From: Vladimir Ponechal <Vladimir_Ponechal(zv)tesco-europe.com>
To: Delphi konference (E-mail) <delphi-l(zv)fwd(tec)cz>
Sent: Friday, December 10, 1999 8:55 AM
Subject: Kolik ma mesic dni?> Preji hezky den vsem,
>
> mel bych jednu otazku... Mam databaze, ktere se neustale nafukuji a
> obsahuji dost polozek, coz samo o sobe potom spomaluje praci. Ja to chci
> vyresit tak, ze uzivatel si vybere kolik dni stare polozky se maji
> zobrazovat v dbgrid a tim padem i v editaci. Vety, ktere jsou starsi nez
> vybrane stari se automaticky pri nabehu presunou za pomoci BatchMove do
> zalozne databaze, aby v pripade potrebi byly k dispozici. Jenze mam jeden
> problem. Jak automaticky zjistit, ktery mesic ma kolik dni? Existuje na to
> neco?
>
> Mam D3.
>
> _________________________________________________
>
> Vladimir Ponechal
> Systems and Network specialist
> European Support and Operations
>
> E-mail: Vladimir_Ponechal(zv)tesco-europe.com
>
> _________________________________________________
>
>

Kolik ma mesic dni?

[*] Pavol Kaka�ka <paka(zv)aktis(tec)cz> - 10.12.1999 10:36:54

> Preji hezky den vsem,
>
> mel bych jednu otazku... Mam databaze, ktere se neustale nafukuji a
> obsahuji dost polozek, coz samo o sobe potom spomaluje praci. Ja to chci
> vyresit tak, ze uzivatel si vybere kolik dni stare polozky se maji
> zobrazovat v dbgrid a tim padem i v editaci. Vety, ktere jsou starsi nez
> vybrane stari se automaticky pri nabehu presunou za pomoci BatchMove do
> zalozne databaze, aby v pripade potrebi byly k dispozici. Jenze mam jeden
> problem. Jak automaticky zjistit, ktery mesic ma kolik dni? Existuje na to
> neco?
>
> Mam D3.
>

Trebars DaysPerMonth z unity DateUtil od RX

Pavol Kakacka
paka(zv)aktis(tec)cz

Pavol Kakacka
paka(zv)aktis(tec)cz


Kolik ma mesic dni?

[*] Ren� Otisk - 10.12.1999 10:40:58

Hi,
Jestli jsem to dobre pochopil, chces od datumu odecist x dnu? TDateTime je
kompatibilni s Extended. Cela cast je datum (pocet dnu tusim od 1.1.1900),
desetinna cast je pak hod:min:sec:ms. Doufam ze ted nemystifikuji.
Neco jako priklad

var
X: Integer;
begin
X := -5 {treba odectu 5 dnu};
ShowMessage(DateToStr(Now + x))
end;
Sroub


> Preji hezky den vsem,
>
> mel bych jednu otazku... Mam databaze, ktere se neustale nafukuji a
> obsahuji dost polozek, coz samo o sobe potom spomaluje praci. Ja to chci
> vyresit tak, ze uzivatel si vybere kolik dni stare polozky se maji
> zobrazovat v dbgrid a tim padem i v editaci. Vety, ktere jsou starsi nez
> vybrane stari se automaticky pri nabehu presunou za pomoci BatchMove do
> zalozne databaze, aby v pripade potrebi byly k dispozici. Jenze mam jeden
> problem. Jak automaticky zjistit, ktery mesic ma kolik dni? Existuje na to
> neco?
>
> Mam D3.
>
> _________________________________________________
>
> Vladimir Ponechal
> Systems and Network specialist
> European Support and Operations
>
> E-mail: Vladimir_Ponechal(zv)tesco-europe.com
>
> _________________________________________________
>

InOutRes mrtvy nebo zivy

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 10.12.1999 11:17:06

>Dalibor Toman wrote:
>> D5 nedovoluji pouziti promenne InOutRes zatimco IOResult zustal zachovan.
>> Prijde mi to jako pekna zlomyslnost. Nebo jsem nekde neco prehledl (Help
>> od Trial verze mlci jako hrob).
>
>Ahoj,
>
>Promenna InOutRes se ve zdrojacich vyskytuje, ale v implementation sekci
>System.pas.

zaplatpanbuh aspon za to :-(

> Jinak muzes pouzit vyjimku EInOutError.


Vyjimku pouzivat nechci.

Stejne je to bordel - proc teda zachovali IOResult?

Zdravi
D. Toman

Pozice "grafickeho kurzoru"

[*] Petr Brant <p.brant(zv)samo(tec)cz> - 10.12.1999 11:19:41

Ahoj vespolek,

potrebuji nekde na Canvasu zobrazit zlomek. O to by nebylo, ale za nim
maji byt dalsi vyrazy a jde o to, jestli je nejaka funkce, ktera je
schopna zjistit, kde se prestalo s kreslenim textu (text by se mel
kreslit pomoci TextOut nebo nejake podobne funkce), aby dalsi text
zacinal ve vhodnem miste. Nevite nekdo ?

**************************************************
Petr Brant [p.brant(zv)samo(tec)cz], programator v MSVC++,
obcas Delphi
**************************************************

TCustomWinSocket - ASyncStyles

[*] kchodl(zv)atlas(tec)cz - 10.12.1999 11:39:25

Ahoj vsem,
mam pusteny SERVER (TServerSocket) a kdyz se na nej pripojim nejakym klientem, tak v event OnClientConnect dynamicky vytvorim dalsiho klienta a zacnu ho napojovat na nejaky dalsi SERVER (muj program je vlastne takova "roura", ktera co na jedne strane slysi, posle dal na predem urcene pevne misto). Ted ale potrebuju zakazat veskery prisun dat do TServerSocket dokud se muj dyn. vytvoreny klient nenapoji na vzdaleny SERVER. Az se napoji, tak muzu povolit prisun dat, ktera okamzite "sendnu" do dyn. vytv. klienta.
Zkusil jsem v event OnClientConnect SERVERovskemu socketu z property ASyncStyles odstranit prvek asRead. Vse bylo OK, nez jsem na ten muj program pripojil s IE4.0. Najednou se vygeneroval event OnClientRead a to i s tim, ze tu danou chvili aktualni Socket.ASyncStyles neobsahovalo prvek asRead!!! Jak je to mozne?!

Dekuji za kazdou odpoved
Progr-Amather -Kchodl-� 1989-1999
ICQ: 31825631


ParamStr a adresar

[*] Petr Ga�ourek <gadourek(zv)centrum(tec)cz> - 10.12.1999 12:09:41

Ahoj,

potrebuji spustit svuj program s parametrem, ve kterem je adresar. Problem nastava pokud je ve jmenu adresare mezera, napr: MyProg Program Files. Fukce ParamStr(1) pak vrati "Program" nikoliv "Program Files". Zatim to resim tak, ze nejprve vsechny mezery v parametrech nahradim specialnim znakem, ktery pak zase po po prebrani parametru nahradim mezerou.
Existuje nejake jine smysluplnejsi reseni?


Diky

Petr Gadourek


TCP/IP - ASyncStyles

[*] kchodl(zv)atlas(tec)cz - 10.12.1999 12:38:57

Jak zabranit vyvolani event OnClientRead?
Pouzil jsem property ASyncStyles pro aktivni socket (TCustomWinSocket), z ktereho jsem odstranil prvek asRead, ale i pres to se event OnClientRead vyvolalo.
Jak tedy na to?

Dik vsem
Progr-Amather -Kchodl-� 1989-1999
ICQ: 32518631


ParamStr a adresar

[*] Radim Kunz <rkunz(zv)ova(tec)comp(tec)cz> - 10.12.1999 12:39:23

To je jednoduche. Dej tem parametr do uvozovek. V ParamStr(1) ho pak
ziskas cely, a bez uvozovek.

Radim Kunz


-----Original Message-----
From: Petr Ga�ourek <gadourek(zv)centrum(tec)cz>
To: Konference Delphi <delphi-l(zv)fwd(tec)cz>
Date: 10. prosince 1999 12:28
Subject: ParamStr a adresar


Ahoj,

potrebuji spustit svuj program s parametrem, ve kterem je adresar. Problem nastava pokud je ve jmenu adresare mezera, napr: MyProg
Program Files. Fukce ParamStr(1) pak vrati "Program" nikoliv "Program Files". Zatim to resim tak, ze nejprve vsechny mezery v
parametrech nahradim specialnim znakem, ktery pak zase po po prebrani parametru nahradim mezerou.
Existuje nejake jine smysluplnejsi reseni?


Diky

Petr Gadourek

Jak zabranit obsluze klavesnice

[*] Thom <thom(zv)comberg(tec)cz> - 10.12.1999 12:41:14

> Napriklad vyvolanim tiche vyjimky (Abort :-)


jenze toto volani zrusi vsechny provedene akce,
a ja chci po stisknuti urcite klavesy vypisovat do editu urcite znaky
a pokud pouziju abort, tak mi chcipne i to vypisovani

dlasi problem je:
procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word; Shift:
TShiftState);
begin
case Key of
VK_INSERT,
VK_BACK,
VK_HOME,
VK_END,
VK_RIGHT,
VK_DELETE: Key := 0; // tohle funguje, kdyz zmacknu sipky nebo home,
end ... vse se zpravne filtruje
end;
if Key >31 then
case key of
Ord('A'): begin
Key := 0;
edit1.text := 'B' // napriklad, ve skutecnosti to dela neco jineho
Abort // at tu je nebo neni chova se to stejne
...
...

ale stejne to pise znak 'A'

diky TH


ParamStr a adresar

[*] Pavol Kaka�ka <paka(zv)aktis(tec)cz> - 10.12.1999 12:43:05


ExtractFilePath(Application.ExeName)

Pavol Kaka�ka
paka(zv)aktis(tec)cz
Ahoj,

potrebuji spustit svuj program s parametrem, ve kterem je adresar. Problem nastava pokud je ve jmenu adresare mezera, napr: MyProg Program Files. Fukce ParamStr(1) pak vrati "Program" nikoliv "Program Files". Zatim to resim tak, ze nejprve vsechny mezery v parametrech nahradim specialnim znakem, ktery pak zase po po prebrani parametru nahradim mezerou.
Existuje nejake jine smysluplnejsi reseni? Diky

Petr Gadourek


Pozice "grafickeho kurzoru"

[*] Pavel �im��ek - 10.12.1999 12:59:35

A co takhle funkce Canvasu TextWidth.
Ahoj Pavel

-----P�vodn� zpr�va-----
Od: Petr Brant <p.brant(zv)samo(tec)cz>
Komu: Konference Delphi <delphi-l(zv)fwd(tec)cz>
Datum: 10. prosince 1999 12:32
P�edm�t: Pozice "grafickeho kurzoru">Ahoj vespolek,
>
>potrebuji nekde na Canvasu zobrazit zlomek. O to by nebylo, ale za nim
>maji byt dalsi vyrazy a jde o to, jestli je nejaka funkce, ktera je
>schopna zjistit, kde se prestalo s kreslenim textu (text by se mel
>kreslit pomoci TextOut nebo nejake podobne funkce), aby dalsi text
>zacinal ve vhodnem miste. Nevite nekdo ?
>
>**************************************************
>Petr Brant [p.brant(zv)samo(tec)cz], programator v MSVC++,
>obcas Delphi
>**************************************************
>
>

Kolik m� m�s�c dn�

[*] Radovan Urban <radovanu(zv)seznam(tec)cz> - 10.12.1999 14:02:21

Zdravim.

Ja to resim takhle.(od,do je TDateTime}

M:=mesic; {mesic}
R:=rok;

s1:='1.'+inttostr(M)+'.'+inttostr(R)
s2:='1.'+inttostr(M+1)+'.'+inttostr(R)

od:=StrtoDate(S1); {prvniho}
do:=StrtoDate(s2)-1; {posledniho}

prvniho mesice - 1 je posledniho predchazejiciho.
samozrejme je treba dat bacha na konec roku. S pozdravem Radovan Urban


-- http://email.seznam(tec)cz
-- email zdarma na cely zivot


ParamStr a adresar

[*] Petr Brant <p.brant(zv)samo(tec)cz> - 10.12.1999 13:03:31

Zkus dat ten adresar do uvozovek.

**************************************************
Petr Brant [p.brant(zv)samo(tec)cz], programator v MSVC++,
obcas Delphi
**************************************************
> -----P�vodn� zpr�va-----
> Od: Petr Ga�ourek [SMTP:gadourek(zv)centrum(tec)cz]
> Odesl�no: 10. prosince 1999 12:10
> Komu: Konference Delphi
> P�edm�t: ParamStr a adresar
>
> Ahoj,
> �
> potrebuji spustit svuj program s parametrem, ve kterem je adresar.
> Problem nastava pokud je ve jmenu adresare mezera, napr: MyProg
> Program Files. Fukce ParamStr(1) pak vrati "Program" nikoliv "Program
> Files".�Zatim to resim tak, ze nejprve vsechny mezery v parametrech
> nahradim specialnim znakem, ktery pak zase po po prebrani parametru
> nahradim mezerou.
> Existuje nejake jine smysluplnejsi reseni?
> �
> �
> Diky
> �
> Petr Gadourek


MSExcel

[*] Petr.Motlicek(zv)bcbrno(tec)cz - 10.12.1999 13:11:45

> > Jsem zacatecnik a potreboval bych poradit, jak konkretne nacist data
> > ze souboru vytvorenem v MSExcelu, aniz bych MSExcel otevrel.
>
> Moc moznosti nemas. Nekde na DSP jsem tusim videl komponenty, ktere udajne
> umi zapisovat a cist Excel format (otazka ja jake verze).

Ahoj,

mohu privatne nejake poslat, ale jeste jsem je
nezkousel.

(nebo hledej na www.torry.ru
XLSFile version 1.0 - tato je pro D3, free
XLSReadWrite V1.23- tato vypada pro D3 a D4,
pro nekomercni pouziti free

Petr Motlicek

ParamStr a adresar

[*] Pavel Junek <junek(zv)hrk.pvtnet(tec)cz> - 10.12.1999 13:16:15

Zkus ten parametr napsat do apostrofu (uvozovek).

Zdravicko Pavel
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Petr Ga�ourek
Sent: Friday, December 10, 1999 12:10 PM
To: Konference Delphi
Subject: ParamStr a adresar


Ahoj,

potrebuji spustit svuj program s parametrem, ve kterem je adresar. Problem
nastava pokud je ve jmenu adresare mezera, napr: MyProg Program Files. Fukce
ParamStr(1) pak vrati "Program" nikoliv "Program Files". Zatim to resim tak,
ze nejprve vsechny mezery v parametrech nahradim specialnim znakem, ktery
pak zase po po prebrani parametru nahradim mezerou.
Existuje nejake jine smysluplnejsi reseni? Diky

Petr Gadourek

TMemoField

[*] Petr.Motlicek(zv)bcbrno(tec)cz - 10.12.1999 13:17:59

Ahoj,

> Nechci tam davat TDBMemo. Navic by to orezalo na 255 znak .
> Sroub
>
>
> Zkus jednoduse
> Memo1.text := DBMemo1.text;***


**to je prece mineno jako TMemoField

ParamStr a adresar

[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 10.12.1999 13:45:15

> potrebuji spustit svuj program s parametrem, ve kterem je adresar. Problem nastava pokud je ve jmenu adresare mezera, napr: MyProg Program Files. Fukce ParamStr(1) pak vrati "Program" nikoliv "Program Files". Zatim to resim tak, ze nejprve vsechny mezery v parametrech nahradim specialnim
znakem, ktery pak zase po po prebrani parametru nahradim mezerou.
> Existuje nejake jine smysluplnejsi reseni?

Jestli se nepletu, melo by stacit dat ten parametr, tj. adresar, do
uvozovek - to ostatne plati pro vsechny parametry, ktere obsahuji
nepohodlne znaky.

David Lebeda


Dynamicke volani (generovani) procedur (jako ve FA

[*] Pavel �im��ek - 10.12.1999 13:47:23

No hned prvni problem ktery vidim je ten ze ty smycky musi zacinat od 0.
A potom aby to melo smysl musis skutecne jak tady nekdo radil
misto CheckListBox1.ItemIndex mit "I".
Ale takhle jak to mas si vytvoris nove polozky v ListBoxu!!!
Pokud chces pouze tem stavajicim priradit TStringListy tak musis
CheckListBox1.Items.Objects[I]:= TStringList.Create;

Ale spis bych to delal hned na zacatku pri prvnim vytvareni polozek
v ListBoxu. Teda pokud je tam nemas uz z DesignTime.

Ahoj Pavel

-----P�vodn� zpr�va-----
Od: Richard Valny <Richard.Valny(zv)oku-st(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 10. prosince 1999 11:41
P�edm�t: Re: Dynamicke volani (generovani) procedur (jako ve FANDu)>Zkusil jsem to takto (modifikoval jsem snad jen mirne radu od p. Pavla
Simicka):
>
>procedure TZpracovaniLoguF.Button9Click(Sender: TObject);
>var i:integer;
>begin
>for i:=1 to CheckListBox1.Items.Count - 1 do
> begin
> CheckListBox1.Items.AddObject(IntToStr(i),TStringList.Create);
>{*}
TStringList(CheckListBox1.Items.Objects[CheckListBox1.ItemIndex]).Add('objek
t'+IntToStr(i));
>{*}
TStringList(CheckListBox1.Items.Objects[CheckListBox1.ItemIndex]).SaveToFile
(IntToStr(i)+'.txt');
> end;
>for i:=1 to CheckListBox1.Items.Count - 1 do
> begin
>{*}
TStringList(CheckListBox1.Items.Objects[CheckListBox1.ItemIndex]).Clear;
>{*}
TStringList(CheckListBox1.Items.Objects[CheckListBox1.ItemIndex]).Free;
> end;
>end;
>
>U radek s * to skonci behovou chybou Out of index (-1) a to mi nejde do
hlavy. To je od indexu TstringList? Vzdyt u CheckListBox1 je bran index
presne podle for.
>
>Dekuji za rady :-)
>
>
>
>=========================================
>Richard Valny richard.valny(zv)oku-st(tec)cz
>Okresni urad Strakonice tel. 0342-441 l. 216
>Smetanova 533 fax. 0342-21208
>386 22 STRAKONICE FiDoNet 2:423/35
>=========================================
>

Kolik ma mesic dni

[*] radovanu(zv)seznam(tec)cz - 10.12.1999 14:13:00

Zdravim

Ja to delam takhle

M=mesic
R=rok

S1:='1.'+inttostr(M)+'.'+inttostr(Y)
S2:='1.'+inttostr(M+1)+'.'+inttostr(Y)

OD:=strtodate(S1);
DO:=strtodate(S2)-1;

Protoze (1.x.rok)-1 = posledniho.x-1.rok
samozrejme je trba dat bacha na konec roku. aby M+1 nebylo 13.
(OD,DO je TDateTime S1,S2 string a M a Y integer)

Radek Urban.

---------------------------------------------


Alignment na Tedit ??

[*] Daniel Fojt�k <xfojtik(zv)albert.osu(tec)cz> - 10.12.1999 14:24:55

Mam jeden drobny problem, jenz ovsem silne poskozuje vzhled meho formulare:
Mam na formulari umisteno nekolik objektu typu TDBedit a TEdit. Ovsem
protoze obsahuji cila tak bych chtel docilit aby vsechny informace byly
zarovnany doprava. Ovsem to se mi u Editu nedari - nevite jak na to
Dik za odpovedi

Dan


MSExcel

[*] Fi�er Ji�� - 10.12.1999 15:01:22

Potrebuji pouze nacist data ze souboru v MSExcel 97. Proste nacist data z
jednoho listu. Pripojit prez ODBC jsem se zkousel, ale po prihlaseni v
Database Exploreru nejsou videt zadna data, i kdyz ODBC driver mam nastaveny
na Excel 97.

Nevis kde delam chybu ???

----- Original Message -----
From: Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, December 10, 1999 7:18 AM
Subject: RE: MSExcel


>
> > -----P�vodn� zpr�va-----
> > Od: Petr Vones [mailto:pvones(zv)mbox.vol(tec)cz]
> > > Jsem zacatecnik a potreboval bych poradit, jak
> > konkretne nacist data
> > > ze souboru vytvorenem v MSExcelu, aniz bych MSExcel otevrel.
> >
> > Ahoj,
> >
> > Moc moznosti nemas. Nekde na DSP jsem tusim videl komponenty,
> > ktere udajne
> > umi zapisovat a cist Excel format (otazka ja jake verze). Nebyly free.
> > Jinak muzes v nouzi zkusit ActiveX komponentu TF1Book, kterou
> > mas v Delphi.
> > Lze ji pouzit pro castecne cteni Excelu 4 a 5.
> >
>
> Dalsi moznost je pristup pres ODBC. To ovsem nelze pouzit obecne
> pro libovolny soubor xls, soubor musi splnovat urcita kriteria
> a musi pro nej byt nakonfigurovan DSN v ODBC. Je to zpusob moznosti
> prace se soubory Excelu, z puvodni otazky neni jasne, jestli
> by tento pristup mohl byt vyhovujici.
>
> Jura
>
>

Pristup k datum, Delphree a vubec was: D5 - ano ci

[*] Erik Salaj <winsoft(zv)napri.sk> - 10.12.1999 15:19:48

> BTW, ma tu nekdo zajem podiskutovat o optimalni koncepci otevreneho
> aplikacniho jadra ?

Ked vysvetlis, co to vlastne je ;-), tak ano.

Erik Salaj


MSExcel

[*] Fiser Ji�� - 10.12.1999 15:38:05

D�ky Petre za dobry tip. Ty komponenty urcite vyzkousim.

Jirka

----- Original Message -----
From: <Petr.Motlicek(zv)bcbrno(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, December 10, 1999 1:11 PM
Subject: Re: MSExcel


> > > Jsem zacatecnik a potreboval bych poradit, jak konkretne nacist
data
> > > ze souboru vytvorenem v MSExcelu, aniz bych MSExcel otevrel.
> >
> > Moc moznosti nemas. Nekde na DSP jsem tusim videl komponenty, ktere
udajne
> > umi zapisovat a cist Excel format (otazka ja jake verze).
>
> Ahoj,
>
> mohu privatne nejake poslat, ale jeste jsem je
> nezkousel.
>
> (nebo hledej na www.torry.ru
> XLSFile version 1.0 - tato je pro D3, free
> XLSReadWrite V1.23- tato vypada pro D3 a D4,
> pro nekomercni pouziti free
>
> Petr Motlicek
>
>
>
>

Rychlost

[*] Mitko Mit�v <mitev(zv)foresta(tec)cz> - 10.12.1999 16:03:20

Ahoj,

pokud pouzivas ten formular jako modalni v hlavnim vlakne programu (asi ano
podle podobnosti About Box) a pouzivas ve threadech metodu Synchronize, pri
jeho vyvolani dojde k zablokovani threadu. Resenim by mohlo byt vyvolani
dialogu ve vlastnim threadu.

S pozdravem

Mitko Mitev, FORESTA SG a.s.
www.foresta(tec)cz
mitev(zv)foresta(tec)cz


-----P�vodn� zpr�va-----
Od: Tomas Folprecht <tomas.folprecht(zv)iol(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 10. prosince 1999 11:42
P�edm�t: Rychlost


>Dobry den,
>
>mam pomerne slozitou aplikaci, je MDI, ma asi 5 automaticky
>vytvarenych formu a
>2 vytvarene dynamicky, jsou tam 2 paralelni thready.
>Ted jsem pridal do programu jeden jednoduchy form (velmi jednoduchy
>neco jako aboutbox)
>a cela aplikace se FATALNE zpomalila. Zkoro v tom nejde pracovat.
>Nevite nekdo cim to je?
>Nemate nejake tipy, jak urychlit aplikaci?
>
>Dekuji
>
>Tomas FOLPRECHT
>

Kolik ma mesic dni?

[*] Ondra Gebauer <gebauero(zv)mlp(tec)cz> - 10.12.1999 16:14:26

Vladimir Ponechal wrote:
>
> Preji hezky den vsem,
>
> mel bych jednu otazku... Mam databaze, ktere se neustale nafukuji a
> obsahuji dost polozek, coz samo o sobe potom spomaluje praci. Ja to chci
> vyresit tak, ze uzivatel si vybere kolik dni stare polozky se maji
> zobrazovat v dbgrid a tim padem i v editaci. Vety, ktere jsou starsi nez
> vybrane stari se automaticky pri nabehu presunou za pomoci BatchMove do
> zalozne databaze, aby v pripade potrebi byly k dispozici. Jenze mam jeden
> problem. Jak automaticky zjistit, ktery mesic ma kolik dni? Existuje na to
> neco?
>
> Mam D3.
>
> _________________________________________________
>
> Vladimir Ponechal
> Systems and Network specialist
> European Support and Operations
>
> E-mail: Vladimir_Ponechal(zv)tesco-europe.com
>
> _________________________________________________

Ahoj,

MonthDays[IsLeapYear(Y), M]

v SysUtils
Ondra


Lokalizace

[*] Daniel <roxton(zv)atlas(tec)cz> - 10.12.1999 16:39:38

Pokud se zeptam blbe, tak se predem omlouvam.
Lze prelozit texty napr. dialozich (unit Dialogs) jednou
provzdy, tak aby se to projevilo jak ve stavajicich
aplikacich (samozrejme po novem prekladu), tak
i v aplikacich budoucich ?
Nechce se mi prekladat kazdou aplikaci zvlast.

Daniel

Volani dialogu z Dll

[*] Vokounek <vokoun(zv)datis.cdrail(tec)cz> - 10.12.1999 17:31:06

Pri volani dialogu z DLL knihovny je indikovan dany dialog
v hlavni liste Windows, i kdyz se nejedna o hlavni formular !!
(viz. demo priklad Delphi5 FormDll). Jak toto odstranit !!??
Dekuji za radu ZVok


ParamStr a adresar

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 10.12.1999 17:57:41

Puvodni zprava, kterou napsal Petr Ga�ourek dne 10 Dec 99,:

> potrebuji spustit svuj program s parametrem, ve kterem je adresar. =
> Problem nastava pokud je ve jmenu adresare mezera, napr: MyProg Program =
> Files. Fukce ParamStr(1) pak vrati "Program" nikoliv "Program Files". =
> Zatim to resim tak, ze nejprve vsechny mezery v parametrech nahradim =
> specialnim znakem, ktery pak zase po po prebrani parametru nahradim =
> mezerou.
> Existuje nejake jine smysluplnejsi reseni?

K tomu jsou uvozovky.


S pozdravem
Petr Zahradnik, pocitacovy expert

Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917, PGP vitano


tisky

[*] p. Jirman <jim.design(zv)iol(tec)cz> - 10.12.1999 18:27:44

tiskyAhoj,

slo by to vytisknout pomoci QuickReportu. Tisk sem tim tisk v D3.
Ze zacatku to slo, ale ja sem to mel stizeny tim, ze sem tisk
asi 8 jpegu na A4 a pod nima popisky. A to se zacalo pekne casove
kousat a swapovat na disku.
Nicmene, prace s nim je jednoducha. Jestli si s nim jeste nedelal,
tak do ty hlavni QuickRep se davaj Qrband, ve kterych se nastavuji
ruzne typy (dulezitej je hlavne typ rbDetail, kterej se opakuje (pod sebe
i na dalsi str.)podle toho,
kolik dat tam das procedurou OnNeedData.) No a do nich se davaj objekty ve slozce QR.
Treba i QRImage nebo QRLabel, coz asi resi tvy problemy (nevim co mas v tom panelu).
proceduru OnNeedData vyplnis tak,
ze do ni zacyklis vyplneni vsech QRobjektu v rbDetail
a pak uz jen staci vyvolat nekde v programu QuickRep.Print a je to.

A ja bych se zase chtel zeptat vsech jak nejlip tisknout nekolik Jpegu tak aby nebyla
tak hrozna casova prodleva jako pri tisku v Quickreportu?

----- Original Message -----
From: dusan
To: 'Delphi, Konference'
Sent: Thursday, December 09, 1999 3:55 PM
Subject: tisky


Vazeni, poradte mi, prosim, jakym zpusobem mohu vytisknout obsah formulare, resp. jenom panelu (TPanel) umisteneho ve formulari. Protoze moje znalosti Delphi jsou zatim male, privital bych i jednoduchy prikladek. A dale bych potreboval poradit, jak vytisknout obrazek (i s moznosti upravy jeho velikosti, aby se vesel na tistenou stranku), ktery je ulozen na disku (*.JPG), a k nemu pripojit (dotisknout) doprovodny text.

Dekuji za kazdou radu, Dusan

Databaze a sireni + par drobnosti

[*] Martin Pe�ek <pesek.martin(zv)mymail(tec)cz> - 10.12.1999 21:02:45

Zdravim !!!

1. Jednou se tu objevilo, ze BDE se muze sirit jenom pomoci InstallShieldu, kterej je dodavanej s Delphi. Mam program, kterej pouziva Paradox 7. Jak ho mam vsak sirit ? Na PC, kde jsou nahrany Delphi to de spustit, ale pokud to nainstauluju nekam jinam, tak mi to hlasi chybu (neco s ti databazovym souborem). Musi byt databazovy soubor v adresari, kde jsem programoval program ?

2. Jak mam softwarove vypnout muj skenr ? Mam UMAX Astra 1220S a nema vypinac. To by tak ani nevadilo, ale pri (re)startu se mi vzdy zapne a trva cca 30 minut nez se vypne.

3. A pak tu mam problem s ikonkama v Delphi 4. Vim, ze se to tu uz parkrat objevilo, ale nic mi nepomohlo. Vymenil jsem drivery a nic. A ty ikonky jsou spatne zobrazeny, grid mrizka neni svetle seda, ale cerna a u TabSheet, kdyz dam HotTrack na true, tak se barva neni tmave modra, ale svetle modra. Mam Riva TNT 128/128ZX.

Mno a to je tak vcelku vsechno. Predem dik za radu. Cau Martin. /======================\
/ pesek.martin(zv)mymail(tec)cz \
/-------------------------------------------------\
<---<([ Martin Pesek ] [ Gamemaker ])>--->
\-------------------------------------------------/
\ www.mujweb(tec)cz/www/gusman /
\======================/

Oprava chybajucich alebo poskodenych indexov

[*] Ondrej Jaura <jaura(zv)datalock.sk> - 10.12.1999 23:15:41

Zdravim :)

Odkazy alebo navod, ako zabezpecit v programe opravu indexov pre dBase
tabulky...

Vhodna reakcia by bola vhodna taka, ako sa chova Database Desktop -
proste "vymaze" z tabulky indexy, teda tabulka sa uz viac na indexy
neodkazuje, co potom umoznuje pomocou jednoducheho prikazu Table.AddIndex
pridat index.

Vopred dakujem za zachranne koleso :)

Ondrej
------
Ondrej Jaura
Datalock a.s.
jaura(zv)datalock.sk
------ :)

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