Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
docasny index na C/S databazi (resp.FF) bez Query
[*] Ing. Jaroslav �ke��k - 29.8.1999 22:20:16
>
> Dotaz znel na FlashFiler. A FlashFiler je databaze typu Client/Server,
> ktera je stejne bezpecna jako SQL Server, podporuje opravdove
> transakce a transakcni log. Integrita je 100% zajistena, pokud
> uzivatel pouziva transakce. Jen to neumi SQL (kdyz nepocitam ruzne
> freewarove nadstavby nad FlashFiler, ktere to trochu umi). A nema
> ulozene procedury a triggery. Nicmene na serveru bezi FlashFiler Server,
> ktery se vyhradne stara o databazi a klienti davaji pokyny. Nejedna
> se tedy o sdileni tabulek.
To jsem prehledl. FlashFiler neznam, tak to nemohu posoudit. Verim, ze je to
dobry. Asi je to spis muj problem, ale ja bych si nektere veci bez SQL uz
neumel predstavit. Jestli je ovsem trideni mozne jen pomoci indexu, tak je
to trochu nemotorne. Indexy provadim jen na klicove polozky nebo z duvodu
optimalizace na nektere polozky podle nichz se casto vybira nebo tridi.
Docasne indexy spise zdrzuji. Pokud se vytvareji stale indexy a kdyz jich je
hodne a ma-li je system odrzovat stalre aktualni, pak se tim databaze
nafukuje a tez zpomaluje. Skoda, ze tam to SQL nepridelali. V popisovanem
pripade bych asi dal prednost docasnym indexum. Pokud jsou vybery male, mene
frekventovane a vice se lisi, pak jsou docasne indexy vhodnejsi.
Dulezite je, aby v takovem pripade doslo k indexovani jen vybranych dat
posilanych na klienta a nikoliv cele tabulky na serveru.
Jaro
ADO + D5
[*] Lukas Voborsky <xvobl03(zv)sorry.vse(tec)cz> - 29.8.1999 23:03:31
On Fri, 27 Aug 1999, Zbysek Hlinka wrote:
> To je pravda, ale to se tyka i sekce protected v jedne unite. V
> ramci unity mohu vesele sahat i do cizi private sekce, coz je pekny
> gulas. Velice se tim sice zjednodusi prace uvnitr unity, ale nadela
> to binec mimo. Myslim, ze definice private a protected by mela byt
> jednoznacna vsude.
Ahoj, s tim by se, myslim, dalo polemizovat. Mam pocit, ze cecko snad
umoznuje deklarovat nejaky tridy jako friend a ty si pak muzou sahat i do
podobnych sekci, jako je private a protected.
Za stavajici situace, kdy tohle packal neumoznuje, pouzivam alespon to, ze
tridy, po kterych chci, aby byly "friend" davam do jedne unity. Jinak je
nacpu do ruznych unit a muzu s uspechem pouzit private a protected.
(Uznavam, ale ze to neni idealni, nebot muze strasne narust pocet souboru
projektu :-o )
Lukas
-==============================================================-
mailto: voborsky(zv)menza.mff.cuni(tec)cz ICQ: 21084410
www: http://come.to/voborsky tel. 8551040-9 l. 393
-==============================================================-
docasny index na C/S databazi (resp.FF) bez Query
[*] Ing. Jaroslav �ke��k - 29.8.1999 23:23:29
Ten FlashFiler je free ?
Jaro
> Puvodni zprava, kterou napsal Ing. Jaroslav �ke��k dne 29 Aug 99,:
>
> > To jsem prehledl. FlashFiler neznam, tak to nemohu posoudit. Verim, ze
je
> > to dobry. Asi je to spis muj problem, ale ja bych si nektere veci bez
SQL
> > uz neumel predstavit. Jestli je ovsem trideni mozne jen pomoci indexu,
tak
>
> Ale to ja si bez SQL take nektere veci nedokazu predstavit... Jenze
> jsou aplikace, ktere SQL nepotrebuji, a jdou udelat bez nej. Takovych
> aplikaci je kolem nas spousta. Ja sam pouzivam SQL Server na to,
> co SQL Server vyzaduje. Ale pokud potrebuji udelat jednouduchou a malou
> aplikaci na tisk danovych dokladu za hotove pro mamu, ktera si proste
> SQL Server kvuli tomu kupovat nebude, pak to udelam jednoduse
> ve FlashFileru na tabulce. A pokud budu delat tisk samolep na jidlo,
> kde mam jen v jedne tabulce soupis carovych kodu + nazvy + slozeni,
> tak to prece take nebudu honit pres SQL Server... Naproti tomu mi
> na Internetu jede aplikace FlashFiler s pomerne rozsahlou databazi
> prispevku, na kterou se mohou jednoduse napojit prispevovatele pres
> TCP/IP a pridat prispevek, ktery se pak napublikuje na WWW server.
>
> S pozdravem
> Petr Zahradnik, pocitacovy expert
>
> ==============================================================
> === 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
>
docasny index na C/S databazi (resp.FF) bez Query
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 29.8.1999 22:46:19
Puvodni zprava, kterou napsal Ing. Jaroslav �ke��k dne 29 Aug 99,:
> To jsem prehledl. FlashFiler neznam, tak to nemohu posoudit. Verim, ze je
> to dobry. Asi je to spis muj problem, ale ja bych si nektere veci bez SQL
> uz neumel predstavit. Jestli je ovsem trideni mozne jen pomoci indexu, tak
Ale to ja si bez SQL take nektere veci nedokazu predstavit... Jenze
jsou aplikace, ktere SQL nepotrebuji, a jdou udelat bez nej. Takovych
aplikaci je kolem nas spousta. Ja sam pouzivam SQL Server na to,
co SQL Server vyzaduje. Ale pokud potrebuji udelat jednouduchou a malou
aplikaci na tisk danovych dokladu za hotove pro mamu, ktera si proste
SQL Server kvuli tomu kupovat nebude, pak to udelam jednoduse
ve FlashFileru na tabulce. A pokud budu delat tisk samolep na jidlo,
kde mam jen v jedne tabulce soupis carovych kodu + nazvy + slozeni,
tak to prece take nebudu honit pres SQL Server... Naproti tomu mi
na Internetu jede aplikace FlashFiler s pomerne rozsahlou databazi
prispevku, na kterou se mohou jednoduse napojit prispevovatele pres
TCP/IP a pridat prispevek, ktery se pak napublikuje na WWW server.
S pozdravem
Petr Zahradnik, pocitacovy expert
==============================================================
=== 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
SQL rozsireni pro FlasFiler (FF)
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 29.8.1999 22:48:11
Puvodni zprava, kterou napsal Ing. Petr �vejda dne 29 Aug 99,:
> Skocil jsem tam a zjistil, ze totez rozsireni SQL pod nazvem
> FFSQLExtension je i ve Vasi Kolekci. Uz jsem ho zkousel instalovat, lec
> marne. Popisi Vam chybu:
>
> Spustim pruzkumnika a dvojklepnu na soubor FE106_D40.DPK - spusti se
> Delphi s balickem. Klepnu na Compile a oznami mi to, ze vyzaduje
> F150SD40.dpk, soubor ktery na disku pocitace nemam (ani podobny). Dal se
Je potreba mit nainstalovane nejdrive TFFServer.zip, pak jeste
TFFServerUpdate.zip a pak teprve FFSQLExtensions.zip.
S pozdravem
Petr Zahradnik, pocitacovy expert
==============================================================
=== 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
Oracle8 a ODBC
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.8.1999 00:12:28
Jan Poslusny wrote:
>
> Zdravim,
> mozna se vam bude zdat, ze s tim porad otravuju, opravdu bych ale nejakym
> zpusobem (odkaz na web, literaturu, rada, soukr. e-mail) potreboval ziskat
> zkusenosti s pristupem k Oracle8 pres ODBC z D4 Prof. Zopakuji puvodni
> problem:
Ahoj,
Dival jsi se jestli o tom neni neco na BDE DevSupport ?
http://www.borland.com/devsupport/bde/
--
Petr Vones, amatersky programator
Web aplikace pomoci Delphi
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.8.1999 00:12:45
"Burger, Tomas" wrote:
> Nejsem si jist, ze kdybych byl sam sobe webmasterem, ze bych si to
> povolil... :-)) Obcas je dobre mit paranoidniho webmastera... Nejde ani tak
> o duveru k BDE jako takovemu, spis o prosty (bohuzel vice mene komercni)
> duvod, ze se mi zda, ze na MS op. systemu behaji MS technologie lepe (ted se
> zvedne vlna protestu... :-) ) - proto padla nakonec volba na ADO a ASP...
To je pomerne logicky, jen Microsoft tusi co se v tom systemu odehrava a
diky jeho "vynikajici" dokumentaci nikdo podobnou moznost nema. Dopada to
tak, ze ostatni jsou nekdy tak o jeden krok zpatky. Jinak (aby to nebylo
tak uplne offtopic :-) tak na BDE bylo postaveno patrne treba eCity (to
podle chybovych hlaseni EDBEngineError exception v jeho zacatcich ...)
Jinym prikladem Delphi & www muze byt i WebHub (http://www.href.com).
--
Petr Vones, amatersky programator
Resize
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.8.1999 00:12:35
> Petr Reichl wrote:
>
> V procedure Resize u formulare mam aby resizoval polozky. V pripade, ze z
> maximalizovaneho stavu prejdu do normalniho tak se mi dole nevykresluje
> StatusBar. Pritom s nim nijak neoperuji, prizpusobuje se sam, ale
> nevykresluje.
Ahoj,
Nemas spis namysli kod v udalosti OnResize ? Jinak tezko rict, mozna by
pomohla mala ukazka toho kodu (a uvedeni verze Delphi :-).
--
Petr Vones, amatersky programator
Plugin aplikace v Delphi
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.8.1999 00:19:21
Ahoj,
Cas od casu se zde probira problematika modularnich aplikaci v Delphi.
Podle mne je asi nejvyhodnejsi pouzit dynamicke zavadeni balicku. Bohuzel
v helpu se toho o tom moc nedoctete (mala zminka v D4 je pod heslem
UnloadPackage kde se dostanete na odkaz "Dynamically loading packages").
Jediny priklad od Borlandu je ke stazeni tady:
http://www.borland.com/devsupport/delphi/downloads/index.html
Proc o tom ale pisu. Neco jsem hledal a jak uz to byva nasel neco uplne
jinyho :-) Tady je pomerne vycerpavajici material ohledne dynamickeho
nahravani balicku s priklady pro Delphi i C++ Builder:
http://www.obsof.com/DL613.html
--
Petr Vones, amatersky programator
pristup na ftp.mlp.cz
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.8.1999 00:19:36
"I.C. - Delphi Support" wrote:
> ftp.mlp(tec)cz -
> - Me to slape jako hodiny.
> PS: Peknej fofr ten ftp server ( jooo Cesnet ).
> Podle myho Route Traceru to na ftp.mlp(tec)cz mam pres sest serveru. ( hec :-) )
Me to bezi taky bez problemu, pouzivam FTPort klient. Traceroute primo od
providera vypada takhle: (jooo VOL :-)
traceroute to weverka.mlp(tec)cz (194.108.208.7), 30 hops max, 40 byte packets
1 nix-e (195.250.155.7) 2.845 ms 3.273 ms 2.404 ms
2 ra-nix.ces.net (194.50.100.10) 2.558 ms 2.290 ms 4.420 ms
3 nix-rab-eth.cesnet(tec)cz (194.212.211.237) 4.964 ms 5.756 ms 4.253 ms
4 rac.cesnet(tec)cz (194.108.60.2) 5.025 ms 7.485 ms 10.015 ms
5 194.50.6.228 (194.50.6.228) 7.181 ms 8.842 ms 7.706 ms
6 mkprg-gw.anet(tec)cz (194.108.189.10) 28.103 ms 28.464 ms 24.176 ms
7 weverka.mlp(tec)cz (194.108.208.7) 28.952 ms 24.971 ms 23.724 ms
--
Petr Vones, amatersky programator
ADO + D5
[*] Erik Salaj <winsoft(zv)napri.sk> - 30.8.1999 00:19:33
> Co se tyka komponent, musim trvat na tom, ze zdrojaky maji
> _doplnovat_ dokumentaci. Jestlize se rozhodnu menit jejich vnitrek,
> treba manipulaci s daty, musim samozrejme vedet co delam a proc
> to delam. Je to obdobne jako se zapalkami - v rukou deti je to
> nebezpecny zivel, v rukou zkusenych je to velmi uzitecny
> pomocnik.
V poriadku, asi mame na vec rozdielne nazory ;-).
> Nektere tridy jsou spatne napsane - netroufam si odhadovat, zda je
> to zamer nebo nedbalost diky podvojne definici deklaraci private a
> protected - pak nezbyva nez zkopirovat a modifikovat celou unitu.
> Coz je ovsem koncepcni chyba, protoze s takto napsanymi tridami
> neudelas nic ani v pripade, ktery by sis pral ty, budes-li je chtit
> pouzit pro dedicnost.
To je ale realita a problem (aspon pre mna ;-) ). Okrem toho existuju
aj ine problemy dedicnosti (napr. problem krehkych bazovych tried,
problem dedenia z nie inprocess objektu, ...), ktore sa ale prejavia
hlavne u distribuovanych systemov. COM tieto problemy riesi
pomocou containment/delegation (vlastnictvo/delegovanie)
mechanizmu.
> > Super, az na to, ze v buducich verziach Windowsu to moze fungovat
> > uplne inac, nedokumentovane funkcie chybat, .... (takze po kazdej
> > novej Windows verzii znova studovat zdrojaky... ;-) )
>
> Tohle musim delat v Delphi i v pripade nekterych dokumentovanych
> veci. Jasny priklad - jina definice typu real v Delphi 4 oproti verzim
> predchozim.
Predpokladam, ze o zmene si sa nedozvedel z Delphi zdrojakov
ale z dokumentacie.
> Zkousel jsi to nekdy? Jak zjistis bez debugovani, kde je chyba,
> napriklad ve spojeni TQuery + TDBgrid + SQL databaze + pridavani
> novych zaznamu v gridu? Je to pouze neskodna chyba zobrazeni v
> gridu, nebo horsi chyba razeni zaznamu v Query (ci jeste hloubeji a
> tedy i v Table), nebo jeste horsi chyba, ktera muze ovlivnit i data v
> databazi? A proc se projevuje jen u SQL databazi a ne u Paradoxu?
Chybu skusim zistit tak, ze otestujem kazdy z komponentov najprv
samostatne. Pokusim sa urobit co najjednoduchsiu aplikaciu
v ktorej sa chyba vyskytuje a poslem to vyrobcovi. Nebudem predsa
studovat vsetky zdrojaky od VCL, Delphi, databazoveho servera,
az po Windows (a Windows drivery) aby som zistil presnu instrukciu,
kde je chyba.
Nedavno som testoval s Adonisom CodeBase provider. Bez jeho
zdrojakov, bez zdrojakov OLE DB atd. a nebol velky problem
zistit zopar chyb. Vyrobcovi, ktory ma o testovanie poziadal,
som potom poslal male aplikacie (boli to HTML stranky s VBScriptom),
kde sa tato chyba vyskytovala, aby to mohol opravit. Nevidim
dovod, preco by som mal stracat cas studovanim cudzich
zdrojakov, ked to nie je vobec potrebne.
> Po dvou az trech instalacich komponent se nutne stanes
> zkusenym v tomto smeru. Jinak je vhodne pripojit readme.txt, kde
> na 4 radcich popises celou instalaci do nejmensich detailu.
Postup instalacie na 4 riadkoch nepovazujem za jednoduchy ;-).
> > 1. Moze sa lahko stat, ze nebudes schopny prepisat niektoru metodu
> > komponentu, pretoze nebude v predkovi virtualna. Povedzme by
> > destruktor nebol virtualny, ako by si to vyriesil?
>
> :-) Prohlasil bych takovouhle zasadni vadu za spatne napsanou
> tridu.
Jednoduche ale malo uzitocne.
> > V COM treba iba implemetovat interface. Ak teda nie som spokojny
> > s TStringList-om, implementujem iny. V tom mojom novom TStringListe
> > mozem vytvorit a pouzivat aj ine objekty, povedzme vyuzijem povodny
> > TStringList (ak to povazujem za vyhodne) a to aj bez jeho zdrojakov
> > samozrejme, upravim si iba destruktor mojho noveho komponentu. Ak to
> > neide upravit s vyuzitim povodnej implementacie, tak stale mozem
> > pouzivat ine komponenty povedzme nejaky abstraktnejsi TList a ak ani
> > to mi nevyhovuje, tak si musim napisat uplny TStringList sam.
>
> Totez ve VCL.
Vo VCL k jednemu interface musi byt prave jedna implementacia, inac
to neprelozis. Ako si napriklad mozem urobit dve implementacie pre ten
isty interface objektu zasobnika? Povedzme, nech interface objektu je:
type TStack = class
public
function Empty: Boolean;
procedure Push(Value: Integer);
procedure Pop;
function Top: Integer;
end;
> > V kazdom pripade VZDY mam moznost si napisat vlastny TStringList tak,
> > ze ho mozem pouzit namiesto povodneho TStringListu (vo VCL toto mozne
> > nie je).
>
> Ja s tebou nesouhlasim, zkus tedy uvest konkretni priklad.
> Porovnej samozrejme na nejake VCL tride a nejakem interface.
Tu je:
// INTERFACE
type
IStack = interface
procedure Push(Value: Integer);
end;
// IMPLEMENTACIA 1 (povedzme povodna vo VCL)
type
TStack1 = class(TInterfacedObject, IStack)
procedure Push(Value: Integer);
end;
procedure TStack1.Push(Value: Integer);
begin
ShowMessage('Stack1: Push ' + IntToStr(Value));
end;
// IMPLEMENTACIA 2 (povedzme moja nova implementacia)
type
TStack2 = class(TInterfacedObject, IStack)
procedure Push(Value: Integer);
end;
procedure TStack2.Push(Value: Integer);
begin
ShowMessage('Stack2: Push ' + IntToStr(Value));
end;
> Co mas na mysli tim "zo specifikacii interfacu musi byt jasne, ci
> sa objekty uvolnuju alebo nie"? V OLE DB narazim kazdou chvili
> na pripady, kdy urcita metoda vraci (za urcitych okolnosti, tedy ne
> vzdy) nejaky dynamicky blok dat, a o jeho uvolneni se pak musim
> starat ja. A to jeste nekdy sam, nekdy pomoci jine metody
> stejneho (nebo jineho) interface. Popis se dovim vyhradne z
> dokumentace. Ze jde tohle psat v ruznych prostredcich, je veci
> binarniho ulozeni. Ovsem i za tohle se plati podstatne vyssi rezii pri
> pristupu k temto tridam.
Musim predsa presne vediet, ako mam dane rozhranie pouzivat (co
prislusny objekt robi). Nie je jedno ci StringList svoje objekty
uvolnuje alebo nie (alebo ano?), musim to teda zistit z dokumentacie
(alebo to mam radsej hladat v zdrojaku?) a podla toho pripadne
uvolnit/neuvolnit tieto objekty sam (alebo ich uvolnovat/neuvolnovat
podla nalady ;-) ?).
> dokumentace. Ze jde tohle psat v ruznych prostredcich, je veci
> binarniho ulozeni. Ovsem i za tohle se plati podstatne vyssi rezii pri
> pristupu k temto tridam.
Rezia pristupu k metodam inprocess COM objektu odpoveda volaniu
virtualnej metody. Podla mna hlavnym dovodom, preco VCL je taka
aka je, je to, ze bola pisana este pre Delphi 1 a odvtedy sa vyrazne
nezmenila.
> Zapominas na cely velky balik COM objektu, ktery s sebou musis
> tahnout v pocitaci a ktere ten tvuj objektik potrebuje. VCL se proste
> natahne cela do programu, takze nepotrebujes mit nainstalovane
> kupy dalsich komponent.
> Jestlize tedy zacnes stavet cosi na nejake COM knihovne, ktera
> neni standardne ve Windows, musis u zakaznika nainstalovat i tuto
> knihovnu.
Podpora COM je sucastou Windows. S aplikaciou samozrejme
potrebujem instalovat potrebne komponenty, co je vsak logicke
a inac sa to asi neda.
> V tom pripade by ses mel obratit spise na Inprise, ne na me.
Ak mi zvysi cas, tak nejake COM veci mam v plane robit (a predpokladam,
ze nie som sam). Mozno si to Inprise vsimne (u ADO im to trvalo asi rok a
pol od prvej verzie mojich komponentov) a zacne sa tomu venovat,
odhadujem tak v Delphi 7 ;-) . Ak ich dovtedy niekto nepredbehne.
Tipnem si, ze COOL bude postavene na COM+. Nievie niekto, ci ma
Delphi 5 nejaku podporu pre COM+?
Erik
TImageList, Windows 98 a 16 barev
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.8.1999 00:24:46
"Kriz Pavel, TDS" wrote:
>
> Vazeni,
> nikde jsem nenasel reseni problemu, ktery mi nadherne zablokuje spusteni
> aplikace.
> Bylo to testovano na vice pocitacich s Windows 98 (pod Win 95 to nedelalo) a
> vsude je to stejne. Pomuze jen nastaveni 256+ barev.
>
> Kompilovano pod Delphi 3.01
Ahoj,
Tusim ze se jednalo o nejaky problem v TImageList. Nicmene, je vsak
nutne v dobe videokaret s 8M RAM i vice pouzivat jeste 16ti barevne
rozliseni ? :-) Vzdyt uz kvuli pouzivani palet to musi zdrzovat pri
zobrazovani, nemluve o tom jak hnusne to vypada ...
--
Petr Vones, amatersky programator
Problem pri ReadFile z mailslotu
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.8.1999 00:24:59
Martin Bodlak wrote:
>
> Prostredi:
> D3Prof, Win95
>
> Problem:
> Pri pouzivani mailslotu pro komunikaci po siti se u vsech pocitacu deje
> pravidelne toto: pokud nejsou nainstalovany zadne sitove protokoly ani
> adaptery ani nic dalsiho sitoveho, nevrati se volani funkce ReadFile.
> Proste to na tom radku zastavi a visi nekde ve Windows; program dal
> nepokracuje. Toto cteni probiha v threadu a diky tomu se tento thread
> neukonci ani pri ukonceni programu (toto ovsem probehne OK). Pokud jsou
> nainstalovane sitove zalezitosti, jede vsechno jak ma.
Ahoj,
Pokud nekde pouzivas cekani v ReadFile, tak si muzes pomoci asynchronnim
ctenim (jak uz ti radil Petr Fejfar). Kdysi jsem ale chtel neco zkusit s
mailsloty a pak jsem je zavrhnul. Finta je totiz v tom, ze ve Win9x u nich
nelze pouzit prave overlapped I/O, viz MSDN Article ID: Q125717 :
SUMMARY
Windows 95 does not support overlapped operations on files, disk, pipes, or
mailslots, but does support overlapped operations on serial and parallel
communication ports. Non-overlapped file write operations are similar to
overlapped file writes, because Windows 95 uses a lazy-write disk cache.
Overlapped I/O can be implemented in a Win32-based application by creating
multiple threads to handle I/O.
> Pochopitelne ten mailslot ma regulerni handle (19), nikde neni zadna
> chyba. GetMailslotInfo vraci true, ... proste nevim, kudy dal.
A jaka je hodnota lpNextSize, neni tam nahodou MAILSLOT_NO_MESSAGE ?
Jinak, tady je nejaka mailslot komponenta (bez zaruky :-)
http://www.djernaes.dk/martin/
--
Petr Vones, amatersky programator
private nebo protected (Was: ADO + D5)
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.8.1999 00:30:20
Lukas Voborsky wrote:
>
> On Fri, 27 Aug 1999, Zbysek Hlinka wrote:
>
> > To je pravda, ale to se tyka i sekce protected v jedne unite. V
> > ramci unity mohu vesele sahat i do cizi private sekce, coz je pekny
> > gulas. Velice se tim sice zjednodusi prace uvnitr unity, ale nadela
> > to binec mimo. Myslim, ze definice private a protected by mela byt
> > jednoznacna vsude.
To je sporny, spis by se melo pri psani trid vice dbat na rozumne vyuzivani
private/protected. Private by melo slouzit predevsim jako misto pro uchovani
hodnot vlastnosti + prislusne Set/Get metody. Samozrejme pokud uz je uplne
nejhur, tak se da pristupovat i k polozkam v private sekci trid z jineho
unitu, ale je to tak na hranici (spise za ni) unosnosti ...
--
Petr Vones, amatersky programator
docasny index na C/S databazi (resp.FF) bez Query
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 29.8.1999 23:31:52
Puvodni zprava, kterou napsal Ing. Jaroslav �ke��k dne 29 Aug 99,:
> Ten FlashFiler je free ?
Jak to myslis free? Jako jestli je to freeware a nebo jestli
se pak siri zdarma? Prvni odpoved ne, druha ano. Musis si ho
koupit, ale pak muzes sirit sve aplikace i server zdarma,
pripadne si to muzes upravovat (jsou k tomu zdrojaky).
S pozdravem
Petr Zahradnik, pocitacovy expert
==============================================================
=== 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
Tak jde cas .... (Was: ADO + D5)
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.8.1999 00:41:31
Zbysek Hlinka wrote:
> Co se tyka komponent, musim trvat na tom, ze zdrojaky maji
> _doplnovat_ dokumentaci. Jestlize se rozhodnu menit jejich vnitrek,
> treba manipulaci s daty, musim samozrejme vedet co delam a proc
> to delam. Je to obdobne jako se zapalkami - v rukou deti je to
> nebezpecny zivel, v rukou zkusenych je to velmi uzitecny
> pomocnik.
Navic v _nekterych_ pripadech je vec srozumitelnejsi ze zdrojaku nez za
pomoci sahodlouhych popisu v dokumentaci. Jedno proste nelze oddelovat
od druheho. Pripomina mi to pomerne nestastny pristup z jineho oboru -
cislicove techniky. Zde se tvrdilo, ze integrovane obvody jsou cerna
skrinka a co je uvnitr neni dulezite, protoze jejich funkce je navenek
preci zcela jasne definovana. Jenze v praxi pri reseni problemu je tento
pristup naprosto nepouzitelny (na logicke obvody je treba se obcas divat
jako na analogove, protoze jejich implementace neni ciste "digitalni").
> > Super, az na to, ze v buducich verziach Windowsu to moze fungovat
> > uplne inac, nedokumentovane funkcie chybat, .... (takze po kazdej
> > novej Windows verzii znova studovat zdrojaky... ;-) )
> Tohle musim delat v Delphi i v pripade nekterych dokumentovanych
> veci. Jasny priklad - jina definice typu real v Delphi 4 oproti verzim
> predchozim.
Ano, pri kazde nove verzi Windows bude treba vse predelat. Bylo to tak
pri prechodu z 16bit na 32bit a bude tomu tak i nadale. Predstava, ze
za pomoci nejakeho idealniho navrhu pak jen vtipne skryjeme rozdily v
implemenentaci je pomerne iluzorni. Staci se podivat treba na prechod
z D1 do D2.
> > Ja viem ze skusenejsi programatori si vedia komponenty bez problemov
> > nainstalovat, ale v Delphi programuju (a chcu pouzivat komponenty) aj
> > ludia, ktori nie su profesionalnymi programatormi, povedzme robia
> > nejaky hardware a v Delphi si chcu pomocou komunikacnej komponenty
> > urobit k tomu nejaky software. Od takychto ludi denne dostavam maily
> > tykajuce sa instalacie. Na tom sa da urcite vylepsit velmi vela
> > (instalacia aj odinstalacia komponentov musi byt uplne automaticka,
> > spustenim jedneho EXE suboru alebo prikazu).
>
> Po dvou az trech instalacich komponent se nutne stanes
> zkusenym v tomto smeru. Jinak je vhodne pripojit readme.txt, kde
> na 4 radcich popises celou instalaci do nejmensich detailu.
Navic, programovani snad neni totez jako treba kupovani rohliku :-) takze
urcite zakladni znalosti se snad mohou vyzadovat. V tom je totiz tak trochu
problem dnesni doby, vse ma byt pokud mozno maximalne snadne a jednoduche.
Jenze, ono to vzdy nejde bez urcitych obeti, VCL je toho dobrym prikladem.
> > 1. Moze sa lahko stat, ze nebudes schopny prepisat niektoru metodu
> > komponentu, pretoze nebude v predkovi virtualna. Povedzme by
> > destruktor nebol virtualny, ako by si to vyriesil?
Mimochodem, jak by jsis predstavoval cely koncept OOP bez virtualnich
destruktoru.
> > V kazdom pripade VZDY mam moznost si napisat vlastny TStringList tak,
> > ze ho mozem pouzit namiesto povodneho TStringListu (vo VCL toto mozne
> > nie je).
>
> Ja s tebou nesouhlasim, zkus tedy uvest konkretni priklad.
> Porovnej samozrejme na nejake VCL tride a nejakem interface.
Tohle je spis tak trochu problem odlisnosti v koncepci OOP a COMu, ne ?
OOP je vice o "Object" a COM zase o "Component" ....
> > S ATL je mozne pomerne jednoducho vyrobit asi 35 kB
> > najjednoduchsiu ActiveX komponentu (da sa spakovat asi na 20kB do
> > cabu a automaticky instalovat z HTML stranky bez akehokolvek
> > programovania). U COM su naroky este daleko mensie.
>
> Zapominas na cely velky balik COM objektu, ktery s sebou musis
> tahnout v pocitaci a ktere ten tvuj objektik potrebuje. VCL se proste
> natahne cela do programu, takze nepotrebujes mit nainstalovane
> kupy dalsich komponent.
Pokud chces zmensit velikost daneho EXE tak prece muzes pouzit balicky.
Predstav si, ze vsechny .BPL jsou neco jako ATL (no, trosku to pokulhava
uznavam :-) a mas totez. Podobne je to i s aplikacemi z MSVC++, jiste ze
EXE je male a neni k nim treba nic moc instalovat, proc tomu tak je zahy
zjistis pri pohledu do adresare WINDOWS\SYSTEM.
> > Presne to by mal Borland podla mna v Delphi vyriesit, pretoze to
> > mimo Borlandu nikto iny v Delphi vyriesit nemoze (zato rozne
> > ADO komponenty, localizacia, atd. uz su davno vyriesene).
>
> V tom pripade by ses mel obratit spise na Inprise, ne na me.
Staci se podivat do prislusnych borland.public.* newsu, tam se takoveto
veci probiraji stale (dokola).
> > Je celkom realne, ze s takymito moznostami pride v kratkom case
> > Microsoft (podla mna investoval do Borlandu koli technologiam
> > z Delphi, ako su dvojcestne vizualne programovanie, ktore chce
> > pouzit v novom COOL nastroji) a Borland sa polozi. A Microsoft
> > samozrejme zase poriadne zarobi ale v tomto pripade urcite nie
> > necestnou konkurenciou, ci marketingom ale preto, ze dokaze
> > strategicky rozmyslat. Ale budme optimisti.
Uvidime, nevim sice nic o COOL nastroji, ale znacny podil na uspechu
Delphi ma myslim soucasna podoba ObjectPascalu. Pokud by tedy chteli
jit touto cestou, museli by bud koupit OP, presvecdit lidi ze C++ je
vlastne docela hracka nebo v posledni rade (coz by bylo asi netezsi),
ze VB je plnohodnotny OOP jazyk :-) Pripadne modni trendy typu COM+
lze preci dale doplnit i do OP.
--
Petr Vones, amatersky programator
docasny index na C/S databazi (resp.FF) bez Query
[*] Ing. Jaroslav �ke��k - 30.8.1999 00:55:59
Myslel jsem zpusob sireni toho serveru
Dik
Jaro
>
> > Ten FlashFiler je free ?
>
> Jak to myslis free? Jako jestli je to freeware a nebo jestli
> se pak siri zdarma? Prvni odpoved ne, druha ano. Musis si ho
> koupit, ale pak muzes sirit sve aplikace i server zdarma,
> pripadne si to muzes upravovat (jsou k tomu zdrojaky).
>
>
> S pozdravem
> Petr Zahradnik, pocitacovy expert
>
> ==============================================================
> === 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
> Finddialog
[*] Menfy <menfy(zv)iol(tec)cz> - 30.8.1999 01:15:11
Ahoj nevite nahodou nekdo, jak se pote co neco najdu pomoci
Finddialogu v DBGridu premistim do policka v dbgridu kurzorem ?
Dik
_______
Menfy design - vse pro internetovou prezentaci...
Filip Rejlek
tel.: 0602 / 816 151
e-mail : menfy.design(zv)telecom(tec)cz
menfy(zv)iol(tec)cz
web : http://web.iol(tec)cz/menfy
Serazeni v dbgridu
[*] Menfy <menfy(zv)iol(tec)cz> - 30.8.1999 01:15:11
Hi all, nevite nekdo, jak udelat, aby se mi recordy v dbgridu radili
podle hodnoty jednoho ze sloupcu ? Treba podle ciselne hodnoty
nebo podle abecedy
_______
Menfy design - vse pro internetovou prezentaci...
Filip Rejlek
tel.: 0602 / 816 151
e-mail : menfy.design(zv)telecom(tec)cz
menfy(zv)iol(tec)cz
web : http://web.iol(tec)cz/menfy
FlashFIler a JPEG obrazky
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 30.8.1999 00:43:27
Ahoj,
nekdo chtel vedet, proc nejsou do tabulky FlashFileru
do pole BLOB nacitat JPEG obrazky. Tak jsem se na to
dival a jde to. Problem neni ve FlashFileru, ten do
BLOBu nacte vsechno. Problem je v DBImage, kterym se
to pak zobrazuje. Me zjisteni - pokud nekdo zkousite
nacist do tabulky obrazek JPEG a zaroven mate aktivni
dataset a na nem naveseny DBImage pro zobrazeni tohoto
pole, bude to hlasit hned chybu a vubec nic to nenacte.
To dela ten DBImage. Vypnete si dataset a pujde to.
Samozrejme to nezobrazi, protoze DBImage neumi JPEG.
Na ten DBImage jsem se ptal Petra Vonese a on potvrdil,
ze to nelze a ze se to musi udelat pres normalni
nedatabazovy Image a do nej to vzdy z tabulky nacist.
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
DB grid a barvy polozek
[*] Zbynek Ceska <zbyces(zv)physics.muni(tec)cz> - 30.8.1999 06:40:19
Zdravim vsechny v konferenci. Mam malou prosbu. Nevite nekdo:
JAK VYTVORIT V DBGRIDU V D4 RUZNE BARVY NA RUZNYCH RADCICH ?
Pro vysvetleni. Mam tam polozky ( seznam cinnosti) a potrebuji, aby se
cinnosti stare mene nez 5 zobrazovali zelene, cinnosti budouci cervene a
zbytek cerne. Proste hledam neco jako " DBGrid1.Rows.Font.Color:=clRed "
ale tam nic takoveho neni.
Pokud si nekdo muyslite, ze to z principu nejde, taky mi dejte
vedet. Vymyslim jine "zvyraznovani".
MOC PROSIM O POMOC.
Dekuji
Zbynek Ceska.
*************************************************************************
** Mgr. (MSc.) Zbynek Ceska ** http://www.sci.muni(tec)cz/~zbyces ******
** Plasma Physics ** High Technology Physics ** Microwave Physics **
*************************************************************************
Plugin aplikace v Delphi
[*] Ing. Miroslav Ondrisek, BONNEL TECHNOLOGIE, s.r.o. <bonnel(zv)telecom(tec)cz> - 30.8.1999 07:26:24
To je v p... Petre, ty nejenze odpovidas skoro na vsechno, ty uz dokonce
odpovidas driv, nez napisu mail s otazkou !!!! To snad uz neni pravda,
nesly by Petrovi poslat rovnou Delphi 6 ? :-)))
Mira
----- P�vodn� zpr�va -----
Od: Petr Vones <pvones(zv)mbox.vol(tec)cz>
Komu: Konference Delphi <delphi-l(zv)fwd(tec)cz>
Odesl�no: 30. srpna 1999 0:19
P�edm�t: Plugin aplikace v Delphi
> Ahoj,
>
> Cas od casu se zde probira problematika modularnich aplikaci v Delphi.
> Podle mne je asi nejvyhodnejsi pouzit dynamicke zavadeni balicku.
Bohuzel
> v helpu se toho o tom moc nedoctete (mala zminka v D4 je pod heslem
> UnloadPackage kde se dostanete na odkaz "Dynamically loading
packages").
> Jediny priklad od Borlandu je ke stazeni tady:
>
> http://www.borland.com/devsupport/delphi/downloads/index.html
>
> Proc o tom ale pisu. Neco jsem hledal a jak uz to byva nasel neco
uplne
> jinyho :-) Tady je pomerne vycerpavajici material ohledne dynamickeho
> nahravani balicku s priklady pro Delphi i C++ Builder:
>
> http://www.obsof.com/DL613.html
>
Ukonceni programu
[*] Miroslav �ipel <Miroslav.Cipel(zv)oku-tu(tec)cz> - 30.8.1999 06:29:35
podivej se do mastapp.dpr v c:\program files\borland\delphi 3\demos\db\mastapp
M.
----- P�vodn� zpr�va -----
Od: Petr Reichl
Komu: ListServ - Delphi
Odesl�no: 27. srpna 1999 13:53
P�edm�t: Ukonceni programu
V projektu je definovan jeden formular jako hlavni a ten kdyz zavru tak skonci
cely program.
V pripade, ze potrebuji zobrazit uvodni logo a do pozadi vlozit nahravani hlavniho
formulare a pote logo ukoncit tak skonci cely program. Jak to mam udelat nejakym
inteligentnim zposubem (ne zpusobem skryt okno s logem visible:=false).
.
.
Web aplikace pomoci Delphi
[*] Milan N�mec <nemec(zv)goldcard(tec)cz> - 30.8.1999 07:34:24
----- Original Message -----
From: Burger, Tomas <tomas.burger(zv)sap-ag.de>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, August 27, 1999 12:41 PM
Subject: RE: Web aplikace pomoci Delphi
> > -----Original Message-----
> > From: Milan Nemec [mailto:nemec(zv)goldcard(tec)cz]
>
> > "Vyzva / odpoved Win NT" a pak heslo mas zasifrovane standardnim
> > zpusobem pouzitym v NT (tusim ze MD4), takze heslo bude zasifrovane
> To vis nebo se domnivas...?
Cetl jsem, ze to je MDx (urcite Lars Klander - Hacker Proof). Tusim, ze tam
bylo napsano MD4 (na 99%).
> Ja jsem si skoro jist, ze jestli pouzivas "chalenge/response" nebo "basic"
> se lisi jen tim, jak se to zpracovava na serveru...
> Kudy a jak jde ta autorizace via http, o tom to nic nerika...
Z dokumentace PWS:
Ov��en� V�zva/odpov�i Windows NT, kter� v sou�asn� dob� podporuje pouze
Microsoft Internet Explorer verze 2.0 a vy���, hesla chr�n� a umo�ouje tak
bezpe�n� p�ihl�en� po s�ti.
Takze rika.
> Ja osobne pouzivam basic a autorizaci na serveru pres DAF. https
nepouzivam,
> protoze nejde o zadna extra hakliva data... Ale kdo chce, muze zkusit
> prorazit treba na http://www.delphi(tec)cz/admin/ - myslim, ze se to
nepodari...
> :-))
>
To je jasne, ze protoze nesedim mezi klientem a serverem, tak heslo nemuzu
zachytit, ale vsichni kteri jsou na ceste mezi tvym prohlizecem a Web
serverem
to mohou bez problemu zjistit.
> Tomas
Serazeni v dbgridu
[*] Jan �ebel�k <honza(zv)haes(tec)cz> - 30.8.1999 07:45:21
Treba na OnTitleClick
Pretridit ja treba dataset, ktery lezi pod gridem:
(DBGrid.DataSource.DataSet as TTable).IndexFieldNames:=Column.FieldName;
(DBGrid.DataSource.DataSet as TQuery).SQL:=' ... ... ... order by '+Column.FieldName;
DBGrid ma taky SelectedField.
Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 931, 692 569, 0601 20 30 84
=========================================
----------
> Odes�latel: Menfy <menfy(zv)iol(tec)cz>
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Serazeni v dbgridu
> Datum: 30. srpna 1999 1:15
>
> Hi all, nevite nekdo, jak udelat, aby se mi recordy v dbgridu radili
> podle hodnoty jednoho ze sloupcu ? Treba podle ciselne hodnoty
> nebo podle abecedy
> _______
>
> Menfy design - vse pro internetovou prezentaci...
> Filip Rejlek
> tel.: 0602 / 816 151
> e-mail : menfy.design(zv)telecom(tec)cz
> menfy(zv)iol(tec)cz
> web : http://web.iol(tec)cz/menfy
> SQL rozsireni pro FlasFiler (FF)
[*] Pavel ZIDEK <kopr(zv)kopr(tec)cz> - 30.8.1999 07:53:20
Koukni na
http://www.dsystems.co.uk/freecomponents.html
Ja v SQL nejedu, takze nevim jestli je to OK
Pavel ZIDEK
----------
Odes�latel: Ing. Petr �vejda <lingvista(zv)lingvista(tec)cz>
Komu: DELPHI forum <delphi-l(zv)fwd(tec)cz>
P�edm�t: SQL rozsireni pro FlasFiler (FF)
Datum: 29. srpna 1999 17:50
Potrebuji (pekne prosim) link na stazeni nejakeho solidniho SQL rozsireni jinak vynikajiciho FlashFileru. Mam FF verzi 1.53 a D4 Prof. a toto rozsireni musi s FF fungovat :-)))))
S pozdravem
Ing. Petr Svejda, software specialist
____________________________________________
|
| Neolit system, software developer
| Stankova 215, Telc, tel: (066) 724 39 34
| mobil: 0603 214 901, fax: 0603 214 902
| lingvista(zv)lingvista(tec)cz, http://www.lingvista(tec)cz/ (Delphi FAQ)
|____________________________________________
Max a min rozsah promenne
[*] Pavel ZIDEK <kopr(zv)kopr(tec)cz> - 30.8.1999 07:59:53
Zdravim,
Nevim kde najit min a max hodnoty typu napr. integer.
Problem je, ze to potrebuji za behu programu, kdy nevim o jakou promennou se jedna v DB. Jakmile dojde k preteceni, DB zahlasi ze jde o chybu, ale ja bych potreboval tento rozsah kontrolovat jeste pred kontrolou DB.
Doufam, ze jsem se vyjadril srozumitelne
Diky za odpoved
Pekny den (rano, vecer i noc) preje
~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
KOPR software Pavel ZIDEK voice 069 / 66 02 156
mailto:kopr(zv)kopr(tec)cz http://www.kopr(tec)cz/w-delphi.htm http://www.kopr(tec)cz
~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~Pruzkum
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 30.8.1999 08:07:54
> -----Original Message-----
> From: Zbysek Hlinka [mailto:zhlinka(zv)login(tec)cz]
> Sent: Friday, August 27, 1999 7:57 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Pruzkum
>
>
> Ahoj,
>
> v navaznosti na debaty z posledni doby me napadlo udelat mensi
> pruzkum. Zkusim zde vymyslet pro zjednoduseni jakysi dotaznik.
> Odpovidejte prosim na muj soukromy majl (kvuli zahlceni teto
> konference a kvuli ovlivnovani navzajem), ja z toho pak udelam
> souhrn, ktery zverejnim. Za souhrn pak prilepim i jednotlive
> odpovedi (zkracene o balast), aby si kazdy mohl zkontrolovat, zda
> jsem vysledky nezkreslil. Predpokladejme, ze pruzkum bude mit i
> pro nas tim vetsi vyznam, cim vice lidi odpovi.
>
> Jako kazdy dotaznik, i tento jiste bude spatne sestaven. Proto je
> mozne zvolit i vice nebo zadnou odpoved, je mozne i dopsat co v
> dotazniku bude chybet.
>
> 1. Pro vyvoj aplikaci pouzivam nejcasteji:
PowerBuilder
MS Visual J++
Plain text editor
>
> 2. V Delphi vyvijim aplikace:
> Komercni, na prodej mimo firmu
> Pro svou firmu
> Shareware, freeware
> Pouze pro sebe
Testovani Delphi - pro svou firmu
>
> 3. Trida aplikaci, kterou nejcasteji resim:
Databazove nad SQL servery (IB, MS SQL, Oracle, ...)
Databazove na souborovymi databazemi (Pdx, dBase, Access, ...)
Web - ECommerce (zam��en� na stranu banky)
>
> 4. V budoucnu se chci orientovat zejmena na tridu aplikaci:
> Databazove nad SQL servery (IB, MS SQL, Oracle, ...)
Stejn� jako 3
> 5. Nejcastejsi okruh mych zakazniku (mozno pripadne upresnit,
> ktereho druhu aplikaci se tyka):
> Stredni firmy
> Velke podniky
> Zahranicni mensi klienti
> Zahranicni vetsi klienti
Jsem trochu na rozpacich - s Videnskou Raiffeisen bank
mame smlouvu na informacni system pro Chorvatskou
Raiffeisen stavebni sporitelnu, co mam zapocitat?
Mensi nebo vetsi zahranicni klient? Jinak v zahranici nemame
zatim nic.
Vsech druhu zakazniku se tykaji vsechny tridy aplikaci z bodu 3
>
> 6. Pouzivam doplnkove knihovny:
Svoje vlastni + Delphi
> 7. Je vetsina mych zakazniku pro danou aplikaci schopna ci
> ochotna investovat do dalsich reseni vazanych na mou aplikaci
> (napr. nakup SQL databaze, MIDAS a podobne, Corba, ...),
Ano
> 8. Pouzivam Delphi (4 a nize) ve verzi
Client/Server
> 9. Pouzivam stale Delphi 1
ne
> 10. Pokud chci koupit D5, davam prednost verzi:
Nechci
Jinak - bylo by mozna dobre rozsirit anketu o vzdelani
(myslim tim obor: informatika, prirodni vedy, zemedelstvi, ...),
pripadne absolvovana skoleni a ziskane certifikaty.
Taky bych se primlouval za to, aby u vsech, kdo s tim budou souhlasit,
byly odpovedi zverejneny jmenovite. Ja za sebe se zverejnenim
souhlasim.
S pozdravem
Jura
-------------
Email: Jiri.Polak(zv)tconsult(tec)cz
Co mne nastvalo a na co si dejte pozor:
http://freeweb.coco(tec)cz/jpolak/cernalistina/Vymena media v mechanice
[*] Viktor.Lostak(zv)chmi(tec)cz (Viktor Lostak) - 30.8.1999 08:18:47
Je nejaka moznost, jak dostat zpravu od systemu, ze uzivatel
vytahnul/zasunul medium do mechaniky (disketu, ZIP, JAZZ atp.)?
Dik za radu. Viktor
Quick report - editace sestav
[*] TUNGLI Jan <tungli(zv)pvt.sk> - 30.8.1999 08:32:52
Mozem ti odporucat SQL Report Builder na adrese:http://www.nexus.hu/tungli
Umoznuje editovanie reportov a vela ineho.
TUNGLI J�nos
email: tungli(zv)pvt.sk
-----P�vodn� zpr�va-----
Od: Jan Naiser <tua(zv)ltm(tec)cz>
Komu: Delphi konference <delphi-l(zv)fwd(tec)cz>
Datum: 24. august 1999 12:44
P�edm�t: Quick report - editace sestav
>Preji pekneho dne,
>
>D4.03
>
>existuje nejaky editor sestav pro QR (standart), ktery by se dal
>zaclenit do aplikace tak, aby se sestavy daly vytvaret a editovat
>(uzivatelsky) primo za behu programu, napr. tak, jak to jde v
>generatoru Sinea?
>
>Dekuji za odpoved.
>S pozdravem Jan Naiser
>
>
>Serazeni v dbgridu
[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 30.8.1999 08:34:37
Udelej to tak, ze si na dany DataSource povesis Query
SELECT * FROM tbl
ORDER BY FLD
No a na OnTitleClick si muzez naplnit nove obsah Query takto .
procedure Form1.DBGTitleClick;
//Predpokladam naplneni vyse uvedenym Query a menim pouze posledni radek
begin
Q.Close;
Q.SQL[1] := 'ORDER BY ' + Column.FieldName;
Q.Open;
end;
Preji hezky den .....
============================================
ML Software - Martin Lasevic
Budovatelska 459,
708 00 Ostrava - Poruba
tel.: + 420 (69) 691 85 11, 0603 338 765
mailto:ml_software(zv)email(tec)cz
mailto:+420603338765(zv)sms.paegas(tec)cz
http://cement.fmi(tec)cz/ml_software
ICQ:33630882
============================================
> Hi all, nevite nekdo, jak udelat, aby se mi recordy v dbgridu radili
> podle hodnoty jednoho ze sloupcu ? Treba podle ciselne hodnoty
> nebo podle abecedy
>
> DB grid a barvy polozek
[*] Jan Fiala <fiala(zv)infos(tec)cz> - 30.8.1999 08:34:22
Mezi RX komponentami je grid, ktery by to mel umet. Pokud bys chtel pouzit standardni DBGrid, dela se to v udalosti OnDawColumnCell. Kratky priklad ti snad objasni pouziti :
procedure gridDrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumn;
State: TGridDrawState);
begin
// obarvovat se budou pouze radky, ktere nemaji focus (nemaji modre pozadi)
If Not (gdFocused in State) And Not (gdSelected In State)
Then Begin
// castka je mesi jak 0, pismo bude cervene
If Data.tblPokl.FieldByName('Castka').AsCurrency < 0
Then grid.Canvas.Font.Color := clMaroon;
// nejake archivni veci - pismo bude zelene
If Data.tblPokl.FieldByName('Ind').AsString = 'A'
Then grid.Canvas.Font.Color := clGreen;
End;
// a tady si zavolame default metodu, ktera to nakresli
grid.DefaultDrawColumnCell(Rect, DataCol, Column, State);
end;
===============================
ing. Jan Fiala fiala(zv)infos(tec)cz
Prog-Soft s.r.o. Plzen
INFOS - informacni system pro napojare
===============================
----- P�vodn� zpr�va -----
Od: Zbynek Ceska <zbyces(zv)physics.muni(tec)cz>>
> Zdravim vsechny v konferenci. Mam malou prosbu. Nevite nekdo:
>
> JAK VYTVORIT V DBGRIDU V D4 RUZNE BARVY NA RUZNYCH RADCICH ?
>
> Pro vysvetleni. Mam tam polozky ( seznam cinnosti) a potrebuji, aby se
> cinnosti stare mene nez 5 zobrazovali zelene, cinnosti budouci cervene a
> zbytek cerne. Proste hledam neco jako " DBGrid1.Rows.Font.Color:=clRed "
> ale tam nic takoveho neni.
> Pokud si nekdo muyslite, ze to z principu nejde, taky mi dejte
> vedet. Vymyslim jine "zvyraznovani".
>
> MOC PROSIM O POMOC.
> Nova verze KEdit 2.42
[*] Pavel ZIDEK <kopr(zv)kopr(tec)cz> - 30.8.1999 08:35:19
Zdrav�m,
kone�n� jsem dodelal dalsi verzi KEdit (verze 2.42). Hlavn� rozsireni je v TKDBEdit, kde je dodelana validace ciselnych dat.
Hledejte na http://www.kopr(tec)cz/delphi/k-delphi.htm
Pekny den (rano, vecer i noc) preje
~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
KOPR software Pavel ZIDEK voice 069 / 66 02 156
mailto:kopr(zv)kopr(tec)cz http://www.kopr(tec)cz/w-delphi.htm http://www.kopr(tec)cz
~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~DB grid a barvy polozek
[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 30.8.1999 08:38:23
Ruznobarevne vybarvovani polozek udelas tak, ze si udelas metodu , povesenou na OnDrawColumnCell a tam si dle obsahu dat urcis barvu.
Prikladam priklad, ktery vybarvuje sloupce, ale je to stejne. No a druha moznst je podivat se do Rx Library.
procedure TFPSeznamy.dbgSeznamDrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumn;
State: TGridDrawState);
begin
if Column.Width <> -1 then Column.Field.Tag := Column.Width;
if not ( SortColumn = Column) then begin
{
dbgSeznam.canvas.brush.color:= clWindow;
dbgSeznam.canvas.fillrect(rect);
dbgSeznam.canvas.font.color:= clWindowText;
dbgSeznam.canvas.textout(rect.left+2,ret.Top+2,column.field.AsString);
}
end
else
begin
{ barevne odli?eni sloupce, dle ktereho je toidino}
if gdSelected in State then begin
dbgSeznam.canvas.brush.color:= clActiveCaption;
dbgSeznam.canvas.font.color := clCaptionText;
end else
begin
dbgSeznam.canvas.brush.color:= clActiveBorder;
dbgSeznam.canvas.font.color := clGreen;
end;
dbgSeznam.canvas.fillrect(rect);
dbgSeznam.canvas.textout(rect.left+2,rect.Top+2,column.field.AsString);
end;
end;
Preji hezky den .....
============================================
ML Software - Martin Lasevic
Budovatelska 459,
708 00 Ostrava - Poruba
tel.: + 420 (69) 691 85 11, 0603 338 765
mailto:ml_software(zv)email(tec)cz
mailto:+420603338765(zv)sms.paegas(tec)cz
http://cement.fmi(tec)cz/ml_software
ICQ:33630882
============================================
> Zdravim vsechny v konferenci. Mam malou prosbu. Nevite nekdo:
>
> JAK VYTVORIT V DBGRIDU V D4 RUZNE BARVY NA RUZNYCH RADCICH ?
>
> Pro vysvetleni. Mam tam polozky ( seznam cinnosti) a potrebuji, aby se
> cinnosti stare mene nez 5 zobrazovali zelene, cinnosti budouci cervene a
> zbytek cerne. Proste hledam neco jako " DBGrid1.Rows.Font.Color:=clRed "
> ale tam nic takoveho neni.
> Pokud si nekdo muyslite, ze to z principu nejde, taky mi dejte
> vedet. Vymyslim jine "zvyraznovani".
>
Serazeni v dbgridu
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 30.8.1999 08:42:50
Ahoj,
> Hi all, nevite nekdo, jak udelat, aby se mi recordy v dbgridu radili podle
> hodnoty jednoho ze sloupcu ? Treba podle ciselne hodnoty nebo podle
> abecedy _______
****Pokud to tam plnis pres TQuery, pak musis v SELECT prikazu
pouzit ORDER BY. Pokud pres TTable, musis uvest index.
Slavek
> Filip Rejlek
----------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
----------------------------------------------
DB grid a barvy polozek
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 30.8.1999 08:44:22
Ahoj,
> JAK VYTVORIT V DBGRIDU V D4 RUZNE BARVY NA RUZNYCH RADCICH ?
****To uz tu bylo probirane nescetnekrat. Podivej se do
archivu konference. Obecne: podivej se do helpu na
udalost OnDrawCell (nebo tak nejak, nemam to ted po ruce).
Slavek
> Zbynek Ceska.
----------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
----------------------------------------------
Minimalizace do SysTraye
[*] Ren� Otisk - 30.8.1999 08:46:29
Hi,
rxLib obsahuje primo komponentu. Hledej na torry nebo dsp
Sroub
Mikroprocesor 8051
[*] delphi(zv)dingo(tec)cz - 30.8.1999 07:41:01 gmt
Ahojte,
nedelali jste nekdo s mikroprocesorem 8051 (i klony)?
Kamos by potreboval s necim pomoci.
Diky moc.
Bob
Prosim, odpovedi smerujte na mail: bob(zv)dingo(tec)cz
seriovy port (com)
[*] Ale� Beran - 30.8.1999 09:45:34
>Viete mi poradit ako by som dokazal posielat nieco na seriovy port a
taktiez
>z neho citat?
> Dakujem.
Mam nejakou free komponentu pro komunikaci pres seriov� port, chtel jsem ji
umistit na ftp.mlp(tec)cz,
ale nejak se mi nedarilo se tam prokopnout. Tak pokud ji budes chtit posli
mi mail a ja ti ji poslu na tvou adresu.
Pouzivam ji a funguje to OK.
Ale� Beran
bluebyte(zv)hide(tec)cz
ShortDateFormat
[*] Josef A. Cerny <vyvoj(zv)atlascon(tec)cz> - 30.8.1999 10:02:33
Zdravim vsechny.
Mam nastaven ShortDateFormat ve Windows na 'd. M. rrrr' a nefunguji mi funkce
DateToStr() a StrToDate(). Obe na me hazou EConvertError. Pri nastavenem formatu
'd.M.rrrr' vse funguje bez problemu. Svadim problem na Delphi 3 (v jinych
nastrojich jsem to jeste netestoval).
Mate informace o naprave teto chyby v nejakem ServicePacku nebo oprave ve
vyssi verzi Delphi?
Diky.
Josef Cerny
********************************************
* Josef A. Cerny
* analyst and programmer
*
* ATLAS consutling, spol. s r.o.
* Chocholouskova 9
* 709 16 Ostrava
* Czech Republic
*
* office : +420 69 661 64 32
* secretary: 661 33 33
* fax : +420 69 661 33 30
* e-mail : cerny(zv)atlascon(tec)cz
* private: peppa(zv)post(tec)cz
* WWW : http://www.atlascon(tec)cz
********************************************Serazeni v dbgridu
[*] Martin Fron�k <FRONEK(zv)zznslany(tec)cz> - 30.8.1999 10:13:30
Musis si na tom sloupci definovat index, a pak to taky nechat zobrazovat
podle toho indexu.
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: Menfy [SMTP:menfy(zv)iol(tec)cz]
> Odesl�no: 30. srpna 1999 1:15
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Serazeni v dbgridu
>
> Hi all, nevite nekdo, jak udelat, aby se mi recordy v dbgridu radili
> podle hodnoty jednoho ze sloupcu ? Treba podle ciselne hodnoty
> nebo podle abecedy
> _______
>
> Menfy design - vse pro internetovou prezentaci...
> Filip Rejlek
> tel.: 0602 / 816 151
> e-mail : menfy.design(zv)telecom(tec)cz
> menfy(zv)iol(tec)cz
> web : http://web.iol(tec)cz/menfy
> Problem pri ReadFile z mailslotu
[*] Martin Bodlak <vyvoj(zv)atlascon(tec)cz> - 30.8.1999 10:44:21
Petr Vones wrote:
>
> Martin Bodlak wrote:
> >
> > Prostredi:
> > D3Prof, Win95
> >
> > Problem:
> > Pri pouzivani mailslotu pro komunikaci po siti se u vsech pocitacu deje
> > pravidelne toto: pokud nejsou nainstalovany zadne sitove protokoly ani
> > adaptery ani nic dalsiho sitoveho, nevrati se volani funkce ReadFile.
> > Proste to na tom radku zastavi a visi nekde ve Windows; program dal
> > nepokracuje. Toto cteni probiha v threadu a diky tomu se tento thread
> > neukonci ani pri ukonceni programu (toto ovsem probehne OK). Pokud jsou
> > nainstalovane sitove zalezitosti, jede vsechno jak ma.
>
> Pokud nekde pouzivas cekani v ReadFile, tak si muzes pomoci asynchronnim
> ctenim (jak uz ti radil Petr Fejfar). Kdysi jsem ale chtel neco zkusit s
> mailsloty a pak jsem je zavrhnul. Finta je totiz v tom, ze ve Win9x u nich
> nelze pouzit prave overlapped I/O, viz MSDN Article ID: Q125717 :
>
Diky Petru Fejfarovi za tu poznamku ohledne overlapped cteni, ale
vzhledem k tomu, ze pro mailsloty (tedy mimo jine) neni mozne to ve
Win9x pouzit, budu muset na to jit jinak.
> A jaka je hodnota lpNextSize, neni tam nahodou MAILSLOT_NO_MESSAGE ?
>
Bohuzel ne, ale vypada to jako nejaka nesmyslna zaporna hodnota. Nicmene
nemam odvahu testovat parametr na "nesmyslnou zapornou hodnotu" :)
A vsechny ostatni navratove parametry rikaji "vsechno je OK, clovece,
klidne jed dal".
Lze nejak zjistit, jestli je nebo neni nainstalovan nejaky sitovy
protokol? Ta pitoma situace totiz nastava jen v pripade, ze neni
nainstalovan zadny sitovy protokol. Treba bude v tomto pripade lepsi
prevence :)
M.
--
Martin Bodlak, ATLAS consulting, spol. s r. o.
Corporate: http://www.atlascon(tec)cz, bodlak(zv)atlascon(tec)cz
Private : http://members.xoom.com/bodlak, martin.bodlak(zv)iname.com
Tel. 069-6616432 (office), 0603-490135 (private)TImageList, Windows 98 a 16 barev
[*] Kriz Pavel, TDS <kriz.tds(zv)ms.easynet(tec)cz> - 30.8.1999 10:53:46
> > Bylo to testovano na vice pocitacich s Windows 98 (pod Win 95 to
nedelalo) a
> > vsude je to stejne. Pomuze jen nastaveni 256+ barev.
>
> Tusim ze se jednalo o nejaky problem v TImageList. Nicmene, je vsak
> nutne v dobe videokaret s 8M RAM i vice pouzivat jeste 16ti barevne
> rozliseni ? :-) Vzdyt uz kvuli pouzivani palet to musi zdrzovat pri
> zobrazovani, nemluve o tom jak hnusne to vypada ...
>
> --
>
> Petr Vones, amatersky programator
>
Ano, jedna se problem TImageList, jak bylo uvedeno.
Souhlasim, ze se 16 barvami se rozumne delat neda. Jenze vysvetlujte takovym
zakaznikum, ze si maji koupit lepsi kartu nebo nainstalovat vetsi pocet
barev (treba pro mensi rozliseni).
Za blbce totiz vzdycky bude autor programu, v tomto pripade ja...
S pozravem
Pavel Kriz (programator samouk)
Minimalizace do SysTraye
[*] Kriz Pavel, TDS <kriz.tds(zv)ms.easynet(tec)cz> - 30.8.1999 11:00:54
Komponenta je treba uvnitr baliku RxLib, ktery je ke stazeni na
"rx.demo.ru", neboli "http://www2.crosswinds.net/~rxlib/files/files.htm"
S pozdravem
Pavel Kriz
----- Original Message -----
From: Tomas Plevak <vamp(zv)sol(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Sunday, August 29, 1999 6:37 PM
Subject: Minimalizace do SysTraye
> Hello,
> asi pred dvema mesici tu byla rec o minimalizaci
> aplikace do SysTraye. Bohuzel se v zadnem mailu
> okolo tohoto problemu neobjevil zadny urcity odkaz
> kde by se potrebna komponenta dala sehnat. Muzete
> poradit kde bych ji nasel?
>
> Se srdecnym pozdravem Tomas Plevak
> E-mail : vamp(zv)sol(tec)cz
> ICQ : 6621919
>
>DB grid a barvy polozek
[*] Tom� Br�dle������i�^����? - 30.8.1999 11:02:04
Zdravim,
DBGrid ma udalost OnDrawColumnCell. Do ty udalosti se da nadefinovat
"uzivatelske" kresleni bunky. Ale da se taky napriklad jen zmenit barba
pozadi nebo font a zavolat defaultni prekreslovani.
Tady mas priklad:
with sender as TDBGrid do
begin
if column.caption='tenhle' then
begin
with canvas do
with Font do
if Color = clHighlightText then color:=clSilver else color:=clGray;
end;
DefaultDrawColumnCell(Rect, DataCol, Column, State);
end;
ten Canvas ma vlastnosti (Brush, Font, ...) ty bunky, ktera se bude kreslit.
Tomas Bradle
t.bradle(zv)pvtnet(tec)cz
-----P�vodn� zpr�va-----
Od: Zbynek Ceska <zbyces(zv)physics.muni(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 30. srpna 1999 7:07
P�edm�t: DB grid a barvy polozek
>
> Zdravim vsechny v konferenci. Mam malou prosbu. Nevite nekdo:
>
>JAK VYTVORIT V DBGRIDU V D4 RUZNE BARVY NA RUZNYCH RADCICH ?
>
>Pro vysvetleni. Mam tam polozky ( seznam cinnosti) a potrebuji, aby se
>cinnosti stare mene nez 5 zobrazovali zelene, cinnosti budouci cervene a
>zbytek cerne. Proste hledam neco jako " DBGrid1.Rows.Font.Color:=clRed "
>ale tam nic takoveho neni.
> Pokud si nekdo muyslite, ze to z principu nejde, taky mi dejte
>vedet. Vymyslim jine "zvyraznovani".
>
> MOC PROSIM O POMOC.
>
> Dekuji
> Zbynek Ceska.
>
>*************************************************************************
> ** Mgr. (MSc.) Zbynek Ceska ** http://www.sci.muni(tec)cz/~zbyces ******
> ** Plasma Physics ** High Technology Physics ** Microwave Physics **
>*************************************************************************
>
>Serazeni v dbgridu
[*] Pavel �im��ek - 30.8.1999 11:03:50
No ja bych si to seradil v SQL dotazu, podle pozadovane polozky.
P.
-----P�vodn� zpr�va-----
Od: Menfy <menfy(zv)iol(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 30. srpna 1999 2:32
P�edm�t: Serazeni v dbgridu
Hi all, nevite nekdo, jak udelat, aby se mi recordy v dbgridu radili
podle hodnoty jednoho ze sloupcu ? Treba podle ciselne hodnoty
nebo podle abecedy
_______
Menfy design - vse pro internetovou prezentaci...
Filip Rejlek
tel.: 0602 / 816 151
e-mail : menfy.design(zv)telecom(tec)cz
menfy(zv)iol(tec)cz
web : http://web.iol(tec)cz/menfy
Problem pri ReadFile z mailslotu - RESENI
[*] Martin Bodlak <vyvoj(zv)atlascon(tec)cz> - 30.8.1999 11:04:52
>
> Prostredi:
> D3Prof, Win95
>
> Problem:
> Pri pouzivani mailslotu pro komunikaci po siti se u vsech pocitacu
deje
> pravidelne toto: pokud nejsou nainstalovany zadne sitove protokoly ani
> adaptery ani nic dalsiho sitoveho, nevrati se volani funkce ReadFile.
> Proste to na tom radku zastavi a visi nekde ve Windows; program dal
> nepokracuje. Toto cteni probiha v threadu a diky tomu se tento thread
> neukonci ani pri ukonceni programu (toto ovsem probehne OK). Pokud jsou
> nainstalovane sitove zalezitosti, jede vsechno jak ma.
Cau,
tak jsem se (brzo, ja vim...) podival do MSDN a tento bug je popsany pod
cislem
Q192276
zaroven s moznostmi reseni. Diky vsem za odpovedi. At zije MSDN!
M.
--
Martin Bodlak, ATLAS consulting, spol. s r. o.
Corporate: http://www.atlascon(tec)cz, bodlak(zv)atlascon(tec)cz
Private : http://members.xoom.com/bodlak, martin.bodlak(zv)iname.com
Tel. 069-6616432 (office), 0603-490135 (private)ADONIS komponenty pro ADO
[*] Martin Talian <geoplan(zv)pp.sinet.sk> - 30.8.1999 11:10:21
ktore je vyhodnejsie resp. rychlejsie ? k DAODS potrebujem DAO , ze ? A
odkial zoberiem ADO, tieto komponenty ho obsahuju ? mozno su to hlupe otazky
ale este som sa s tym nestretol.
Martin
-----P�vodn� spr�va-----
Od: Erik Salaj <winsoft(zv)napri.sk>
Pre: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
D�tum: 27. srpna 1999 0:34
Predmet: Re: ADONIS komponenty pro ADO
>> Aky je rozdiel medzi Adonis a DAODS komponentami ?
>
>Adonis pouziva nove rozhranie Microsoftu ADO pre
>univerzalny datovy pristup k roznym datovym zdrojom
>(desktop aj SQL databazy, systemy suborov, OLAP, ...).
>DAO komponenty pouzivaju DAO rozhranie (tiez MS)
>pre nativny pristup k MS Access 97, resp. 2000 databazam.
>
>Erik Salaj
(Ne)utajovani algoritmu kodovani
[*] Viktor.Lostak(zv)chmi(tec)cz (Viktor Lostak) - 30.8.1999 11:16:10
----- Original Message -----
From: Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Sunday, August 29, 1999 5:04 PM
Subject: (Ne)utajovani algoritmu kodovani
> Preji vsem pekneho dne,
>
> dovolte, abych k tomu take neco povedel. Utajeni zpusobu
> zakodovani dat muze byt v jistem smyslu bezpecnejsi nez jeji
> prozrazeni. Zda-li je algoritmus spravne se muze preci povedet
> matematicky dukaz.
>
Ale kdeze. Co se da na algoritmech pro sifrovani tak dalece dokazovat? No a
i kdyby se snad dalo, tak po provedeni takoveho dukazu by to zverejneni uz
snad nijak nevadilo, ne?
> Dalsi moznost je ta, ze ho nechci prozradit z toho duvodu, ze
> algoritmus je velmi primitivni nebo je slozen z nekolika znamych
> primitivu. Priklad:
>
> Pouziji znamy a popsany (a trivialni) algoritmus A, na vysledna
> data algoritmus podobnych vlastnosti B (muzu dale kombinovat).
> Pokud zachovam zakladni vlastnosti zobrazeni potrebne k sifrovani
> a tim utajeni, bude vetsi problem data hrubou silou prorazit, pokud
> algoritmus nereknu, nez kdyz jej zverejnim.
Kombinaci hloupych algoritmu tezko muze vzniknout nejaky chytry.
>
> Pro aplikace pro male firmy to bohate staci. Nevim, k cemu jim
> bude treba RSA, kdyz staci nejaky xor s posunutim a odectenim /
> prictenim cisla na nejakem pevne danem miste a pak jeste
> prokombinovat sifrovane bloky. Konkurenci stejne mala firma
> nebude mit asi naldu, penize ani cas na to, aby zjistovala postup.
To je vcelku pravda. Ovsem neverim, ze psat a testovat takovy diletantsky
algoritmus je jednodussi, nez si stahnout nejakout tu free knihovnu.
>
> Slavek
>
>
Viktor
> ----------------------------------------------
> http://atrey.karlin.mff.cuni(tec)cz/~rk
> ----------------------------------------------
Jak zjistit dosazitelne pocitace
[*] Viktor.Lostak(zv)chmi(tec)cz (Viktor Lostak) - 30.8.1999 11:21:14
Jak se daji zjistit vsechny pocitace, dosazitelne z meho pocitace po LAN ?
Dik. VIktor
ADO + D5
[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 30.8.1999 11:29:35
Haj hou!
From: Erik Salaj <winsoft(zv)napri.sk>
> Zdrojaky nemaju nahradzat (ci doplnovat) dokumentaciu, maximalne
> tak nejake ukazky zo zdrojaka doplnit do dokumentacie na vysvetlenie
> principu, ci prikladu pre lepsie pochopenie.
Souhlasim, ze zdroje nemaji nenahrazovat dokumentaci, ale jsou casto jedinym
a nenahraditelnym finalnim zdrojem informaci, pokud je dokumentace neuplna
nebo nejasna. Pritomnost zdroju ovsem nikoho nenuti je vyuzivat ke studiu.
Primarne jde v cele diskuzi o zdroje pouze o to mit MOZNOST do nich
nahlednout, kdyz clovek citi potrebu. Bez teto moznosti je rada problemu v
praxi neresitelna.
> Povazujem za nevyhnutne
> striktne oddelit interface od implementacie (a implementaciu
> v maximalnej miere chapat ako ciernu skrinku) a nie z konkretnej
> implementacie (zdrojakov) odvodzovat interface.
Souhlasim, ale o to tu prece vubec nejde (neni predmetem diskuze).
> Programovanie
> so zdrojakmi moze viest k programovaniu s vyuzivanim specifickych
> implementacnych detailov, co vedie k tomu, ze po zmene implementacie
> povedzme zasobnika aplikacia zrazu nebude fungovat, napriek tomu,
> ze pouziva jeho interface.
To je vec programatorskeho stylu a pristupu k problemu. Absence nebo
pritomnost CIZICH zdroju neimplikuje jejich vhodne nebo nevhodne pouziti.
Pokud je nekdo prase, nezachrani ho ani nepritomnost zdroju. Nemluve o tom,
ze rozhodovat o tom, co je pro jine dobre a co ne, je ponekud (mirne receno)
nestastne. Kazdy je zodpovedny samza sebe, toz nam netreba strazcu moralky a
cistoty, at uz programatorske nebo i jine.
> Nie je celkom jednoduche ani s pouzitim zdrojakov VCL ukazat
> na konkretny riadok vo VCL, ze tam je chyba, alebo tam vznika
> nejaky problem, atd. (porozumiet zdrojaku je obvykle zlozitejsie
> ako dokumentacii, inac by ziadna dokumentacia k VCL ani nebola
> potrebna, uplne by stacili zdrojaky).
>
> Pokial je povedzme v OLE DB chyba, treba snad informovat Microsoft
> a nie svojvolne si to opravovat (nastastie zdrojaky nie su k dispozicii).
Ve vetsine pripadu nejde o to chybu odstranit, ale v prvni rade zjistit, v
cich rukach je Cerny Petr (kdo za to muze). Rada chyb se vskutku neda
odstranit, ale pri pochopeni duvodu chyby (coz se bez zdroju da tezko), lze
navrhnout alternaivni reseni (workaround). Vetsina problemu ma, jak znamo,
vice nez jedno reseni.
> Vsimni si, ze ani standardne Delphi balicky sa nesmu
> svojpomocne opravovat alebo modifikovat, inac by vznikol
> poriadny chaos.
Balicky se nedaji menit ne proto, ze by to delalo bordel pri nasazeni u
klienta (k tomu staci pouzit jine jmeno balicku nebo balicek umistit do
stejneho adresare jako program), ale protoze VCLxx.DPL/BPL (a nektere dalsi)
jsou integralni soucasti samotneho IDE Delphi. Tudit po zasahu neni zarucena
spravna funkcnost prostredi. O nic jineho nejde. Ostatne, vzdy lze vytvorit
program bez balicku.
> Vobec si to nemyslim, ze je to mimoriadne komplikovane a uz vobec
> na to nevidim ziadny principialny dovod. ActiveX designer nevie absolutne
> nic o implementacii mojho ActiveX komponentu (v ActiveX sa na rozdiel
> od VCL nenabaluju nove veci na stare komponenty) a predsa to funguje
> vdaka tomu, ze je presne specifikovane rozhranie medzi designerom
> a komponentom. Nic viac.
Ok, a tim jako chces naznacit, ze mezi VCL (TPersistent, TComponent atd.) a
IDE delphi NENI definovane presne rozhranni ? Nenech se vysmat. Nehlede na
to, ze kazdy takovy framework je velice slozita a komplexni zalezitost (co
se tyce ActiveX/OLE2, podivej se na prislusnou "smecku" interfacesu).
> > TObject je zakladni trida, ktera v podstate spolupracuje pouze s
> > RTTI, a stara se o alokaci a dealokaci pameti. Mensi uz to byt
> > nemuze. Mam vaznou obavu, ze mas tak trochu mlhu v tom, proti
> > cemu zde brojis. :-)
>
> Najjednoduchsi COM objekt implementujuci IUnknown je daleko mensi
> (tri funkcie + jedna premenna na pocitanie referencii, odhadom do 20
riadkov
> zdrojaka a do 100 bajtov vysledneho kodu).
Jo-o. A tim jsi mel na mysli co ? Ze je mensi a tim lepsi ? No, on taky
IUnknown nic moc neumi. TObject v sobe zahrnuje message dispatching a type
library. V postate lze napsat libovolnou aplikaci, ktera by pracovala s
objekty JEN na urovni TObject, coz se o IUnknown rici neda.
> Vlastne mas pravdu. To "naopak" som myslel tak, ze to podla mna nie je
> vyhoda ale dost velka nevyhoda (hlavne pre programatorov komponentov,
> napriklad aj preto, ze im to neumoznuje chranit si urcite know-how).
Pritomnost zdroju na druhou stranu chrani zakaznika. Pokud autor zmizi,
ztrati zajem o dalsi vyvoj pripadne nechce zabudovat do komponentu moje
vlasti specificke vlastnosti, mohu to udelat sam (kdyz chci, musim atd.).
> Ja viem ze skusenejsi programatori si vedia komponenty bez problemov
> nainstalovat, ale v Delphi programuju (a chcu pouzivat komponenty) aj
ludia,
> ktori nie su profesionalnymi programatormi, povedzme robia nejaky hardware
> a v Delphi si chcu pomocou komunikacnej komponenty urobit k tomu nejaky
> software. Od takychto ludi denne dostavam maily tykajuce sa instalacie.
> Na tom sa da urcite vylepsit velmi vela (instalacia aj odinstalacia
> komponentov musi byt uplne automaticka, spustenim jedneho EXE suboru
> alebo prikazu).
Instalace komponentu (abvzlaste mam-li jiz prelozeny balicek) je tak
trivialni, ze na ni neni moc co zjednodusovat. Ostatne, kazdy nastroj
vyzaduje urcity minimalni stupen znalosti, aby mohl byt pouzivan. Nemam nic
proti zpristupnovani slozitych nastroju a stroju masam, ale odtud potud. Na
auto je zapotrebi take ridicak, a raketoplan se nikdy nebude ovladat tak
snadno jako televize (a ani pan "Sponka" to nezmeni).
> 1. Moze sa lahko stat, ze nebudes schopny prepisat niektoru metodu
> komponentu, pretoze nebude v predkovi virtualna. Povedzme by
> destruktor nebol virtualny, ako by si to vyriesil?
a) Staticky destruktor je pitomost.
b) Pokud bude metoda kterou potrebuji prepsat staticka, musim problem resit
jinak. Nicmene, co kdyz metoda NEBUDE staticka ?
> 2. Moze sa lahko stat, ze nebudes schopny ziskat nejaku informaciu
> (bude v private) alebo zavolat nejaku potrebnu funkciu (tiez bude v
> private). Povedzme destruktor by bol privatny, ako by si to vyriesil?
To se da vyresit. Neciste, ale da se to.
> Vo VCL si teda odkazany na to, aby autor komponentu vopred
> premyslal, ze co asi bude niekto potrebovat v buducnosti rozsirovat,
> upravovat, ... a podla toho pripravi virtualne methody, ... (alebo nebude
> premyslat a urobi vsetky virtualne metody, alebo ziadnu, atd...).
a) Komponenta, u ktere autor nepremyslel dopredu nez ji vubec zacal psat je
na 98% na pendrek a nebude ji pouzivat nikdo.
b) Znovupouzitelnost a prispusobitelnost je zakladnim pozadavkem na vsechny
elementarni SW stavebni kameny, at uz jsou to nativni komponenty/tridy nebo
COM objekty.
> V kazdom pripade VZDY mam moznost si napisat vlastny TStringList tak,
> ze ho mozem pouzit namiesto povodneho TStringListu (vo VCL toto
> mozne nie je).
To je pravda a je to dobre. Nicmene se jedna o znovupouzitelnost na urovni
interface. U nativnich OP trid implementujicich interface muzes casto
znovupouzit i implementaci (treba jen cast). U ActiveX je toto nemozne.
> V tomto pripade by islo o vytvorenie noveho interface (pri jeho
> implementacii sa vsak moze postupovat rovnako). Chcel som ukazat,
> ze COM umoznuje nieco, co VCL neumoznuje a to napisat si
> k existujucemu interfacu vlastnu implementaciu (a mozem si ju
> napisat aj v C-cku alebo Visual Basicu a stale to musi fungovat).
VCL vyuziva COM sporadicky, ale tam kde je pouzit, MUZES udelat to co
popisujes. Chapu to tak, ze by jsi rad videl VCL zalozenou vyhradne/prevazne
na COM (jinak to, co pises nema smysl, neb to neni pravda). Tady bych rad
upozornil na zasadni problem COMu, a tou jsou cyklicke reference (objekty A
a B na sebe drzi interface, cimz se "uzamknou" v pameti). VCL je PLNA
cyklickych referenci (napr. property Owner/Components[]). Navrhnout
kompaktni a zaroven efektivni framework ciste na bazi COM je takrka
nadlidsky ukol (a ani VB jej v tomto smyslu NEMA). Nicmene, vyraznejsi
vyuziti COM ve VCL je mozne a AFAIK vyvoj je takto smerovan. Ale je nutne si
uvedomit, ze zasadni zmena v koncepci VCL neni jednoducha a vyzaduje cas.
> S ATL je mozne pomerne jednoducho vyrobit asi 35 kB najjednoduchsiu
> ActiveX komponentu (da sa spakovat asi na 20kB do cabu a automaticky
> instalovat z HTML stranky bez akehokolvek programovania).
> U COM su naroky este daleko mensie.
Jen diky tomu, ze RT nihovny jsou soucasti Windows :-))) Ostatne, v Delphi
muzes take vyuzivat "balicky".
> Je celkom realne, ze s takymito moznostami pride v kratkom case
> Microsoft (podla mna investoval do Borlandu koli technologiam
> z Delphi, ako su dvojcestne vizualne programovanie, ktore chce
> pouzit v novom COOL nastroji) a Borland sa polozi. A Microsoft
> samozrejme zase poriadne zarobi ale v tomto pripade urcite nie
> necestnou konkurenciou, ci marketingom ale preto, ze dokaze
> strategicky rozmyslat.
Cista spekulace.
>Ale budme optimisti.
Tak, tak.
Hodne zdaru
Pavel Cisar pcisar(zv)atlas(tec)cz
TekMetrics Certified Master Delphi Developer
http://www.tekmetrics.com/transcript.shtml?pid=76711
VCL and/or COM (was: Re: ADO + D5)
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 30.8.1999 11:49:44
Erik Salaj wrote:
> > > Super, az na to, ze v buducich verziach Windowsu to moze fungovat
> > > uplne inac, nedokumentovane funkcie chybat, .... (takze po kazdej
> > > novej Windows verzii znova studovat zdrojaky... ;-) )
> >
> > Tohle musim delat v Delphi i v pripade nekterych dokumentovanych
> > veci. Jasny priklad - jina definice typu real v Delphi 4 oproti
> > verzim predchozim.
>
> Predpokladam, ze o zmene si sa nedozvedel z Delphi zdrojakov
> ale z dokumentacie.
Uvedena zmena byla natolik zasadni, ze samozrejme musi byt
dokumentovavana. Pokud se vsak rozhodnu pro pouziti
nedokumentovane vlastnosti (napriklad proto, ze pomoci
dokumentovanych proste urcity problem resit nelze - a v Delphi je
takovych oblasti cela rada, zejmena co se tyce vazeb na IDE),
musim vedet co delam a samozrejme hlidat budouci verze.
> > Zkousel jsi to nekdy? Jak zjistis bez debugovani, kde je chyba,
> > napriklad ve spojeni TQuery + TDBgrid + SQL databaze + pridavani
> > novych zaznamu v gridu? Je to pouze neskodna chyba zobrazeni v
> > gridu, nebo horsi chyba razeni zaznamu v Query (ci jeste hloubeji a
> > tedy i v Table), nebo jeste horsi chyba, ktera muze ovlivnit i data
> > v databazi? A proc se projevuje jen u SQL databazi a ne u Paradoxu?
>
> Chybu skusim zistit tak, ze otestujem kazdy z komponentov najprv
> samostatne. Pokusim sa urobit co najjednoduchsiu aplikaciu
> v ktorej sa chyba vyskytuje a poslem to vyrobcovi. Nebudem predsa
> studovat vsetky zdrojaky od VCL, Delphi, databazoveho servera, az po
> Windows (a Windows drivery) aby som zistil presnu instrukciu, kde je
> chyba.
:-) Krokovani pres podezrela mista mi prijde prece jen mene
pracnejsi. A ani nevim, jak bys zjistil uvedeny problem bez
krokovani (tedy nejen zjistit, ve ktere komponente chyba je, ale zda
a za jakych okolnosti muze mit vliv na data ci ne).
> > Po dvou az trech instalacich komponent se nutne stanes
> > zkusenym v tomto smeru. Jinak je vhodne pripojit readme.txt, kde na
> > 4 radcich popises celou instalaci do nejmensich detailu.
>
> Postup instalacie na 4 riadkoch nepovazujem za jednoduchy ;-).
Psal jsem "do nejmensich detailu".
> > > 1. Moze sa lahko stat, ze nebudes schopny prepisat niektoru metodu
> > > komponentu, pretoze nebude v predkovi virtualna. Povedzme by
> > > destruktor nebol virtualny, ako by si to vyriesil?
> >
> > :-) Prohlasil bych takovouhle zasadni vadu za spatne napsanou
> > tridu.
>
> Jednoduche ale malo uzitocne.
Jednoduche jiste malo uzitecne urcite ne. Zacnu se poohlizet po
jinem reseni tehoz problemu.
> Vo VCL k jednemu interface musi byt prave jedna implementacia, inac to
> neprelozis. Ako si napriklad mozem urobit dve implementacie pre ten
> isty interface objektu zasobnika? Povedzme, nech interface objektu je:
>
> type TStack = class
> public
> function Empty: Boolean;
> procedure Push(Value: Integer);
> procedure Pop;
> function Top: Integer;
> end;
> [...]
Aha, takto jsi to myslel. OK.
> Musim predsa presne vediet, ako mam dane rozhranie pouzivat (co
> prislusny objekt robi). Nie je jedno ci StringList svoje objekty
> uvolnuje alebo nie (alebo ano?), musim to teda zistit z dokumentacie
> (alebo to mam radsej hladat v zdrojaku?) a podla toho pripadne
> uvolnit/neuvolnit tieto objekty sam (alebo ich uvolnovat/neuvolnovat
> podla nalady ;-) ?).
Mno, ono to z dokumentace jasne je. Muze se ale stat, ze mi dana
vlastnost nevyhovuje, a chci si ji tedy prepsat. Ale jen tu jednu,
vsechny ostatni ponecham. Bez drojaku se mi vsak muze snaze
stat, ze provedu v urcitych pripadech zmenu, ktera bude mit fatalni
vliv na jine funkce, nebo ze vubec nebudu vedet, zda je mnou
pozadovana zmena bezpecna.
> > Zapominas na cely velky balik COM objektu, ktery s sebou musis
> > tahnout v pocitaci a ktere ten tvuj objektik potrebuje. VCL se
> > proste natahne cela do programu, takze nepotrebujes mit
> > nainstalovane kupy dalsich komponent. Jestlize tedy zacnes stavet
> > cosi na nejake COM knihovne, ktera neni standardne ve Windows, musis
> > u zakaznika nainstalovat i tuto knihovnu.
>
> Podpora COM je sucastou Windows. S aplikaciou samozrejme
> potrebujem instalovat potrebne komponenty, co je vsak logicke
> a inac sa to asi neda.
Takze balik zustava, akorat je misto jednoho exace rozstrkan do
vice ruznych souboru. Suma sumarum na objemu neusetrime nic.
Microsoft investoval do Inprise, takze si muzeme vymyslet situaci,
kdy Microsoft zahrne standardne vsechny Delphi balicky do
Windows. Pak se tve programy najednou smrsknou a ty si budes
pochvalovat, jak malinke programy muzes v Delphi psat (pricemz
podminkou bude, ze uzivatel bude SPxx na sva Wokna, stejne
jako je to v pripade COM objektu). Neni to stejna situace?
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
ADO + D5
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 30.8.1999 11:49:45
Lukas Voborsky wrote:
> > To je pravda, ale to se tyka i sekce protected v jedne unite. V
> > ramci unity mohu vesele sahat i do cizi private sekce, coz je pekny
> > gulas. Velice se tim sice zjednodusi prace uvnitr unity, ale nadela
> > to binec mimo. Myslim, ze definice private a protected by mela byt
> > jednoznacna vsude.
>
> Ahoj, s tim by se, myslim, dalo polemizovat. Mam pocit, ze cecko snad
> umoznuje deklarovat nejaky tridy jako friend a ty si pak muzou sahat i
> do podobnych sekci, jako je private a protected. Za stavajici situace,
> kdy tohle packal neumoznuje, pouzivam alespon to, ze tridy, po kterych
> chci, aby byly "friend" davam do jedne unity. Jinak je nacpu do
> ruznych unit a muzu s uspechem pouzit private a protected. (Uznavam,
> ale ze to neni idealni, nebot muze strasne narust pocet souboru
> projektu :-o )
Pokud je takto volna deklarace, prosim, ale pak je nezbytne, aby
programatori vice premysleli, zda pri psani trid nepachaji nejakou
zrudnost. Kdyz na jare secu travnik, musim se vyhnout zahonu s
jahodami, jinak budu bez jahod. :-)
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Tak jde cas .... (+ Pruzkum - dilci vysledky)
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 30.8.1999 11:49:45
Petr Vones wrote:
> > Co se tyka komponent, musim trvat na tom, ze zdrojaky maji
> > _doplnovat_ dokumentaci. Jestlize se rozhodnu menit jejich vnitrek,
>
> Navic v _nekterych_ pripadech je vec srozumitelnejsi ze zdrojaku nez
> za pomoci sahodlouhych popisu v dokumentaci. Jedno proste nelze
> oddelovat od druheho. Pripomina mi to pomerne nestastny pristup z
> jineho oboru - cislicove techniky. Zde se tvrdilo, ze integrovane
> obvody jsou cerna skrinka a co je uvnitr neni dulezite, protoze jejich
> funkce je navenek preci zcela jasne definovana. Jenze v praxi pri
> reseni problemu je tento pristup naprosto nepouzitelny (na logicke
> obvody je treba se obcas divat jako na analogove, protoze jejich
> implementace neni ciste "digitalni").
A kdyz pujdu jeste dal, tak bez znalosti (aspon povsechne) toho,
jak to funguje uvnitr, mohu sice take ridit automobil, ale s vetsi
pravdepodobnosti ho drive oddelam. Tedy, se znalosti vnitrnosti na
urovni zdrojaku budu nejspis i lepe rozumet tomu, co deje v mem
programu a budu i efektivneji programovat. A coz teprve kdyz si
zacne zakaznik stezovat na chyby... :-)
Jsem rozhodnym odpurcem pornografie, strelnych zbrani, valek,
potratu, nabozenske nesnasenlivosti a zatajovani zdrojaku. :-)))
> Ano, pri kazde nove verzi Windows bude treba vse predelat. Bylo to tak
> pri prechodu z 16bit na 32bit a bude tomu tak i nadale. Predstava, ze
> za pomoci nejakeho idealniho navrhu pak jen vtipne skryjeme rozdily v
> implemenentaci je pomerne iluzorni. Staci se podivat treba na prechod
> z D1 do D2.
Mno, ono je stejne nejlepsi kazde dva az tri roky napsat ten
program zcela znovu, protoze jednak jsem se za tu dobu naucil
radu novych veci, za dalsi se vyskytnou nove technologie, ktere se
do stare verze daji napasovat jen se znacnymi problemy a nevyuzit
je muze byt skoda... Uz mam takto druhou generaci Lokalizatoru a
chystam se ted na treti generaci jineho programu.
> > > Je celkom realne, ze s takymito moznostami pride v kratkom case
> > > Microsoft (podla mna investoval do Borlandu koli technologiam z
> > > Delphi, ako su dvojcestne vizualne programovanie, ktore chce
> > > pouzit v novom COOL nastroji) a Borland sa polozi. A Microsoft
> > > samozrejme zase poriadne zarobi ale v tomto pripade urcite nie
> > > necestnou konkurenciou, ci marketingom ale preto, ze dokaze
> > > strategicky rozmyslat. Ale budme optimisti.
>
> Uvidime, nevim sice nic o COOL nastroji, ale znacny podil na uspechu
> Delphi ma myslim soucasna podoba ObjectPascalu. Pokud by tedy chteli
> jit touto cestou, museli by bud koupit OP, presvecdit lidi ze C++ je
> vlastne docela hracka nebo v posledni rade (coz by bylo asi netezsi),
> ze VB je plnohodnotny OOP jazyk :-) Pripadne modni trendy typu COM+
> lze preci dale doplnit i do OP.
Ja se domnivam, ze vyznamnym prvkem uspechu Delphi je i
moznost tvorby komponent vlastnimi prostredky (a tedy i jednim
jazykem). Uz se mi seslo dost vyplnenych dotazniku, takze
zverejnim jeden predbezny vysledek. Z 59 lidi postacuji standardni
komponenty pouze 3 (sic!) lidem. Vzhledem k jednoduchosti
dotazniku na to lze vyrobit nejmene dva vyklady:
1. Standardni komponenty jsou mizerne, nedostacujici.
2. Programatori teto vlastnosti Delphi radi a casto vyuzivaji.
Prekvapivy se pro me stal i pocet tvurcu vlastnich komponent - 40 -
coz by napovidalo spise pro vyklad cislo 2 s mirnou primesi
vykladu cislo 1. Bezkonkurencni jsou freeware komponenty (46),
celkem pekny stav je v pripade komercnich komponent (nevim
vsak, zda sem nekteri nepocitali nakup ze shareware, coz je
docela mozne) - 31.
Takze pokud chce jeste nekdo prispet do pruzkumu v zajmu
ziskani sirsich vysledku, pospeste si, uzaverka se blizi (utery ci
streda).
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
private nebo protected (Was: ADO + D5)
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 30.8.1999 11:49:45
Petr Vones wrote:
> > > To je pravda, ale to se tyka i sekce protected v jedne unite. V
> > > ramci unity mohu vesele sahat i do cizi private sekce, coz je
> > > pekny gulas. Velice se tim sice zjednodusi prace uvnitr unity, ale
> > > nadela to binec mimo. Myslim, ze definice private a protected by
> > > mela byt jednoznacna vsude.
>
> To je sporny, spis by se melo pri psani trid vice dbat na rozumne
> vyuzivani private/protected. Private by melo slouzit predevsim jako
> misto pro uchovani hodnot vlastnosti + prislusne Set/Get metody.
> Samozrejme pokud uz je uplne nejhur, tak se da pristupovat i k
> polozkam v private sekci trid z jineho unitu, ale je to tak na hranici
> (spise za ni) unosnosti ...
Uchovani hodnot ano, v pripade Set/Get metod to muze byt
spornejsi. Uz se mi nekolikrat stalo, ze jsem potreboval prekryt i
tyto metody nebo se k nim alespon dostat (kvuli volani v
potomkovi). Ovsem pokud je vlastnost pouze read, pak by mela
byt obecne take protected. V private by mely byt jen ty veci, ktere
se za zadnych okolnosti _nesmeji_ prekryt. Stav je vsak takovy, ze
je tam kdeco. :-(
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
OwnerDraw TRxMainMenu
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 30.8.1999 12:13:13
Ahoj,
potreboval byc trochu poradit. Pouzivam TRxMainMenu v modu OwnerDraw. V
podstate tam jen vykresluji obrazky pres OnGetItemParams. Pokud ale u
polozky nemam zadny obrazek, tak se mi rozhodi zarovnani ve sloupci oproti
ostatnim radkum, kde obrazek je (vypada to podivne, je-li tam i klavesova
zkratka). Obrazky jsou vsechy stejne velike (17x17). Je mozne nejakym
zpusobem toto zarovnani ovlivnit ? U polozek menu, ktere maji dalsi submenu
(tj. maji jeste >) mi to neukaze ani prirazeny obrazek. Proc?
Diky za jakoukoliv odpoved
Jaro B.
Client / Server
[*] Petr Reichl <meap(zv)seznam(tec)cz> - 30.8.1999 12:38:05
Potreboval bych poradit nasledujicim resenim aplikace. Postaci mi pouze
doporuceni vhodne literatury a to jak v tistene tak i elektronicke forme,
ale byl bych radsi pro vase cene zkusenosti. Drive jsem pracoval pod Visual
Basicem, kde bych tento problem zvladl lepe, ale jelikoz jsem pro clientsky
program zvolil Delphi, tak bych i rad serverovou cast napsal v Delphi.
Verim, ze to v Delphi pujde, jinak se budu muset opet (ac nerad) vratit k
VB. Pod VB bych taky mel problemy, protoze tohle reseni jsem nikdy
neprogramoval, ale znam ho lepe nez Delphi. Pro upresneni programuji
v Delphi 4.0 Professional.
Nejprve situace:
Programuji aplikaci client/server. Veskera komunikace probiha pres Internet.
Clientska cast pracuje s databazemi Paradox pres BDE. Je to obycejna
databazova aplikace prohlizejici data zaslana ze serveru a posilajici na
server nova data. Server ridi nejakou databazi a posila nova data klientum a
od jednotlivych klientu je prijima. Klientska cast je uz napsana (zatim bez
podpory komunikace se serverem), serverova cast jeste neexistuje.
Podminky pro beh serveru:
Server funguje jako soukroma realitni burza, tzn. bez pristupu verejnosti.
Navstevnost za den bude max. 50x. Kdyspozici jsou veskere sluzby (FTP, ODBC,
ADO, ASP, SSL, ....)
Co protrebuji:
Typ databaze na serveru: nejspise Paradox, jelikoz ho vyuzivaji klientske
aplikace, ale nejradeji bych preferoval databazi Access, protoze znam jeji
prednosti a zaludnosti.
Serverova cast: varianta c.1) program, ktery vse ridi, c.2) script
(pravdepodobne ASP)
Zde je problem u ktereho nemam ani predstavu jak to realizovat pomoci Delhi,
predevsim co vlastne umi BDE.
Komunikace mezi c a s.: - staci, kdy poradite alespon teoreticky
Budu vam vsem velmi vdecny, kdyz prispejete alespon teoretickou radou, ci
doporucenim vhodne literatury.
S pozdravem.
--
Petr Reichl
E-mail: reichl(zv)seznam(tec)cz
DB grid a barvy polozek
[*] Ing. Jaroslav Ske��k - 30.8.1999 12:57:21
... z principu to jde a je to celkem snadne.
Pouzijes udalost OnDrawColumnCell
V nasledujicim prikladu budou polozky skladovych karet, ktere maji
zapornou zasobu zvyrazneny cervenou barvou. Protoze u tmavsich
polozek je spatne videt text v pripade, ze na ni stoji kurzor, je tam jeste
radek,
ktery zmeni text "fokusovane" polozky na bilou barvu.
procedure TFormSkladoveKarty.DBGrid1DrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumn;
State: TGridDrawState);
begin
if QueryKarty.FieldByName('ZASOBA').Asfloat < 0 then begin
DBGrid1.Canvas.Font.Color := clRed;
// Zajisti aby pismo polozky na niz je umisten kurzor ziskalo bilou barvu!
if (DBGrid1.Focused) and (GdSelected in state) then
DbGrid1.Canvas.Font.Color := clWhite;
end;
DbGrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State);
end;
JARO
>
> Zdravim vsechny v konferenci. Mam malou prosbu. Nevite nekdo:
>
> JAK VYTVORIT V DBGRIDU V D4 RUZNE BARVY NA RUZNYCH RADCICH ?
>
> Pro vysvetleni. Mam tam polozky ( seznam cinnosti) a potrebuji, aby se
> cinnosti stare mene nez 5 zobrazovali zelene, cinnosti budouci cervene a
> zbytek cerne. Proste hledam neco jako " DBGrid1.Rows.Font.Color:=clRed "
> ale tam nic takoveho neni.
> Pokud si nekdo muyslite, ze to z principu nejde, taky mi dejte
> vedet. Vymyslim jine "zvyraznovani".
>
> MOC PROSIM O POMOC.
>
> Dekuji
> Zbynek Ceska.
>
> *************************************************************************
> ** Mgr. (MSc.) Zbynek Ceska ** http://www.sci.muni(tec)cz/~zbyces ******
> ** Plasma Physics ** High Technology Physics ** Microwave Physics **
> *************************************************************************
>
>Finddialog
[*] Ing. Jaroslav Ske��k - 30.8.1999 12:58:44
Nastav na formulari vlastnost Activecontrol := DbGrid1
Jaro
> Ahoj nevite nahodou nekdo, jak se pote co neco najdu pomoci
> Finddialogu v DBGridu premistim do policka v dbgridu kurzorem ?
> Dik
> _______
>
> Menfy design - vse pro internetovou prezentaci...
> Filip Rejlek
> tel.: 0602 / 816 151
> e-mail : menfy.design(zv)telecom(tec)cz
> menfy(zv)iol(tec)cz
> web : http://web.iol(tec)cz/menfy
>
> NW4.11 a DBF
[*] Karel Kral <kral(zv)purus(tec)cz> - 30.8.1999 13:37:49
Jak uz tu bylo receno, ja bych jednoznacne zkusil klienta od Novellu.
Chyba muze byt prave ve spolupraci M$ klienta a NW.
tomas.mazurek(zv)vitkovice(tec)cz wrote:
>
> Dobry den,
>
> upresnuji svuj problem s NOVELLem. Nesikovne jsem se vyjadril,
> problem neni v dlouhem nazvu, ale jednoznacne v te mezere. Tedy DBASE
> tabulku na NOVELLu 4.11 s mezerou v nazvu nemuzu otevrit ani pres BDE
> ani pres ODBC. Hlasi Invalid file name. Ty same tabulky na NT s
> odpovidajicimi pravy jsou OK.
>
> Pouzivam klienta od Novellu. Soubory jsou na jinak normalne citelne
> (M602 apod.).
>
> Muj pocit je, ze se jedna o nejakou kombinaci specifickych vlastnosti
> Netware a normy SQL. Cpat mezeru do nazvu asi neni nejlepsi, lec s
> tim ja nic nenadelam...
>
> Kdyby mel nekdo nejaky napad...
>
> Dik TM
--
______________________________________________________
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
______________________________________________________
Hvezdicky a otazniky
[*] Viktor.Lostak(zv)chmi(tec)cz (Viktor Lostak) - 30.8.1999 13:43:46
Diky, ale to nemuzu pouzit. Asi jsem to jasne nevysvetlil, ale ja potrebuju
filtrovat nazvy souboru z databaze, ne z disku pomoci FindFirst/FindNext.
Nicmene diky za snahu. Viktor
----- Original Message -----
From: Ing. Jaroslav Ske��k <jaro(zv)sinea(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, August 24, 1999 12:04 AM
Subject: Re: Hvezdicky a otazniky
> Nevite nekdo o nejakem zdrojaku, ktery by resil "hvezdickovou konvenci"
pri porovnavani retzcu, tj. takove to "*.exe" ? Nejlepe v C++, ale muze to
byt
v Delphi nebo v necem jinem. Nechce se mi to delat, kdyby se to dalo nekde
stahnout. Dik. Viktor
-----------
Podle prikladu na DeleteAllFiles muzes jednoduchou upravou
vytvorit podobne funkce na cokoliv.
procedure DeleteAllFiles(const Path, FileSpec: string);
....
Form
[*] Petr Reichl <meap(zv)seznam(tec)cz> - 30.8.1999 13:56:42
Mam dojem, ze se zde o tom uz psalo, ale presto bych potreboval vysvetlit
jaky je rozdil, kdyz mam form umisten v kategorii AUTO-CREATE FORMS nebo v
AVAILABLE FORMS. Kdy je vhodne pouzit ten, ktery zpusob.
Dekuji.
S pozdravem.
--
Petr Reichl
E-mail: reichl(zv)seznam(tec)cz
BDE v sieti
[*] Martin Talian <geoplan(zv)pp.sinet.sk> - 30.8.1999 14:47:53
Spr�va vo form�te MIME rozdelen� na viac �ast�.
zdravim,
Mam taku malu databazovu aplikaciu. Je na sietovom disku.Ak ju spustim na jednom pocitaci aj viac krat, funguje. Ale ak ju mam spustenu na jednom pocitaci a ak ju skusim spustit este na inom vypise mi pri spusteni chyb hlasenie a nespusti sa. vid chyb. hlasenie
Exception EBDEngine Error in module denprj.exe at 0008D67E.
Directory is controlled by other.Net.
vie niekdo poradit ?
Martin
DB grid a barvy polozek
[*] rjunga(zv)oku-ka(tec)cz - 30.8.1999 16:06:21
Pouzij komponentu RXDBGrid. sezenes ji na www.torry.ru nebo mi napis na
rjunga(zv)oku-ka(tec)cz a ja ti je poslu.
Roman Junga
Zbynek Ceska <zbyces(zv)physics.muni(tec)cz> na 30.08.99 06:40:19
Odpov?zte pros?m - delphi-l(zv)fwd(tec)cz
Komu: delphi-l(zv)fwd(tec)cz
Kopie: (Na v?dom?: Roman Junga/IDC/OkUKarvina/CZ)
P?edm?t: DB grid a barvy polozek
Zdravim vsechny v konferenci. Mam malou prosbu. Nevite nekdo:
JAK VYTVORIT V DBGRIDU V D4 RUZNE BARVY NA RUZNYCH RADCICH ?
Pro vysvetleni. Mam tam polozky ( seznam cinnosti) a potrebuji, aby se
cinnosti stare mene nez 5 zobrazovali zelene, cinnosti budouci cervene a
zbytek cerne. Proste hledam neco jako " DBGrid1.Rows.Font.Color:=clRed "
ale tam nic takoveho neni.
Pokud si nekdo muyslite, ze to z principu nejde, taky mi dejte
vedet. Vymyslim jine "zvyraznovani".
MOC PROSIM O POMOC.
Dekuji
Zbynek Ceska.
*************************************************************************
** Mgr. (MSc.) Zbynek Ceska ** http://www.sci.muni(tec)cz/~zbyces ******
** Plasma Physics ** High Technology Physics ** Microwave Physics **
*************************************************************************OnCloseQuery
[*] Tomas Folprecht <tomas.folprecht(zv)iol(tec)cz> - 30.8.1999 16:07:10
Dobry den vsem.
Mam takovy problem.
V moji MDI aplikaci potrebuji v OnCloseQuery ChildFormu poznat,
jestli se zavira cela aplikace (parent), nebo jen dany ChildForm.
V OnCloseQuery ParentFormu to nijak osetrit nejde (ze bych si nastavil
nejaky flag),
protoze se nejdrive volaji OnCloseQuery vsech deti a teprve pak se
zavola OnCloseQuery rodice.
Dekuji za pripadnou radu
Tomas Folprecht
TImage
[*] Daniel Schmidt <dano(zv)mail(tec)cz> - 30.8.1999 16:12:22
Dobry den,
hram sa s Delphi 3 a komponentou TImage.
Do nej nieco nakreslim, a ked ju chcem zvetsit(nie stretch - chcem kreslit
na vecsiu plochu),
kreslit sice mozem, ale je to orezane zdola a sprava. Nejako som vyrozumel,
ze zmenou velkosti komponenty TImage sa nemeni velkost bitmapy v pameti. V
helpe som nezistil vobec nic.
Neviete prosim nahodou niekto, ako to obist?
Dakujem
Daniel Schmidt
DB grid a barvy polozek
[*] Jan �ebel�k <honza(zv)haes(tec)cz> - 30.8.1999 16:19:30
Pokud je mi znamo, je treba nastavit default drawing na false a pak si barvu nastavit na OnDrawItem.
Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 931, 692 569, 0601 20 30 84
=========================================
----------
> Odes�latel: Zbynek Ceska <zbyces(zv)physics.muni(tec)cz>
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: DB grid a barvy polozek
> Datum: 30. srpna 1999 6:40
>
>
> Zdravim vsechny v konferenci. Mam malou prosbu. Nevite nekdo:
>
> JAK VYTVORIT V DBGRIDU V D4 RUZNE BARVY NA RUZNYCH RADCICH ?
>
> Pro vysvetleni. Mam tam polozky ( seznam cinnosti) a potrebuji, aby se
> cinnosti stare mene nez 5 zobrazovali zelene, cinnosti budouci cervene a
> zbytek cerne. Proste hledam neco jako " DBGrid1.Rows.Font.Color:=clRed "
> ale tam nic takoveho neni.
> Pokud si nekdo muyslite, ze to z principu nejde, taky mi dejte
> vedet. Vymyslim jine "zvyraznovani".
>
> MOC PROSIM O POMOC.
>
> Dekuji
> Zbynek Ceska.
>
> *************************************************************************
> ** Mgr. (MSc.) Zbynek Ceska ** http://www.sci.muni(tec)cz/~zbyces ******
> ** Plasma Physics ** High Technology Physics ** Microwave Physics **
> *************************************************************************docasny index na C/S databazi (resp.FF) bez Query
[*] ing.Pavel Cabalka <pavel_cabalka(zv)vcshk(tec)cz> - 30.8.1999 16:20:20
Diky vsem za namety. Prozatim to resim tak, ze tam nasekam potrebne mnozstvi klicu. To s tou docasnou tabulkou je taky dobry ale nejprve budu muset otestovat jak to bude s rychlosti na coz momentalne nemam dost casu.
Taky jsem zaregistroval prispevek o dopln.knihovnach SQL pro FlashFiler. Vypada to zajimave. Asi si budu muset koupit to CD Kolekce.
jeste jednou dik PavelC
----- Original Message -----
From: Petr Zahradnik <clexpert(zv)clexpert(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Sunday, August 29, 1999 1:33 PM
Subject: Re: docasny index na C/S databazi (resp.FF) bez Query
> Puvodni zprava, kterou napsal ing.Pavel Cabalka dne 27 Aug 99,:
>
> > Vytvoril jsem si nasledujici zacatecnicky problem : chtel bych nabidnout =
> > uzivatelum moznost setrideni tabulky dle libovolne polozky, popr.polozek =
> > (dle jeho vyberu). Nicmene nechci na tabulce vytvaret tolik =
> > indexu(klicu) kolik je tam polozek (pripadne jejich kombinaci). Dale =
> > nemohu pouzit TQuery (pracuji s db FlashFiler, ktery nepodporuje SQL).
> > Program by mel pracovat v siti, takze je tu problem s Excusive modem.
>
> Ale proc ne? Vzdyt tech indexu muzes vytvorit libovolny pocet,
> tam neni vubec zadny problem. Klidne ty indexy vytvor, to bude
> jedine dobre. Pokud bys data napr. nacital do nejake lokalni
> tabulky a tam indexoval, bude to dost casove narocne.
>
>
> 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
asi se mi zblaznili Delphi4
[*] ing.Pavel Cabalka <pavel_cabalka(zv)vcshk(tec)cz> - 30.8.1999 16:26:43
Tak tedy novy problem do plena : Po spusteni D4 bez projektu se mi okna usporadaji hodn� doprava (castecne i za zobrazitelnou plochu), a "Project Manager" se mi nedari zobrazit vubec ackoliv v seznamu otevrenych oken je. Vypadalo to jeste hur ale to popisovat nebudu.
Nevite nahodou nekdo, jak privest D4 k rozumu ??? Nejlepe kam si uklada informace o otevrenych oknech pri ukonceni D4.
predem diky PavelC
----------------------------
Form
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 30.8.1999 16:33:02
Ahoj,
> Mam dojem, ze se zde o tom uz psalo, ale presto bych potreboval vysvetlit
> jaky je rozdil, kdyz mam form umisten v kategorii AUTO-CREATE FORMS nebo v
> AVAILABLE FORMS. Kdy je vhodne pouzit ten, ktery zpusob.
ACF se vytvareji pri startu programu -- dele trva start a aplikace
zabira vice pameti.
AF se nevytvari automaticky -- musis je vytvorit A ZRUSIT sam.
AF je vhodne pouzit napriklad ve velmi narocne aplikaci, kde
vyvtaris slozite formy za behu. Nebo muzes takto vytvaret
formulare, ktere se velmi malo pouzivaji (AboutForm apod.) --
urychlis tim start aplikace.
Slavek
> Petr Reichl
----------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
----------------------------------------------
Max a min rozsah promenne
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 30.8.1999 16:36:01
Ahoj,
> Nevim kde najit min a max hodnoty typu napr. integer.
****Viz help a funkce HIGH.
Slavek
> ~ KOPR software Pavel ZIDEK voice 069 / 66 02 156
----------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
----------------------------------------------
asi se mi zblaznili Delphi4
[*] rdocekal(zv)csas(tec)cz - 30.8.1999 16:50:17
Hmm a mas nainstalovany update 2 a 3 ? Takove chyby IDE se IMHO objevovaly v
puvodni verzi 4.0.
K tem ulozenym pozicim oken bez otevreneho projektu - mrkni na
..\Delphi4\bin\delphi32.dsk. Krome toho kazdy projekt ma taky svoje .dsk s
ulozenim desktopu.
S pozdravem
Radek Docekal
<mailto:rdocekal(zv)csas(tec)cz> ICQ: 9008367
-----P�vodn� zpr�va-----
Od: ing.Pavel Cabalka [mailto:pavel_cabalka(zv)vcshk(tec)cz]
Odesl�no: 30. srpna 1999 16:27
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: asi se mi zblaznili Delphi4
Tak tedy novy problem do plena : Po spusteni D4 bez projektu se mi okna
usporadaji hodn� doprava (castecne i za zobrazitelnou plochu), a "Project
Manager" se mi nedari zobrazit vubec ackoliv v seznamu otevrenych oken je.
Vypadalo to jeste hur ale to popisovat nebudu.
Nevite nahodou nekdo, jak privest D4 k rozumu ??? Nejlepe kam si uklada
informace o otevrenych oknech pri ukonceni D4.
predem diky PavelC
----------------------------
Serazeni v dbgridu
[*] Petr Fojtik <fof(zv)foresta(tec)cz> - 30.8.1999 16:57:28
Mam jednu overenou konstrukci, ktera dobre funguje. Predpoklada pouziti
RxQuery a RxDBGridu napojeneho na toto RxQuery. Umi to tridit podle jednoho
sloupce, pri opakovanem kliku na stejny sloupec zmenit poradi trideni,
oznacit vybrany sloupec SortMarkerem (propadne i barevne).
Pro setrideni dotazu se pouzije macro ve vlastnosti SQL v RxQuery (napr.
'SELECT * FROM tabulka ORDER BY %macroOrder'). Samotne strideni je po kliku
na nadpis sloupce, ud�lost OnTitleBtnClick. Proto musi mit RxDBGrid
vlastnost TitleButtons na True (obdobne by to asi slo i na OnTitleClick).
Tato procedura (preruseni na OnTitleBtnClick) ti provede setrideni gridu :
procedure TFormular.RxDBGrid1TitleBtnClick(Sender: TObject; ACol: Integer;
Field: TField);
var pom : String;
begin
if (Field <> nil) then
begin
RxQuery1.Close;
// pri opakovan�m kliku na stejn� sloupec se meni poradi
if (Field.FieldName = MacroByName('macroOrder').AsString) then
pom := Field.FieldName + ' desc'
else pom := Field.FieldName;
RxQuery1.MacroByName('macroOrder').AsString := Field.FieldName;
RxQuery1.Open
end;
end;
Pokud chces mit tento sloupec i oznacen, musis pridat jeste tuto proceduru
(preruseni na OnGetBtnParams):
procedure TFormular.RxDBGrid1GetBtnParams(Sender: TObject; Field: TField;
AFont: TFont; var Background: TColor; var SortMarker: TSortMarker;
IsDown: Boolean);
var pommac : String;
JeDesc : Boolean;
begin
JeDesc := False;
pommac := TRxQuery(Field.DataSet).MacroByName('macroOrder').AsString;
// ore�eme pr�padn� " asc" na konci macra - zbytecn�
if RightS(pommac, 4) = ' asc' then pommac := Copy(pommac, 1,
Length(pommac)-4);
// zjist�me jak� je tr�den�
if RightS(pommac, 5) = ' desc' then
begin pommac := Copy(pommac, 1, Length(pommac)-5); JeDesc := True; end;
// nastav�me SortMarker a pr�padne i BackGround
if (Field <> nil) and Field.DataSet.Active and
(CompareText(Field.FieldName, pommac) = 0) then
begin
if JeDesc then SortMarker := smDown else SM := smUp;
BackGround := <tvoje nova barva>;
end;
end;
Je to vybirane ze slozitejsi procedury, takze se omlouvam za pripadne
formalnichyby.
Petr Fojt�k
fof(zv)foresta(tec)cz
0657 - 687 134
-----P�vodn� zpr�va-----
Od: Pavel �im��ek <simicek(zv)foresta(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 30. srpna 1999 16:20
P�edm�t: Re: Serazeni v dbgridu
>No ja bych si to seradil v SQL dotazu, podle pozadovane polozky.
>P.
>
>
>-----P�vodn� zpr�va-----
>Od: Menfy <menfy(zv)iol(tec)cz>
>Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
>Datum: 30. srpna 1999 2:32
>P�edm�t: Serazeni v dbgridu
>
>
>Hi all, nevite nekdo, jak udelat, aby se mi recordy v dbgridu radili
>podle hodnoty jednoho ze sloupcu ? Treba podle ciselne hodnoty
>nebo podle abecedy
>_______
>
> Menfy design - vse pro internetovou prezentaci...
> Filip Rejlek
> tel.: 0602 / 816 151
> e-mail : menfy.design(zv)telecom(tec)cz
> menfy(zv)iol(tec)cz
> web : http://web.iol(tec)cz/menfy
>
>
Form
[*] Pavel �im��ek - 30.8.1999 17:02:46
Kdyz mas formular umisten v kategorii AUTO-CREATE FORMS tak se formular
vytvori na zacatku aplikace tesne pred zavolanim Application.Run a pokud je
v AVALAIBLE FORMS tak se vytvori pouze na tvuj popud, cili az v kodu zavolas
jeho vytvoreni. Podivej se kdyz tak do *.dpr souboru, je to tam pekne videt.
Jedna z moznosti kde se toho vyuziva je u Child oken MDI aplikace. Je to
logicke protoze nikdy dopredu nevis kolik tech detskych oken bude. Proto se
vytvari az za behu.
P.
-----P�vodn� zpr�va-----
Od: Petr Reichl <meap(zv)seznam(tec)cz>
Komu: ListServ - Delphi <delphi-l(zv)fwd(tec)cz>
Datum: 30. srpna 1999 16:31
P�edm�t: Form
>Mam dojem, ze se zde o tom uz psalo, ale presto bych potreboval vysvetlit
>jaky je rozdil, kdyz mam form umisten v kategorii AUTO-CREATE FORMS nebo v
>AVAILABLE FORMS. Kdy je vhodne pouzit ten, ktery zpusob.
>
>Dekuji.
>
>S pozdravem.
>--
>Petr Reichl
>E-mail: reichl(zv)seznam(tec)cz
>
>
>asi se mi zblaznili Delphi4
[*] Ing. Jaroslav �ke��k - 30.8.1999 17:27:53
Ja myslim, ze to jde pouze za okno. Mozna jsi to nekdy spustil s vyssim rozlisenim.
Nejsnadnejsi asi bude zvysit rozliseni, vratit vse zpet. Pred zavrenim jeste
zkontroluj zda mas nastaveno ukladani prostredi (Options), jinak se ti to bude
vracet stale
Jaro
Tak tedy novy problem do plena : Po spusteni D4 bez projektu se mi okna usporadaji hodn� doprava (castecne i za zobrazitelnou plochu), a "Project Manager" se mi nedari zobrazit vubec ackoliv v seznamu otevrenych oken je. Vypadalo to jeste hur ale to popisovat nebudu.
Nevite nahodou nekdo, jak privest D4 k rozumu ??? Nejlepe kam si uklada informace o otevrenych oknech pri ukonceni D4.
predem diky PavelC
----------------------------
docasny index na C/S databazi (resp.FF) bez Query
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 30.8.1999 16:55:02
Puvodni zprava, kterou napsal ing.Pavel Cabalka dne 30 Aug 99,:
> dost casu. Taky jsem zaregistroval prispevek o dopln.knihovnach SQL pro
> FlashFiler. = Vypada to zajimave. Asi si budu muset koupit to CD Kolekce.
To nemusis kupovat, tam je toho pro FlashFiler jen jeden adresar
a to vsechno najdes na FlashFoundry 2, ktere je zde:
http://www.tpx.turbopower.com/~Ben.Oram/foundry/
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
Form
[*] Kriz Pavel, TDS <kriz.tds(zv)ms.easynet(tec)cz> - 30.8.1999 17:56:13
> Mam dojem, ze se zde o tom uz psalo, ale presto bych potreboval vysvetlit
> jaky je rozdil, kdyz mam form umisten v kategorii AUTO-CREATE FORMS nebo v
> AVAILABLE FORMS. Kdy je vhodne pouzit ten, ktery zpusob.
Auto-Create Forms neznamena nic jineho, nez ze v Project.dpr se uvadi
Application.CreateForm(Trida, Promenna)
pro vsechny takove dialogy, coz znamena, ze pak mohu delat
Promenna.ShowModal apod. kdykoliv potrebuji.
Prusvih je v tom, za takovym zpusobem se zejmena ve Windows 95 velmi plytva
zdroji (resources), takze staci i kdyz mam treba 128MB pameti RAM, staci
spustit treba tri takove aplikace a system zahltim.
Dalsim efektem je to, ze cim vice je Auto-create forms, tim se aplikace
startuje dele.
Takze doporuji potreba dodrzovat tento zpusob
- hlavni okna inicializovat v Auto-create forms
- pro ostatni okna si udelat takovou funkci:
function MujDlg: boolean;
begin
with TMujDialog.Create(Application) do
try
Result := (ShowModal=mrOK);
finally
Free;
end;
end;
Pokud vsak jsou okna, se kterymi se pracuje casto, byva vyhodne obetovat
pamet, a kdyz vytvaret je vzdy pri prvnim pouziti:
const
MujDialog: TMujDialog = nil;
function MujDlg: boolean;
begin
if not Assigned(MujDialog) then MujDialog.Create(Application);
Result := (MujDialog.ShowModal=mrOK);
end;
S pozdravem
Pavel Kriz
TDS
----- Original Message -----
From: Petr Reichl <meap(zv)seznam(tec)cz>
To: ListServ - Delphi <delphi-l(zv)fwd(tec)cz>
Sent: Monday, August 30, 1999 1:56 PM
Subject: Form
Form
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 30.8.1999 18:17:10
> function MujDlg: boolean;
> begin
> with TMujDialog.Create(Application) do
> try
> Result := (ShowModal=mrOK);
> finally
> Free;
****Free uz ne, dnes se pouzva Release; (viz help)
> end;
> end;
Slavek
> Pavel Kriz
----------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
----------------------------------------------
asi se mi zblaznili Delphi4
[*] ing.Pavel Cabalka <pavel_cabalka(zv)vcshk(tec)cz> - 30.8.1999 18:20:37
Update 2 nainstalovany mam. Mezitim uz jsem nasel zminovany delphi32.dsk a tam jsem ten ulitly "Project Manager" narovnal takze uz ho vidim. Nicmene porad nemuzu hlavni okno Delphi primet k tomu, aby pri rozliseni 1024 pouzili maximalni sirku hlavniho okna 1024. Porad mi tam rvou 1032, ale to uz neni fatal.
Nicmene mel bych jeste jednu otazecku : lze nejakym zpusobem zajistit, aby mi "Code Explorer" zustal zadokovany i po restartu Delphi spolu s "ObjectBrowserem" a "Project Managerem" ? Jakesi implicitni nastaveni.
diky PavelC
=================================
----- Original Message -----
From: <rdocekal(zv)csas(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, August 30, 1999 4:50 PM
Subject: RE: asi se mi zblaznili Delphi4
> Hmm a mas nainstalovany update 2 a 3 ? Takove chyby IDE se IMHO objevovaly v
> puvodni verzi 4.0.
> K tem ulozenym pozicim oken bez otevreneho projektu - mrkni na
> ..\Delphi4\bin\delphi32.dsk. Krome toho kazdy projekt ma taky svoje .dsk s
> ulozenim desktopu.
>
> S pozdravem
> Radek Docekal
> <mailto:rdocekal(zv)csas(tec)cz> ICQ: 9008367
>
> -----P�vodn� zpr�va-----
> Od: ing.Pavel Cabalka [mailto:pavel cabalka(zv)vcshk(tec)cz]
> Odesl�no: 30. srpna 1999 16:27
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: asi se mi zblaznili Delphi4
>
>
> Tak tedy novy problem do plena : Po spusteni D4 bez projektu se mi okna
> usporadaji hodn� doprava (castecne i za zobrazitelnou plochu), a "Project
> Manager" se mi nedari zobrazit vubec ackoliv v seznamu otevrenych oken je.
> Vypadalo to jeste hur ale to popisovat nebudu.
> Nevite nahodou nekdo, jak privest D4 k rozumu ??? Nejlepe kam si uklada
> informace o otevrenych oknech pri ukonceni D4.
>
> predem diky PavelC
> ----------------------------
docasny index na C/S databazi (resp.FF) bez Query
[*] ing.Pavel Cabalka <pavel_cabalka(zv)vcshk(tec)cz> - 30.8.1999 18:26:07
Tak to je fajn. Uz jsem tam byl a vyluxoval jsem to. Nicmene nevim jestli se tim prokousu. Jestli jsem to pochopil, tak je to pro FF v.1.52 a ja mam uz opatchovano na 1.53
zatim diky a cau
PavelC
----- Original Message -----
From: Petr Zahradnik <clexpert(zv)clexpert(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, August 30, 1999 5:55 PM
Subject: Re: docasny index na C/S databazi (resp.FF) bez Query
> To nemusis kupovat, tam je toho pro FlashFiler jen jeden adresar
> a to vsechno najdes na FlashFoundry 2, ktere je zde:
>
> http://www.tpx.turbopower.com/~Ben.Oram/foundry/
>
>
> 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
Form
[*] Lukas Voborsky <xvobl03(zv)sorry.vse(tec)cz> - 30.8.1999 19:26:59
On Mon, 30 Aug 1999, Slavek Rydval wrote:
> > function MujDlg: boolean;
> > begin
> > with TMujDialog.Create(Application) do
> > try
> > Result := (ShowModal=mrOK);
> > finally
> > Free;
> ****Free uz ne, dnes se pouzva Release; (viz help)
Je to pravda, ale je treba davat pozor na to, ze v tomto pripade se posle
zprava a form se zrusi az buhvikdy. Vetsinou to sice nevadi, ale zrovna
nedavno mi to, uz nevim proc, dost vadilo a chvili mi trvalo, nez jsem
prisel na to, ze chyba je v me utlocitnosti (free to vyresil).
bye
Lukas
-==============================================================-
mailto: voborsky(zv)menza.mff.cuni(tec)cz ICQ: 21084410
www: http://come.to/voborsky tel. 8551040-9 l. 393
-==============================================================-
WinNT: Uzamceni WorkStation
[*] Luk� Gallina - 30.8.1999 19:35:51
Panowe,
wypada to, ze muj trouble zapadl tam, kam se jeste nikdo newydal (cituji StarTrek). Takze znowu:
Pouziwam WinNT 4.0 CZ SP5, Delphi 2 Developer, Delphi 4 C/S
Potrebuji (nejlepe w D4) udelat sluzbu nebo aplikaci bez formu (lepe sluzbu ale wcelku je to fuk) ktera zjisti ze user nebo system zamknul PraceStejsn. (CTRL+ALT+DEL, Lock WorkStation). Newim, jestli je treba nejaka API fce, ktera Stejsn (setLockWorkstation nebo neco w tom smyslu).
Smyslem jest, abych kdyz se zamkne WorkStation, at rucne nebo sporicem, aby aplikace pustila SetiForWindowsNT. To je totiz rychlejsi nez Seti pro Windows (asi tak 4x), jenze je to radkowa aplikace a a nechce se mi ji poustet rucne :-) ). Proste po zamknuti prowedst dalsi operace...
Dik za kazny namet.
Luk� Gallina (Lukas Gallina)
racek(zv)devacomm(tec)cz
Hledejte mimozemstany, jsou zde.....http://setiathome.ssl.berkeley.edu
docasny index na C/S databazi (resp.FF) bez Query
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 30.8.1999 18:56:27
Puvodni zprava, kterou napsal ing.Pavel Cabalka dne 30 Aug 99,:
> Tak to je fajn. Uz jsem tam byl a vyluxoval jsem to. Nicmene nevim =
> jestli se tim prokousu. Jestli jsem to pochopil, tak je to pro FF v.1.52 =
> a ja mam uz opatchovano na 1.53 zatim diky a cau=20 PavelC
Ale ono to urcite bude chodit i s FF1.53, jen bude potreba nekde
ve zdrojaku balicku nastavit jiny nazev balicku FlashFileru...
Ja to nezkousel, protoze ja jsem byl liny updatovat na 1.53,
prestoze ji mam stazenou, proste jsem lenoch... (je to hodne
prace spustit ten instalak :)))
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
(Ne)utajovani algoritmu kodovani
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 30.8.1999 20:02:15
Ahoj,
> Ale kdeze. Co se da na algoritmech pro sifrovani tak dalece dokazovat?
****Jedine, ale zato podstatne: ze je dekodovatelny. :-)
> No
> a i kdyby se snad dalo, tak po provedeni takoveho dukazu by to zverejneni
> uz snad nijak nevadilo, ne?
****Jde o to, ze dukaz zustane ve firemni dokumentaci stejne jako
zdroj algoritmu.
> Kombinaci hloupych algoritmu tezko muze vzniknout nejaky chytry.
****To jsem ani netvrdil. Tvrdil jsem, ze je hure dekodovatelny
hrubou silou.
Slavek
ps.: Nechci, aby tu vznikla domneka, ze zastavam ten nebo ten
zpusob. Kazda situace si vyzaduje sve.
> Viktor
----------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
----------------------------------------------
TImage
[*] Tomas Matousek <matousek(zv)havit(tec)cz> - 30.8.1999 20:03:23
>Dobry den,
>
>hram sa s Delphi 3 a komponentou TImage.
>Do nej nieco nakreslim, a ked ju chcem zvetsit(nie stretch - chcem kreslit
>na vecsiu plochu),
>kreslit sice mozem, ale je to orezane zdola a sprava. Nejako som vyrozumel,
>ze zmenou velkosti komponenty TImage sa nemeni velkost bitmapy v pameti. V
>helpe som nezistil vobec nic.
>Neviete prosim nahodou niekto, ako to obist?
>
>Dakujem
>
>Daniel Schmidt
>
Pri zvetseni Image:
Image.Picture.Bitmap.Width:=Image.Width;
Image.Picture.Bitmap.Height:=Image.Height;
Tomas Matousek
matousek(zv)havit(tec)cz
OnCloseQuery
[*] Tomas Matousek <matousek(zv)havit(tec)cz> - 30.8.1999 20:08:36
>Dobry den vsem.
>
>Mam takovy problem.
>V moji MDI aplikaci potrebuji v OnCloseQuery ChildFormu poznat,
>jestli se zavira cela aplikace (parent), nebo jen dany ChildForm.
>V OnCloseQuery ParentFormu to nijak osetrit nejde (ze bych si nastavil
>nejaky flag),
>protoze se nejdrive volaji OnCloseQuery vsech deti a teprve pak se
>zavola OnCloseQuery rodice.
>
>Dekuji za pripadnou radu
>Tomas Folprecht
>
Zkus porovnat handle hlavniho formu s (Sender as TCustomForm).Handle.
Nezkousel jsem to, takze to neni jisty, ale mohlo by to jit.
Tomas Matousek
matousek(zv)havit(tec)cz
Prace s databazi
[*] Petr Reichl <meap(zv)seznam(tec)cz> - 30.8.1999 20:22:50
Potreboval bych poradit jak mam pracovat s databazi ve zdrojovem kodu. Pro
vysvetleni. Donedavna jsem pracoval ve VB, ve kterem jsem si do promenych
nadeklaroval databazi, recordset a pracoval jsem s tim napr. takto:
rs.AddNew
rs.fields("Jmeno")=Text1.Text
rs.Update
... tzn. otevrel jsem recordset pro zapis, polozce Jmeno byla prirazena
hodnota z Text1.Text a zmena byla ulozena do recordsetu. Takto jednoduse
byla provedenaoperace s databazi ve VB. V Delphi jsem na nic podobneho
neprisel a dost to postradam, jelikoz napr. potrebuji otevrit dve databaze a
porovnat zaznamy a aktulaizovat jednu podle te druhe. Normalne ve VB bych v
nejake smycce porovnal zaznamy rs.fiels ... = rs..... Jak tuto situaci mam
udelat v Delphi?
----
Vsem vam moc dekuji, ze odpovidate na me dotazy. Moc me to pomaha. Jsem
exbasicar a tudiz mam porad sklony k porovnavani Delphi s VB a rad bych zase
pouzival programove konstrukce, ktere jsem pouzival ve VB take v Delphi.
Predevsim s praci s databazemi.
----
Petr Reichl
---
* -
* E-mail: reichl(zv)seznam(tec)cz, meap(zv)seznam(tec)cz
* Podpora PGP: www.pgp(tec)cz
* -
---
asi se mi zblaznili Delphi4
[*] Ing. Jaroslav �ke��k - 30.8.1999 21:29:00
No jednoduseto to uloz a potom to ukladani vypni
Jaro
Update 2 nainstalovany mam. Mezitim uz jsem nasel zminovany delphi32.dsk a tam jsem ten ulitly "Project Manager" narovnal takze uz ho vidim. Nicmene porad nemuzu hlavni okno Delphi primet k tomu, aby pri rozliseni 1024 pouzili maximalni sirku hlavniho okna 1024. Porad mi tam rvou 1032, ale to uz neni fatal.
Nicmene mel bych jeste jednu otazecku : lze nejakym zpusobem zajistit, aby mi "Code Explorer" zustal zadokovany i po restartu Delphi spolu s "ObjectBrowserem" a "Project Managerem" ? Jakesi implicitni nastaveni.
diky PavelC
=================================
----- Original Message -----
From: <rdocekal(zv)csas(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, August 30, 1999 4:50 PM
Subject: RE: asi se mi zblaznili Delphi4
> Hmm a mas nainstalovany update 2 a 3 ? Takove chyby IDE se IMHO objevovaly v
> puvodni verzi 4.0.
> K tem ulozenym pozicim oken bez otevreneho projektu - mrkni na
> ..\Delphi4\bin\delphi32.dsk. Krome toho kazdy projekt ma taky svoje .dsk s
> ulozenim desktopu.
>
> S pozdravem
> Radek Docekal
> <mailto:rdocekal(zv)csas(tec)cz> ICQ: 9008367
>
> -----P�vodn� zpr�va-----
> Od: ing.Pavel Cabalka [mailto:pavel cabalka(zv)vcshk(tec)cz]
> Odesl�no: 30. srpna 1999 16:27
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: asi se mi zblaznili Delphi4
>
>
> Tak tedy novy problem do plena : Po spusteni D4 bez projektu se mi okna
> usporadaji hodn� doprava (castecne i za zobrazitelnou plochu), a "Project
> Manager" se mi nedari zobrazit vubec ackoliv v seznamu otevrenych oken je.
> Vypadalo to jeste hur ale to popisovat nebudu.
> Nevite nahodou nekdo, jak privest D4 k rozumu ??? Nejlepe kam si uklada
> informace o otevrenych oknech pri ukonceni D4.
>
> predem diky PavelC
> ---------------------------- Tak jde cas .... (Was: ADO + D5)
[*] Erik Salaj <winsoft(zv)napri.sk> - 30.8.1999 22:04:20
> Navic v _nekterych_ pripadech je vec srozumitelnejsi ze zdrojaku nez za
> pomoci sahodlouhych popisu v dokumentaci. Jedno proste nelze oddelovat
> od druheho. Pripomina mi to pomerne nestastny pristup z jineho oboru -
> cislicove techniky. Zde se tvrdilo, ze integrovane obvody jsou cerna
> skrinka a co je uvnitr neni dulezite, protoze jejich funkce je navenek
> preci zcela jasne definovana. Jenze v praxi pri reseni problemu je tento
> pristup naprosto nepouzitelny (na logicke obvody je treba se obcas divat
> jako na analogove, protoze jejich implementace neni ciste "digitalni").
Povedal by som, ze z vynimky robis pravidlo. Je zaujimave, ze vela ludi
programuje bez detailnych znalosti procesora a hardwaru, zrejme je to
chyba. Mali by sa okamzite zacat ucit analogove obvody - to koli tym
digitalnym ;-).
> Ano, pri kazde nove verzi Windows bude treba vse predelat. Bylo to tak
> pri prechodu z 16bit na 32bit a bude tomu tak i nadale. Predstava, ze
> za pomoci nejakeho idealniho navrhu pak jen vtipne skryjeme rozdily v
> implemenentaci je pomerne iluzorni. Staci se podivat treba na prechod
> z D1 do D2.
Vela 16bitovych aplikacii mi bez problemov bezi aj pod NT-ckom, takze
to celkom take iluzorne s kompatibilitou nebude. Ze v Delphi 1 a v Delphi 2
boli rozdiely - povedal by som, ze prave preto, ze sa vo VCL nepouzivaju
niektore principy, ktore kompatibilite napomahaju. Delphi komponenty
nie su kompatibilne ani medzi roznymi verziami Delphi, tak co by sme
to este potom chceli.
> Navic, programovani snad neni totez jako treba kupovani rohliku :-) takze
> urcite zakladni znalosti se snad mohou vyzadovat. V tom je totiz tak
trochu
> problem dnesni doby, vse ma byt pokud mozno maximalne snadne a jednoduche.
> Jenze, ono to vzdy nejde bez urcitych obeti, VCL je toho dobrym prikladem.
Niekedy je jednoduchsie namiesto vyriesenia problemu presvedcit ludi, ze to
nie je nedostatok ale vlastne celkom vyhodna vlastnost a ze ten problem
je vlastne v tym ludoch samotnych, ze sa tomu nevedia prisposobit
(ci dokonca vyuzit tu vlastnost).
> Mimochodem, jak by jsis predstavoval cely koncept OOP bez virtualnich
> destruktoru.
Bol to obecny priklad na virtualnu metodu (a nahodou destruktor). Vo VCL
je vela nevirtualnych metod a tento problem sa tam jednoznacne prejavuje
(na destruktoroch asi nie, ked su virtualne). Takze bavme sa k veci, t.j.
k probleme s nevirtualnymi metodami a nie k destruktorom (ktore virtualne
su).
> Tohle je spis tak trochu problem odlisnosti v koncepci OOP a COMu, ne ?
> OOP je vice o "Object" a COM zase o "Component" ....
OOP je o "Object ..." a COM je o "... Object ...".
> Pokud chces zmensit velikost daneho EXE tak prece muzes pouzit balicky.
> Predstav si, ze vsechny .BPL jsou neco jako ATL (no, trosku to pokulhava
> uznavam :-) a mas totez. Podobne je to i s aplikacemi z MSVC++, jiste ze
Predstavit si to mozem a predstava je to velmi lakava, ale to je tak vsetko
;-)
> Uvidime, nevim sice nic o COOL nastroji, ale znacny podil na uspechu
> Delphi ma myslim soucasna podoba ObjectPascalu. Pokud by tedy chteli
> jit touto cestou, museli by bud koupit OP, presvecdit lidi ze C++ je
> vlastne docela hracka nebo v posledni rade (coz by bylo asi netezsi),
> ze VB je plnohodnotny OOP jazyk :-) Pripadne modni trendy typu COM+
> lze preci dale doplnit i do OP.
Mam taky pocit, ze na tieto "modne trendy" Borland nejako zabuda.
A namiesto toho vyvija MIDAS a podobne nezmysly, ktore neskor
zahodi (rovnako ako ReportSmith, Paradox, InterBase, IntraBuilder, ...).
Erik Salaj
ADONIS komponenty pro ADO
[*] Erik Salaj <winsoft(zv)napri.sk> - 30.8.1999 22:35:48
Zdravim,
k DAODS je potrebne DAO 3.5 alebo DAO 3.6. DAO je
sucastou skoro kazdeho vyvojoveho produktu od Microsoftu
(Visual C++, Visual Basic, Office Developer Edition, ...).
ADO je volne dostupne na http://www.microsoft.com/data
a bude sucastou Windows 2000, takze v tomto pripade
nebude potrebne okrem aplikacie (a pripadne SQL servera
ak sa pouzije) uz nic instalovat.
Co sa tyka rychlosti DAO je o nieco rychlejsie pre pristup
k MS Access databaza, ADO zase poskytuje ine vyhody, napr.
rovnaky pristup aj k SQL databazam, podporu pre viacvrstove
aplikacie a Internet, ...
Ak mate dalsie otazky, kludne sa pytajte, pokial budem vediet,
odpoviem.
Pozdravuje
Erik
----- Original Message -----
From: Martin Talian <geoplan(zv)pp.sinet.sk>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, August 30, 1999 11:10 AM
Subject: RE: ADONIS komponenty pro ADO
> ktore je vyhodnejsie resp. rychlejsie ? k DAODS potrebujem DAO , ze ? A
> odkial zoberiem ADO, tieto komponenty ho obsahuju ? mozno su to hlupe
otazky
> ale este som sa s tym nestretol.
>
> Martin
Deravy formular
[*] Igor MALY <igormaly(zv)zv.psg.sk> - 30.8.1999 22:39:51
Zdravim
Neviem ci to tu uz bolo, ale potrebujem v programe urobit "deravy formular".
Mohol
by mi niekto napisat ako sa to da urobit? Existuje na to nejaka komponenta?
Vdaka
_________
Igor MALY
e-mail: igormaly(zv)zv.psg.sk
ICQ: 25017561
Seminar Delphi 5 v Laznich Belohrade
[*] Jan �ebel�k <honza(zv)haes(tec)cz> - 30.8.1999 23:14:29
Blizi se podzim a s tim se me stale vice z vas pta:
"Uskutecni se zase v Laznich Belohrade podobny seminar o Delphi, jako byl v lednu?"
Rozhodne se o podobnou akci pokusim - je tady Delphi 5 a urcite by stalo podivat se mu na zoubky trochu dukladneji, aby to nebyly jen propagacni slogany.
CALL FOR PAPER: Prosim o namety na obsah seminare a nabidky vystoupeni.
O priprave seminare vas budu prubezne informovat na http://www.haes(tec)cz v sekci "Klub vyvojaru - Seminare".
Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 931, 692 569, 0601 20 30 84
=========================================(Ne)utajovani algoritmu kodovani
[*] Lukas Voborsky <xvobl03(zv)sorry.vse(tec)cz> - 30.8.1999 23:20:21
On Mon, 30 Aug 1999, Slavek Rydval wrote:
> Ahoj,
>
> > Ale kdeze. Co se da na algoritmech pro sifrovani tak dalece dokazovat?
> ****Jedine, ale zato podstatne: ze je dekodovatelny. :-)
Kazdy rozumny algoritmus je dekodovatelny...
Lukas
-==============================================================-
mailto: voborsky(zv)menza.mff.cuni(tec)cz ICQ: 21084410
www: http://come.to/voborsky tel. 8551040-9 l. 393
-==============================================================-
Resize
[*] Petr Reichl <meap(zv)seznam(tec)cz> - 31.8.1999 03:29:47
Zde uvadim kod:
procedure TfrmMain.FormResize(Sender: TObject);
begin
panSlozky.Height:=frmMain.ClientHeight - tlbMain.Height -
stbMain.Height - 5;
trvSlozky.Height:=panSlozky.Height - panSlozkyHeader.Height - 8;
panSeznam.Height:=frmMain.ClientHeight - tlbMain.Height -
stbMain.Height - panNadpis.Height - 10;
panSeznam.Width:=frmMain.ClientWidth - panSlozky.Width -7;
lsvSeznam.Height:=panSeznam.Height - 4;
lsvSeznam.Width:=panSeznam.Width - 3;
panNadpis.Width:=frmMain.ClientWidth - panSlozky.Width -7;
end;
... normalne zde usporadavam objekty podle daneho rozmeru formulare, ale
kdyz prejdu z maximalizovaneho stavu do normalniho, tak se nevykresli
StatusBar, prejdu zpet do maximalizovaneho a je tam.
Delphi 4.0 Professional
Petr Reichl
---
* -
* E-mail: reichl(zv)seznam(tec)cz, meap(zv)seznam(tec)cz
* Podpora PGP: www.pgp(tec)cz
* -
---
----- Original Message -----
From: Petr Vones <pvones(zv)mbox.vol(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, August 30, 1999 12:12 AM
Subject: Re: Resize
> > Petr Reichl wrote:
> >
> > V procedure Resize u formulare mam aby resizoval polozky. V pripade, ze
z
> > maximalizovaneho stavu prejdu do normalniho tak se mi dole nevykresluje
> > StatusBar. Pritom s nim nijak neoperuji, prizpusobuje se sam, ale
> > nevykresluje.
>
> Ahoj,
>
> Nemas spis namysli kod v udalosti OnResize ? Jinak tezko rict, mozna by
> pomohla mala ukazka toho kodu (a uvedeni verze Delphi :-).
>
> --
>
> Petr Vones, amatersky programator
>
>
>
BDE v sieti
[*] Jan Fiala <fiala(zv)infos(tec)cz> - 31.8.1999 06:07:51
----- P�vodn� zpr�va ----- zdravim,
M
am taku malu databazovu aplikaciu. Je na sietovom disku.A
k ju spustim na jednom pocitaci aj viac krat, funguje. Al
e ak ju mam spustenu na jednom pocitaci a ak ju skusim s
pustit este na inom vypise mi pri spusteni chyb hlasenie
a nespusti sa. vid chyb. hlasenie
Exception EBDE
ngine Error in module denprj.exe at 0008D67E.
Director
y is controlled by other.Net.
vie niekdo poradit
?
Martin
Zrejme jde o Paradox tabulky. Ty p
ouzivaji pro zamykani a dalsi veci soubor Paradox.NET. To
co potrebujes, je na stanicich v BDE u Paradox driveru n
astavit NET DIR do stejneho adresare, cili na sit. Spoust
a informaci je v archivu konference, probiralo se to tu m
nohokrat.
===============================
ing. Jan F
iala fiala(zv)infos(tec)cz
Prog-Soft s.r.o.
Plzen
INFOS - informacni system pro napojare
=========
======================
Prace s databazi
[*] Jan Fiala <fiala(zv)infos(tec)cz> - 31.8.1999 06:41:15
----- P�vodn� zpr�va -----
Od: Petr Reichl <meap(zv)seznam(tec)cz>> Potreboval bych poradit jak mam pracovat s databazi ve zdrojovem kodu. Pro
> vysvetleni. Donedavna jsem pracoval ve VB, ve kterem jsem si do promenych
> nadeklaroval databazi, recordset a pracoval jsem s tim napr. takto:
>
> rs.AddNew
> rs.fields("Jmeno")=Text1.Text
> rs.Update
V Delphi mame misto RecordSetu DataSet (nebo taky Table). Tu si samozrejme muzes pojmenovat taky "rs".
rs.Append;
rs.FieldByName('Jmeno').Value := Text1.Text;
nebo primo typova konverze
rs.FieldByName('Jmeno').AsString := Text1.Text;
nebo
rs.FieldValues['Jmeno'] := Text1.Text;
nebo
rs.Fields[x].Value := Text1.Text;
rs.Post;
> ... tzn. otevrel jsem recordset pro zapis, polozce Jmeno byla prirazena
> hodnota z Text1.Text a zmena byla ulozena do recordsetu. Takto jednoduse
> byla provedenaoperace s databazi ve VB. V Delphi jsem na nic podobneho
> neprisel a dost to postradam, jelikoz napr. potrebuji otevrit dve databaze a
> porovnat zaznamy a aktulaizovat jednu podle te druhe. Normalne ve VB bych v
> nejake smycce porovnal zaznamy rs.fiels ... = rs..... Jak tuto situaci mam
> udelat v Delphi?
Napr:
for i := 0 to rs.Fields.Count - 1 do
if rs.Fields[i].Value <> rs1.Fields[i].Value
then begin
rs.edit;
rs.Fields[i].Value := rs1.Fields[i].Value;
rs.post
end;
>
> ----
> Vsem vam moc dekuji, ze odpovidate na me dotazy. Moc me to pomaha. Jsem
> exbasicar a tudiz mam porad sklony k porovnavani Delphi s VB a rad bych zase
> pouzival programove konstrukce, ktere jsem pouzival ve VB take v Delphi.
> Predevsim s praci s databazemi.
> ----
>
> Petr Reichl
===============================
ing. Jan Fiala fiala(zv)infos(tec)cz
Prog-Soft s.r.o. Plzen
INFOS - informacni system pro napojare
===============================Form - dodatek
[*] Kriz Pavel, TDS <kriz.tds(zv)ms.easynet(tec)cz> - 31.8.1999 07:03:55
Omlouvam se za takovou chybicku. Psal jsem to v rychlosti, teprve po
odeslani jsem si toho vsiml...
> const
> MujDialog: TMujDialog = nil;
>
> function MujDlg: boolean;
> begin
> if not Assigned(MujDialog) then MujDialog.Create(Application);
> Result := (MujDialog.ShowModal=mrOK);
> end;
Na 1. radce ve funkci melo byt samozrejme
if not Assigned(MujDialog) then
MujDialog:=TMujDialog.Create(Application);
S pozdravem
Pavel Kriz
TDS
> ----- Original Message -----
> From: Petr Reichl <meap(zv)seznam(tec)cz>
> To: ListServ - Delphi <delphi-l(zv)fwd(tec)cz>
> Sent: Monday, August 30, 1999 1:56 PM
> Subject: Form
ADONIS komponenty pro ADO
[*] Martin Talian <geoplan(zv)pp.sinet.sk> - 31.8.1999 07:21:21
DAO 3.5 je tusim aj v D4 , nie ? Len potom by som tak musel mat
pravdepodobne aj BDE, ze.
Aku verziu DAO pouziva Acces 97 ?
Este jedna otazka
Mam taku malu databazovu aplikaciu. Je na sietovom disku. Je to v DBASE. Mam
v BDE nastaveny alias STANDART, driver dbase. Ak ju spustim na jednom
pocitaci aj viac krat, funguje. Ale ak ju mam spustenu na jednom pocitaci a
ak ju skusim spustit este na inom vypise mi pri spusteni chyb hlasenie a
nespusti sa. vid chyb. hlasenie
Exception EBDEngine Error in module denprj.exe at 0008D67E.
Directory is controlled by other.Net.
vie niekdo poradit ?
Martin
Martin
-----P�vodn� spr�va-----
Od: Erik Salaj <winsoft(zv)napri.sk>
Pre: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
D�tum: 31. srpna 1999 1:02
Predmet: Re: ADONIS komponenty pro ADO
>Zdravim,
>
>k DAODS je potrebne DAO 3.5 alebo DAO 3.6. DAO je
>sucastou skoro kazdeho vyvojoveho produktu od Microsoftu
>(Visual C++, Visual Basic, Office Developer Edition, ...).
>
>ADO je volne dostupne na http://www.microsoft.com/data
>a bude sucastou Windows 2000, takze v tomto pripade
>nebude potrebne okrem aplikacie (a pripadne SQL servera
>ak sa pouzije) uz nic instalovat.
>
>Co sa tyka rychlosti DAO je o nieco rychlejsie pre pristup
>k MS Access databaza, ADO zase poskytuje ine vyhody, napr.
>rovnaky pristup aj k SQL databazam, podporu pre viacvrstove
>aplikacie a Internet, ...
>
>Ak mate dalsie otazky, kludne sa pytajte, pokial budem vediet,
>odpoviem.
>
>Pozdravuje
>
>Erik
>
>----- Original Message -----
>From: Martin Talian <geoplan(zv)pp.sinet.sk>
>To: <delphi-l(zv)fwd(tec)cz>
>Sent: Monday, August 30, 1999 11:10 AM
>Subject: RE: ADONIS komponenty pro ADO
>
>
>> ktore je vyhodnejsie resp. rychlejsie ? k DAODS potrebujem DAO , ze ? A
>> odkial zoberiem ADO, tieto komponenty ho obsahuju ? mozno su to hlupe
>otazky
>> ale este som sa s tym nestretol.
>>
>> Martin
Plocha
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 31.8.1999 07:28:02
Ahoj,
potreboval bych poradit. Jak bych zjistil z BP7.0, ktera plocha Windows je
prave aktivni tj. c:\windows\plocha nebo c:\windows\profiles\<user>\plocha ?
(ovsem jak by to bylo v cizojazycnych...)
Diky za kazdou radu
Jaro B.Web aplikace pomoci Delphi
[*] Milan N�mec <nemec(zv)goldcard(tec)cz> - 31.8.1999 07:34:24
Posilam tento mail znovu, protoze predchozi pokus se
nekde ztratil
> Odpovim Ti do konference, protoze bych rad
> vyvratil mytus o tom, ze nekdo prolomi heslo
> do NT za dva dny.
>
> Za dva dny nebo kratsi dobu to prolomis, jen
> kdyz pouzijes nedostatecne bezpecne heslo (tratke
> nebo bude ve slovniku). To ale neni problem
> algoritmu, i kdyz vymyslis ten nejlepsi algoritmus
> a nekdo pouzije kratke heslo, tak to zabezpeceni
> totalne degradujes.
>
> Hashovaci kod pouzity v NT je 128 bitovy. Je
> to dnes odborniky povazovano za malo a za
> bezpecne jsou povazovany 160 bitove a delsi
> algoritmy. Nedostatecna bezpecnost je v tomto
> pripade to, ze to prolomis za pouziti nekolika
> tisic pocitacu a budes potrebovat mesice casu.
>
>
> From: Z�vada Ji�� <zavada(zv)atcomp(tec)cz>
> To: <delphi-l(zv)fwd(tec)cz>
> Sent: Friday, August 27, 1999 2:47 PM
> Subject: RE: Web aplikace pomoci Delphi
>
>
> > Milan Nemec napsal v odpovedi Jirimu Zavadovi:
> >
> > > > Prave tady te propagace verejneho standardu priserne zklame, protoze
> > > > existuji desifratory na hesla WinNT. Desifrator, ktery byl vytvoren
k
> > > necemu
> > > > uplne jinemu, funguje pak na hesla Weboveho pristupu.
> > > >
> > > Nevim jestli jsi zkousel desifrovat hesla v NT, ja jo (l0phtcrack,
atd.)
> > > takze vim o cem pisu. Prolomit MD4 asi nebude nejjednodussi, rozhodne
> > > s nekolika malo pocitaci nemas sanci pri pouziti dobreho hesla.
> > > I na nejlepsi algoritmus lze vytvorit desifrator (utok hrubou silou),
> > > takze argument o existenci desifratoru nema prilis smysl, dulezitejsi
> > > je jakou ma sanci najit heslo v realnem case. Troufam si tvrdit,
> > > ze snadnejsi bude prolomit tve zabezpeceni.
> > >
> > Prave argument existence desifratoru je nejlepsi, i kdyz se Ti moc
> > nehodi.
>
> To je blbost.
>
> > Pro siroce rozsirene technologie je vyssi pravdepodobnost, ze se
> > nekomu vyplati vytvorit desifrator. Pro malo rozsirene, ponekud utajene
> (kde
> > nevi, ceho se chytnout) je mu to silne k nicemu - co ziska ? Za kolik
> prace
> > dostane kolik efektu ? Ale nechme toho, pochybuji, ze to ostatni bavi,
>
> To zalezi jak citliva jsou ta data.
>
> >
> > Mimochodem, jde o aktualni stav schopnosti zabezpecit pristup, k
> > tomu rikam:
> >
> > - NT autentifikace je nedostatecna, existuji desifratory, ktere si s
> > ni poradi (mozna i zaplaty na diry - kdo je ma ?). Take jsem to
zkousel -
> uz
> > fakt, ze sifra je prolomitelna hrubou silou (pri soucasnych moznostech
> > "hrube sily") ji cini nebezpecnou
> > - Ja pouzivam autentifikaci, kterou jsem si napsal, je vykonna, pro
> > ucel, na ktery je pouzita je bezpecna dost a predevsim plne funkcni.
> >
>
> Kdyz myslis....
>
> > > > Jakou ma tato rozprava o heslech souvislost s Delphi ?
> > >
> > > Takovou, ze tvrdis, ze je mozne udelat autorizaci programove.
> > > Jo jde to, ale u autorizace je dulezita bezpecnost, jinak je
> > > autorizace k nicemu, ze?
> > >
> >
> > S chimerou, ze ma autentifikace je nedostatecne bezpecna jste prisli
> > na zaklade nepochopeni meho tvrzeni, nema smysl Vam neco vyvracet
> argumenty,
> > kdyz mate sve (presvedceni, viru) postavenou v prazdnu.
> >
> :-)))
> Ano, ale pan Chimera uz sel pryc.
>
> Milan
>Form
[*] Kriz Pavel, TDS <kriz.tds(zv)ms.easynet(tec)cz> - 31.8.1999 07:35:49
> > with TMujDialog.Create(Application) do
> > try
> > Result := (ShowModal=mrOK);
> > finally
> > Free;
> ****Free uz ne, dnes se pouzva Release; (viz help)
Dobra pripominka, diky, je to zajimave cteni. Jenze v tom helpu to Borlandi
skutecne doporucuji, ale v praxi uplne ve vsech prikladech (adresare "Demos"
v Delphi 3 i Delphi 4) pouzivaji vyhradne Free (Release maji jen u threadu)
:-)))
Pavel Kriz
(Ne)utajovani algoritmu kodovani
[*] Milan N�mec <nemec(zv)goldcard(tec)cz> - 31.8.1999 07:44:39
Kdyz se nejaka blbost dobre zduvodni, aby
to vypadalo logicky muze se zdat, ze je to
docela rozumne.
Utajeny algoritmus je casovana bomba,
nikdy nevis, kdy to nekdo odtajni.
Na to jsem neprisel sam, to uz zjistili
jini prede mnou.
Milan
----- Original Message -----
From: Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Sunday, August 29, 1999 5:04 PM
Subject: (Ne)utajovani algoritmu kodovani
> Preji vsem pekneho dne,
>
> dovolte, abych k tomu take neco povedel. Utajeni zpusobu
> zakodovani dat muze byt v jistem smyslu bezpecnejsi nez jeji
> prozrazeni. Zda-li je algoritmus spravne se muze preci povedet
> matematicky dukaz.
>
> Dalsi moznost je ta, ze ho nechci prozradit z toho duvodu, ze
> algoritmus je velmi primitivni nebo je slozen z nekolika znamych
> primitivu. Priklad:
>
> Pouziji znamy a popsany (a trivialni) algoritmus A, na vysledna
> data algoritmus podobnych vlastnosti B (muzu dale kombinovat).
> Pokud zachovam zakladni vlastnosti zobrazeni potrebne k sifrovani
> a tim utajeni, bude vetsi problem data hrubou silou prorazit, pokud
> algoritmus nereknu, nez kdyz jej zverejnim.
>
> Pro aplikace pro male firmy to bohate staci. Nevim, k cemu jim
> bude treba RSA, kdyz staci nejaky xor s posunutim a odectenim /
> prictenim cisla na nejakem pevne danem miste a pak jeste
> prokombinovat sifrovane bloky. Konkurenci stejne mala firma
> nebude mit asi naldu, penize ani cas na to, aby zjistovala postup.
>
> Slavek
>
>
> ----------------------------------------------
> http://atrey.karlin.mff.cuni(tec)cz/~rk
> ----------------------------------------------
(Ne)utajovani algoritmu kodovani
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 31.8.1999 08:00:58
> -----Original Message-----
> From: Slavek Rydval [mailto:rk(zv)atrey.karlin.mff.cuni(tec)cz]
> Sent: Monday, August 30, 1999 8:02 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Re: (Ne)utajovani algoritmu kodovani
>
>
> Ahoj,
>
> > Ale kdeze. Co se da na algoritmech pro sifrovani tak dalece
> dokazovat?
> ****Jedine, ale zato podstatne: ze je dekodovatelny. :-)
???
Algoritmus snad nemusi byt dekodovatelny ani nedekodovatelny
kdyz je verejny.
>
> > No
> > a i kdyby se snad dalo, tak po provedeni takoveho dukazu by
> to zverejneni
> > uz snad nijak nevadilo, ne?
> ****Jde o to, ze dukaz zustane ve firemni dokumentaci stejne jako
> zdroj algoritmu.
Kdyz zustane ve firemni dokumentaci stejne jako zdroj algoritmu,
tak neni tajny. To je stejne, jako kdybys ho vystavil na webu.
Nebo pro ruzne firmy vyvines i ruzne algoritmy? :-)
pokud postavis reseni na utajenem algoritmu, staci, aby
narusitel jednou rozlouskl nejaky zakryty text a uz zna vsechno.
Naopak overene algoritmy jsou algoritmy, k nimz neexistuje
inverzni funkce a i znalost toho algoritmu nikomu neumozni se
s rozsifrovanim vyporadat bez hrube sily. Pak uz staci zvolit
dostatecne velky klic, aby rozlousknuti trvalo dostatecne dlouhou
dobu na to, aby nenapachalo skody. A i kdyby se narusiteli podarilo
rozsifrovat jednu zpravu, stoji u druhe zase na zacatku.
>
> > Kombinaci hloupych algoritmu tezko muze vzniknout nejaky chytry.
> ****To jsem ani netvrdil. Tvrdil jsem, ze je hure dekodovatelny
> hrubou silou.
:-)))
Mozna je horsi sestavit algoritmus pro hrubou silu, protoze
narusitel neprohledava stavovy prostor n-rozmernych klicu ale
funkci (algoritmu), zato vsak mu postaci jeden uspech a ziska
inverzni algoritmus.
Jura
-------------
Email: Jiri.Polak(zv)tconsult(tec)cz
Co mne nastvalo a na co si dejte pozor:
http://freeweb.coco(tec)cz/jpolak/cernalistina/pristup na ftp.mlp.cz a Winproxy
[*] Gebauer Lukas <gebylist(zv)mlp(tec)cz> - 31.8.1999 08:08:21
tak pdole osledniho zjisteneho stavu to vypada na nejakou
zahadnou nekompatibilitu mezi nasim FTP serverem a Winproxy.
na ci strane je chyba, to zatim fakt nevim... dulezite je, ze pokud
pouzivate Winproxy, tak se proste na ftp.mlp(tec)cz nepripojite... ;-(((
Louci se Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
Max a min rozsah promenne
[*] Pavel ZIDEK <kopr(zv)kopr(tec)cz> - 31.8.1999 08:09:19
Diky,
ALE High jede pouze pro typ byte a integer.
High(integer)
High(byte)
Ja bych potreboval jeste High(Currency) a Comp...
No a dale jeste ty minimalni hodnoty techto promenych.
Samozrejme rozsahy znam, ale ja to potrebuji za behu programu, kdy neznam v DB typ promenne. Asi je budu muset natrvdo naprogramovar jako konstaty.
----------
> Odes�latel: Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz>
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Max a min rozsah promenne
> Datum: 30. srpna 1999 16:36
>
> Ahoj,
>
> > Nevim kde najit min a max hodnoty typu napr. integer.
> ****Viz help a funkce HIGH.
>
> Slavek
>
> > ~ KOPR software Pavel ZIDEK voice 069 / 66 02 156
>
>
> ----------------------------------------------
> http://atrey.karlin.mff.cuni(tec)cz/~rk
> ----------------------------------------------
Form
[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 31.8.1999 08:09:48
> Mam dojem, ze se zde o tom uz psalo, ale presto bych potreboval vysvetlit
> jaky je rozdil, kdyz mam form umisten v kategorii AUTO-CREATE FORMS nebo
v
> AVAILABLE FORMS. Kdy je vhodne pouzit ten, ktery zpusob.
>
Pokud mas neco v AUTO-CREATE-FORMS, tak se ty formulare vytvari pri
spusteni programu a pak uz se na ne jenom odkazujes ( tam byhc pouzil
formy,
na ktere se odkazuji dost casto a tim usetrim cas potrebny pro jejich
vytvareni).
V AVAILABLE FORMS jsou formy, ktere sice projekt zna, ale ktere si pred
pouzitim musis vytvorit ( tady se asi hodi davat formy, jejichz cetnost
pouziti
neni az tak casta).
Martin
Preji hezky den .....
============================================
ML Software - Martin Lasevic
Budovatelska 459,
708 00 Ostrava - Poruba
tel.: + 420 (69) 691 85 11, 0603 338 765
mailto:ml_software(zv)email(tec)cz
mailto:+420603338765(zv)sms.paegas(tec)cz
http://cement.fmi(tec)cz/ml_software
ICQ:33630882
============================================
BDE v sieti
[*] Ren� Otisk - 31.8.1999 08:14:54
Hi,
Delas to asi na paradoxu, ze? takze musis nastavit netdirectory v bde administratoru na vsech pocitacich na stejne sdilene misto
Sroub
----- Original Message -----
From: Martin Talian
To: delphi-l(zv)fwd(tec)cz
Sent: Monday, August 30, 1999 2:47 PM
Subject: BDE v sieti
zdravim,
Mam taku malu databazovu aplikaciu. Je na sietovom disku.Ak ju spustim na jednom pocitaci aj viac krat, funguje. Ale ak ju mam spustenu na jednom pocitaci a ak ju skusim spustit este na inom vypise mi pri spusteni chyb hlasenie a nespusti sa. vid chyb. hlasenie
Exception EBDEngine Error in module denprj.exe at 0008D67E.
Directory is controlled by other.Net.
vie niekdo poradit ?
Martin
BDE v sieti
[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 31.8.1999 08:20:28
> Exception EBDEngine Error in module denprj.exe at 0008D67E.
> Directory is controlled by other.Net.
>
> vie niekdo poradit ?
>
Problem je v tom, ze nemas na vsech stanicich nastaveny stejny adresar NET
DIR ( pravdepodobne pouzivas PARADOX).
Na vsech stanicich nastav v BDE NET DIR a nebo v sve aplikaci vyuzivej
property Session.NETFileDir pro nastaveni netdiru jen pro svoji aplikaci.
Dale doporucuji nastavit Session.PrivateDir na nejaky TEMP adresar na
lokalni stanici ( do PrivateDiru si PARADOX uklada podpurne tabulky pri
tvorbe Query).
Preji hezky den .....
============================================
ML Software - Martin Lasevic
Budovatelska 459,
708 00 Ostrava - Poruba
tel.: + 420 (69) 691 85 11, 0603 338 765
mailto:ml_software(zv)email(tec)cz
mailto:+420603338765(zv)sms.paegas(tec)cz
http://cement.fmi(tec)cz/ml_software
ICQ:33630882
============================================
Vymena media v mechanice
[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 31.8.1999 08:22:54
Zkus to testovat na LabelDisku ci jine nalezitosti, ktere na tech mediich jsou?
Martin
> -----Puvodni zprava-----
> Od: Viktor Lostak [SMTP:Viktor.Lostak(zv)chmi(tec)cz]
> Odeslano: 30. srpna 1999 8:19
> Komu: delphi-l(zv)fwd(tec)cz
> Poedmit: Vymena media v mechanice
>
> Je nejaka moznost, jak dostat zpravu od systemu, ze uzivatel
> vytahnul/zasunul medium do mechaniky (disketu, ZIP, JAZZ atp.)?
>
> Dik za radu. Viktor
>
>
> ADONIS komponenty pro ADO
[*] Jan Fiala <fiala(zv)infos(tec)cz> - 31.8.1999 08:29:40
----- P�vodn� zpr�va -----
Od: Martin Talian <geoplan(zv)pp.sinet.sk>> Mam taku malu databazovu aplikaciu. Je na sietovom disku. Je to v DBASE. Mam
> v BDE nastaveny alias STANDART, driver dbase. Ak ju spustim na jednom
> pocitaci aj viac krat, funguje. Ale ak ju mam spustenu na jednom pocitaci a
> ak ju skusim spustit este na inom vypise mi pri spusteni chyb hlasenie a
> nespusti sa. vid chyb. hlasenie
>
> Exception EBDEngine Error in module denprj.exe at 0008D67E.
> Directory is controlled by other.Net.
BDE pouziva pro SQL dotazy (docasne tabulky) format Paradox. Takze i pro dBASE plati nastavovani NET DIR v driveru u Paradoxu.
===============================
ing. Jan Fiala fiala(zv)infos(tec)cz
Prog-Soft s.r.o. Plzen
INFOS - informacni system pro napojare
===============================Table.Locate(...)
[*] Petr Sadovsky <petr(zv)slunce(tec)cz> - 31.8.1999 08:52:14
Ahojte,
Mam tabulku DBase pripojenou pres BDE, dam na ni Locate(..) a nemuzu
prijit na to, jak
dam po Locate vyhledat dalsi . Neco jako LocateNext(..) . Kdyz spustim
Locate dvakrat po sobe, nejde stejny zaznam, protoze hleda automaticky znovu
od zacatku tabulky.
Diky za kazdou radu.
Petr Sadovsk�
p.sadovsky(zv)atlas(tec)cz
ICQ 37042001
pristup na ftp.mlp.cz
[*] Mari�nHatala<emha(zv)mailbox.sk> - 31.8.1999 09:18:57
Jasne, akosi mi usla ruka ;)
Ka�dopadne sa mi podarilo presvedcit ho (teda ftpmail) aby sa tam dostal. eMHa
-----P�vodn� zpr�va-----
Od: Petr Fejfar [SMTP:callnet(zv)telecom(tec)cz]
Odesl�no: 29. august 1999 9:12
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Re: pristup na ftp.mlp(tec)cz
Mari�nHatala <emha(zv)mailbox.sk> wrote:> helpu mal prihlasit ako user "anonnymous"
> a password spiatocna adresa,
No, jestlis to zadaval jako "anonnymous", tak to by ledacos vysvetlovalo :-)
Ono se to spravne pise "anonymous".
Problem s transparentnosti ikonek
[*] Heinisch Jiri <HeiJu(zv)sol(tec)cz> - 31.8.1999 09:27:11
> > nejak se mi moc wjeci nedari. Mam udelany ikonky w Icon Easelu, kde jsou
> nastaveny nektery plochy transparentni.
> > Kdyz je pouziwam w systemu (WinNT 4 CZ WorkStation, SP5) tak jsou w
> poradku. Jakmile je dam do resources a jako ikonku EXE filu tak to dela
to,
> ze transparentni okraje jsou cernou barwou. Jak u EXE tak i kdyz je
> wykresluji pres TListView ci TPicture.
ahoj
Ty same problemy jsem mel u Timagelist a pouzivani karty ASUS 3000ZX.
Pokud vymenim kartu za ATI problem zmizel.
S pozdravem Heinisch Jiri
Tak jde cas .... (Was: ADO + D5)
[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 31.8.1999 09:53:21
Haj hou!
From: Erik Salaj <winsoft(zv)napri.sk>> Povedal by som, ze z vynimky robis pravidlo. Je zaujimave, ze vela ludi
> programuje bez detailnych znalosti procesora a hardwaru, zrejme je to
> chyba. Mali by sa okamzite zacat ucit analogove obvody - to koli tym
> digitalnym ;-).
Ano, ano. Spousta lidi si po cely zivot vystaci s Cestinou, ale ne nadarmo
se rika, ze "kolik jazyku znas, tolikrat jsi clovekem". Takze jeste jednou:
Cela kauza o zdrojacich je o MOZNOSTI lepe poznat, pochopit a vyuzit cizi
praci, kdyz to CHCI. Pokud o to nekdo nestoji, nikdo mu to necpe.
> Vela 16bitovych aplikacii mi bez problemov bezi aj pod NT-ckom, takze
> to celkom take iluzorne s kompatibilitou nebude. Ze v Delphi 1 a v Delphi
2
> boli rozdiely - povedal by som, ze prave preto, ze sa vo VCL nepouzivaju
> niektore principy, ktore kompatibilite napomahaju. Delphi komponenty
> nie su kompatibilne ani medzi roznymi verziami Delphi, tak co by sme
> to este potom chceli.
Jake "principy, ktere kompatibilite napomahaju" ? A ze je VCL (mirne)
odlisna mezi jednotlivymi verzemi Delphi ? To je argument ? Win32 API
Windows je take (mirne) odlisne mezi 95/98/NT. Je to zcela normalni jev, a
rika se mu evoluce brzdena setrvacnosti.
> > Navic, programovani snad neni totez jako treba kupovani rohliku :-)
takze
> > urcite zakladni znalosti se snad mohou vyzadovat. V tom je totiz tak
> trochu
> > problem dnesni doby, vse ma byt pokud mozno maximalne snadne a
jednoduche.
> > Jenze, ono to vzdy nejde bez urcitych obeti, VCL je toho dobrym
prikladem.
>
> Niekedy je jednoduchsie namiesto vyriesenia problemu presvedcit ludi, ze
to
> nie je nedostatok ale vlastne celkom vyhodna vlastnost a ze ten problem
> je vlastne v tym ludoch samotnych, ze sa tomu nevedia prisposobit
> (ci dokonca vyuzit tu vlastnost).
Hmmm, a naivne si mislet, ze bez prace jsou kolace, za malo penez hodne
muziky, vzdelani bez studia a mistrovstvi bez driny a odrikani ?
Mam silny pocit ze se mijime uz v zakladnim pohledu na zivot, vesmir a vubec
:-))))))
> Bol to obecny priklad na virtualnu metodu (a nahodou destruktor). Vo VCL
> je vela nevirtualnych metod a tento problem sa tam jednoznacne prejavuje
> (na destruktoroch asi nie, ked su virtualne). Takze bavme sa k veci, t.j.
> k probleme s nevirtualnymi metodami a nie k destruktorom (ktore virtualne
> su).
Ok, pomineme destruktory. Problem neni ve virtualite/staticnosti, ale v
dobrem navrhu knihovny (VCL nebo jine). Cim lepe je navrzena (rozumej s
durazem na moznosti znovupouziti a prizpusobeni), tim mensi pravdepodobnost,
ze narazis na problem staticke metody. A pokud se to preci jen podari, toz
jsou i jina reseni, ne ?
> > Pokud chces zmensit velikost daneho EXE tak prece muzes pouzit balicky.
> > Predstav si, ze vsechny .BPL jsou neco jako ATL (no, trosku to pokulhava
> > uznavam :-) a mas totez. Podobne je to i s aplikacemi z MSVC++, jiste ze
>
> Predstavit si to mozem a predstava je to velmi lakava, ale to je tak
vsetko
> ;-)
???
> Mam taky pocit, ze na tieto "modne trendy" Borland nejako zabuda.
> A namiesto toho vyvija MIDAS a podobne nezmysly, ktore neskor
> zahodi (rovnako ako ReportSmith, Paradox, InterBase, IntraBuilder, ...).
Podporovat "modni trendy" je velice riskantni zalezitost a stoji dost penez
(viz priklad IntraBuilderu). jedna vec je podporovat (rozumej prosazovat) to
co sam vymyslim a jina vec podporovat neco, co si vymyslel nekdo jiny, a co
jeste neprokazalo svou zivotaschopnost. Nicmene Borland nove technologie
podporuje *sec mu sily staci*.
a) ReportSmith NEBYL Borlandu
b) Paradox se prezil, ale za ta leta odvedl dobrou sluzbu. Borland nema
tolik penez jako MS, aby mohl sponzorovat ustupujici technologie.
c) Interbase je dobra SQL databaze a Borland se ji nezbavuje (to by musel
byt padly na hlavu).
d) IntraBulder mel tu smulu, ze podporoval novou technologii, ktera se
nakonec neujala (byla nahrazena jinymi). To se stava i v "lepsich rodinach".
Hodne zdaru
Pavel Cisar pcisar(zv)atlas(tec)cz
TekMetrics Certified Master Delphi Developer
http://www.tekmetrics.com/transcript.shtml?pid=76711
Problem pri ReadFile z mailslotu
[*] Petr Fejfar <callnet(zv)telecom(tec)cz> - 31.8.1999 09:55:57
Martin Bodlak <vyvoj(zv)atlascon(tec)cz> wrote:
>vzhledem k tomu, ze pro mailsloty (tedy mimo jine) neni mozne to ve
>Win9x pouzit, budu muset na to jit jinak.
Sorry, to me uslo. Vedel jsem, ze pod W9x nelze asynchronne pracovat se soubory, ale myslel jsem si, ze s mailsloty by to mohlo jit, stejne jako to jde s porty, ktere nekolik poslednich mesicu programuji. Holt: "myslet znamena <cenzored> vedet" :-)
bye pf, callnet(zv)telecom(tec)cz
Nova verze WebProvideru
[*] voltrr1.epr(zv)mail.cez(tec)cz - 31.8.1999 08:56:33
Zdar,
mam k disposici novou verzi WebProvideru , nyni jiz vcetne prvku pro
generovani html
z datasetu , posilani obrazku , jejich online vytvareni a nekolika dalsich
vylepseni.
Soucasti jsou i dema jednotlivych casti (napr. graficke pocitadlo pristupu
na stranky)
Potreboval bych par beta testeru kteri to ozkusi (jedna se hlavne o
instalaci pod D3)
nez se to hodi na Delphree.
Radek Voltr
voltrr1.epr(zv)mail.cez(tec)cz
WebProvider Coordinator
(Ne)utajovani algoritmu kodovani
[*] Z�vada Ji�� <zavada(zv)atcomp(tec)cz> - 31.8.1999 10:21:57
Jiri Polak napsal v odpovedi Slavkovi Rydvalovi:
...
> >
> > > No
> > > a i kdyby se snad dalo, tak po provedeni takoveho dukazu by
> > to zverejneni
> > > uz snad nijak nevadilo, ne?
> > ****Jde o to, ze dukaz zustane ve firemni dokumentaci stejne jako
> > zdroj algoritmu.
>
> Kdyz zustane ve firemni dokumentaci stejne jako zdroj algoritmu,
> tak neni tajny. To je stejne, jako kdybys ho vystavil na webu.
> Nebo pro ruzne firmy vyvines i ruzne algoritmy? :-)
> pokud postavis reseni na utajenem algoritmu, staci, aby
> narusitel jednou rozlouskl nejaky zakryty text a uz zna vsechno.
> Naopak overene algoritmy jsou algoritmy, k nimz neexistuje
> inverzni funkce a i znalost toho algoritmu nikomu neumozni se
> s rozsifrovanim vyporadat bez hrube sily. Pak uz staci zvolit
> dostatecne velky klic, aby rozlousknuti trvalo dostatecne dlouhou
> dobu na to, aby nenapachalo skody. A i kdyby se narusiteli podarilo
> rozsifrovat jednu zpravu, stoji u druhe zase na zacatku.
>
Ahoj Juro,
mam pocit, ze teorie utajeneho algoritmu je Tva nocni mura. Kdybys
predem definoval, co je podle Tebe utajeny algoritmus, po prvni dvojici
mailu jsme mohli skoncit obapolnym (vsechpolnym) souhlasem a usetrit si
opravnene rozhorcene reakce prispevatelu. Mimochodem, jeste jsi mi
neodpovedel, jak bys z bezpecnostniho hlediska hodnotil pouziti
autentifikacnich www prostredku treti strany (prikladem budiz dynamicky
autentifikacni filtr DAF), ktery dostanes bez zdrojaku - zejmena ve srovnani
s autentifikacni technologii, do ktere (pokud si ji napises) mas plny vhled.
Hodnoceni by Ti nemuselo delat problem, pokud jsi byl s nazorem na mou www
autentifikaci hotov tak rychle.
Vzdy zalezi na tom, co k cemu pouzijes - je mi jasne, ze pokud
(podle Tveho dotazniku) zpracovavas aplikace pro banky, abys prosel sitem
pri zadavani zakazky, musis se vykazat obecne uznavanym mechanizmem
zabezpeceni - autentifikace pristupu a sifrovani prenasenych dat. Ja nemusim
- me se nikdo nepta, jak data zabezpecuji, staci, ze prakticky nevznikaji
problemy. Coz mi ovsem nebrani do autentifikace inkorporovat prvky
zabezpeceni podle vlastni uvahy - i treba dost silne. Nemas pravdu, kdyz
zobecnujes pozadavky zabezpeceni aplikace pro pouziti v bankovnictvi na
libovolnou aplikaci (to snad je kazdemu jasne) - neni divu, ze jsi dosel k
chybnemu nazoru.
Delphi zdar !
DBGrid s radkem navic
[*] Pavel �im��ek - 31.8.1999 10:21:13
Ahoj vsem!
Nevedeli byste nekdo o komponente na bazi DBGridu, ktera by mela jeden radek navic do ktereho by slo zapisovat hodnoty vznikle napriklad matematickyma operacema provadenyma nad danou tabulkou zobrazenou v ostatnich radcich DBGridu? Jde hlavne o to aby tento radek reagoval na na vsechny udalosti Gridu typu zmena sirek sloupcu, prehazovani sloupcu, scrollovani apod. a daly se do nej dopsat libovolne retezce.
Dik za kazdou radu Pavel
OnCloseQuery
[*] Tomas Folprecht <tomas.folprecht(zv)iol(tec)cz> - 31.8.1999 10:32:32
> >Dobry den vsem.
> >Mam takovy problem.
> >V moji MDI aplikaci potrebuji v OnCloseQuery ChildFormu poznat,
> >jestli se zavira cela aplikace (parent), nebo jen dany ChildForm.
> >V OnCloseQuery ParentFormu to nijak osetrit nejde (ze bych si
nastavil
> >nejaky flag),
> >protoze se nejdrive volaji OnCloseQuery vsech deti a teprve pak se
> >zavola OnCloseQuery rodice.
> >Dekuji za pripadnou radu
> >Tomas Folprecht
>
> Zkus porovnat handle hlavniho formu s (Sender as
TCustomForm).Handle.
> Nezkousel jsem to, takze to neni jisty, ale mohlo by to jit.
> Tomas Matousek
> matousek(zv)havit(tec)cz
Bohuzel, v OnCloseQuery je Sender vzdy ChildForm, bez ohledu na to,
jak se okno zavira.
Jestli nekdo alespon tusite, jakou cestou se vydat, prosim, poradte.
Je to pro me dost dulezite.
Dekuji Tomas Folprecht
Tak jde cas .... (+ Pruzkum - dilci vysledky)
[*] Erik Salaj <winsoft(zv)napri.sk> - 31.8.1999 10:35:26
> A kdyz pujdu jeste dal, tak bez znalosti (aspon povsechne) toho,
> jak to funguje uvnitr, mohu sice take ridit automobil, ale s vetsi
> pravdepodobnosti ho drive oddelam. Tedy, se znalosti vnitrnosti na
> urovni zdrojaku budu nejspis i lepe rozumet tomu, co deje v mem
> programu a budu i efektivneji programovat. A coz teprve kdyz si
> zacne zakaznik stezovat na chyby... :-)
Takze pred pouzitim auta, ci televizora je najistejsie prestudovat
vyrobnu dokumentaciu, schemy, rozobrat motor a zistit presne,
co sa tam deje ... A potom to uz budem vediet efektivne pouzivat ;-).
Prevaznej vecsine ludi nastastie staci na dostatocne efektivne pouzitie
pozriet navod na pouzitie (od toho aj je).
Rozhodne treba dat zakaznikovi zdrojaky, ked sa zacne stazovat
na chyby. Nech si to poriadne prestuduje, aby programu porozumel
a vedel ho efektivne pouzivat a nech si chyby pomocou zdrojakov
aj hlada (a samozrejme nech nie je taky drzy a neotravuje ale
nech si to pomocou nich aj sam opravi) ;-)
> Jsem rozhodnym odpurcem pornografie, strelnych zbrani, valek,
> potratu, nabozenske nesnasenlivosti a zatajovani zdrojaku. :-)))
Mozno trochu viac tolerancie by nezaskodilo.
> Mno, ono je stejne nejlepsi kazde dva az tri roky napsat ten
> program zcela znovu, protoze jednak jsem se za tu dobu naucil
> radu novych veci, za dalsi se vyskytnou nove technologie, ktere se
> do stare verze daji napasovat jen se znacnymi problemy a nevyuzit
> je muze byt skoda... Uz mam takto druhou generaci Lokalizatoru a
> chystam se ted na treti generaci jineho programu.
Napad je to zaujimavy, vecsinou ale nerealny, pretoze na to nie su peniaze.
Erik Salaj
OnCloseQuery
[*] Radim Kunz <rkunz(zv)ova(tec)comp(tec)cz> - 31.8.1999 10:44:22
Tak v hlavnim okne prepis primo metodu CloseQuery, a tam
si ten flag nastav. Treba takhle:
function xform.CloseQuery:boolean;
begin
NejakyFlag := true;
Result := inherited CloseQuery;
end;
Radim Kunz
-----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: 31. srpna 1999 10:34
P�edm�t: Re: OnCloseQuery
>> >Dobry den vsem.
>> >Mam takovy problem.
>> >V moji MDI aplikaci potrebuji v OnCloseQuery ChildFormu poznat,
>> >jestli se zavira cela aplikace (parent), nebo jen dany ChildForm.
>> >V OnCloseQuery ParentFormu to nijak osetrit nejde (ze bych si
>nastavil
>> >nejaky flag),
>> >protoze se nejdrive volaji OnCloseQuery vsech deti a teprve pak se
>> >zavola OnCloseQuery rodice.
>> >Dekuji za pripadnou radu
>> >Tomas Folprecht
>>
>> Zkus porovnat handle hlavniho formu s (Sender as
>TCustomForm).Handle.
>> Nezkousel jsem to, takze to neni jisty, ale mohlo by to jit.
>> Tomas Matousek
>> matousek(zv)havit(tec)cz
>
>Bohuzel, v OnCloseQuery je Sender vzdy ChildForm, bez ohledu na to,
>jak se okno zavira.
>Jestli nekdo alespon tusite, jakou cestou se vydat, prosim, poradte.
>Je to pro me dost dulezite.
>
>Dekuji Tomas Folprecht
Web aplikace pomoci Delphi
[*] Z�vada Ji�� <zavada(zv)atcomp(tec)cz> - 31.8.1999 10:59:13
Milan Nemec napsal v odpovedi Jirimu Zavadovi: > > Odpovim Ti do konference, protoze bych rad
> > vyvratil mytus o tom, ze nekdo prolomi heslo
> > do NT za dva dny.
> >
> > Za dva dny nebo kratsi dobu to prolomis, jen
> > kdyz pouzijes nedostatecne bezpecne heslo (tratke
> > nebo bude ve slovniku). To ale neni problem
> > algoritmu, i kdyz vymyslis ten nejlepsi algoritmus
> > a nekdo pouzije kratke heslo, tak to zabezpeceni
> > totalne degradujes.
> >
> > Hashovaci kod pouzity v NT je 128 bitovy. Je
> > to dnes odborniky povazovano za malo a za
> > bezpecne jsou povazovany 160 bitove a delsi
> > algoritmy. Nedostatecna bezpecnost je v tomto
> > pripade to, ze to prolomis za pouziti nekolika
> > tisic pocitacu a budes potrebovat mesice casu.
> >
> >
>
O dvou dnech jsem nepsal (kde jsi je vzal ?), klidne staci
nekolikadenni beh - jaka je doba platnosti www prihlasovacich hesel ? Kolik
hesel pouzivanych realnymi uzivateli pri autentizaci je skutecne bezpecnych
? Myslis, ze jsou ochotni pouzivat bezpecna hesla ?:-))) Proste pises zjevne
s nedostatkem znalosti praxe / skutecne reality. Opakuji, ze mam zkusenosti
s realnym vice nez rocnim provozem objednavkoveho systemu vytvoreneho v
Delphi, pres ktery byly uskutecneny objednavky na zbozi za vice nez sto
milionu korun.
> > > > > Prave tady te propagace verejneho standardu priserne zklame,
> protoze
> > > > > existuji desifratory na hesla WinNT. Desifrator, ktery byl
> vytvoren
> k
> > > > necemu
> > > > > uplne jinemu, funguje pak na hesla Weboveho pristupu.
> > > > >
> > > > Nevim jestli jsi zkousel desifrovat hesla v NT, ja jo (l0phtcrack,
> atd.)
> > > > takze vim o cem pisu. Prolomit MD4 asi nebude nejjednodussi,
> rozhodne
> > > > s nekolika malo pocitaci nemas sanci pri pouziti dobreho hesla.
> > > > I na nejlepsi algoritmus lze vytvorit desifrator (utok hrubou
> silou),
> > > > takze argument o existenci desifratoru nema prilis smysl,
> dulezitejsi
> > > > je jakou ma sanci najit heslo v realnem case. Troufam si tvrdit,
> > > > ze snadnejsi bude prolomit tve zabezpeceni.
> > > >
> > > Prave argument existence desifratoru je nejlepsi, i kdyz se Ti moc
> > > nehodi.
> >
> > To je blbost.
>
Blbost je neochota priznat vlastni omyl. Vim, o cem hovorim - timhle
desifratorem jsem schopen (presneji receno je kazdy schopen) dekodovat 80%
hesel WinNT site se dvema sty uzivateli do ctyr dnu. Prakticky overeno.
>
> >
> > > Pro siroce rozsirene technologie je vyssi pravdepodobnost, ze se
> > > nekomu vyplati vytvorit desifrator. Pro malo rozsirene, ponekud
> utajene
> > (kde
> > > nevi, ceho se chytnout) je mu to silne k nicemu - co ziska ? Za kolik
> > prace
> > > dostane kolik efektu ? Ale nechme toho, pochybuji, ze to ostatni bavi,
> >
> > To zalezi jak citliva jsou ta data.
Ano, presne tak, jaka je moznost uplatneni desifratoru (drzme se
dobreho prikladu) hesel pro WinNT, podari-li se nekomu jej vytvorit ? Jakou
efektivitu ma cinnost koumaka, ktery nevi, jak mam data zabezpecena a pokud
se mu podari (teoreticky :-((() nabourat autentifikaci, nebude vedet pro
jaky zabezpecovaci algoritmus vlastne ma tim padem klic ?
> >
> > >
> > > Mimochodem, jde o aktualni stav schopnosti zabezpecit pristup, k
> > > tomu rikam:
> > >
> > > - NT autentifikace je nedostatecna, existuji desifratory, ktere si s
> > > ni poradi (mozna i zaplaty na diry - kdo je ma ?). Take jsem to
> zkousel -
> > uz
> > > fakt, ze sifra je prolomitelna hrubou silou (pri soucasnych moznostech
> > > "hrube sily") ji cini nebezpecnou
> > > - Ja pouzivam autentifikaci, kterou jsem si napsal, je vykonna, pro
> > > ucel, na ktery je pouzita je bezpecna dost a predevsim plne funkcni.
> > >
> >
> > Kdyz myslis....
> >
>
U fungujiciho systemu nejde jen o "myslis", tam jde o spokojenost
zakaznika s provozem - tu ziskas jen na dobre reseni, ktere se osvedci.
> > > > > Jakou ma tato rozprava o heslech souvislost s Delphi ?
> > > >
> > > > Takovou, ze tvrdis, ze je mozne udelat autorizaci programove.
> > > > Jo jde to, ale u autorizace je dulezita bezpecnost, jinak je
> > > > autorizace k nicemu, ze?
> > > >
> > >
> > > S chimerou, ze ma autentifikace je nedostatecne bezpecna jste prisli
> > > na zaklade nepochopeni meho tvrzeni, nema smysl Vam neco vyvracet
> > argumenty,
> > > kdyz mate sve (presvedceni, viru) postavenou v prazdnu.
> > >
> > :-)))
> > Ano, ale pan Chimera uz sel pryc.
> >
> > Milan
> >
>
Proc mi o vyskytu pana Chimery nepises na soukromy mail (podivej>
zavada(zv)atcomp(tec)cz), vsichni v konferenci se dozvi, ze uz odesel a zacnou
zkoumat kam, mozna pujdou za nim a copak tady pocneme sami. :-)))Pruzkum
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 31.8.1999 11:26:23
Polak Jiri wrote:
> > konference a kvuli ovlivnovani navzajem), ja z toho pak udelam
> > souhrn, ktery zverejnim. Za souhrn pak prilepim i jednotlive
> > odpovedi (zkracene o balast), aby si kazdy mohl zkontrolovat, zda
> > jsem vysledky nezkreslil.
> Taky bych se primlouval za to, aby u vsech, kdo s tim budou souhlasit,
> byly odpovedi zverejneny jmenovite. Ja za sebe se zverejnenim
> souhlasim.
Ze vsechno zverejnim jsem napsal hned na zacatku. Protoze
dotaznik je tak jednoduchy, ze je z nej mozne vyrobit protichudne
vyklady. Takze at si kazdy vyrobi svuj vlastni vyklad. :-) Jako
identifikace odpovidajiciho tam bude jeho majlova adresa.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Deravy formular
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 31.8.1999 11:26:23
Igor MALY wrote:
> Neviem ci to tu uz bolo, ale potrebujem v programe urobit "deravy
> formular". Mohol by mi niekto napisat ako sa to da urobit? Existuje na
> to nejaka komponenta?
Vhodnou kombinaci funkci CreateEllipticRgn, CombineRgn,
SetWindowRgn a podobnych. Kompletni priklad na toto tema
rozebiram na skoleni komponent.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Plocha
[*] Tom� Br�dle������i�^����? - 31.8.1999 11:30:03
Zdravim,
zkus to v registry :
HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell
Folders
Tohle je na Win98, pro jina Windows si to musis overit
Tomas Bradle
t.bradle(zv)pvtnet(tec)cz
-----P�vodn� zpr�va-----
Od: Bene� Jaroslav <JBenes(zv)cpoj(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 31. srpna 1999 9:44
P�edm�t: Plocha
>Ahoj,
>
>potreboval bych poradit. Jak bych zjistil z BP7.0, ktera plocha Windows je
>prave aktivni tj. c:\windows\plocha nebo c:\windows\profiles\<user>\plocha
?
>(ovsem jak by to bylo v cizojazycnych...)
>
>Diky za kazdou radu
>
>Jaro B.
>ADO + D5
[*] Erik Salaj <winsoft(zv)napri.sk> - 31.8.1999 11:35:32
> Souhlasim, ze zdroje nemaji nenahrazovat dokumentaci, ale jsou casto
jedinym
> a nenahraditelnym finalnim zdrojem informaci, pokud je dokumentace neuplna
> nebo nejasna. Pritomnost zdroju ovsem nikoho nenuti je vyuzivat ke studiu.
> Primarne jde v cele diskuzi o zdroje pouze o to mit MOZNOST do nich
> nahlednout, kdyz clovek citi potrebu. Bez teto moznosti je rada problemu v
> praxi neresitelna.
Ano, suhlasim. Vyriesil som uz rozne problemy aj bez zdrojakov, ale
povedzme, ze sa mozu niekedy zist.
> To je vec programatorskeho stylu a pristupu k problemu. Absence nebo
> pritomnost CIZICH zdroju neimplikuje jejich vhodne nebo nevhodne pouziti.
> Pokud je nekdo prase, nezachrani ho ani nepritomnost zdroju. Nemluve o
tom,
> ze rozhodovat o tom, co je pro jine dobre a co ne, je ponekud (mirne
receno)
> nestastne. Kazdy je zodpovedny samza sebe, toz nam netreba strazcu moralky
a
> cistoty, at uz programatorske nebo i jine.
Takisto suhlasim, samotne zdrojaky za to nemozu.
> Ve vetsine pripadu nejde o to chybu odstranit, ale v prvni rade zjistit, v
> cich rukach je Cerny Petr (kdo za to muze). Rada chyb se vskutku neda
> odstranit, ale pri pochopeni duvodu chyby (coz se bez zdroju da tezko),
lze
> navrhnout alternaivni reseni (workaround). Vetsina problemu ma, jak znamo,
> vice nez jedno reseni.
No neviem. Ja by som velmi neradil brat si priklad z workaroundov, ale je
fakt, ze v praxi su niekedy potrebne aj taketo alternativne riesenia.
> Balicky se nedaji menit ne proto, ze by to delalo bordel pri nasazeni u
> klienta (k tomu staci pouzit jine jmeno balicku nebo balicek umistit do
> stejneho adresare jako program), ale protoze VCLxx.DPL/BPL (a nektere
dalsi)
> jsou integralni soucasti samotneho IDE Delphi. Tudit po zasahu neni
zarucena
> spravna funkcnost prostredi. O nic jineho nejde. Ostatne, vzdy lze
vytvorit
> program bez balicku.
Povedal by som, ze je to z obidvoch dovodov. Tak Delphi by nefungovalo
ako ani klientska aplikacia (Delphi je vlastne len jednou klientskou
aplikaciou pre tieto balicky).
> Ok, a tim jako chces naznacit, ze mezi VCL (TPersistent, TComponent atd.)
a
> IDE delphi NENI definovane presne rozhranni ? Nenech se vysmat. Nehlede na
Nemozem si pomoct, ale zopar nedokumentovanych suborov v adresari ToolsAPI
za rozhranie nepovazujem. Kludne sa mi mozes smiat, ak to za rozhranie
povazujes.
> to, ze kazdy takovy framework je velice slozita a komplexni zalezitost (co
> se tyce ActiveX/OLE2, podivej se na prislusnou "smecku" interfacesu).
To, ze ActiveX je komplikovana zalezitost, neznamena, ze nemoze existovat
jednoduchsi system.
> Jo-o. A tim jsi mel na mysli co ? Ze je mensi a tim lepsi ? No, on taky
> IUnknown nic moc neumi. TObject v sobe zahrnuje message dispatching a type
> library. V postate lze napsat libovolnou aplikaci, ktera by pracovala s
> objekty JEN na urovni TObject, coz se o IUnknown rici neda.
1. IUnknown ako zakladny objekt toho vela ani vediet nema (viem
si predstavit, ze megovy IUnknown by toho zvladol ovela viac)
2. Podla mna je na TObject nabalenych az zbytocne vela veci
3. Predpokladam, ze namiesto type library si myslel RTTI
4. Fakt ma zaujima, co by aplikacia pouzivajuca len TObject objekty
mohla uzitocne robit
> Instalace komponentu (abvzlaste mam-li jiz prelozeny balicek) je tak
> trivialni, ze na ni neni moc co zjednodusovat. Ostatne, kazdy nastroj
> vyzaduje urcity minimalni stupen znalosti, aby mohl byt pouzivan. Nemam
nic
> proti zpristupnovani slozitych nastroju a stroju masam, ale odtud potud.
Na
> auto je zapotrebi take ridicak, a raketoplan se nikdy nebude ovladat tak
> snadno jako televize (a ani pan "Sponka" to nezmeni).
Na instalaciu komponentov asi naozaj treba vodicak, tu je popis priamo
z Delphi helpu ako sa to instaluje v tom jednoduchsom pripade (ked je
k dipozicii prelozeny balicek):
-------------
To install or uninstall your own components, or components from a
third-party vendor, follow these steps:
1 If you are installing a new package, copy or move the package files to a
local directory. If the package is shipped with .BPL, .DCP, and .DCU files
be sure to copy all of them.
The directory where you store the .DCP file-and the .DCU files, if they are
included with the distribution-must be in the Delphi Library Path. It is
customary to put executable files in the Delphi BIN or LIB directory.
If the package is shipped as a .DPC (package collection) file, only the one
file need be copied; the .DPC file contains the other files. (For more
information about package collection files, see "Package collection files"
on page 10-25.)
2 Choose Component|Install Packages from the IDE menu, or choose
Project|Options and click the Packages tab.
3 A list of available packages appears under "Design packages".
To install a package in the IDE, select the check box next to it.
To uninstall a package, deselect its check box.
To see a list of components included in an installed package, select the
package and click Components.
To add a package to the list, click Add and browse in the Open Package
dialog box for the directory where the .BPL or .DPC file resides (see step
1). Select the .BPL or .DPC file and click Open. If you select a .DPC file,
a new dialog box appears to handle the extraction of the .BPL and other
files from the package collection.
To remove a package from the list, select the package and click Remove.
4 Click OK.
----------------
Instalacia komponentov je taka jednoducha, ze ani s dodavanym
InstallShield Express-om ju nezvladnes. A zabudovany Package
Collection Editor je tak kvalitny software, ze ho nikto nepouziva.
Pre porovnanie tu je instalacia ActiveX:
regsvr32 component.dll
Toto zaregistrovanie zvladne InstallShield Express automaticky, takze
vlastne spustenie setupu je vsetko, co treba urobit (jednoduche a aj
bez vodicaku).
> a) Staticky destruktor je pitomost.
> b) Pokud bude metoda kterou potrebuji prepsat staticka, musim problem
resit
> jinak. Nicmene, co kdyz metoda NEBUDE staticka ?
Zase tu vidim jednoduche riesenie, ktore nic neriesi. Konstatovanie
"musim problem resit jinak" opet za riesenie nepovazujem.
> > 2. Moze sa lahko stat, ze nebudes schopny ziskat nejaku informaciu
> > (bude v private) alebo zavolat nejaku potrebnu funkciu (tiez bude v
> > private). Povedzme destruktor by bol privatny, ako by si to vyriesil?
>
> To se da vyresit. Neciste, ale da se to.
Vyborne, miesto seriozneho riesenia bude asi vyhodnejsie ukazat,
ze nejaky workaround vzdy existuje.
> a) Komponenta, u ktere autor nepremyslel dopredu nez ji vubec zacal psat
je
> na 98% na pendrek a nebude ji pouzivat nikdo.
> b) Znovupouzitelnost a prispusobitelnost je zakladnim pozadavkem na
vsechny
> elementarni SW stavebni kameny, at uz jsou to nativni komponenty/tridy
nebo
> COM objekty.
Jasne znovupouzitelnost sa neziska sama od seba, ale vyvojovy prostriedok
by to mal co naviac podporovat. Podobne je to aj s inymi vlastnostami
softwaru povedzme korektnost, robustnost, spolahlivost, rozsiritelnost,
modularita, .... Asi bude vyhodnejsie pouzit OOP v prostriedku, ktory
OOP podporuje, aj ked mi nezaruci vsetky z OOP vyplyvajuce vyhody.
> To je pravda a je to dobre. Nicmene se jedna o znovupouzitelnost na urovni
> interface. U nativnich OP trid implementujicich interface muzes casto
> znovupouzit i implementaci (treba jen cast). U ActiveX je toto nemozne.
OOP podporuje znovupouzitelnost dedicnostou. COM umoznuje
znovupouzitelnost pomocou containment a aggregation mechanizmov.
COM+ sa viac priblizuje OOP programovacim jazykom a umoznuje
aj dedicnost implementacie.
COM ovsem tym, ze je binarnym standardom, unmoznuje z hladiska
znovupouzitelnosti este jednu velmi dolezitu vec - binarnu kompatibilitu
so zvyskom sveta (su to Tvoje slova, vsak?). Napr. z Delphi aplikacie
mozem pouzit Word objekty ak to potrebujem. To z Word-u Delphi
komponenty uz pouzit nemozem (pozor, nie je to problem Word-u).
> VCL vyuziva COM sporadicky, ale tam kde je pouzit, MUZES udelat to co
> popisujes. Chapu to tak, ze by jsi rad videl VCL zalozenou
vyhradne/prevazne
Tam kde by som to potreboval, COM nie je pouzite.
> na COM (jinak to, co pises nema smysl, neb to neni pravda). Tady bych rad
> upozornil na zasadni problem COMu, a tou jsou cyklicke reference (objekty
A
> a B na sebe drzi interface, cimz se "uzamknou" v pameti). VCL je PLNA
> cyklickych referenci (napr. property Owner/Components[]). Navrhnout
> kompaktni a zaroven efektivni framework ciste na bazi COM je takrka
> nadlidsky ukol (a ani VB jej v tomto smyslu NEMA). Nicmene, vyraznejsi
> vyuziti COM ve VCL je mozne a AFAIK vyvoj je takto smerovan. Ale je nutne
si
> uvedomit, ze zasadni zmena v koncepci VCL neni jednoducha a vyzaduje cas.
Jasne, chapem, ze aj COM ma svoje problemy. Napriek tomu MDAC, DirectX
a viacmenej kompletne Windows 2000 funguju.
> > S ATL je mozne pomerne jednoducho vyrobit asi 35 kB najjednoduchsiu
> > ActiveX komponentu (da sa spakovat asi na 20kB do cabu a automaticky
> > instalovat z HTML stranky bez akehokolvek programovania).
> > U COM su naroky este daleko mensie.
>
> Jen diky tomu, ze RT nihovny jsou soucasti Windows :-))) Ostatne, v Delphi
> muzes take vyuzivat "balicky".
Nemozes Delphi balicky porovnavat s COM komponentami. Delphi balicek
na rozdiel od COM komponentov mimo Delphi aplikacie nemozem pouzit.
To klasicke DLL-ka (s funkcnym rozhranim) su na tom z tohto hladiska lepsie
ako Delphi balicky. Delphi balicky totiz nemaju interface (alebo si myslis,
ze ho maju? ako ho potom asi vyuzijem z nie Delphi aplikacie?).
Erik Salaj
OnCloseQuery
[*] Tom� Br�dle������i�^����? - 31.8.1999 11:50:07
Zdravim,
kdyz se podivas do zdrojaku unity Forms na TCustomForm, tak tam zjistis:
- ze se opravdu nejprve volaji CloseQuery MDI-deti
- ze na pocatku vseho je metoda obsluhy zpravy :
procedure WMClose(var Message: TWMClose); message WM_CLOSE;
ta vola Close
- Close vola QueryClose ...
- Close se neda inheritnout - je staticka (od Borlandu zase jeden dobrej
napad)
- Takze jediny reseni bych videl :
do tveho hlavniho MDI formu bych dal odchytit zpravu pomoci
procedure WMClose(var Message: TWMClose); message WM_CLOSE;
jeji obsah
begin
{nastavit priznak, ... atd}
inherited;
end;
a pak samozrejme u deti reagovat pomoci priznaku.
Tomas Bradle
t.bradle(zv)pvtnet(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: 31. srpna 1999 10:46
P�edm�t: Re: OnCloseQuery
>> >Dobry den vsem.
>> >Mam takovy problem.
>> >V moji MDI aplikaci potrebuji v OnCloseQuery ChildFormu poznat,
>> >jestli se zavira cela aplikace (parent), nebo jen dany ChildForm.
>> >V OnCloseQuery ParentFormu to nijak osetrit nejde (ze bych si
>nastavil
>> >nejaky flag),
>> >protoze se nejdrive volaji OnCloseQuery vsech deti a teprve pak se
>> >zavola OnCloseQuery rodice.
>> >Dekuji za pripadnou radu
>> >Tomas Folprecht
>>
>> Zkus porovnat handle hlavniho formu s (Sender as
>TCustomForm).Handle.
>> Nezkousel jsem to, takze to neni jisty, ale mohlo by to jit.
>> Tomas Matousek
>> matousek(zv)havit(tec)cz
>
>Bohuzel, v OnCloseQuery je Sender vzdy ChildForm, bez ohledu na to,
>jak se okno zavira.
>Jestli nekdo alespon tusite, jakou cestou se vydat, prosim, poradte.
>Je to pro me dost dulezite.
>
>Dekuji Tomas Folprecht
>
>OnCloseQuery
[*] Mitko Mit�v <mitev(zv)foresta(tec)cz> - 31.8.1999 12:04:55
>Dobry den vsem.
>
>Mam takovy problem.
>V moji MDI aplikaci potrebuji v OnCloseQuery ChildFormu poznat,
>jestli se zavira cela aplikace (parent), nebo jen dany ChildForm.
>V OnCloseQuery ParentFormu to nijak osetrit nejde (ze bych si nastavil
>nejaky flag),
>protoze se nejdrive volaji OnCloseQuery vsech deti a teprve pak se
>zavola OnCloseQuery rodice.
>
>Dekuji za pripadnou radu
>Tomas Folprecht
>
>
Zkus testovat vlastnost Terminated objektu Application. V pr�pade ukoncovani
aplikace bude nastavena na true.
Mitko Mitev
Deravy formular
[*] Tomas Holan <HOLAN(zv)ksvi.mff.cuni(tec)cz> - 31.8.1999 12:17:00
> Neviem ci to tu uz bolo, ale potrebujem v programe urobit "deravy formular".
Treba takhle
(dela to kulatou diru, proto ten cyklus):
procedure TForm1.Button1Click(Sender: TObject);
var NewRgn : HRGN;
Points : array[1..400] of TPoint;
fi,i: integer;
begin
Points[1].x:=0;
Points[1].y:=0;
Points[2].x:=Width;
Points[2].y:=0;
Points[3].x:=Width;
Points[3].y:=Height;
Points[4].x:=0;
Points[4].y:=Height;
i := 4;
for fi:=0 to 360 do
if (fi mod 10)=0 then
begin
Inc( i );
Points[ i ].x := Width div 2 +
round( Width/3 * sin( fi/360*2*PI ) );
Points[ i ].y := Height div 2 +
round( Height/3 * cos( fi/360*2*PI ) )
end;
Inc( i );
Points[i].x:=0;
Points[i].y:=Height;
{ nastaveni polygonu okna: }
NewRgn:=CreatePolygonRgn(Points, i, Alternate);
SetWindowRgn( Form1.Handle, NewRgn, True);
RemoveProp(Form1.Handle,'region');
SetProp( Form1.Handle, 'region', NewRgn );
end;
Tom
OnCloseQuery
[*] Tomas Folprecht <tomas.folprecht(zv)iol(tec)cz> - 31.8.1999 12:23:55
Bohuzel, metoda TForm.CloseQuery je deklarov�na jako static a nelze ji
prepsat.
Ale dik za inspiraci.
Tomas Folprecht
----- Original Message -----
From: Radim Kunz <rkunz(zv)ova.comp(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, August 31, 1999 10:44 AM
Subject: Re: OnCloseQuery
Tak v hlavnim okne prepis primo metodu CloseQuery, a tam
si ten flag nastav. Treba takhle:
function xform.CloseQuery:boolean;
begin
NejakyFlag := true;
Result := inherited CloseQuery;
end;
Radim Kunz
-----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: 31. srpna 1999 10:34
P�edm�t: Re: OnCloseQuery
>> >Dobry den vsem.
>> >Mam takovy problem.
>> >V moji MDI aplikaci potrebuji v OnCloseQuery ChildFormu poznat,
>> >jestli se zavira cela aplikace (parent), nebo jen dany ChildForm.
>> >V OnCloseQuery ParentFormu to nijak osetrit nejde (ze bych si
>nastavil
>> >nejaky flag),
>> >protoze se nejdrive volaji OnCloseQuery vsech deti a teprve pak se
>> >zavola OnCloseQuery rodice.
>> >Dekuji za pripadnou radu
>> >Tomas Folprecht
>>
>> Zkus porovnat handle hlavniho formu s (Sender as
>TCustomForm).Handle.
>> Nezkousel jsem to, takze to neni jisty, ale mohlo by to jit.
>> Tomas Matousek
>> matousek(zv)havit(tec)cz
>
>Bohuzel, v OnCloseQuery je Sender vzdy ChildForm, bez ohledu na to,
>jak se okno zavira.
>Jestli nekdo alespon tusite, jakou cestou se vydat, prosim, poradte.
>Je to pro me dost dulezite.
>
>Dekuji Tomas Folprecht
OT: Cross-tab query
[*] Milan Schembera <milan(zv)missoftware(tec)cz> - 31.8.1999 12:23:44
Ahojte lidicky,
asi se to spise netyka Delphi, ale mam
takovyhle problem:
Potrebuju udelat cross-tab query a nechci ji
delat primo v Delphi, takze jsem premyslel, ze
bych to udelal jako VIEW (pouzivam MS SQL
7), ale co se tyce MS SQL, jsem zacatecnik ;-)
V napovede se mi nepodarilo nic najit, netusite
nekdo, jak ?
Konkretne mam 2 tabulky (CLOVEK,
JAZYKY), kde muze mit CLOVEK v tabulce
JAZYKY nekolik zaznamu. Chci mit vyslednou
tabulku, kde kazdy CLOVEK bude mit 1 radek
a jako sloupce budou JAZYKY (distinct) s tim,
ze na pruseciku bude hodnota ANO nebo NE,
podle toho, jestli ten CLOVEK ma v tabulce
JAZYKY pro prislusny jazyk zaznam nebo ne.
Diky moc za kazdy nakopnuti.
Milan
DB grid a barvy polozek
[*] Igor Klepoch <klepoch(zv)ba.sknet.sk> - 31.8.1999 12:44:30
Zdravim vsechny v konferenci. Mam malou prosbu. Nevite nekdo:
JAK VYTVORIT V DBGRIDU V D4 RUZNE BARVY NA RUZNYCH RADCICH ?
Ahoj,
vykreslenie (aj farby) DBGrid pola je mozne riesit v obsluhe OnDrawColumnCell. Toto je kusok kodu z jedneho
demo prikladu (na adrese marcocantu.com je mozne ich stiahnut viac, toto je konkretne v Part3.zip, priklad DrawData).
procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
var
Code: Integer;
Bmp: TBitmap;
begin
// erase existing output
DBGrid1.Canvas.FillRect (Rect);
.
.
.
// choose the font color
if (Column.Field = Table1Lengthcm) and
(Table1Lengthcm.AsInteger > 100) then
DBGrid1.Canvas.Font.Color := clRed
else if gdSelected in State then
DBGrid1.Canvas.Font.Color := clHighlightText
else
DBGrid1.Canvas.Font.Color := Column.Font.Color;
// draw the standard text
DBGrid1.Canvas.TextRect (
Rect, Rect.Left, Rect.Top,
Column.Field.AsString);
end;
// optionally draw the focus rectangle
if gdFocused in State then
DBGrid1.Canvas.DrawFocusRect (Rect);
end;
----------------------------------
Igor Klepoch
DB grid a barvy polozek
[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 31.8.1999 12:56:06
> DBGrid ma udalost OnDrawColumnCell. Do ty udalosti se da nadefinovat
> "uzivatelske" kresleni bunky. Ale da se taky napriklad jen
> zmenit barba
> pozadi nebo font a zavolat defaultni prekreslovani.
A jak na to u normalni StringGrid (nebo Drawgrid)?
Chtel bych pomoci ni vytvorit paletu barev.memo to Interbase
[*] TUNGLI Jan <tungli(zv)pvt.sk> - 31.8.1999 13:02:11
Potrebujem obsah memo (32kB) ulozit do Intarbase tabulky.
Potrebujem kratky priklad.
TUNGLI J�nos
EMail: jan.tungli(zv)seznam(tec)cz
My Home Page: http://free.netlap.hu/4321/
Struktura .dbf
[*] tmara(zv)itsys(tec)cz - 31.8.1999 13:11:33
Hezky den,
asi se ptam na naprosto jasnou v�c, ale ja jsem to nikde v�helpu nenasel.
Jde mi o toto: obcas potrebuji zjistit strukturu .db nebo .dbf souboru. V
Database Desktopu ji sice zjistim, ale uz ji nevytisknu (nebo alespon nevim
jak). Ve stare dobre Foxce byl prikaz "structure",
V�Delphim nevim, ale neverim, ze by v�nem n�co podobneho nebylo. Poradite
mi? Thx.
P.S. Jestli jde o opravdu primitivni v�c, tak se, prosim, zdrzte neslusnych
komentaru na mou osobu. :o)
ByE.Table.Locate(...) - konec
[*] Petr Sadovsky <petr(zv)slunce(tec)cz> - 31.8.1999 13:20:15
Diky - uz jsem nasel reseni pana Sebelika v archivu .
Petr Sadovsk�
p.sadovsky(zv)atlas(tec)cz
ICQ 37042001
Screensavers
[*] FitCom <fitcom(zv)volny(tec)cz> - 31.8.1999 13:42:26
dobre dokumentovany je to v UDDF
http://www.gnomehome.demon.nl/uddf/indexnf.htm
dal�� tak� na http://www.rsac.org/ratingsv01.html
nebo http://classic.physiol.cam.ac.uk/users/ljw1004/
a microsoft to ma taky na webu
-----P�vodn� zpr�va-----
Od: Ivan Zernovac <ivan(zv)gratis.sk>
Komu: Delphi <delphi-l(zv)fwd(tec)cz>
Datum: 3. z��� 1999 11:24
P�edm�t: Screensavers
>Su niekde pravidla na tvorbu screensaverov? Doteraz som robil
>experimenty iba na baze RE. Viem tolko, ze je to EXE premenovane na SCR,
>ale neviem napriklad, ako vykreslovat do preview okna. Vedel by som
>ziskat DC plochy, kam to treba vykreslit, ale to okno je typu 32770 co
>je asi najcastesie pouzivany typ okna. To by som musel hladat s udanim
>aj window textu a to by potom neslo v inych jazykovych verziach Windows.
>
>Pozrel som aj import tables niektorych screensaverov, ale nenasiel som
>nic, co by ma priviedlo na stopu.
>
>Ivan
>
>P.S.: Ti z vas, ktory pouzivaju TDump a nepoznaju Dependecy Walker, nech
>si ho okamzite zozenu. Jeho jedina nevyhoda je, ze nedumpuje NE subory,
>ale inak je super. (no a samozrejme neposkytuje udaje o sekciach, typoch
>segmentov a pod, ale tie vacsinou ani netreba)
>Probl�m s DWORD, cardinal
[*] Petr Voborn�k <vobornik(zv)apel(tec)cz> - 31.8.1999 13:45:06
Zdravim,
Narazil jsem na nasledujici "chybu":
var A: DWORD;
begin
A:=129;
if ((A and 128) > 0) then
begin
A:=0; // toto se nevykona
end
end.
Kdy� tento kod krokuji, tak mi prekladac ukaze, ze vyhodnotil podminku
spravne, ale neprovede prikaz mezi begin a end. Problem je se vsemi 32bit
typy. Zajimave je, ze pokud se v podmince vyhodnocuji jen hodnoty mensi jak
128, tak je vse ok.
Vse je take ok, pokud je vyraz nasledujici ((A and 128) > 1).
Nevim co to ma znamenat. Je to chyba prikazu "if", v prekladaci nebo nekde
jinde ?
Diky za jakykoliv nazor. Petr
[D3 Standard, Win95]
Struktura .dbf
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 31.8.1999 13:49:50
Ahoj,
dej si na formular TTable, dosad nejakou tabulku, aktivuj ji a pouzij
treba toto (odzkouseno D4/SP3):
procedure TForm1.Button1Click(Sender: TObject);
var
i: integer;
s: string;
begin
Memo1.Lines.Clear;
for i := 0 to Table1.Fields.Count-1 do
begin
case Table1.Fields [i].DataType of
ftUnknown: s := 'Unknown or undetermined';
ftString: s := 'Character or string field';
ftSmallint: s := '16-bit integer field';
ftInteger: s := '32-bit integer field';
ftWord: s := '16-bit unsigned integer field';
ftBoolean: s := 'Boolean field';
ftFloat: s := 'Floating-point numeric field';
ftCurrency: s := 'Money field';
ftBCD: s := 'Binary-Coded Decimal field';
ftDate: s := 'Date field';
ftTime: s := 'Time field';
ftDateTime: s := 'Date and time field';
ftBytes: s := 'Fixed number of bytes (binary storage)';
ftVarBytes: s := 'Variable number of bytes (binary storage)';
ftAutoInc: s := 'Auto-incrementing 32-bit integer counter field';
ftBlob: s := 'Binary Large OBject field'; ftMemo: s := 'Text
memo
field'; ftGraphic: s := 'Bitmap field'; ftFmtMemo: s := 'Formatted
text memo field'; ftParadoxOle: s := 'Paradox OLE field';
ftDBaseOle: s := 'dBASE OLE field'; ftTypedBinary: s := 'Typed
binary field'; ftCursor: s := 'Output cursor from an Oracle stored
procedure
(TParam only)';
ftFixedChar: s := 'Fixed character field';
ftWideString: s := 'Wide string field';
ftLargeInt: s := 'Large integer field';
ftADT: s := 'Abstract Data Type field';
ftArray: s := 'Array field';
ftReference: s := 'REF field';
ftDataSet: s := 'DataSet field';
end;
Memo1.Lines.Add (Table1.Fields [i].FieldName+': '+S+'
('+IntToStr (Table1.Fields [i].DataSize)+')');
end;
end;
Slavek
> Hezky den,
> asi se ptam na naprosto jasnou v�c, ale ja jsem to nikde v�helpu
> nenasel. Jde mi o toto: obcas potrebuji zjistit strukturu .db nebo .dbf
> souboru. V Database Desktopu ji sice zjistim, ale uz ji nevytisknu (nebo
> alespon nevim jak). Ve stare dobre Foxce byl prikaz "structure",
> V�Delphim nevim, ale neverim, ze by v�nem n�co podobneho nebylo.
> Poradite mi? Thx.
>
> P.S. Jestli jde o opravdu primitivni v�c, tak se, prosim, zdrzte
> neslusnych komentaru na mou osobu. :o)
>
> ByE.
>
----------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
----------------------------------------------
Web aplikace pomoci Delphi
[*] Milan N�mec <nemec(zv)goldcard(tec)cz> - 31.8.1999 14:14:31
From: Z�vada Ji�� <zavada(zv)atcomp(tec)cz>
>
> > > Odpovim Ti do konference, protoze bych rad
> > > vyvratil mytus o tom, ze nekdo prolomi heslo
> > > do NT za dva dny.
> > >
> > > Za dva dny nebo kratsi dobu to prolomis, jen
> > > kdyz pouzijes nedostatecne bezpecne heslo (tratke
> > > nebo bude ve slovniku). To ale neni problem
> > > algoritmu, i kdyz vymyslis ten nejlepsi algoritmus
> > > a nekdo pouzije kratke heslo, tak to zabezpeceni
> > > totalne degradujes.
> > >
> > > Hashovaci kod pouzity v NT je 128 bitovy. Je
> > > to dnes odborniky povazovano za malo a za
> > > bezpecne jsou povazovany 160 bitove a delsi
> > > algoritmy. Nedostatecna bezpecnost je v tomto
> > > pripade to, ze to prolomis za pouziti nekolika
> > > tisic pocitacu a budes potrebovat mesice casu.
> > >
> > >
> >
> O dvou dnech jsem nepsal (kde jsi je vzal ?),
Tady v konferenci, vim zes to nepsal ty o dvou dnech, ale nekdo jiny.
> klidne staci
> nekolikadenni beh - jaka je doba platnosti www prihlasovacich hesel ?
Kolik
> hesel pouzivanych realnymi uzivateli pri autentizaci je skutecne
bezpecnych
> ? Myslis, ze jsou ochotni pouzivat bezpecna hesla ?:-))) Proste pises
zjevne
> s nedostatkem znalosti praxe / skutecne reality.
Mas pravdu v tom, za nekolik dnu zjistis vetsinu pouzivanych (nebezpecnych)
hesel. Nekteri lide jsou ochotni pouzivat bezpecna hesla jini ne, myslim,
ze je to otazka vyskoleni tech lidi a myslim, ze casem se to zlepsi. Vetsina
pouziva Win 95, na ktere se dostanes bez hesla, casem taky bude treba
vetsina pouzivat Win 2000 a lidi se nauci, ze tam to heslo je k necemu
uzitecne a jak to pouzit spravne.
Obvykle se pouzivaji malo bezpecne postupy (at uz jde o kratke heslo
s NT autentizaci nebo tajny algoritmus) az do doby, nez se stane nejakej
pruser a nekdo se do takoveho systemu naboura. Pak se zacne hledat
nejakej bezpecnejsi postup. A ja rikam, ze je lepsi pouzit ten bezpecnejsi
postup driv nez se nejakej pruser stane. A tento bezpecnejsi postup je,
ze vyuzijes autentizaci NT, ale samozrejmne s bezpecnym heslem - to
lze vynutit.
> >
> Blbost je neochota priznat vlastni omyl. Vim, o cem hovorim - timhle
> desifratorem jsem schopen (presneji receno je kazdy schopen) dekodovat 80%
> hesel WinNT site se dvema sty uzivateli do ctyr dnu. Prakticky overeno.
Lepsi hesla lze vynutit, to ze spravce site necha uzivatele pouzivat
slaba hesla muze mit dva duvody:
1. bud na te siti neni bezpecnost potrebna.
2. nebo spatny spravce site.
Cau
Milan
(Ne)utajovani algoritmu kodovani
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 31.8.1999 14:19:58
> -----Original Message-----
> From: Z�vada Ji�� [mailto:zavada(zv)atcomp(tec)cz]
> Sent: Tuesday, August 31, 1999 10:22 AM
> To: 'delphi-l(zv)fwd(tec)cz'
> Subject: RE: (Ne)utajovani algoritmu kodovani
>
>
> mam pocit, ze teorie utajeneho algoritmu je Tva nocni
> mura. Kdybys
> predem definoval, co je podle Tebe utajeny algoritmus, po
> prvni dvojici
> mailu jsme mohli skoncit obapolnym (vsechpolnym) souhlasem a
> usetrit si
> opravnene rozhorcene reakce prispevatelu. Mimochodem, jeste jsi mi
> neodpovedel, jak bys z bezpecnostniho hlediska hodnotil pouziti
> autentifikacnich www prostredku treti strany (prikladem budiz
> dynamicky
> autentifikacni filtr DAF), ktery dostanes bez zdrojaku -
Zalezi na tom, jak je to zdokumentovany. Pokud bych se docetl,
ze to resi autentifikaci, ale nereknou mi jak, protoze
utajeni je zpusob ochrany, tak si nemuzu ten produkt
koupit. Nejde o zdrojak, ale o to, aby mi vysvetlili mechanismus,
jaky pouzivaji. Co se v tom systemu deje, kdyz...
Pokud mi nic takoveho nereknou a nepresvedci ne, ze maji
dobre reseni, tak to nekoupim. Protoze nebudu kupovat
zajice v pytli, abych zjistil (pokud mozno s nejakym pruserem),
ze se tam muze prihlasit kazdej, koho napadne to zkusit.
Anebo muze jednoduse odchytit heslo a login.
Takze to je na dve strany. Kupec se musi zajimat o to, jak
dane reseni funguje a vyrobce musi sve reseni nabizet, tzn.
vysvetlovat, jak neco resi. Pokud tomu ta neni a kupec duveruje
reklamnim poutacum, asi nepotrebuje bezpecnou aplikaci.
> zejmena ve srovnani
> s autentifikacni technologii, do ktere (pokud si ji napises)
> mas plny vhled.
> Hodnoceni by Ti nemuselo delat problem, pokud jsi byl s
> nazorem na mou www
> autentifikaci hotov tak rychle.
Nize v dopise si na to "hotov tak rychle" odpovidas sam.
Tys napsal, zes vyresil autentizaci pro IIS (doufam, ze si to
pamatuju presne) a vyznelo to obecne. Tak jsem se Ti ozval,
ze toto reseni nelze obecne pouzit, protoze nezarucuje bezpecnost
>
> Vzdy zalezi na tom, co k cemu pouzijes - je mi jasne, ze pokud
> (podle Tveho dotazniku) zpracovavas aplikace pro banky, abys
> prosel sitem
> pri zadavani zakazky, musis se vykazat obecne uznavanym mechanizmem
> zabezpeceni - autentifikace pristupu a sifrovani prenasenych
> dat. Ja nemusim
> - me se nikdo nepta, jak data zabezpecuji, staci, ze
> prakticky nevznikaji
> problemy. Coz mi ovsem nebrani do autentifikace inkorporovat prvky
> zabezpeceni podle vlastni uvahy - i treba dost silne. Nemas
> pravdu, kdyz
> zobecnujes pozadavky zabezpeceni aplikace pro pouziti v
> bankovnictvi na
> libovolnou aplikaci
:-) koukam, ze to na nas zapusobilo uplne stejne, ale obracene.
Ja jsem byl az doted presvedcen, zes obecne mluvil Ty a ja
ze jsem rekl, ze takove reseni nelze vzdy pouzit.
> (to snad je kazdemu jasne) - neni divu,
> ze jsi dosel k
> chybnemu nazoru.
Nebudeme se uz hadat o blbosti, v tom zasadnim mas pravdu.
Ma cenu delat pouze takovou ochranu,
jaka se vyplati. Jestli nahodou neni pripadna skoda mensi nez naklady
na zabezpeceni. Taky jsem se na tom skoleni dozvedel, ze je traba
brat v uvahu i pravdepodobnost utoku a predpokladanou silu utocnika.
Protoze zabezpecit se neda nic, kazda sifra je rozlousknutelna
(krajni zpusob muze byt unos a muceni autora algoritmu, aby to rekl).
Otazkou je, kolik je utocnik schopen a ochoten investovat.
bye
Jura
-------------
Email: Jiri.Polak(zv)tconsult(tec)cz
Co mne nastvalo a na co si dejte pozor:
http://freeweb.coco(tec)cz/jpolak/cernalistina/ADO + DBF III+
[*] Jan Najvarek <najvarek(zv)seznam(tec)cz> - 31.8.1999 08:22:15 -0400
Ahoj,
mam problemse ctenim DBF souboru pres ADO (pouzivam primy pristup pres
RecordSet, zadne komponenty ...).
Vsechno funguje skvele, jenom
- znak $9E (158) se cte jako $50(80) - vsechny ostatni znaky jsou OK
Okolosti: D4.03 Prof, ADO 2.1, Win NT 4 Workstation, zkousel jsem nastavit
v
DSN snad vsechny moznosti pro drivery dBase III, IV, i V, tzn. z
Internacional i ACSII, vse porad stejne.
DBF soubor je databaze ze stareho 16-bitoveho anglicko-ceskeho slovniku,
chci si udelat jen jiny prohlizec ...
Co delam spatne, nebo potrebuji nejakou ceskou verzi dBase driveru ??
Diky
Jan Najvarek
P.S. Zkousel jsem take adonis a u nich se projevuje druha nepatricnost
(nemam to u sebe, tak nazvy jen dle odhadu)- TADODataSet: po nastaveni
Connected na true to pravdepodobne zjistuje RecordCount, protoze to na par
sekund je 100% zatizeni pocitace a program zmrzne .. lze to nejak vypnout
(dbf soubor ma 10 MB).
OnCloseQuery
[*] Radim Kunz <rkunz(zv)ova(tec)comp(tec)cz> - 31.8.1999 14:29:09
V D4 uz je CloseQuery virtualni, Close zatim staticka.
Radim Kunz
>Bohuzel, metoda TForm.CloseQuery je deklarov�na jako static a nelze ji
>prepsat.
>Ale dik za inspiraci.
>
>Tomas Folprecht
>Struktura .dbf
[*] Karel Pechanec <kapecha(zv)mias(tec)cz> - 31.8.1999 14:59:59
zdravim...
muzes to skusit uplne jednoduse treba ctenim hodnot z TField v TDataSet.
var
dbStruct:TStrings;
i:integer;
s:String;
begin
table1.active:=true;
dbStruct:=TStringList.create;
for i:=0 to table1.FieldCount-1 do begin
s:=intToStr(table1.fields[i].fieldNo);
s:=s+'.'+table1.Fields[i].FieldName;
s:=s+'; ';
case table1.fields[i].dataType of
ftUnknown:s:=s+'Unknown or undetermined';
ftString:s:=s+'Character or string field';
ftSmallint:s:=s+'16-bit integer field';
ftInteger:s:=s+' 32-bit integer field';
ftWord :s:=s+'16-bit unsigned integer field';
ftBoolean :s:=s+'Boolean field';
ftFloat :s:=s+'Floating-point numeric field';
ftCurrency:s:=s+' Money field';
ftBCD :s:=s+'Binary-coded Decimal field';
(*
...atd.
*)
end;
s:=s+' ['+intToStr(table1.fields[i].datasize)+']';
if table1.fields[i].IsIndexField then s:=s+'; '+'*';
(*
...atd.
*)
dbStruct.Add(s);
end;(*-------------------------------------------------------
Karel Pechanec; kapecha(zv)mias(tec)cz
MIA Software s.r.o.; www.mias(tec)cz
-------------------------------------------------------*)
-----P�vodn� zpr�va-----
Od: tmara(zv)itsys(tec)cz <tmara(zv)itsys(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 31. srpna 1999 14:30
P�edm�t: Struktura .dbf
Hezky den,
asi se ptam na naprosto jasnou v�c, ale ja jsem to nikde v helpu nenasel.
Jde mi o toto: obcas potrebuji zjistit strukturu .db nebo .dbf souboru. V
Database Desktopu ji sice zjistim, ale uz ji nevytisknu (nebo alespon nevim
jak). Ve stare dobre Foxce byl prikaz "structure",
V Delphim nevim, ale neverim, ze by v nem n�co podobneho nebylo. Poradite
mi? Thx.
P.S. Jestli jde o opravdu primitivni v�c, tak se, prosim, zdrzte neslusnych
komentaru na mou osobu. :o)
ByE.Cross-tab query
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 31.8.1999 15:15:14
> -----Original Message-----
> From: Milan Schembera [mailto:milan(zv)missoftware(tec)cz]
> Sent: Tuesday, August 31, 1999 12:24 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: OT: Cross-tab query
>
>
> Ahojte lidicky,
>
> asi se to spise netyka Delphi, ale mam
> takovyhle problem:
>
> Potrebuju udelat cross-tab query a nechci ji
> delat primo v Delphi, takze jsem premyslel, ze
> bych to udelal jako VIEW (pouzivam MS SQL
> 7), ale co se tyce MS SQL, jsem zacatecnik ;-)
> V napovede se mi nepodarilo nic najit, netusite
> nekdo, jak ?
>
> Konkretne mam 2 tabulky (CLOVEK,
> JAZYKY), kde muze mit CLOVEK v tabulce
> JAZYKY nekolik zaznamu. Chci mit vyslednou
> tabulku, kde kazdy CLOVEK bude mit 1 radek
> a jako sloupce budou JAZYKY (distinct) s tim,
> ze na pruseciku bude hodnota ANO nebo NE,
> podle toho, jestli ten CLOVEK ma v tabulce
> JAZYKY pro prislusny jazyk zaznam nebo ne.
Ja bych to udelal pres proceduru. Uz jsem jednou neco
podobneho delal, protoze mi nesla pouzit Decision Cube,
navic tech dat bylo hodne a je to rychleji spocitane na serveru,
nez aby se to tahalo na klienta.
Jestli vubec neznas MS SQL, asi se u toho dost zapotis. :-)
Zkusim za jednotlive body davat patricne prikazy.
Procedura by mela:
CREATE PROCEDURE UdelejPrehled () AS
BEGIN
END
- zalozit docasnou tabulku se sloupci Clovek, Jazyk1, ... JazykN
//CREATE TABLE #DocasnaTabulka (Clovek Char(20), ......)
- pripravit zaznamy pro kazdeho cloveka
//INSERT INTO #DocasnaTabulka (Clovek)
// SELECT DISTINCT Clovek
// FROM CLOVEK
- kurzorem projet Jazyky a pro kazdy zaznam udelat Update prislusneho
zaznamu v docasne tabulce.
//Musis se naucit pracovat s kurzorem, takhle z hlavy to hned vsechno
nenapisu
//Cursor se deklaruje prikazem DECLARE MujCursor CURSOR FOR SELECT Clovek,
Jazyk FROM ....
//Dale je potreba otevrit kurzor, zacyklit si v nem pres vsechny radky
OPEN MujCursor
WHILE (1 = 1) BEGIN
FETCH next FROM MujCursor
INTO (zv)Clovek, (zv)Jazyk
/*test na status kursoru*/
IF (zv)(zv)FETCH_STATUS <> 0 BREAK;
- a tady je v promennych Clovek a Jazyk, je potreba je Updatovat v
DocasneTabulce
- je to slabina, musis pracovat s pevne danymy jazyky. Jinak je neumim
updatovat
IF (zv)Jazyk = 'Jazyk1'
UPDATE #DocasnaTabulka SET Jazyk1 = 'ANO'
WHERE Clovek = (zv)Clovek
IF(zv)Jazyk = 'Jazyk2'
UPDATE #DocasnaTabulka SET Jazyk2 = 'ANO'
WHERE Clovek = (zv)Clovek
........//atd pro vsechny jazyky
//uzavreni cyklu
END
//zniceni kurzoru
CLOSE MujCursor;
DEALLOCATE MujCursor;
//Vratit vytvorenou tabulku
SELECT * FROM #DocasnaTabulka
No a je to vsechno.
Z Delphi muzes vyvolat proceduru pres StoredProc, melo by to jit i pres
Query,
a napojit na ni klasicky DataSource
Jura
-------------
Email: Jiri.Polak(zv)tconsult(tec)cz
Co mne nastvalo a na co si dejte pozor:
http://freeweb.coco(tec)cz/jpolak/cernalistina/Tvorba Instalacek - dotaz
[*] Robert Holovsky <robert.holovsky(zv)seznam(tec)cz> - 31.8.1999 15:21:41
Ahoj Delphini,
mel bych na vas takovy dotazek. Jelikoz to neni dlouho co jsem zacal vyvijet
nejake programy v Delphi, tak by mne zajimaly nektere informace k vytvareni
instalacni disket nebo spis CD-ROM.
Ja mam zakoupenou verzi DELPHI 4.0 Proffesional, tam je InstallShield, ale
bohuzel mi nenabizi moznosti instalace tak jak bych si predstavoval.
1) potrebuji TYP SETUPU vice nez tri (tzn. treba TYPICKA, UPLNA, VLASTNI a
treba jeste MINIMALNI apod.)
2) taky ze instalace bude probihat ze dvou CD-ROM, a ja potrebuji aby 1. CD
obsahovalo komprimovana data programu, tak jak to InstalShield dela
standartne, ale na druhe CD(jsou tam obrazky) aby byly nekomprimovana, nebot
podle typy instalace se prekopiruj do patricneho adr. na disku nebo se budou
tahat z CD.
3) Pri nastavavovani adresaru kam instalovat, aby bylo mozno nastavit pro
kazdou slozku vlastni podadresar, jak to delaji nektere instalacni
programy.
Napr. Aplikace: C:\Progra~1\Applikace
Obrazky: C:\Progra~1\Applikace\Obrazky - ale mozno zmenit treba
na C:\Dokume~1\Obr
. atd.
4) Jak je to s ceskymi instalacnimi programy - InstalShield mam v anglictine
tudiz i angl. dialogova okenka, potrebuji cesky. Jak na to?? Je moznost
nejakeho upgradu apod.?
Takze doufam, ze mi nekdo poskytne par informaci a zasveti mne to taju
vyroby instalacek.
Predem dekuji
Robert
robert.holovsky(zv)seznam(tec)cz
robert.holovsky(zv)gefos(tec)cz
IDAPI error
[*] Iko <iko(zv)kamarad(tec)cz> - 31.8.1999 15:33:22
zdravim ludia
Vie mi niekto poradit, kde zozeniem posis chyb %subj% ? Databaza
mi vyhadzuje chybu a ja netusim, co znamena.
iko
iko(zv)kamarad(tec)cz
Probl�m s DWORD, cardinal
[*] Komzak, Roman <Roman.Komzak(zv)oriflame(tec)cz> - 31.8.1999 15:48:41
Mam Delphi 4, a radek se mi vykona - projistotu uvadim, ze samozrejme se
nevykona, pokud dojde k optimalizaci kompilatorem - v nize uvedenem prikladu
staci pridat na konci napr. toto
ShowMessage(IntToStr(A));
Roman
-----Original Message-----
From: Petr Voborn�k [SMTP:vobornik(zv)apel(tec)cz]
Sent: 31. srpna 1999 13:45
To: delphi-l(zv)fwd(tec)cz
Subject: Probl�m s DWORD, cardinal
Zdravim,
Narazil jsem na nasledujici "chybu":
var A: DWORD;
begin
A:=129;
if ((A and 128) > 0) then
begin
A:=0; // toto se nevykona
end
end.
Kdy� tento kod krokuji, tak mi prekladac ukaze, ze vyhodnotil
podminku
spravne, ale neprovede prikaz mezi begin a end. Problem je se vsemi
32bit
typy. Zajimave je, ze pokud se v podmince vyhodnocuji jen hodnoty
mensi jak
128, tak je vse ok.
Vse je take ok, pokud je vyraz nasledujici ((A and 128) > 1).
Nevim co to ma znamenat. Je to chyba prikazu "if", v prekladaci nebo
nekde
jinde ?
Diky za jakykoliv nazor. Petr
[D3 Standard, Win95]
Zaokrouhlov�n�
[*] FitCom <fitcom(zv)volny(tec)cz> - 31.8.1999 16:07:01
Dobry den
jsem zacatecnik samouk a potreboval bych pomoc s timto:
1. Zaokrouhlovani cisel na desetiny ( konkretne mam cenu napr. 24Kc
a pripoctu DPH 22% = 29,28 a potreboval bych 29,30 Kc.
2. Prevod cisla na slovni zapis napr. 48 Kc = ctyricetosumkorun.
Mockrat dekuji za odpovedi Jan Pecen
Struktrura
[*] tomas.mazurek(zv)vitkovice(tec)cz - 31.8.1999 14:08:02
Hello,
mam aplikace, ktere to umi tisknout... Zjisti a vytiskne vsechny
typy tabulek, ktere jsou podporovane v BDE. Napr. u Paradoxu lze
zjistit:
Polozky, validace, ref. integrita, indexy apod...
Mam to vyzkousene na paradoxu, dbase, interbase a oracle.
Je to pro BDE 16 i 32, kdo ma zajem, necht si napise. Muzu poslat i
zdrojaky...
TM