Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
Pasword
[*] Otakar �koloud <Otakar.Skoloud(zv)seznam(tec)cz> - 31.8.1999 16:13:47
Dobry den,
Dotaz:
Jak programove obejit dialog Enter Pasword(s) u Paradox(7) tabulky? Heslo je zname.
Diky.
Ahoj
O.S.
-- http://email.seznam(tec)cz
-- email zdarma na cely zivot
Web aplikace pomoci Delphi
[*] Z�vada Ji�� <zavada(zv)atcomp(tec)cz> - 31.8.1999 16:32:19
Milan Nemec napsal v odpovedi Jirimu Zavadovi:
> > 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.
>
Nesouhlasim s tvym tvrzenim. Jakmile je NT autentizace zlomitelna
hrubou silou, i relativne dlouha hesla jsou desifrovatelna, vse je
zalezitosti nasazeni dostatecne vykonne masiny na dostatecne dlouhou dobu.
Uz u "stredne komplikovaneho" hesla narazis na nutnost kompromisu - uzivatel
nechce zadavat dlouhe a komplikovane heslo a casto je menit, zejmena webovy
uzivatel ne. Proste to neudela - nema ochotu podlehat autoritam, jako se
mozna deje v pripade LAN na diktat spravce. To si radeji vybere konkurencni
shop na jinem sajtu, ktery ho tak neobtezuje.
Je v tom jeste nekolik nuanci (v zavislosti na typu aplikace
[zakaznika], o kterou se jedna), ale nema to podle me smysl rozebirat do
konference - myslim ze podil webovych vyvojaru pracujicich v Delphi, ktere
by to zajimalo, bude pomerne maly.
> > >
> > 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.
>
Test jsme delali hned po objeveni desifratoru s cilem zjistit miru
jeho nebezpecnosti pro nasi sit. Do doby objeveni desifratoru nikdo nevedel,
ze se da snadno nahlednout do toho, co pouziva jako heslo, nedavali takovy
pozor co se uziva, ALE uz tehdy vsak byla u nas vynucena delka hesla alespon
8 znaku a pravidelna expirace hesel. I za techto pomerne standardnich
podminek doslo k uvedenemu nachytani site WinNT v nedbalkach. Muze to byt
vizitka kvality desifratoru - ci spise nekvality zabezpeceni WinNT. Pro
informaci - byla to spolecna sit Autocontu Ostrava a.s. a ATComputers a.s.,
myslis, ze ma neschopne spravce ? Znam je, nerekl bych.
Ahoj
J.Z.
(Ne)utajovani algoritmu kodovani
[*] Z�vada Ji�� <zavada(zv)atcomp(tec)cz> - 31.8.1999 17:09:06
Jiri Polak napsal v odpovedi Jirimu Zavadovi:
...
> > 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.
>
>
Mam obavu, ze i kdyby byli tak ochotni a sdelili algoritmus, porad
nemas jistotu, ze dela skutecne to (a jenom to), co tvrdi. Podle meho nazoru
jistotu mas teprve tehdy, az mas zdrojak - a to bud koupeny, nebo takovy, ze
si jej napises. :-)).
> > 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
>
Nectes presne, co jsem napsal. Bohuzel nemohu ovlivnit, jak pochopis
to, co napisu, ale NEUVEDL jsem nic o obecnem reseni uzitecnem pro vsechna
mozna nasazeni, ale na to jiste prijdes, prectes-li si historii nasi
komunikace. Stejne tak jsem neuvedl, ze pouzivam "utajeny algoritmus" -
myslim, ze i toto nedorozumeni pada na stejny vrub.
V psychologii se tomu rika semanticky diferencial a princip
apercepce :-)) (to nejsou sprosta slova)
> >
> > 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.
>
V tom se plne shodneme.
Ahoj,
Jiri Zavada
zavada(zv)atcomp(tec)cz
Tvorba Instalacek - dotaz
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 31.8.1999 17:21:18
Puvodni zprava, kterou napsal Robert Holovsky dne 31 Aug 99,:
> DELPHI 4.0 Proffesional, tam je InstallShield, ale bohuzel mi nenabizi
> moznosti instalace tak jak bych si predstavoval. 1) potrebuji TYP SETUPU
> [... odstrizeno ...]
> Je moznost nejakeho upgradu apod.?
No jo, to je problem. InstallShield Express Delphi Edition, co jsi
dostal k Delphi, je ocesana verze InstallShield Express, ktery toho
zase az tak moc take neumi. Natoz pak ten ocesany. Pokud chces
instalovat opravdu ten zaklad - normalni program + BDE + SQL Links +
+ balicky apod., vytvorit zastupce a nejake zaznamy do registru,
je na to InstallShield Express z Delphi dostatecny. Pokud chces
neco vic, pak se musis poohlednout po nejakem jinem instalatoru.
Mas nekolik moznosti. Muzes si poridit neco opravdu kvalitniho,
coz ale byva dost drahe. Napriklad InstallShield Professional 5.5
je i ve verzi International nebo Bilingual, ktere umi cestinu.
A je to instalacni program, kterym udelat uplne vsechno, co te
kdy napadne. Cena tomu odpovida a prevysuje cenu Delphi Professional.
Pak je take dobry napr. WISE Install, ktery je v nekolika verzich
a v te uplne nejvyssi je jeste drazsi nez ISPro. Jsou ale i levnejsi
instalatory. Nebo si muzes nekde najit nejakou free knihovnu
do Delphi, ktera instalacni program umi udelat. To existuje.
Tady bych si ale dovolil trochu varovat - pokud pouzivas BDE,
mel bys pouzivat certifikovany instalacni program, ktery je
schvalen Borlandem pro instalace BDE. Tech neni moc a knihovna
pro Delphi vubec zadna. A to nemluvim o certifikaci na logo
Designed for Windows 95/98/NT. Ale to te treba vubec nepali.
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
ADONIS komponenty pro ADO
[*] Erik Salaj <winsoft(zv)napri.sk> - 31.8.1999 19:49:24
DAO nie je sucastou D4. Access 97 pouziva DAO 3.5
a Access 2000 novsi DAO 3.6. DAO je uplne nezavisle
od BDE, snad az na jednu vynimku, ze DAO 3.6 obsahuje
ISAM driver pre paradox (a myslim, ze to plati aj pre dBase),
ktory pouziva BDE, takze v pripade, ze sa tento driver
pouziva, musi byt BDE nainstalovane.
Erik Salaj
----- Original Message -----
From: Martin Talian <geoplan(zv)pp.sinet.sk>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, August 31, 1999 7:21 AM
Subject: RE: ADONIS komponenty pro ADO
> 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
Cross-tab query
[*] Hynek Svatos <svatos(zv)af(tec)czu(tec)cz> - 31.8.1999 19:58:31
> 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
> file://CREATE TABLE #DocasnaTabulka (Clovek Char(20), ......)
> - pripravit zaznamy pro kazdeho cloveka
> file://INSERT INTO #DocasnaTabulka (Clovek)
> // SELECT DISTINCT Clovek
> // FROM CLOVEK
> - kurzorem projet Jazyky a pro kazdy zaznam udelat Update prislusneho
> zaznamu v docasne tabulce.
> file://Musis se naucit pracovat s kurzorem, takhle z hlavy to hned vsechno
> nenapisu
> file://Cursor se deklaruje prikazem DECLARE MujCursor CURSOR FOR SELECT
Clovek,
> Jazyk FROM ....
> file://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
>
> file://uzavreni cyklu
> END
>
> file://zniceni kurzoru
> CLOSE MujCursor;
> DEALLOCATE MujCursor;
>
> file://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/
Ahoj,
je tu problemek, co kdyz budu chtit libovolny pocet jazyku ?
Pak je toto reseni v podstate k nicemu. Leda by se modifikovalo: ten cursor
vytvaret dynamicky pres volani EXECUTE:
DECLARE (zv)v_str varchar(1000)
SET (zv)v_str = 'CREATE TABLE #DocasnaTabulka (Clovek Char(20), '
v cyklu pridat vsechny mozne jazyky
SET (zv)v_str = (zv)v_str + ' Jazyk1 bit, '
a pak zavolat
EXECUTE ( (zv)v_str )
atd.
Ovsem to by znamenalo, ze by se musely dynamicky generovat i ty inserty ...
byla by to zrejme pekna pakarna
a nebo pres jednoduchou tabulku:
CREATE TABLE #DocasnaTabulka (Clovek Char(20), Jazyky varchar(5000))
pricemz kazdy znak by predstavoval jeden typ jazyka (A=anglictina,
B=nemcina, ...)
takze veta 'Karel', 'ABC' by znamenala ze kaja umi tri jazyky.
Muselo by se ovsem potichu predpokladat, ze pocet jazyku nepreleze unosnou
mez a v Delphi by se to muselo aste dekodovat (to by ovsem byla trivka)
Tak nevim, prvni z tech dvou reseni mi pripada mene hloupe ...
==== Hynek Svatos ====
svatos(zv)af(tec)czu(tec)cz
svatos(zv)kam(tec)czu(tec)cz
===================Pruzkum
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 31.8.1999 20:00:43
Vodicka, David (CAP, GCF) wrote:
> Ja souhlasim se zverejnenim nasi odpovedi i s moji adresou, ale bacha
> : ta korespondence sla na soukromy email a tak si ne uplne kazdy muze
> prat zverejneni sve odpovedi i s emailem. O zverejneni byla jen rec u
> zpracovanych vysledku pruzkumu. PS: nevim, komu by to mohlo vadit, ale
> jde o princip.
V poradku. Sice jsem v puvodnim majlu upozornoval, ze odpovedi
zverejnim, ale nespecifikoval jsem detaily. Takze bych to udelal
spise takto: kdo NESOUHLASI s uverejnenim sveho majlu (resp.
identifikace) v hlavicce dotazniku, necht mi to napise svuj
nesouhlas na muj soukromy majl do ctvrtka 2.9.99 do 7 hodin rano.
Namisto jeho majlu dam anonymni identifikaci. Pote anketu uzavru
a zverejnim.
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
Prekresleni casti komponenty
[*] Petr Kundrata <pksoft(zv)atlas(tec)cz> - 31.8.1999 20:01:49
Ahoj!
D4Prof+SP3
Potreboval bych prekreslit cast komponenty (konkretne TDrawGrid)
a nejlepe nejakym obecnym zpusobem. Cilem je po zmene hodnot
v programu obnovit pouze dotcenou oblast.
1. Dalo by se to realizovat pomoc� DrawCell, ale musel bych
vzdy sam dopocitavat AState: TGridDrawState a podle nej jeste
nastavovat barvy a fonty ...
2. Prekreslovani je omezeno obdelnikem Canvas.ClipRect, ktery
by bylo vhodne nastavit. Ale
....
property ClipRect: TRect read GetClipRect;
....
function TCanvas.GetClipRect: TRect;
begin
RequiredState([csHandleValid]);
GetClipBox(FHandle, Result);
end;
Takze nastavit jedine pres win32:
The ExcludeClipRect function creates a new clipping region
that consists of the existing clipping region minus the
specified rectangle.
The IntersectClipRect function creates a new clipping region
from the intersection of the current clipping region and the
specified rectangle.
Jsou jedine funkce, ktere jsem v helpu nasel, ze by mi
mohly pomoci. Obe ale umi pouze omezit existujici ClipRect :-(
Pri prvnim pouziti IntersectClipRect je vse ok - Cliprect
predtim obsahovalo celou plochu komponenty, ale podruhe je
jiz ClipRect nulovy. Potrebuji jej tedy alespon znovu obnovit
na celou plochu komponenty.
Pokud mate nekdo tento problem vyresen, tak se prosim ozvete.
Petr Kundrata
Deravy formular
[*] Ing. Ludek Florian <ludan(zv)bluerose(tec)cz> - 31.8.1999 21:06:37
Mam na to komponenty vcetne nekolika prikladu.
Najdu a zejtra to nekam soupnu.
Bye Ludan
> Neviem ci to tu uz bolo, ale potrebujem v programe urobit "deravy
formular".
Plocha
[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 31.8.1999 21:51:41
> zkus to v registry :
> HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell
> Folders
>
Nechci Ti do toho kecat, ale da se z DOSovske ( alespon tak to vyplynulo z dotazu) aplikace sahnout do registry???
Jediny mozna pristup je podle mne primo sahnout do systemovych souboru
users.dat a system.dat ( registry).
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
============================================
OnCloseQuery
[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 31.8.1999 21:56:17
Zkus tohle :
Kazde okno by pri zavreni melo reagovat na message WM_CLOSE ( to by mela
byt zprava, ktera ten proces spusti).
Ve WND_PROC hlavniho okna nebo v metode, povesene na WM_CLOSE nahazovat v
pripade zavreni cele aplikace nejakou globalni "vlajku" na True a tu potom
testovat v MDIChildech pri zavreni.
Je to jen napad - nezkousel jsem to.
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
============================================
> -----Puvodni zprava-----
> Od: Tomas Folprecht [SMTP:tomas.folprecht(zv)iol(tec)cz]
> Odeslano: 31. srpna 1999 10:33
> Komu: delphi-l(zv)fwd(tec)cz
> Poedmit: 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
>
>
> DB grid a barvy polozek
[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 31.8.1999 22:02:39
V podstate oboji. Rozdil mezi DBGridem a StringGridem je ten, ze StringGrid
ma tu udalost jako OnDrawCell a mas tam indexovanou bunku Col, Row a
odpovidajici oblast TRect.
U DBGridu je to OnDrawColumnCell a mas tam misto indexu Col parametr typu
TColumn ( tusim).
Ale jinak je pricip uplne stejny.
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
============================================
> -----Puvodni zprava-----
> Od: Krayzel Libor [SMTP:Libor.Krayzel(zv)czech-tv(tec)cz]
> Odeslano: 31. srpna 1999 12:56
> Komu: 'delphi-l(zv)fwd(tec)cz'
> Poedmit: RE: DB grid a barvy polozek
>
> > 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.
>
> DBGrid s radkem navic
[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 31.8.1999 22:09:11
> 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
>
> <<Soubor: ATT00017.html>>
Takova fikce.
Coz takhle to mit na jednom panelu a mit tam dva DBGridy, kde jeden ma
align alBottom a druhy AlClient ( to je ten vrchni).
V tom vrchnim jsou vlastni data a na tom spodnim zase Calcfieldy a jine
vypocty.
Presouvani a dalsi cinnosti by probihaly asi tak, ze na zmenu polohy nebo
velikosti sloupce v hornim gridu by musel reagovat spodni grid ( chtelo by
se to
podivat do SRC, negeneruje-li se tam nejaka prihodna udalost nebo message.
( zkus vyuzit udalosti OnColEnter a OnColExit)
A podobne by to asi bylo i se scrollovanim ( mozne reseni (ale ne
odzkousene) je nepouzivat scrollbar v DBGridu, ale scrollovat cely panel -
mozna to je blbost).
Jo a u toho spodniho gridu bych vypnul nazvy sloupcu - vypadalo by to
divne. Aby jsi zamezil u spodniho gridu prepsani nebo editaci, asi bych
nastavil property ReadOnly na True a Enabled na False - veskere pohyby
resit vrchnim gridem.
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
============================================
Form
[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 31.8.1999 22:11:05
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)
:-)))
Neni to spise podle hesla "zvyk je zelezna kosile"??
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
============================================DBGrid s radkem navic
[*] Ing. Jaroslav �ke��k - 31.8.1999 22:31:08
A neni mozne si vytvorit pomocny prazdny radek primo v te tabulce??
Jaro
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
Problem s transparentnosti ikonek
[*] Luk� Gallina - 31.8.1999 22:45:28
Novell s Tebou !
Jenomze ja pouziwam Ati Expert(zv)Play 98 a ta mi to dela.... a mam to
ozkousene i na dalsich kartach (S3....) a jen we WinNT, tudiz to nebude
trouble karty. Nekdo mi tu radil, abych ikonku udelal w jinem editoru..napr
MicroAngelo nebo jak se jmenoval a je po problemu....
Ale dik za radu....
Luk� Gallina (Lukas Gallina)
racek(zv)devacomm(tec)cz
Hledejte mimozemstany, jsou zde.....http://setiathome.ssl.berkeley.edu
----- Original Message -----
From: Heinisch Jiri <HeiJu(zv)sol(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, August 31, 1999 9:27 AM
Subject: Re: Problem s transparentnosti ikonek
>
> > > 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
>
>
>Prace s databazi
[*] Ing. Jaroslav �ke��k - 31.8.1999 22:54:02
Prechod z jineho jazyka je mozna obtiznejsi nez zacinat z nuly. Take jsem
kdysi to zazil.
Presto bych ja doporucoval (i ze sve zkusenosti) prejit na nazvoslovi a
metody
bezne pro Delphi. Duvody jsou nejmene dva.
1. Predpokladam ze kody napsane v Delphi budou pripadne cist a louskat
Delphisti
a nikoliv experti pres VB. Takovy programator z toho pak bude jelen.
2. Az si na to zvyknes a porozumis tomu vice, tak se i tobe samotnemu
nebudou
ty Delphi-VB propletence libit.
Tak napriklat DataSet bych ponechal datasetem a nepredelaval bych ho na
RecordSet,
protoze patri do tridy TDataset (T naznacuje, ze jde o tridu).
Poznamka.
Uz jsem videl i takove zdrojaky, kde napr TTable bylo zkracene oznaceni
string promenne pro Tiskove Tabulky. V tom se pak jednomu opravdu hezky
cte.
Jaro
>
> > 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
> ===============================
>Modulo 11 atd
[*] Miloslav L�tal - BV <letal(zv)sol(tec)cz> - 31.8.1999 22:56:37
Zna prosim nekdo proceduru na ruzna vypocty MODULO jako je
Rodne cislo, Bankovni ucet, ICO, carovy kod atd.
viz. help PC FANDu:
Funkce modulo vrac� true pokud kontrola vstupn�ch parametr� metodou
"modulo n" vyhovuje.
Syntaxe: MODULO ( TextV�raz ,n,w1,w2,..wm ) : boolean
TextV�raz .... �et�zec cifer d�lky m+1, ci (i=1..m) jsou jeho cifry
a cp je kontroln� cifra na pozici m+1
w1,...,wm .... tzv. v�hy
definice: ( n - sum ( ci * wi ) mod n ) mod 10 = cp
Pokud plat� tato rovnost, je v�sledek TRUE.
Vypnuti MediaPlayer
[*] Ing. Ludek Florian <ludan(zv)bluerose(tec)cz> - 31.8.1999 23:02:00
Cauec all,
V programu hlidam stavove hodnoty, pri jejich prekroceni potrebuji prehrat WAV se sirenou.
Jenze pokud si cirou nahodou user pusti MediaPlayer, tak kdyz hraje nebo je pozastaven, sirenu nespustim.
Takze bych potreboval nejakym zpusobem ukoncit vsechny zvuky, abych ji mohl spustit ja.
Muze mi nekdo poradit, jak to resit ? Rozhodne nechci pouzit ActiveX...
Bye Ludan
ADO + DBF III+
[*] Erik Salaj <winsoft(zv)napri.sk> - 31.8.1999 23:18:26
> 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).
Adonis ma ako prednastaveny client recordset (pretoze ten toho vie viac
ako server recordset) a ten funguje tak, ze najprv sa vsetky data nacitaju
je jeho buffra a potom s nimi ADO pracuje pomocou vlastnej kniznice.
Takze treba nastavit CursorLocation property na clServer pripadne
pouzit asynchronny fetch zaznamov. Doporucujem pozriet pripadne
aj Adonis FAQ na http://www.cybermagic.co.nz/winsoft/adofaq.htm .
Najnovsi Adonis 3.4 (beta verzia je na http://www.cybermagic.co.nz/winsoft)
podporuje priamy pristup k tabulkam vcitane pouzitia indexov a seek metody
(CommandType treba nastavit ctTableDirect, dalej to vyzaduje ADO 2.1
a musi to podporovat OLE DB provider). Na dBase tabulkach som to
skusal ale iba s CodeBase providerom (nie je sucastou MDAC).
Chodi to vsak aj s Jet 4.0 providerom na Access 2000 databazy, tak
mozno to pojde s tymto providerom aj na dBase. Toto by mal byt
najrychlejsi pristup na klasicke desktop databazy.
Erik Salaj
Tak jde cas .... (Was: ADO + D5)
[*] Erik Salaj <winsoft(zv)napri.sk> - 31.8.1999 23:33:35
> 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.
Aspon zopar principov:
Jenoznacne oddelit interface a implementaciu.
Interface zdokumentovat.
Nemenit interface.
Predstav si, ze by aj WinAPI bolo kompatibilne tak ako je Delphi VCL,
t.j. ze pre kazdu novu verziu Windows by si musel prekompilovat aplikacie
s novymi WinAPI headrami aby bezali pod novym Windowsom. Pretoze
komponenty musis vzdy pre nove Delphi prekompilovat (s novou VCL),
aby v novsom Delphi fungovali. Mne sa zda takato kompatibilita (na urovni
zdrojoveho kodu) malo kompatibilna a chcel by som kompatibilitu
na urovni interface (najlepsie binarneho).
> > 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
> :-))))))
Si ma nepochopil (alebo som to zle napisal, chyba mi tam ksichtik na konci).
Chcel som povedat, ze niekedy nie je snaha hladat seriozne riesenie
problemu,
ale namisto toho vsetlijake cesticky ako ho obist.
> 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 ?
OK, ako mi Delphi pomoze s navrhom lepsej kniznice ako je VCL, alebo
aspon v rieseni tych problemov, ktore vo VCL su (jednym z nich su staticke
metody v protected a public sekcii)? To je ten problem, ktory ma trapi,
a ja uz davno viem, ze ten problem tam je, a zaujima ma jeho riesenie,
nie iba konstatovanie. Podla mna tu pomoze iba zasadne prebudovanie
celej kniznice s pouzitim lepsej komponentovej technologie ako je
OOP source code kompatibilita.
> 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*.
Ano, daleko lacnejsie je nic nerobit ;-) Prezrad mi, ake prevratne
technologie to Borland vyvija a podporuje ze mu na to ledva sily
stacia? Z informacii, ktore o Delphi 5 mam, je podla mna D5
presne tam kde bolo aj D3.
Ked sme uz pri riskantnych zalezitostiach, tak COM+ sa mi zda
daleko menej riskantne ako MIDAS ci Linux.
Erik Salaj
DBGrid s radkem navic
[*] Viliam Mlich <vmlich(zv)mbox.vol(tec)cz> - 1.9.1999 00:26:52
Hello Pavel!
> 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
Pouzi priamo DBGrid. Tie vysledky matematickych operacii preved na string a
daj ho do 'caption' zahlavia kazdeho stlpca. Proceduru pre volanie zaves na
kazdu potrebnu udalost toho gridu (OnResize, OnClick... :-)
Bye mailto:vmlich(zv)mbox.vol(tec)cz
V.Mlich http://www(tec)czech-web(tec)cz/~vmlich
Prace s databazi
[*] Jan Fiala <fiala(zv)infos(tec)cz> - 1.9.1999 06:37:25
----- P�vodn� zpr�va -----
Od: Ing. Jaroslav �ke��k <jaro(zv)sinea(tec)cz>
> Tak napriklat DataSet bych ponechal datasetem a nepredelaval bych ho na
> RecordSet,
> protoze patri do tridy TDataset (T naznacuje, ze jde o tridu).
> Poznamka.
> Uz jsem videl i takove zdrojaky, kde napr TTable bylo zkracene oznaceni
> string promenne pro Tiskove Tabulky. V tom se pak jednomu opravdu hezky
> cte.
> Jaro
>
V tom pojmenovavani s tebou souhlasim. Ja jsem se to jen snazil kolegovi priblizit tak, aby kdyz se podiva na svuj vypis programu z VB a ukazku, kterou jsem mu poslal, byly videl rozdily na prvni pohled. Ostatne ja bych dal prednost pojmenovani spis tblCiselnik nez TTableCiselnik :-)
===============================
ing. Jan Fiala fiala(zv)infos(tec)cz
Prog-Soft s.r.o. Plzen
INFOS - informacni system pro napojare
===============================
> > > 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.FieldValues['Jmeno'] := Text1.Text;
> > rs.Post;
Zaokrouhlov�n�
[*] Ren� Otisk - 1.9.1999 07:04:03
Hi,
ad1
ZaokrouhleneCislo := (Round(Cislo*10))/10;
ad2
tam bych pouzil asi
(pro cela cisla)
AString := IntToStr(Trunc(Cislo))
for i := 1 to length(AString[i]) do
case
'0': volani funkce s parametrem i, ktera ti vrati prislusny text
vzahujici se k pozici cisla (desitky, stovky, tisice)
'1': -"-
end;
----- Original Message -----
From: FitCom <fitcom(zv)volny(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, August 31, 1999 4:07 PM
Subject: Zaokrouhlov�n�
> 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
>
>Pasword
[*] Ren� Otisk - 1.9.1999 07:08:28
Hi,
AddPassword(const Password: string);
RemovePassword(const Password: string);
RemoveAllPassword(const Password: string);
property OnPassword: TPasswordEvent;
type TPasswordEvent = procedure(Sender: TObject; var Continue: Boolean
) of object;
Sroub
----- Original Message -----
From: Otakar �koloud <Otakar.Skoloud(zv)seznam(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, August 31, 1999 4:13 PM
Subject: Pasword
> Dobry den,
>
> Dotaz:
>
> Jak programove obejit dialog Enter Pasword(s) u Paradox(7) tabulky? Heslo
je zname.
>
> Diky.
> Ahoj
>
> O.S.
>
> -- http://email.seznam(tec)cz
> -- email zdarma na cely zivot
Cross-tab query
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 1.9.1999 07:13:01
> -----Original Message-----
> From: Hynek Svatos [mailto:svatos(zv)af(tec)czu(tec)cz.tconsult(tec)cz]
> Sent: Tuesday, August 31, 1999 7:59 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Re: Cross-tab query
> je tu problemek, co kdyz budu chtit libovolny pocet jazyku ?
> Pak je toto reseni v podstate k nicemu. Leda by se
> modifikovalo: ten cursor
> vytvaret dynamicky pres volani EXECUTE:
>
> DECLARE (zv)v_str varchar(1000)
>
> SET (zv)v_str = 'CREATE TABLE #DocasnaTabulka (Clovek Char(20), '
> v cyklu pridat vsechny mozne jazyky
> SET (zv)v_str = (zv)v_str + ' Jazyk1 bit, '
>
> a pak zavolat
> EXECUTE ( (zv)v_str )
>
> atd.
>
> Ovsem to by znamenalo, ze by se musely dynamicky generovat i
> ty inserty ...
> byla by to zrejme pekna pakarna
To se mi libi, ja MS SQL Server zas tak dobre neznam a stacilo
mi staticke reseni, protoze jsem delal tydenni prehledy
a ve sloupcich byly tydny. Tak jsem dalsi moznosti nehledal.
A to reseni s EXECUTE se mi libi
i pro muj pripad, protoze bude snad i vykonnejsi : misto
padesati tri IFu tam bude jedno sestaveni prikazu a jeho EXECUTE.
Takze myslim, ze ne pakarna, ale skutecne dobre reseni.
Navic pouzitelne obecne, diky
Jura
-------------
Email: Jiri.Polak(zv)tconsult(tec)cz
Co mne nastvalo a na co si dejte pozor:
http://freeweb.coco(tec)cz/jpolak/cernalistina/Prevod stareho layeru QRep do vyssi verze
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 1.9.1999 07:26:58
Ahoj,
mel bych maly dotaz, ohledne QuickReportu. Potreboval bych prevest navrzene
formulare z QR1 do QR v Delphi 3 nebo 4. Nactu-li formular s bandy, smrske
se mi vsechno do jednoho bodu. Vzhledem k odlisne povaze stare verze QR
(layer formu) oproti nov� verzi (layer komponentu) zrejme existuje nejaka
konverzni utilita nebo neco podobneho.
Muzete mi, prosim, nekdo poradit, kde hledat, nebo jak to udelat? Uz jsem se
tady ptal (viz. QuickReport a Delphi 1), ale zrejme nikdo tento nebo podobny
problem nema, tak mi nikdo neodpovedel...
Dekuji za jakoukoliv odpoved
Jaro B.Plocha
[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 1.9.1999 07:35:46
> 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.
To nevim, ale mam neblahe tuseni, ze to nebude az tak snadno
realizovatelne. Uz jen z toho duvodu, ze program v BP 7.0 je vlastne DOS a
pro DOSovske
okno si Windowsy spousteji vlastni virtualni stroj, coz je vlastne okno
prikazove radky. Tim padem taky nemuzes odchytavat message, ktere jsou
tomuto oknu posilany a vyuzivat API funkce ( a nebo nevim jak).
Nevim to jiste, spise je to moje domenka.
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
============================================Tak jde cas .... (+ Pruzkum - dilci vysledky)
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 1.9.1999 07:43:05
> -----Original Message-----
> From: Erik Salaj [mailto:winsoft(zv)napri.sk]
> Sent: Tuesday, August 31, 1999 10:35 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Re: Tak jde cas .... (+ Pruzkum - dilci vysledky)
>
>
> > 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).
Ano, ale navod k pouziti Ti nestaci k tomu, abys mohl vyvinout
motor, se kterym by auto dobre jezdilo. A o tom to je, ne?
Rec nebyla o pouzivani, ale o vyvoji software
Jura
-------------
Email: Jiri.Polak(zv)tconsult(tec)cz
Co mne nastvalo a na co si dejte pozor:
http://freeweb.coco(tec)cz/jpolak/cernalistina/
Zaokrouhlov�n�
[*] Petr Brant <p.brant(zv)samo(tec)cz> - 1.9.1999 06:46:58
Ahoj,
zaokrouhleni se provede tak, ze to cislo vynasobis 10, prictes 0.5,
useknes (Trunc) desetinnou cast a pak zase vydelis deseti.
NEBO
to cislo vynasobis 10, useknes (Round) desetinnou cast a pak zase
vydelis deseti.
Pro prevod cisla na slovni vyjadreni posilam funkci z archivu (musis si
upravit cestinu) - autor Mgr. Petr Kellner:
function Slovy(N:LongInt):String;
function Koncovka(S1,S2_4,S5_Moc:String;Pocet:LongInt):String;
begin
if Pocet=1 then
Koncovka:=S1
else
if (2<=Pocet) And (Pocet<=4) then
Koncovka:=S2_4
else
Koncovka:=S5_Moc;
end;
function Dvacitky(N:Word):String;
begin
case N of
1:Dvacitky:='jeden�ct';
2:Dvacitky:='dvan�ct';
3:Dvacitky:='t(c)in�ct';
4:Dvacitky:='?t(c)n�ct';
5:Dvacitky:='patn�ct';
6:Dvacitky:='�estn�ct';
7:Dvacitky:='sedmn�ct';
8:Dvacitky:='osmn�ct';
9:Dvacitky:='devaten�ct';
end;
end;
function Desitky(N:Word):String;
begin
case N of
0:Desitky:='';
1:Desitky:='deset';
2:Desitky:='dvacet';
3:Desitky:='t(c)icet';
4:Desitky:='?ty(c)icet';
5:Desitky:='pades�t';
6:Desitky:='�edes�t';
7:Desitky:='sedmdes�t';
8:Desitky:='osmdes�t';
9:Desitky:='devades�t';
end;
end;
function Jednotky(N,Druh:Word):String;
begin
case N of
0:Jednotky:='';
1:case Druh of
1 :Jednotky:='jedna';
2 :Jednotky:='jedno';
3 :Jednotky:='jeden';
end;
2:case Druh of
1,2:Jednotky:='dv�';
3 :Jednotky:='dva';
end;
3:Jednotky:='t(c)i';
4:Jednotky:='?ty(c)i';
5:Jednotky:='p�t';
6:Jednotky:='�est';
7:Jednotky:='sedm';
8:Jednotky:='osm';
9:Jednotky:='dev�t';
end;
end;
function Rady(Rad,N:Word):String;
begin
case Rad of
1:Rady:='';
2:Rady:='tis�c' +Koncovka('','e','',N);
3:Rady:='milion'+Koncovka('','y','-',N);
end;
end;
function Slovy100(N,Druh:Word):String;
var
Out:String;
begin
if (11<=(N mod 100)) And ((N mod 100)<=19) then
begin
Out:=Dvacitky(N mod 10);
N:=N div 100;
end
else
begin
Out:=Jednotky(N mod 10,Druh);
N:=N div 10;
Out:=Desitky(N mod 10)+Out;
N:=N div 10;
end;
if N>0 then
Out:=Jednotky(N,2)+Koncovka('sto','sta','set',N)+Out;
Slovy100:=Out;
end;
var
Out:String;
Pom,Druh,Rad:Word;
begin
if N<=0 then
begin
Slovy:='Nula';
Exit;
end;
Druh:=1;
Rad:=1;
Out:='';
while N>0 do
begin
Pom:=N mod 1000;
N:=N div 1000;
Out:=Slovy100(Pom,Druh)+Rady(Rad,Pom mod 10)+Out;
Inc(Rad);
Druh:=3;
end;
Out[1]:=UpCase(Out[1]);
Slovy:=Out;
end;
**************************************************
Petr Brant [p.brant(zv)samo(tec)cz], programator v MSVC++,
obcas Delphi nebo Visual Basic
**************************************************
> -----P�vodn� zpr�va-----
> Od: FitCom [SMTP:fitcom(zv)volny(tec)cz]
> Odesl�no: 31. srpna 1999 16:07
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Zaokrouhlov�n�
>
> 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
> Tak jde cas .... (+ Pruzkum - dilci vysledky)
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 1.9.1999 07:51:32
Erik Salaj wrote:
> > 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).
:-) Neni to treba. Ale je to vyhoda. Ja napriklad take neznam vnitrni
praci procesoru (alespon na urovni assembleru), ale obcas citim,
ze by se to hodilo.
> 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) ;-)
Pokud je zakaznikem programator, a moje prace ma slouzit pro
dalsi programovani, pak samozrejme ano.
> > Jsem rozhodnym odpurcem pornografie, strelnych zbrani, valek,
> > potratu, nabozenske nesnasenlivosti a zatajovani zdrojaku. :-)))
>
> Mozno trochu viac tolerancie by nezaskodilo.
Nic dalsiho me momentalne nenapadlo. :-)
> > 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.
Na vylepsovani stareho monstra ostatne take ne. Samozrejme to
plati pro vyvoj nove verze. Pokud stary system funguje bez nutnosti
vetsich uprav, necht funguje dal.
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
[*] Filous Ji�� <JFilous(zv)cpoj(tec)cz> - 1.9.1999 08:01:51
Ahoj,
ned�vno jsem zkou�el ��st registr p��mo ze soubor� SYSTEM.DAT a
USER.DAT pod DOSem pr�v�
pomoc� BP7.0 a jde to. Pokud chce�, mohu Ti poslat pro inspiraci
zdroj�k a popis struktury registry v
angli�tin� a m�j zkr�cen� popis v �e�tin� (ani jeden ale nen�
kompletn�, na v�znam v�ech polo�ek ve struktu�e jsem
ani j� a ani p�vodn� autor nep�i�el).
Jirka Filous
> -----P�vodn� zpr�va-----
> Od: Bene� Jaroslav [SMTP:JBenes(zv)cpoj(tec)cz]
> Odesl�no: 31. srpna 1999 7:28
> Komu: delphi-l(zv)fwd(tec)cz
> 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.Pasword
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 1.9.1999 08:21:40
Ahoj,
> Jak programove obejit dialog Enter Pasword(s) u Paradox(7) tabulky?
> Heslo je zname.
****Table1.DBSession.AddPassword(tve_heslo);
(skryta reklama: o tomto temate by mel vyjit clanek
v zarijovych Softwerovych novinach).
Slavek
> O.S.
----------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
----------------------------------------------
Prace s databazi
[*] Ing. Jaroslav �ke��k - 1.9.1999 08:23:11
Pred par lety jsem zkracoval co se dalo, protoze jsem byvaly Fox-kar a tam
slo jen 8 znaku.
Postupne jsem zjistil ze je lepsi nechavat dlouhe nazvy a nezkracovat nic.
Je to citelnejsi
Jaro
>
> V tom pojmenovavani s tebou souhlasim. Ja jsem se to jen snazil kolegovi
priblizit tak, aby kdyz se podiva na svuj vypis programu z VB a ukazku,
kterou jsem mu poslal, byly videl rozdily na prvni pohled. Ostatne ja bych
dal prednost pojmenovani spis tblCiselnik nez TTableCiselnik :-)
>
> ===============================
> ing. Jan Fiala fiala(zv)infos(tec)cz
> Prog-Soft s.r.o. Plzen
> INFOS - informacni system pro napojare
> ===============================
>
> > > > 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.FieldValues['Jmeno'] := Text1.Text;
> > > rs.Post;
>
>IDAPI error
[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 1.9.1999 09:02:39
Pri cem a jaka chyba Ti vypadne vypadne. Nektere chyby jsou popsany v souboru BDE.INT.
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 ludia
>
> Vie mi niekto poradit, kde zozeniem posis chyb %subj% ? Databaza
> mi vyhadzuje chybu a ja netusim, co znamena.
>
Probl�m s DWORD, cardinal
[*] Viktor.Lostak(zv)chmi(tec)cz (Viktor Lostak) - 1.9.1999 09:43:57
Blbne to, i kdyz to zmenis na tohle?
if ((A and DWORD(128)) > DWORD(0)) then
begin
A:=0; // toto se nevykona
end
Konference in English
[*] Viktor.Lostak(zv)chmi(tec)cz (Viktor Lostak) - 1.9.1999 09:52:24
Nevite nekdo, pekne prosim, kde by se clovek mohl prihlasit do nejake
konference o programovani (C++, ale ono je to vcelku fuk) v anglictine?
TNX. Viktor
Zaokrouhlov�n�
[*] Petr Motl��ek - 1.9.1999 09:56:08
----- Original Message -----
From: FitCom <fitcom(zv)volny(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, August 31, 1999 4:07 PM
Subject: Zaokrouhlov�n�
>Zaokrouhlovani cisel na desetiny ( konkretne mam cenu napr. 24Kc
> a pripoctu DPH 22% = 29,28 a potreboval bych 29,30 Kc.
viz help funkce Round
> 2. Prevod cisla na slovni zapis napr. 48 Kc = ctyricetosumkorun.
hledej v archivu konference - slo to tak polovina roku 1998
Petr Motlicek
Pasword
[*] Petr Motl��ek - 1.9.1999 09:58:49
----- Original Message -----
From: Otakar �koloud <Otakar.Skoloud(zv)seznam(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, August 31, 1999 4:13 PM
Subject: Pasword
> Jak programove obejit dialog Enter Pasword(s) u Paradox(7) tabulky? Heslo
je zname.
drive k tabulce budes pristupovat (otevreni, dotaz na tabulku) pouzij metodu
prislusne session:
viz help
"Adds a password to the current session for accessing encrypted Paradox
tables.
procedure TSession.AddPassword(const Password: string);"
Petr Motlicek
Konference in English
[*] M.Levy <M.Levy(zv)sh.cvut(tec)cz> - 1.9.1999 10:20:53
Konference ? Myslis mailovou ?
Pokud by Ti stacila news, pak zkus jakykoliv news server
Treba news.cvut(tec)cz
Je tam spousta group o programovani, urcite si vyberes
treba: comp.lang.c++.
moderated,microsoft.public.vc.language
HTH
Michal Levy
> Nevite nekdo, pekne prosim, kde by se clovek mohl
prihlasit do nejake
> konference o programovani (C++, ale ono je to vcelku fuk)
v anglictine?
>
> TNX. Viktor
>Konference in English
[*] tmara(zv)itsys(tec)cz - 1.9.1999 10:29:51
Zkus to na http://www.eGroups.com <http://www.eGroups.com>
ByE.
-----P�vodn� zpr�va-----
Od: Viktor.Lostak(zv)chmi(tec)cz [mailto:Viktor.Lostak(zv)chmi(tec)cz]
Odesl�no: 1. z��� 1999 9:52
Komu: tmara(zv)itsys(tec)cz
P�edm�t: Konference in English
Nevite nekdo, pekne prosim, kde by se clovek mohl prihlasit do
nejake
konference o programovani (C++, ale ono je to vcelku fuk) v
anglictine?
TNX. Viktor
zaheslov�n� tabulky *.DB
[*] Fiedler, Milan (CAP, GCF) <Milan.Fiedler(zv)gecapital(tec)com> - 1.9.1999 10:55:50
jak jednodu�e zaheslovat tabulku *.DB.
Milan Fiedler
ADO + DBF III+
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 1.9.1999 11:59:44
Erik Salaj wrote:
> Najnovsi Adonis 3.4 (beta verzia je na
> http://www.cybermagic.co.nz/winsoft) podporuje priamy pristup k
> tabulkam vcitane pouzitia indexov a seek metody (CommandType treba
> nastavit ctTableDirect, dalej to vyzaduje ADO 2.1 a musi to podporovat
> OLE DB provider). Na dBase tabulkach som to skusal ale iba s CodeBase
> providerom (nie je sucastou MDAC). Chodi to vsak aj s Jet 4.0
> providerom na Access 2000 databazy, tak mozno to pojde s tymto
> providerom aj na dBase. Toto by mal byt najrychlejsi pristup na
> klasicke desktop databazy.
Co jsem zkousel primy pristup k tabulkam s pouzitim jejich
vlastnich indexu pres OLE DB 2.1 na MS SQL, tak tam se
nedarilo. Takze ne vsude to funguje. Zde bych chtel jeste
upozornit, ze ADO ma jeste vlastni tridici mechanismus, takze je
mozne tridit podle takrka libovolnych sloupcu bez ohledu na index
tabulky, tedy i u SQL vysledku. Tuto vlastnost jiste mnoho lidi s
povdekem uvita.
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 .... (Was: ADO + D5)
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 1.9.1999 11:59:44
Erik Salaj wrote:
> > 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.
>
> Aspon zopar principov:
>
> Jenoznacne oddelit interface a implementaciu.
> Interface zdokumentovat.
> Nemenit interface.
Mno, a co je jeste horsi, nekdy se v nove verzi zmeni i nazev tridy.
:-(((
> Predstav si, ze by aj WinAPI bolo kompatibilne tak ako je Delphi VCL,
> t.j. ze pre kazdu novu verziu Windows by si musel prekompilovat
> aplikacie s novymi WinAPI headrami aby bezali pod novym Windowsom.
> Pretoze komponenty musis vzdy pre nove Delphi prekompilovat (s novou
> VCL), aby v novsom Delphi fungovali. Mne sa zda takato kompatibilita
> (na urovni zdrojoveho kodu) malo kompatibilna a chcel by som
> kompatibilitu na urovni interface (najlepsie binarneho).
Prekompilovani je jeste to nejmensi co mi vadi. Horsi je, kdyz se
meni bez viditelneho duvodu nazvy trid, metod a parametru.
> > jeste neprokazalo svou zivotaschopnost. Nicmene Borland nove
> > technologie podporuje *sec mu sily staci*.
>
> Ano, daleko lacnejsie je nic nerobit ;-) Prezrad mi, ake prevratne
> technologie to Borland vyvija a podporuje ze mu na to ledva sily
> stacia? Z informacii, ktore o Delphi 5 mam, je podla mna D5 presne tam
> kde bolo aj D3.
:-) No, zase ne tak docela, prece jen v D5 zustavaji nove typy z D4
(coz neni zanedbatelne), ladici pomucky jsou oproti D3 take nekde
jinde atp. Kdyz uz, tak by sedelo spise srovnani s D4. Tam je zda
se mensi rozdil nez mezi D3-D4.
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
Jak zmenit poradi pri nahravani property
[*] Marian Jonas <jonas(zv)ji(tec)cz> - 1.9.1999 11:04:51
Mam nasledujici deklaraci komponenty :
TPSCisel = class(TComponent)
private
FDataSet: TDataSet;
FPrimaryField: string;
procedure SetDataset(Value: TDataset);
procedure SetPrimaryField(Value: string);
public
constructor Create(AOwner: TComponent); override;
destructor Destroy; override;
...
published
property Dataset: TDataset read FDataset write SetDataset;
property PrimaryField: string read FPrimaryField write SetPrimaryField;
end;
V okamziku kdy spoustim program ve kterem je tato komponenta se pri
vytvareni vola prvne metoda SetPrimaryField a pak SetDataset.
Ja potrebuji aby se prvne spustil SetDataset a pak SetPrimaryField.
Mam Delphi 4 + SP3
Nevite nekdo jak na to ? Dik.
Marian Jonas
jonas(zv)ji(tec)cz
zaheslov�n� tabulky *.DB
[*] Karel Pechanec <kapecha(zv)mias(tec)cz> - 1.9.1999 12:23:52
zdravim...
uz to tady bylo...ale muzes pouzit funkci z BDE>DbiDoRestructure< tim vlozis
heslo do tabulky.
treba takto:
(*uses
DBIProcs,
DBITypes,
DBIErrs,BDE;
*)
procedure fceAddPassword(Table: TTable; password: string);
const
RESTRUCTURE_TRUE = WordBool(1);
var
TabDesc: CRTblDesc;
hDb: hDBIDb;
begin
FillChar(TabDesc, SizeOf(CRTblDesc), 0);
with TabDesc do
begin
StrPCopy(szTabName, Table.TableName);
StrCopy(szTabType, szPARADOX);
StrPCopy(szPassword, password);
bProtected := RESTRUCTURE_TRUE;
end;
Check(DbiGetObjFromObj(hDBIObj(Table.Handle), objDATABASE, hDBIObj(hDb)));
Table.Close;
Check(DbiDoRestructure(hDb, 1, (zv)TabDesc, nil, nil, nil, FALSE));
Table.Open;
end;
-----P�vodn� zpr�va-----
Od: Fiedler, Milan (CAP, GCF) <Milan.Fiedler(zv)gecapital.com>
Komu: Delphi <delphi-l(zv)fwd(tec)cz>
Datum: 1. z��� 1999 12:12
P�edm�t: zaheslov�n� tabulky *.DB
jak jednodu�e zaheslovat tabulku *.DB.
Milan Fiedler
Probl�m s DWORD, cardinal
[*] Petr Voborn�k <vobornik(zv)apel(tec)cz> - 1.9.1999 12:41:32
D�ky za typ, ale stejne to nefunguje. Zajimave na tom je, ze kdy� ten kod
krokuju a nastavim kurzor mysi na dany vyraz, tak prekladac vypise v
plovouci napovede, ze vyhodnotil vyraz "True", ale p�i dalsim kroku preskoci
telo podprogramu aniz by ho vykonal. :o
-----P�vodn� zpr�va-----
Od: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz] za u�ivatele Viktor
Lostak
Blbne to, i kdyz to zmenis na tohle?
if ((A and DWORD(128)) > DWORD(0)) then
begin
A:=0; // toto se nevykona
end
Konference in English
[*] Jirka Majvald <majvald(zv)email(tec)cz> - 1.9.1999 13:02:40
A nevite nekdo o nejake newsove konferenci v cestine ?
----- P�vodn� zpr�va -----
Od: Viktor Lostak <Viktor.Lostak(zv)chmi(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 1. z��� 1999 11:18
P�edm�t: Re: Konference in English
> Bohuzel myslim mailovou, ja se pres nasi proxy na news nedostanu. Viktor
>
> ----- Original Message -----
> From: M.Levy <M.Levy(zv)sh.cvut(tec)cz>
> To: <delphi-l(zv)fwd(tec)cz>
> Sent: Wednesday, September 01, 1999 10:20 AM
> Subject: Re: Konference in English
>
>
> > Konference ? Myslis mailovou ?
> > Pokud by Ti stacila news, pak zkus jakykoliv news server
>
>
>
Jak se vlastne ten Petr jmenuje a jak je to s jeho
[*] Zden�k B�hm - 1.9.1999 13:05:11
Zdravim vsechny,
dostal se mi do rukou casopis Computer, cislo 17, 1.9.1999. Na strance 67 je
tam reklama na Dephi 5, kde se tvrdi: "Delphi days 99 - odborna konference
uvede Delphi 5 na cesky a slovensky trh. Novinky v Delphi 5 predstavi - M.
Raim a J. Zeleny (Inprise), ale i dalsi odbornici: P.Cisar, P. Vones (to "s"
je s hackem), P.Kas ...."
A ja si vzdycky myslel, ze je to bez hacku. Takovy negativni vliv ma na
cloveka cesky (tohle slovo bych napsal bez diakritiky, i kdyby se dala
pouzit) internet...
Druhy rozpor vnimam v podpisu amatersky programator a uvedenim mezi
odborniky u Inprise.
Zdar Zdenek
P.S. Odpustte mi hloupemu a neznalemu amaterovi (nepodepisuju se tak, ale
bezesporu jim jsem), za tento OffTopic, ale proste mi to nedalo.Zaokrouhlov�n�
[*] Radim Kunz <rkunz(zv)ova(tec)comp(tec)cz> - 1.9.1999 13:08:55
DPH se zaokrouhluje takto:
Result := Round((x*10)+0.49)/10;
Nekdo tu psal, ze mas pricist 0.50, ale pokud bys to udelal,
zaokrouhlilo by to nahoru i cele koruny.
Radim Kunz
>
>----- Original Message -----
>From: FitCom <fitcom(zv)volny(tec)cz>
>To: <delphi-l(zv)fwd(tec)cz>
>Sent: Tuesday, August 31, 1999 4:07 PM
>Subject: Zaokrouhlov�n�
>
>
>>Zaokrouhlovani cisel na desetiny ( konkretne mam cenu napr. 24Kc
>> a pripoctu DPH 22% = 29,28 a potreboval bych 29,30 Kc.
>
>viz help funkce Round
>
>> 2. Prevod cisla na slovni zapis napr. 48 Kc = ctyricetosumkorun.
>
>hledej v archivu konference - slo to tak polovina roku 1998
>
>Petr Motlicek
>Struktura .dbf
[*] Michal �viga <proton(zv)iol(tec)cz> - 1.9.1999 13:10:39
Objevil jsem (samozrejme nahodou, hledal jsem uplne neco jineho) v Rx
DBAware knihovne komponentu
TableItems, napoji se na Datasource a napr. v tabuce se objevi struktura te
tabulky, ktera se vyplni v TableItems.
S pozdravem
Michal �viga (Sviga)
=============================[PROTON]====
CROSS MEDIA SERVIS - CD KATALOG AMPER
http://www.cd-amper(tec)cz mailto:info(zv)cd-amper(tec)cz
tel.,fax: +420 2 65 15 052 mobil: 0602/ 207 557
http://www.dama(tec)cz - Internetovy casopis pro zeny
=========================================
> 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
----------------------------------------------
Jak se vlastne ten Petr jmenuje a jak je to s jeho
[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 1.9.1999 13:25:40
Haj hou!
> dostal se mi do rukou casopis Computer, cislo 17, 1.9.1999. Na strance 67
je
> tam reklama na Dephi 5, kde se tvrdi: "Delphi days 99 - odborna konference
> uvede Delphi 5 na cesky a slovensky trh. Novinky v Delphi 5 predstavi - M.
> Raim a J. Zeleny (Inprise), ale i dalsi odbornici: P.Cisar, P. Vones (to
"s"
> je s hackem), P.Kas ...."
Ha, uz to prasklo :-)))))))
Program DD'99
14.9. - Praha, Narodni dum na Vinohradech, Nam. Miru 9, Praha 2
16.9. - Bratislava - Hotel Kyjev, Rajska 2
Startuje se v 9:00
9:15 Enterprise technologie v Delphi 5 - Martin Raim, Inprise Corp.
10:30 Prestavka
10:45 Nove programovaci techniky v Delphi 5 - Ing. Jindrich Zeleny, Inprise
CZ (aneb plne predstaveni D5).
11:30 InterbaseExpress - moje malickost
11:50 Kdyz VCL nestaci - Petr Vones (aneb rozsireni funkci VCL pomoci Win
API)
12:10 Porovnani D5 a D3 - Pavel Kas (Kaucuk a.s.)
12:30 Delphi a vicevrstve internet/intranet aplikace - RNDr. Pavel Zika (Epa
software s.r.o)
12:40 Delphi 5 a MSSQL 7 - zastupce spolecnosti Trivas
12:50 Diskuse
13:00 Losovani o D5
Hodne zdaru
Pavel Cisar pcisar(zv)atlas(tec)cz
TekMetrics Certified Master Delphi Developer
http://www.tekmetrics.com/transcript.shtml?pid=76711
Probl�m s DWORD, cardinal
[*] Jan Najvarek <najvarek(zv)seznam(tec)cz> - 1.9.1999 08:33:56 -0400
Ja si myslim, ze kdyz si vypnes optimalizaci (Project Options), tak se to
bude chopvat v poradku.
Honza Najvarek
----- Original Message -----
From: Petr Voborn�k <vobornik(zv)apel(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, September 01, 1999 6:41 AM
Subject: RE: Probl�m s DWORD, cardinal
> D�ky za typ, ale stejne to nefunguje. Zajimave na tom je, ze kdy� ten kod
> krokuju a nastavim kurzor mysi na dany vyraz, tak prekladac vypise v
> plovouci napovede, ze vyhodnotil vyraz "True", ale p�i dalsim kroku
preskoci
> telo podprogramu aniz by ho vykonal. :o
>
> -----P�vodn� zpr�va-----
> Od: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz] za u�ivatele
Viktor
> Lostak
>
> Blbne to, i kdyz to zmenis na tohle?
>
> if ((A and DWORD(128)) > DWORD(0)) then
> begin
> A:=0; // toto se nevykona
> end
>
>
>
>Probl�m s DWORD, cardinal
[*] Jan Fiala <fiala(zv)infos(tec)cz> - 1.9.1999 15:03:02
----- P�vodn� zpr�va -----
Od: Petr Voborn�k <vobornik(zv)apel(tec)cz>> D�ky za typ, ale stejne to nefunguje. Zajimave na tom je, ze kdy� ten kod
> krokuju a nastavim kurzor mysi na dany vyraz, tak prekladac vypise v
> plovouci napovede, ze vyhodnotil vyraz "True", ale p�i dalsim kroku preskoci
> telo podprogramu aniz by ho vykonal. :o
>
> if ((A and DWORD(128)) > DWORD(0)) then
> begin
> A:=0; // toto se nevykona
> end
Doufam, ze promennou A dale v programu pouzivas nebo do ni za podminkou primo neco neprirazujes. Pokud ne, tak ma pravdu kompiler v tom, ze tu instrukci nema cenu provadet.
===============================
ing. Jan Fiala fiala(zv)infos(tec)cz
Prog-Soft s.r.o. Plzen
INFOS - informacni system pro napojare
===============================Hvezdicky a otazniky
[*] Ing. Jaroslav Ske��k - 1.9.1999 15:05:55
Tak to otevri v TQuery pomoci SELECT * FROM Tabulka WHERE LIKE "%.exe"
jmeno_polozky
Jaro
> 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);
>
> ....
>
>nastaven� verze DLL
[*] Fiedler, Milan (CAP, GCF) <Milan.Fiedler(zv)gecapital(tec)com> - 1.9.1999 15:11:11
M�m Delphi4
sna��m se u DLL nastavit verzi v options a nende a nejde, kde d�l�m kopanec
!!!
Milan Fiedler
IB vs MS SQL - was: Re: OffTopic: Licencni politik
[*] Ing. Jaroslav �ke��k - 1.9.1999 15:33:49
> Nechuti mohu mit treba 1000, ale kdyz jen asi 20% zakazniku je
> ochotno si koupit s programem i databazi (a ti me urcite neuzivi),
> tak musim vybrat takove reseni, kterym pokryji i tech zbyvajicich
> 80% a pritom nebudu muset mit dve verze programu.
Takhle jednoduse se to brat neda. Ja jsem se preorientoval na tech
jak rikas 20% zakazniku ... a ti dnes tvori 100% (datove programy).
Nekteri zakaznici odpadli, ale diky prechodu
na kvalitni C/S technologii vznikly nove mnohem zajimavejsi zakazky.
Je to jako kdyz prodavas na trznici tricka za 50 Kc nebo zacnes
prodavat kvalitni a drazsi zbozi. Zajiste prijdes o zakazniky,
kteri nikam jinam nez na trznici nebo do bazaru nechodi, ale
zacnou k tobe chodit zakaznici, kteri by takove zbozi
na trznici nikdy nekoupili. Taky se asi nebudes snazit do sveho
obchodu s kvalitnim zbozim za kazdou cenu nalakat i zakazniky
z trziste a prodavat tam i ausus.
Tim chci jen rici, ze tento broblem je slozitejsi a kdo pocita
jen 20% a 80%, tak pocita spatne, protoze 20% muze byt
mnohem vice nez 80%, resp. 20% zakazniku muze prinest
nekolikanasobne vyssi obrat nez zbylych 80%.
Jiste by bylo vyhodne mit jednu technologii pro vsechny zakazniky,
ale asi to neni dost realne.
Jaro
>
> Mno, aspon nemusim utracet cas rozhodovanim mezi vice
> moznostmi, kdyz mam jen jednu. :-)
>
>
> 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
> Jak zjistit typ media?
[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 1.9.1999 15:52:44
Haj hou!
> potrebuji takovou drobnost: Spousti se nejaky EXE a ja potrebuji
> zjistit, zda se spousti z CD ROM anebo z nejakeho jineho media. Nestaci
> pouze zjistit atributy. Nevite nekdo ?
Funkce GetDriveType v unite Windows. Vraci UINT ale jsou k tomu konstanty
jako:
0 = UNKNOWN
DRIVE_REMOVABLE
DRIVE_FIXED
DRIVE_REMOTE
DRIVE_CDROM
DRIVE_RAMDISK
Jine hodnoty jsou spatne.
Hodne zdaru
Pavel Cisar pcisar(zv)atlas(tec)cz
TekMetrics Certified Master Delphi Developer
http://www.tekmetrics.com/transcript.shtml?pid=76711
Data v textovem souboru
[*] MIKE� P�emysl <premysl.mikes(zv)otr.br.ds.mfcr(tec)cz> - 1.9.1999 16:07:04
Potreboval bych udelat velice jednoduchy prohlizec s
vyhledavanim na asi 1500 zaznamu. Z letmeho seznameni s Delphi jsem
vyrozumel, ze v pripade pouziti tabulek typu paradox nebo foxpro se
nelze vyhnout BDE. Proto se ptam - neexistuje jina cesta? (Ovsem nahrady
BDE od jinych vyrobcu, ktere zabiraji spoustu mista a musi se
redistribuovat spolu s EXE v podstate nejsou resenim).
Kdyz bych treba pouzil pro ulozeni dat textovy soubor, je rovnez nutne
pristupovat skrz BDE?
Diky, Premex
Probl�m s DWORD, cardinal
[*] Petr Voborn�k <vobornik(zv)apel(tec)cz> - 1.9.1999 16:11:55
Optimalizaci mam vypnutou. :(
-----P�vodn� zpr�va-----
Od: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz] za u�ivatele Jan
Najvarek
Ja si myslim, ze kdyz si vypnes optimalizaci (Project Options), tak se to
bude chopvat v poradku.
Honza Najvarek
Zaokrouhlov�n�
[*] Petr Brant <p.brant(zv)samo(tec)cz> - 1.9.1999 15:12:35
> -----P�vodn� zpr�va-----
> Od: Radim Kunz [SMTP:rkunz(zv)ova.comp(tec)cz]
> Odesl�no: 1. z��� 1999 13:09
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Zaokrouhlov�n�
>
> DPH se zaokrouhluje takto:
>
> Result := Round((x*10)+0.49)/10;
[Petr Brant] ^^^^ to jo, ale ja jsem psal Trunc, ne Round
> Nekdo tu psal, ze mas pricist 0.50, ale pokud bys to udelal,
> zaokrouhlilo by to nahoru i cele koruny.
>
> Radim Kunz
> Jak zjistit typ media?
[*] Petr Brant <p.brant(zv)samo(tec)cz> - 1.9.1999 15:14:57
Ahoj,
potrebuji takovou drobnost: Spousti se nejaky EXE a ja potrebuji
zjistit, zda se spousti z CD ROM anebo z nejakeho jineho media. Nestaci
pouze zjistit atributy. Nevite nekdo ?
Diky predem
**************************************************
Petr Brant [p.brant(zv)samo(tec)cz], programator v MSVC++,
obcas Delphi nebo Visual Basic
**************************************************
BDE 16-bit a datumy po roce 2000
[*] Ale� Beran - 1.9.1999 16:46:59
Ahoj,
m�m takov� probl�m, kter� mne jak se ��k� doslova zasko�il.
N�kde jsem �etl, �e s datumy po roce 2000 by nem�ly b�t ��dn� probl�my
alespo� n�kolik prvn�ch desetilet� .... bla, bla, bla ....
M�m program napsan� v DELPHI 1 a pou��v�m BDE ver. 2.5 z CD DELPHI 3.
V�m, �e je to tro�ku anachronismus, ale necht�lo se mi p�ekl�p�t projekt
o n�kolika des�tk�ch tis�c ��dek do 32-bit�. Zat�m funguje resp. fungoval
v�ude bez probl�m�.
Ale ejhle, najednou se mi stalo na jednom po��ta�i, �e tento program, kter�
b�n� dovoloval
ukl�dat do datab�ze data po roce 2000, mi p�i ukon�en� editace z�znamu v
datab�zi
p�eona�il datum 1.1.2000 v TDBEdit na 1.1.1900 a ulo�il ho do datab�ze
TTable (PARADOX).
Zkou�el jsem nastavit v BDECFG parametr FOURDIGIT na true, co� ale nebylo na
��dn�m
z po��ta��, kde to d��ve bez probl�m� fungovalo, ale v�bec nic se na tom
kritick�m po��ta�i
nezm�nilo - zase 1900.
Po��ta�em by to snad b�t nem�lo, proto�e to je a� ne �pln� nov� Pentium cca
200 Mhz a �lov�k
co se tam star� o po��ta�e tvrd�, �e to testoval a ten po��ta� s rokem 2000
probl�m m�t nem�.
D�ky za n�jakou radu, jsem u� z toho dost hotovej.
Ale� Beran
Prekresleni casti komponenty
[*] Tomas Holan <HOLAN(zv)ksvi.mff.cuni(tec)cz> - 1.9.1999 17:14:08
> Potreboval bych prekreslit cast komponenty (konkretne TDrawGrid)
> a nejlepe nejakym obecnym zpusobem. Cilem je po zmene hodnot
> v programu obnovit pouze dotcenou oblast.
InvalidateRect resp. InvalidateRgn
Tom
Zaokrouhlov�n�
[*] Ing. Jaroslav �ke��k - 1.9.1999 17:25:07
Zakon, ktery narizoval zaokrouhlovat DPH vzdy nahoru byl jiz davno zmenen.
Stat uz si totiz nasel mnohem ucinnejsi zpusoby okradani.
Zjistilo se, ze efektivnejsi je vracet preplatky DPH s dlohym casovym
odstupem.
Jaro.
> DPH se zaokrouhluje takto:
>
> Result := Round((x*10)+0.49)/10;
>
> Nekdo tu psal, ze mas pricist 0.50, ale pokud bys to udelal,
> zaokrouhlilo by to nahoru i cele koruny.
>
> Radim Kunz
>
>
> >
> >----- Original Message -----
> >From: FitCom <fitcom(zv)volny(tec)cz>
> >To: <delphi-l(zv)fwd(tec)cz>
> >Sent: Tuesday, August 31, 1999 4:07 PM
> >Subject: Zaokrouhlov�n�
> >
> >
> >>Zaokrouhlovani cisel na desetiny ( konkretne mam cenu napr. 24Kc
> >> a pripoctu DPH 22% = 29,28 a potreboval bych 29,30 Kc.
> >
> >viz help funkce Round
> >
> >> 2. Prevod cisla na slovni zapis napr. 48 Kc = ctyricetosumkorun.
> >
> >hledej v archivu konference - slo to tak polovina roku 1998
> >
> >Petr Motlicek
> >
>DBGrid s radkem navic
[*] Robert Kindl <rob(zv)exec(tec)cz> - 1.9.1999 17:32:11
> 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.
Myslim, ze presne tohle umi GXDBGrid viz. http://www.gexpert.com
Rob
Zaokrouhlov�n�
[*] Radim Kunz <rkunz(zv)ova(tec)comp(tec)cz> - 1.9.1999 17:33:54
>> DPH se zaokrouhluje takto:
>>
>> Result := Round((x*10)+0.49)/10;
> [Petr Brant] ^^^^ to jo, ale ja jsem psal Trunc, ne Round
Sory, spatne jsem si precetl otazku, kolega chtel obycejne
zaokrouhleni (cena+DPH), ja myslel, ze chce zaokrouhlovat
primo DPH (desetniky nahoru). Ale to uz se stejne nedela. Radim Kunz
>> Nekdo tu psal, ze mas pricist 0.50, ale pokud bys to udelal,
>> zaokrouhlilo by to nahoru i cele koruny.
>>
>> Radim Kunz
>>
Jak se vlastne ten Petr jmenuje a jak je to s jeho
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 1.9.1999 18:53:42
Ahoj,
> Ha, uz to prasklo :-)))))))
>
****Proc myslis, ze to uz prasklo? Na webu je to jiz relativne dlouho
(ale stejne jsem se vesel do prvnich 200). ;-) Doufam, ze se tam
sejdeme v hojnem poctu.
Jinak bych rad upozornil jeste na jednu zajimavou akci:
http://www.microsoft(tec)cz/akce/win2000devdays
Slavek
> Program DD'99
>
> 14.9. - Praha, Narodni dum na Vinohradech, Nam. Miru 9, Praha 2
> 16.9. - Bratislava - Hotel Kyjev, Rajska 2
>
> Startuje se v 9:00
> 9:15 Enterprise technologie v Delphi 5 - Martin Raim, Inprise Corp.
> 10:30 Prestavka
> 10:45 Nove programovaci techniky v Delphi 5 - Ing. Jindrich Zeleny,
> Inprise CZ (aneb plne predstaveni D5). 11:30 InterbaseExpress - moje
> malickost 11:50 Kdyz VCL nestaci - Petr Vones (aneb rozsireni funkci VCL
> pomoci Win API) 12:10 Porovnani D5 a D3 - Pavel Kas (Kaucuk a.s.) 12:30
> Delphi a vicevrstve internet/intranet aplikace - RNDr. Pavel Zika (Epa
> software s.r.o) 12:40 Delphi 5 a MSSQL 7 - zastupce spolecnosti Trivas
> 12:50 Diskuse 13:00 Losovani o D5
>
> Hodne zdaru
>
> Pavel Cisar pcisar(zv)atlas(tec)cz
----------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
----------------------------------------------
Data v textovem souboru
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 1.9.1999 18:58:08
> Kdyz bych treba
> pouzil pro ulozeni dat textovy soubor, je rovnez nutne pristupovat skrz
> BDE?
****Samozrejme, ze ne. V Delphi muzes pracovat se soubory
(temer) stejne, jako tomu bylo za dob Pascalu.
Slavek
> Diky, Premex
----------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
----------------------------------------------
Vytvareni komponent za behu
[*] Pavel Bare� <Atoll(zv)telecom(tec)cz> - 1.9.1999 19:11:18
Nemohl by mi nekdo prosim poradit jak vytvaret komponenty za behu ?
Zkousel jsem:
Panel2:=TPanel.create(Form1);
Panel se sice vytvori ale nevikresli.
dekuji za radu
Pavel Bares
Atoll s.r.o.
www.atoll(tec)cz
nastaveni verze DLL
[*] Milan Schembera <milan(zv)missoftware(tec)cz> - 1.9.1999 19:32:29
-----Puvodni zprava-----
Od: Fiedler, Milan (CAP, GCF) [SMTP:Milan.Fiedler(zv)gecapital.com]
Odeslano: 1. zaoi 1999 15:11
Komu: Delphi
Poedmit: nastaveni verze DLL
Mam Delphi4
sna?im se u DLL nastavit verzi v options a nende a nejde, kde dilam kopanec
!!!
Staci do zdrojoveho kodu pripsat {$R *.res}
That`s all folks. Oni to Borlandi u library nedelaj. Asi bug ;-)
Preji hezky den a jsem s pozdravem
Milan Schembera
mailto:info(zv)missoftware(tec)cz
http://www.missoftware(tec)cz
---------------------------------
- on-line objednavkove, rezervacni a obchodni systemy po internetu
- zakazkovy software pro Windows 3.x/9x/NT
- software pro autoskoly http://www.autoskola99(tec)cz
- servis pro autopujcovny http://www.auto-pujcovny(tec)cz
Deravy formular
[*] Ing. Petr Svejda <lingvista(zv)lingvista(tec)cz> - 1.9.1999 19:54:24
Na www.lingvista(tec)cz je na Delphi SuperFAQ pr�klad 0013 s presn�m postupem,
jak vytvorit derav� okno (s moznost� posouv�n� mys�) :-)
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/
|____________________________________________
----- P�vodn� zpr�va -----
Od: Tomas Holan <HOLAN(zv)ksvi.mff.cuni(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 31. srpna 1999 12:17
P�edm�t: Re: Deravy formular
> > 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
>IB vs MS SQL
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 1.9.1999 20:19:51
Ing. Jaroslav �ke��k wrote:
> > Nechuti mohu mit treba 1000, ale kdyz jen asi 20% zakazniku je
> > ochotno si koupit s programem i databazi (a ti me urcite neuzivi),
> > tak musim vybrat takove reseni, kterym pokryji i tech zbyvajicich
> > 80% a pritom nebudu muset mit dve verze programu.
>
> Takhle jednoduse se to brat neda. Ja jsem se preorientoval na tech jak
> rikas 20% zakazniku ... a ti dnes tvori 100% (datove programy).
> Nekteri zakaznici odpadli, ale diky prechodu na kvalitni C/S
> technologii vznikly nove mnohem zajimavejsi zakazky.
:-) Vzhledem k programu, ktereho se to tyka, je v tomto state prilis
velka konkurence na pocet firem. V oblasti velkych firem je to jeste
horsi. Takze ted jsou nasbirani zakaznici, ti dostanou s novou verzi
vsichni jednotne MSDE a tech 20% si dokoupi (resp. upgraduji)
aktualni verzi MS SQL. Ale aby jich odpadlo 80% (ci 70%) si
dovolit nemohu, to by me skutecne neuzivilo.
> Je to jako kdyz prodavas na trznici tricka za 50 Kc nebo zacnes
> prodavat kvalitni a drazsi zbozi. Zajiste prijdes o zakazniky,
> kteri nikam jinam nez na trznici nebo do bazaru nechodi, ale
> zacnou k tobe chodit zakaznici, kteri by takove zbozi
> na trznici nikdy nekoupili. Taky se asi nebudes snazit do sveho
> obchodu s kvalitnim zbozim za kazdou cenu nalakat i zakazniky
> z trziste a prodavat tam i ausus.
Rekneme, ze prodavam tricka stredni kvality. Tedy dostatecne
dobre, ale jeste dostatecne levne. Tenhle program neni pro vetsinu
firem az natolik nezbytny, aby nedali prednost levnejsi konkurenci.
> Tim chci jen rici, ze tento broblem je slozitejsi a kdo pocita
> jen 20% a 80%, tak pocita spatne, protoze 20% muze byt
> mnohem vice nez 80%, resp. 20% zakazniku muze prinest
> nekolikanasobne vyssi obrat nez zbylych 80%.
Jak kde.
> Jiste by bylo vyhodne mit jednu technologii pro vsechny zakazniky, ale
> asi to neni dost realne.
Uz nastesti je. Vsak se mi notne ulevilo. :-)
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
Data v textovem souboru
[*] Ing. Petr �vejda <lingvista(zv)lingvista(tec)cz> - 1.9.1999 20:25:12
Pred nedavnem jsem koupil FlashFiler od TurboPower a hodi se krome jineho
presne takoveto aplikace. Pri jednouzivatelske aplikaci budes distribuovat
pouze jeden exe soubor a datovy soubor (pokud ho nevytvoris za behu) - tedy
zadna konfigurace - snadna instalace a perfektni bezpecnost zajistena
transakcemi. Na Paradox si uz malem ani nevzpomenu - snad jenom kdyz mi vola
nejaky zakaznik, ktery ma porusene indexy nebo vazbu tabulka - memo soubor.
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/
|____________________________________________
----- P�vodn� zpr�va -----
Od: MIKE� P�emysl <premysl.mikes(zv)otr.br.ds.mfcr(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 1. z��� 1999 16:07
P�edm�t: Data v textovem souboru
> Potreboval bych udelat velice jednoduchy prohlizec s
> vyhledavanim na asi 1500 zaznamu. Z letmeho seznameni s Delphi jsem
> vyrozumel, ze v pripade pouziti tabulek typu paradox nebo foxpro se
> nelze vyhnout BDE. Proto se ptam - neexistuje jina cesta? (Ovsem nahrady
> BDE od jinych vyrobcu, ktere zabiraji spoustu mista a musi se
> redistribuovat spolu s EXE v podstate nejsou resenim).
> Kdyz bych treba pouzil pro ulozeni dat textovy soubor, je rovnez nutne
> pristupovat skrz BDE?
>
> Diky, Premex
>docasny index na C/S databazi (resp.FF) bez Query
[*] Ing. Petr Svejda <lingvista(zv)lingvista(tec)cz> - 1.9.1999 20:31:20
S instalaci SQL pro FlashFiler jsem take narazil. Nainstaloval jsem
FFSQLExtension - neslo to zkompilovat, zkusil jsem predtim nasadit TFFServer
(+Update) a ten taky nesel zkompilovat - rozumej balicek. Po 2 hodinach jsem
to zabalil a cekam na silu z hury (nebo verzi s SQL? :-))))))
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/
|____________________________________________
----- P�vodn� zpr�va -----
Od: Petr Zahradnik <clexpert(zv)clexpert(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 30. srpna 1999 19:56
P�edm�t: Re: docasny index na C/S databazi (resp.FF) bez Query
> 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
>
>Konference in English
[*] Tomas Matousek <matousek(zv)havit(tec)cz> - 1.9.1999 20:50:08
>Nevite nekdo, pekne prosim, kde by se clovek mohl prihlasit do nejake
>konference o programovani (C++, ale ono je to vcelku fuk) v anglictine?
>
>TNX. Viktor
>
www.borlan.com
Tomas Matousek
matousek(zv)havit(tec)cz
Tvorba Instalacek - dotaz
[*] Heinisch Jiri <HeiJu(zv)sol(tec)cz> - 1.9.1999 21:05:49
Puvodni zprava, kterou napsal Robert Holovsky dne 31 Aug 99,:
> DELPHI 4.0 Proffesional, tam je InstallShield, ale bohuzel mi nenabizi
> moznosti instalace tak jak bych si predstavoval. 1) potrebuji TYP SETUPU
> [... odstrizeno ...]
> Je moznost nejakeho upgradu apod.?
ahoj zkus se podivat tady, cesky produkt , docela se mi to libi, kdyz se
tam dodelaji
jiste fajnovosti tak to bude dobre pouzitelne.
http://www.mujweb(tec)cz/www/npasoft/
S pozdravem Heinisch Jiri
Struktura .dbf
[*] Heinisch Jiri <HeiJu(zv)sol(tec)cz> - 1.9.1999 21:09:13
> 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",
Neco na to mam , kdyz tak napis poslu ti to
S pozdravem Heinisch Jiri
docasny index na C/S databazi (resp.FF) bez Query
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 1.9.1999 20:45:37
Puvodni zprava, kterou napsal Ing. Petr Svejda dne 1 Sep 99,:
> S instalaci SQL pro FlashFiler jsem take narazil. Nainstaloval jsem
> FFSQLExtension - neslo to zkompilovat, zkusil jsem predtim nasadit
> TFFServer (+Update) a ten taky nesel zkompilovat - rozumej balicek. Po 2
> hodinach jsem to zabalil a cekam na silu z hury (nebo verzi s SQL?
> :-))))))
Me to chodi, ale jak jsem rikal, mam FF 1.52, protoze jsem byl liny
nainstalovat update na FF 1.53. Nainstaluji ten patch a overim
funkcnost, pripadne malinko poupravim zdroj balicku...
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
docasny index na C/S databazi (resp.FF) bez Query
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 1.9.1999 21:23:07
Puvodni zprava, kterou napsal Ing. Petr Svejda dne 1 Sep 99,:
> S instalaci SQL pro FlashFiler jsem take narazil. Nainstaloval jsem
> FFSQLExtension - neslo to zkompilovat, zkusil jsem predtim nasadit
> TFFServer (+Update) a ten taky nesel zkompilovat - rozumej balicek. Po 2
> hodinach jsem to zabalil a cekam na silu z hury (nebo verzi s SQL?
> :-))))))
Tak jsem tedy nebyl liny, nainstaloval update FF 1.53 a prepsal
v balickach FFServeru a FFSQLExtensions nazev balicku ze 152
na 153, prekompiloval to vsechno... no a chodi to... Takze Ti
na soukromy mail posilam paklik vcetne prelozenych balicku,
no a kdyz si to nakopirujes do sveho pocitace a ty balicky
zavedes, melo by to chodit bez problemu. Samozrejme ten jeden
balicek runtime je potreba dat do Windows/System...
TO ALL: Pokud to nekomu take nechodi, poslu mu to velice rad,
je toho asi 500 kB.
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
Jak nacist celou vetu z druhe tabulky pomoci Looku
[*] Milan Bla�ek <mbsint(zv)telecom(tec)cz> - 1.9.1999 23:02:43
Toto je zpr�va ve form�tu MIME obsahuj�c�n�kolik ��st�.
Ahoj - tento dotaz opakuji protoze nikdo zatim nereagoval.
Resim problem jak pri provedeni lookupu na druhou tabulku nacist nejenom jeden udaj daneho kl��ov�ho pole,
ale pot�ebuji nacist vsechny pole (tzn. celou vetu ). V Paradoxu to slo primo pri vytvareni tabulek zadat tak, ze se nastavila
funkce lookup bud pouze pro nahrani udaje z jednoho pole a nebo se nastavilo nahrani udaju ze vsech identicky poli.
V delphi jsem to nenasel.
Diky za odpoved
Milan Blazek
Plocha
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 01.9.1999 23:53:54
Bene� Jaroslav wrote:
>
> 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...)
Ahoj,
Predpokladam ze jde o BP7 pro DOS. Vzhledem k tomu, ze je k tomu potrebna
informace z registru bych asi jako nejjednodussi reseni videl napsat v
Delphi maly EXE (bez komponent) ktery ti tu informaci vytahne z registru
a ulozi do souboru. Ten si pak z ty DOSovy aplikace prectes a smazes. Aby
si nemusel s tim DOSovym programem ten pridavny EXE vlacet, tak pokud se
pamatuju, v BP7 bylo mozne ulozit obecna data do .OBJ (do velikosti 64k)
a ten pak prilinkovat k EXE. Pak uz jej staci ulozit do docasneho adresare
a spustit. Cele reseni ma mozna ale jednu chybu kterou nemam moznost overit,
totiz jestli lze z "DOSu" pod Windows spustit Win32 aplikaci, s pomoci
volani
command.com by to ale snad mohlo jit ... ?
--
Petr Vones, amatersky programator
Vymena media v mechanice
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 01.9.1999 23:54:32
Viktor Lostak wrote:
>
> Je nejaka moznost, jak dostat zpravu od systemu, ze uzivatel
> vytahnul/zasunul medium do mechaniky (disketu, ZIP, JAZZ atp.)?
Ahoj,
Pravdepodobne to nebude ono, ale zkus odchytavat zpravu WM_DEVICECHANGE
nebo jeste zde jsou nejake nedokumentovane oznamovaci zpravy shellu:
http://www.informant.com/libs/delphi/99/di9903kb.zip
--
Petr Vones, amatersky programator
TImageList, Windows 98 a 16 barev
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 01.9.1999 23:54:11
"Kriz Pavel, TDS" wrote:
> 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...
Ahoj,
Tak pri spusteni te aplikace zkontroluj nastaveni zobrazeni a pripadne
jej rovnou uprav. Priklad najdes tady:
http://www.borland.com/devsupport/delphi/faq/FAQ735D.html
BTW: Mam asi 2 roky starou S3ku, ktera uz tenkrat byla ta uplne
nejlevnejsi a nabizi mi to nejmin 256barev ... :-)
--
Petr Vones, amatersky programator
nastaven� verze DLL
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 01.9.1999 23:54:42
"Fiedler, Milan (CAP, GCF)" wrote:
>
> M�m Delphi4
> sna��m se u DLL nastavit verzi v options a nende a nejde, kde d�l�m kopanec
> !!!
Ahoj,
Vypada to, ze tam v DLL wizardu zapomeli pridat prilinkovani resource.
library Project1;
uses
SysUtils,
Classes;
{$R *.RES} // tohle tam pridej
begin
end.
--
Petr Vones, amatersky programator
Jak zmenit poradi pri nahravani property
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 01.9.1999 23:55:06
> Marian Jonas wrote:
>
> Mam nasledujici deklaraci komponenty :
>
> TPSCisel = class(TComponent)
> private
> FDataSet: TDataSet;
> FPrimaryField: string;
> procedure SetDataset(Value: TDataset);
> procedure SetPrimaryField(Value: string);
> public
> constructor Create(AOwner: TComponent); override;
> destructor Destroy; override;
> ...
> published
> property Dataset: TDataset read FDataset write SetDataset;
> property PrimaryField: string read FPrimaryField write
> SetPrimaryField;
> end;
> V okamziku kdy spoustim program ve kterem je tato komponenta se pri
> vytvareni vola prvne metoda SetPrimaryField a pak SetDataset.
>
> Ja potrebuji aby se prvne spustil SetDataset a pak SetPrimaryField.
A co to udelat tak, ze potrebny kod vyuzivajici hodnoty z tech vlastnosti
zavolas az v metode Loaded, ktera se vola po nacteni vsech vlastnosti.
--
Petr Vones, amatersky programator
Prekresleni casti komponenty
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 01.9.1999 23:55:37
Petr Kundrata wrote:
>
> Ahoj!
>
> D4Prof+SP3
>
> Potreboval bych prekreslit cast komponenty (konkretne TDrawGrid)
> a nejlepe nejakym obecnym zpusobem. Cilem je po zmene hodnot
> v programu obnovit pouze dotcenou oblast.
Ahoj,
Jestli jsem to dobre pochopil, tak muzes pouzit funkci InvalidateRect
procedure TForm1.Button1Click(Sender: TObject);
var
R: TRect;
begin
R := DrawGrid1.CellRect(3, 3); // obdelnik bunky [3, 3]
InvalidateRect(DrawGrid1.Handle, (zv)R, False);
end;
procedure TForm1.DrawGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
begin
DrawGrid1.Canvas.TextRect(Rect, Rect.Left, Rect.Top, TimeToStr(Now));
end;
--
Petr Vones, amatersky programator
Probl�m s DWORD, cardinal
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 01.9.1999 23:56:22
Petr Voborn�k wrote:
>
> 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.
Ahoj,
Je to dano tim, ze prirazeni hodnoty "A:=0" nikde dale nevyuzivas a
prekladac tento zbytecny kod pri optimalizaci vyhodi.
Pri krokovani ti mohou obcas nastat i jine zahadne situace, treba tahle:
http://www.delphi(tec)cz/soubor.asp?rok=1999&mesic=May&den=19&first=46&soubor=dlfaaach.htm
--
Petr Vones, amatersky programator
Struktura .dbf
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 01.9.1999 23:56:32
tmara(zv)itsys(tec)cz wrote:
>
> 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.
Ahoj,
O moznosti tisknout z Database Desktopu nevim, ale strukturu tabulky si
muzes vytisknout sam programove. Docela dobre to jde pomoci komponenty
TTableItems (z RxLib). Ta komponenta funguje podobne jako TTable s tim
rozdilem, ze neobsahuje data tabulky, ale informace o ni. Potom uz staci
pouzit treba QuickReport ...
--
Petr Vones, amatersky programator
Data v textovem souboru
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 01.9.1999 23:57:06
MIKE� P�emysl wrote:
>
> Potreboval bych udelat velice jednoduchy prohlizec s
> vyhledavanim na asi 1500 zaznamu. Z letmeho seznameni s Delphi jsem
> vyrozumel, ze v pripade pouziti tabulek typu paradox nebo foxpro se
> nelze vyhnout BDE. Proto se ptam - neexistuje jina cesta? (Ovsem nahrady
> BDE od jinych vyrobcu, ktere zabiraji spoustu mista a musi se
> redistribuovat spolu s EXE v podstate nejsou resenim).
> Kdyz bych treba pouzil pro ulozeni dat textovy soubor, je rovnez nutne
> pristupovat skrz BDE?
Ahoj,
Jedna z moznosti je pracovat s tim textem primo v Delphi bez pouziti
databazove podpory. Bude s tim sice asi trosku vic psani, ale nebudes
muset distribuovat BDE. Muzes pouzit treba TStringList a do neho ten
soubor nahrat, pokud neni zrovna nejak ohromny. Dalsi moznost je pak
prace se soubory nebo soubory mapovane do pameti.
Pokud ale potrebujes prece jen databazovy pristup, tak je mozne pouzit
nejaky potomek od virtualniho TDataSet (neni pak potreba BDE) ktery umi
alespon trochu pracovat s daty. Najdes jej treba v RxLib - TRxMemoryData.
--
Petr Vones, amatersky programator
Data v textovem souboru
[*] Karel Vlcek <vlcekk(zv)hotmail(tec)com> - 02.9.1999 00:22:07 pdt
Ahoj
Resim ted prave podobny problem, jeste okoreneny snahou "za malo penez hodne
muziky". Hledal jsem na DSP (http://sunsite.icm.edu.pl/delphi/) free
komponentu a nasel jsem
MemoryTable (kbmmemtb.zip v sekci DatBasePrograming D3), neni ti uplne ono,
chce to trochu dopracovat, ale zda se, ze "zije" - to znamena tvurce se
snazi ji dopracovat a nebrani se pomoci. Je potomkem TDataSet takze se da
pouzit vice mene jako TTable. Zkus se na to podivat a uvidis jak ti bude
vyhovovat.
Prosba : Pokud by nekdo vedel o nejakem jinem reseni, dejte mi vedet budu
vam velice vdecny. (Moc si za to nekoupite, ja vim)
Karel Vlcek
===========================
poskytovani software
GSM : ++420 602 264812
mailto: Vlcekk(zv)hotmail.com
===========================
----Original Message Follows----
From: MIKE� P�emysl <premysl.mikes(zv)otr.br.ds.mfcr(tec)cz>
Potreboval bych udelat velice jednoduchy prohlizec s
vyhledavanim na asi 1500 zaznamu. Z letmeho seznameni s Delphi jsem
vyrozumel, ze v pripade pouziti tabulek typu paradox nebo foxpro se
nelze vyhnout BDE. Proto se ptam - neexistuje jina cesta? (Ovsem nahrady
BDE od jinych vyrobcu, ktere zabiraji spoustu mista a musi se
redistribuovat spolu s EXE v podstate nejsou resenim).
Kdyz bych treba pouzil pro ulozeni dat textovy soubor, je rovnez nutne
pristupovat skrz BDE?
Diky, Premex
______________________________________________________
Get Your Private, Free Email at http://www.hotmail.com
Deravy formular
[*] Ing. Ludek Florian <ludan(zv)bluerose(tec)cz> - 2.9.1999 04:08:32
Cauec,
sorry, ale driv to neslo.
Najdete tady: http://www.bluerose(tec)cz/index.php3?cat=komponenty
Bye Ludan
>Mam na to komponenty vcetne nekolika prikladu.
>
>Najdu a zejtra to nekam soupnu.
>
>Bye Ludan
>
>
>> Neviem ci to tu uz bolo, ale potrebujem v programe urobit "deravy
>formular".
>
>Data v textovem souboru
[*] Jan Fiala <fiala(zv)infos(tec)cz> - 2.9.1999 05:54:57
----- P�vodn� zpr�va -----
Od: MIKE� P�emysl <premysl.mikes(zv)otr.br.ds.mfcr(tec)cz>> Potreboval bych udelat velice jednoduchy prohlizec s
> vyhledavanim na asi 1500 zaznamu. Z letmeho seznameni s Delphi jsem
> vyrozumel, ze v pripade pouziti tabulek typu paradox nebo foxpro se
> nelze vyhnout BDE. Proto se ptam - neexistuje jina cesta? (Ovsem nahrady
> BDE od jinych vyrobcu, ktere zabiraji spoustu mista a musi se
> redistribuovat spolu s EXE v podstate nejsou resenim).
> Kdyz bych treba pouzil pro ulozeni dat textovy soubor, je rovnez nutne
> pristupovat skrz BDE?
Pokud mas knihu Mistrovstvi v Delphi 3, tak je tam priklad primo na textovy dataset bez pouziti BDE, a muzes s tim pracovat stejne jako s normalnim datasetem.
===============================
ing. Jan Fiala fiala(zv)infos(tec)cz
Prog-Soft s.r.o. Plzen
INFOS - informacni system pro napojare
=============================== Vytvareni komponent za behu
[*] Jan Fiala <fiala(zv)infos(tec)cz> - 2.9.1999 06:10:40
----- P�vodn� zpr�va -----
Od: Pavel Bare�
> Nemohl by mi nekdo prosim poradit jak vytvaret komponenty za behu ?
>
> Zkousel jsem:
>
> Panel2:=TPanel.create(Form1);
>
> Panel se sice vytvori ale nevikresli.
Krome Create musis nastavit jeste nekolik vlastnosti. Predpokladam, ze Visible a velikost nastavujes. Zkus nastavit vlastnost Parent := Form1 (form, na kterem panel lezi).Mozna se ti pak vYkresli.
===============================
ing. Jan Fiala fiala(zv)infos(tec)cz
Prog-Soft s.r.o. Plzen
INFOS - informacni system pro napojare
===============================BDE - standard instalace - namet na diskuzi
[*] Milan Schembera <milan(zv)missoftware(tec)cz> - 2.9.1999 07:00:39
Ahojte vsichni,
ted jsem se docela nastval, protoze jsem si z
novyho Chip CD instalovat jeden demo
programek, a on mi bez dotazu preinstaloval
BDE, takze jsem mel ted asi 2 hodiny reseni,
co s tim. BDE Admin mi porad hlasil samou
chybu, v Delphi IDE ani nemluvim (nepisu).
Nedavno jsem se setkal s podobnym
problemem, ovsem ten me stal hodinu prace a
200 kilometru cesty - to kdyz podobny
"program" po odinstalovani sam sebe
odinstaloval i moje BDE (netusil asi, k cemu je
v registru polozka UseCount).
Proto bych chtel, aby se domluvila nejaka
pravidla standardni instalace BDE s aplikaci
pro ty, co treba netusi co a jak. Ona spousta
firem ji totiz nedodrzuje a ti, co to dodrzuji, pak
na to doplaceji (to Brno me stalo 2000 = cesta
+ zbytecne ztraceny cas).
Milan
Data v textovem souboru
[*] Bo�an Hynek <HBocan(zv)cpoj(tec)cz> - 2.9.1999 07:14:38
Pokud vlastnis Mistrovstvi v Delphi 3 CD je tam reseny priklad na vytvoreni
vlastniho TDatasetu bez BDE pro TXT s pevnou delkou vety
Hynek Bo�an
Masarykovo n�m. 122
753 01 Hranice
<mailto:hbocan(zv)cpoj(tec)cz>
> -----P�vodn� zpr�va-----
> Od: MIKE� P�emysl [SMTP:premysl.mikes(zv)otr.br.ds.mfcr(tec)cz]
> Odesl�no: 1. z��� 1999 16:07
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Data v textovem souboru
>
> Potreboval bych udelat velice jednoduchy prohlizec s
> vyhledavanim na asi 1500 zaznamu. Z letmeho seznameni s Delphi jsem
> vyrozumel, ze v pripade pouziti tabulek typu paradox nebo foxpro se
> nelze vyhnout BDE. Proto se ptam - neexistuje jina cesta? (Ovsem nahrady
> BDE od jinych vyrobcu, ktere zabiraji spoustu mista a musi se
> redistribuovat spolu s EXE v podstate nejsou resenim).
> Kdyz bych treba pouzil pro ulozeni dat textovy soubor, je rovnez nutne
> pristupovat skrz BDE?
>
> Diky, Premex
Vytvareni komponent za behu
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 2.9.1999 07:27:36
Ahoj,
> Nemohl by mi nekdo prosim poradit jak vytvaret komponenty za
> behu ?
>
> Zkousel jsem:
>
> Panel2:=TPanel.create(Form1);
****Nastav jeste parenta (!) a ostatni veci jako width, top, left, ...
>
> Panel se sice vytvori ale nevikresli.
****Ja jsem se ucil psat nevykresli. ;-)> Pavel Bares
Slavek
----------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
----------------------------------------------
Highlight syntax
[*] Hole�ek Radek <holecek.radek(zv)seznam(tec)cz> - 02.9.1999 07:45:30
Nemate, prosim, nekdo zkusenosti s editorem textu, ktery je zavisly na
klicovych slovech (doufam, ze jsem to v subjectu nazval spravne).
Objevil jsem nejakou unitu RichTute od Jon Hogan-Dorana. Bohuzel mi ale
nejak nefunguje.
Vite-li nekdo o nejakem rozumnem algoritmu nebo necem podobnem, prosim,
nakopnete, naznacte, ukazte.
Mam D4, Update 3, NT4.
Mnohonasobne diky
Radek Holecek
Vytvareni komponent za behu
[*] Petr Brant <p.brant(zv)samo(tec)cz> - 2.9.1999 07:10:21
Musis jeste pripsat
Panel2.Parent:=Form1; //jinak ten chudak nevi, kde se ma vlastne
vykreslovat
Panel2.Left:=....
a nezapomen to vsechno obalit try..finally apod. Ale to asi pisu
zbytecne.
> -----P�vodn� zpr�va-----
> Od: Pavel Bare� [SMTP:Atoll(zv)telecom(tec)cz]
> Odesl�no: 1. z��� 1999 19:11
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Vytvareni komponent za behu
>
> Nemohl by mi nekdo prosim poradit jak vytvaret komponenty za behu ?
> �
> Zkousel jsem:
> �
> � Panel2:=TPanel.create(Form1);
> �
> Panel se sice vytvori ale nevikresli.
> �
> dekuji za radu
> �
> Pavel Bares
> Atoll s.r.o.
> www.atoll(tec)cz <http://www.atoll(tec)cz>Prevod stareho layeru QRep do vyssi verze
[*] TUNGLI Jan <tungli(zv)pvt.sk> - 2.9.1999 08:12:55
Prevod QR1 na QR2 nie je poriadne vyriesene poriadne. Zial musis si to
urobit znovu alebo moyes napisat na to program.
TUNGLI J�nos
EMail: jan.tungli(zv)seznam(tec)cz
My Home Page: http://free.netlap.hu/4321/
-----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: 1. september 1999 7:47
P�edm�t: Prevod stareho layeru QRep do vyssi verze
>Ahoj,
>
>mel bych maly dotaz, ohledne QuickReportu. Potreboval bych prevest navrzene
>formulare z QR1 do QR v Delphi 3 nebo 4. Nactu-li formular s bandy, smrske
>se mi vsechno do jednoho bodu. Vzhledem k odlisne povaze stare verze QR
>(layer formu) oproti nov� verzi (layer komponentu) zrejme existuje nejaka
>konverzni utilita nebo neco podobneho.
>Muzete mi, prosim, nekdo poradit, kde hledat, nebo jak to udelat? Uz jsem
se
>tady ptal (viz. QuickReport a Delphi 1), ale zrejme nikdo tento nebo
podobny
>problem nema, tak mi nikdo neodpovedel...
>
>Dekuji za jakoukoliv odpoved
>
>Jaro B.
>nastaven� verze DLL
[*] Fiedler, Milan (CAP, GCF) <Milan.Fiedler(zv)gecapital(tec)com> - 2.9.1999 08:14:47
Dekuju za odpoved. Usetrila mi mnoho casu.
-----P�vodn� zpr�va-----
Od: Petr Vones [mailto:pvones(zv)mbox.vol(tec)cz]
Odesl�no: 1. z��� 1999 23:55
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Re: nastaven� verze DLL
"Fiedler, Milan (CAP, GCF)" wrote:
>
> M�m Delphi4
> sna��m se u DLL nastavit verzi v options a nende a nejde, kde d�l�m
kopanec
> !!!
Ahoj,
Vypada to, ze tam v DLL wizardu zapomeli pridat prilinkovani resource.
library Project1;
uses
SysUtils,
Classes;
{$R *.RES} // tohle tam pridej
begin
end.
--
Petr Vones, amatersky programator
NLM
[*] Martin Dupal <mdupal(zv)vision(tec)cz> - 2.9.1999 08:31:03
Ahoj,
chtel bych se zeptat, zda nekdo nevite jak lze napsat
vlastni NLM modul pro Novell 4.x a jake prostredky
k tomu jsou potreba. Eventuelne, zda k tomu lze vyuzit
Delphi :-)
Budu vdecny i za tip na literaturu.
Martin
zaheslov�n� tabulky *.DB
[*] Fiedler, Milan (CAP, GCF) <Milan.Fiedler(zv)gecapital(tec)com> - 2.9.1999 08:34:11
Co dosadit do:
szTabName
szTabType
Milan Fiedler
-----P�vodn� zpr�va-----
Od: Karel Pechanec [mailto:kapecha(zv)mias(tec)cz]
Odesl�no: 1. z��� 1999 12:24
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Re: zaheslov�n� tabulky *.DB
zdravim...
uz to tady bylo...ale muzes pouzit funkci z BDE>DbiDoRestructure< tim vlozis
heslo do tabulky.
treba takto:
(*uses
DBIProcs,
DBITypes,
DBIErrs,BDE;
*)
procedure fceAddPassword(Table: TTable; password: string);
const
RESTRUCTURE_TRUE = WordBool(1);
var
TabDesc: CRTblDesc;
hDb: hDBIDb;
begin
FillChar(TabDesc, SizeOf(CRTblDesc), 0);
with TabDesc do
begin
StrPCopy(szTabName, Table.TableName);
StrCopy(szTabType, szPARADOX);
StrPCopy(szPassword, password);
bProtected := RESTRUCTURE_TRUE;
end;
Check(DbiGetObjFromObj(hDBIObj(Table.Handle), objDATABASE, hDBIObj(hDb)));
Table.Close;
Check(DbiDoRestructure(hDb, 1, (zv)TabDesc, nil, nil, nil, FALSE));
Table.Open;
end;
-----P�vodn� zpr�va-----
Od: Fiedler, Milan (CAP, GCF) <Milan.Fiedler(zv)gecapital.com>
Komu: Delphi <delphi-l(zv)fwd(tec)cz>
Datum: 1. z��� 1999 12:12
P�edm�t: zaheslov�n� tabulky *.DB
jak jednodu�e zaheslovat tabulku *.DB.
Milan Fiedler
Vytvareni komponent za behu
[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 2.9.1999 08:41:12
Zkus jeste nucene vyvolat metodu formu REfresh ( na prekresleni).
Mozna to zabere.
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
============================================
>
> > Nemohl by mi nekdo prosim poradit jak vytvaret komponenty za behu ?
> >
> > Zkousel jsem:
> >
> > Panel2:=TPanel.create(Form1);
> >
> > Panel se sice vytvori ale nevikresli.
>
Mikroprocesor 8051
[*] Martin Fron�k <FRONEK(zv)zznslany(tec)cz> - 2.9.1999 08:41:16
Za onoho casu jsem na to delal prekladac pro AtariST (Motorola 68000),
ale fakt za onoho casu. Co bys chtel?
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: delphi(zv)dingo(tec)cz [SMTP:delphi(zv)dingo(tec)cz]
> Odesl�no: 30. srpna 1999 9:41
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Mikroprocesor 8051
>
> 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
Probl�m s DWORD, cardinal
[*] Petr Voborn�k <vobornik(zv)apel(tec)cz> - 2.9.1999 08:46:17
Moc d�ky za vysvetleni, ale stejne kdyz vypnu optimalizaci a pustim
nasledujici kod, tak se dialog nezobrazi. Zarazi mne, ze kdyz upravim kod
aby testoval hodnoty mensi jak 128, tak je vse OK. Osobne jsem to vyresil
jednoduse, ze ve vyrazu pouzivam ">1" misto ">0". Rad bych, ale zjistil vcem
je problem. :((
begin
A:=129;
if ((DWORD(A) and DWORD(128)) > DWORD(0)) then
begin
ShowMessage(IntToStr(A))
end;
end.
-----P�vodn� zpr�va-----
Od: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz] za u�ivatele Petr
Vones
Ahoj,
Je to dano tim, ze prirazeni hodnoty "A:=0" nikde dale nevyuzivas a
prekladac tento zbytecny kod pri optimalizaci vyhodi.
Pri krokovani ti mohou obcas nastat i jine zahadne situace, treba tahle:
http://www.delphi(tec)cz/soubor.asp?rok=1999&mesic=May&den=19&first=46&soubor=dl
faaach.htm
--
Petr Vones, amatersky programator
Cached Updates
[*] Milan Schembera <milan(zv)missoftware(tec)cz> - 2.9.1999 08:48:51
Mam komponentu database a query s
vlastnosti CachedUpdates nastavenou na
True.
Pridam zaznam, zahajim transakci, zavolam
metodu query ApplyUpdates (tesne pred tim je
UpdatesStatus tohoto zaznamu usInserted),
pak transakci komitnu a zavolam
CommitUpdates na guery.
Takto by to melo fungovat.
Ale pokracuji ...
Ten samy zaznam zedituju, zahajim transakci,
zavolam metodu query ApplyUpdates (a v tuto
chvili bych predpokladal, ze UpdateStatus
tohoto zaznamu bude usModified. Jenze on je
zase usInserted. To znamena, ze se snazi
pridat zaznam se stejnym primarnim klicem. A
co je jeste zajimavejsi, nekdy to projde bez
chyby, nekdy volani ApplyUpdates skonci s
chybou "Key violation", kterou se mi navic
nepodarilo odchytit v bloku try..except.)
Radek
Highlight syntax
[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 2.9.1999 09:01:33
Haj hou!
> Nemate, prosim, nekdo zkusenosti s editorem textu, ktery je zavisly na
> klicovych slovech (doufam, ze jsem to v subjectu nazval spravne).
> Objevil jsem nejakou unitu RichTute od Jon Hogan-Dorana. Bohuzel mi ale
> nejak nefunguje.
> Vite-li nekdo o nejakem rozumnem algoritmu nebo necem podobnem, prosim,
> nakopnete, naznacte, ukazte.
Stahni si mwEdit (napr. DSP, Torry). Ten ma syntax highlight a je to se
zdroji (Open Source).
Hodne zdaru
Pavel Cisar pcisar(zv)atlas(tec)cz
TekMetrics Certified Master Delphi Developer
http://www.tekmetrics.com/transcript.shtml?pid=76711
Data v textovem souboru
[*] Mitko Mit�v <mitev(zv)foresta(tec)cz> - 2.9.1999 09:04:49
>----- P�vodn� zpr�va -----
>Od: MIKE� P�emysl <premysl.mikes(zv)otr.br.ds.mfcr(tec)cz>
>Komu: <delphi-l(zv)fwd(tec)cz>
>Odesl�no: 1. z��� 1999 16:07
>P�edm�t: Data v textovem souboru
>
>
>> Potreboval bych udelat velice jednoduchy prohlizec s
>> vyhledavanim na asi 1500 zaznamu. Z letmeho seznameni s Delphi jsem
>> vyrozumel, ze v pripade pouziti tabulek typu paradox nebo foxpro se
>> nelze vyhnout BDE. Proto se ptam - neexistuje jina cesta? (Ovsem nahrady
>> BDE od jinych vyrobcu, ktere zabiraji spoustu mista a musi se
>> redistribuovat spolu s EXE v podstate nejsou resenim).
>> Kdyz bych treba pouzil pro ulozeni dat textovy soubor, je rovnez nutne
>> pristupovat skrz BDE?
>>
>> Diky, Premex
V knize Mistrostvi v Delhpi 3 je popsan zpusob vytvoreni vlastni tridy
odvozene od TDataset. Priklad je udelan prave nad textovym souborem. Pokud
knihu nemas a budes mit zajem poslu zdrojak s prikladem.
Mitko Mitev
QuickReport
[*] Tomas Folprecht <tomas.folprecht(zv)iol(tec)cz> - 2.9.1999 09:17:10
Dobry den vsem,
pouzivam QReport 2.0 Delphi3.
Pokud nastavim nektere komponente na reportu AutoStretch na True a
velikost
teto komponenty je po prirazeni textu potreba zvetsit, program spadne
na Acces Violation.
Nevite nekdo PROC?
Diky
Tomas Folprecht
NLM
[*] Radoslav =?iso-8859-1?Q?Krehl=EDk?= <heretic(zv)softok(tec)cz> - 02.9.1999 09:38:06
>vlastni NLM modul pro Novell 4.x a jake prostredky
>k tomu jsou potreba. Eventuelne, zda k tomu lze vyuzit
>Delphi :-)
Chapu ze se ti v Cecku nechce psat, ale rozhodne bych ti doporucil spise
Watcom, tam je pro psani NLM primo podpora.
Heretic-X, SOFTWARE specialist,<www.nt(tec)cz>BDE - standard instalace - namet na diskuzi
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 2.9.1999 09:39:11
Milan Schembera wrote:
> ted jsem se docela nastval, protoze jsem si z
> novyho Chip CD instalovat jeden demo
> programek, a on mi bez dotazu preinstaloval
> BDE, takze jsem mel ted asi 2 hodiny reseni,
> co s tim. BDE Admin mi porad hlasil samou
> chybu, v Delphi IDE ani nemluvim (nepisu).
> Nedavno jsem se setkal s podobnym
> problemem, ovsem ten me stal hodinu prace a
> 200 kilometru cesty - to kdyz podobny
> "program" po odinstalovani sam sebe
> odinstaloval i moje BDE (netusil asi, k cemu je
> v registru polozka UseCount).
>
> Proto bych chtel, aby se domluvila nejaka
> pravidla standardni instalace BDE s aplikaci
> pro ty, co treba netusi co a jak. Ona spousta
> firem ji totiz nedodrzuje a ti, co to dodrzuji, pak
> na to doplaceji (to Brno me stalo 2000 = cesta
> + zbytecne ztraceny cas).
Ja se domnivam, ze zadna pravidla stanovit nelze. A to proto, ze
vzdy se najde nekdo, kdo cosi spacha, supsne to na CD, tuto
konferenci necte :-), a na problemy je zadelano. Zejmena kdyz je
jeho databaze v Paradoxu, moje take, a on pouziva jina nastaveni
nez ja. Pak uz nezbyva nez usilovna modlitba, aby nas zakaznik
nenadelal jeste vetsi skody marnymi pokusy to nejak rozchodit.
Prave z techto duvodu se mi velice zamlouva OLE DB (potazmo
ADO), protoze jakmile se to na pocitac jednou nainstaluje, uz to
tam bude a na jeho odstraneni pomuze jen zgruntu nova instalace
nejake stare verze Windows. Az dokoncim program pracujici s
OLE DB a nasadim ho u vsech zakazniku, budu mit (pevne doufam
:) klidnejsi spani.
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
Dotaznik - vyhodnoceni
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 2.9.1999 09:39:11
Ahoj all,
dekuji vsem, kteri poslali sve dopovedi, seslo se jich 75, coz lze
myslim povazovat za celkem reprezentativni vzorek.
Program i s vysledky jsem poslal Petru Zahradnikovi, aby to
vystavil na svem webu. On take ohlasi, kde to bude ke stazeni. S
programem jsou dodany i zdrojaky napsane v D3, takze si muzete
prehled vylepsovat. V souboru anketa.txt jsou vsechny odpovedi.
Puvodni otazky jsem rozsiroval postupne podle doslych odpovedi,
takze vysledky je treba brat s urcitou rezervou - patrne by mnozi
odpovedeli i na jine otazky, ktere v puvodnim dotazniku nebyly.
Jednotlive odpovedi jsem se snazil obodovat (systemem cislo
otazky / cislo podotazky) podle charakteru odpovedi. Nekdy jsem
prislusnou odpoved neobodoval vubec, nekde jsem pouze
odhadoval, takze jsem se mohl i splest. Nekde jsem pridelil jedne
odpovedi i vice bodu, napriklad odpoved "primerenou az drahou" na
otazku 11 jsem obodoval jako primerenou a zaroven jako drahou.
Ostatne prohlednete si soubor anketa.txt. Cast jedne odpovedi
jsem radeji vymazal, prestoze si autor pral zustat v anonymite.
Nektere odpovedi tykajici se C++ Builderu jsem hodnotil jako by se
jednalo o Delphi.
A ted souhrnne vysledky. Uvadim aktualizovany seznam otazek
spolu se soucty doslych odpovedi.
1. Pro vyvoj aplikaci pouzivam nejcasteji:
1 Delphi - 68
2 C++ Builder - 2
3 Jine - 15
2. V Delphi vyvijim aplikace:
1 Komercni, na prodej mimo firmu - 57
2 Pro svou firmu - 47
3 Shareware, freeware - 24
4 Pouze pro sebe - 24
3. Trida aplikaci, kterou nejcasteji resim:
1 Databazove nad SQL servery - 33
2 Databazove na souborovymi databazemi - 51
3 Komunikacni - 27
4 Graficka - 8
5 Systemova (drajvy pro pridavna zarizeni a podobne) - 15
6 Vyukova - 2
7 Knihovny a komponenty, nastroje pro ostatni vyvojare - 1
8 Databazove nad postrelacni databazi (M, MSM, Cach�, DSM) -1
9 Web server aplikace - 5
10 Vypocetni programy - 3
11 Prezentacni CD - 1
4. V budoucnu se chci orientovat zejmena na tridu aplikaci:
1 Databazove nad SQL servery - 53
2 Databazove na souborovymi databazemi - 32
3 Komunikacni - 28
4 Graficka - 13
5 Systemova (drajvy pro pridavna zarizeni a podobne) - 14
6 Vyukova - 2
7 Knihovny a komponenty, nastroje pro ostatni vyvojare - 1
8 Databazove nad postrelacni databazi (M, MSM, Cach�, DSM) - 1
9 Web server aplikace - 6
10 Vypocetni programy - 3
11 Prezentacni CD - 1
5. Nejcastejsi okruh mych zakazniku (mozno pripadne upresnit,
ktereho druhu aplikaci se tyka):
1 Bezdomovci - 4 :-)))
2 Male firmicky - 39 (zde jsem predpokladal, ze sem spadnou i
jednotlivci)
3 Stredni firmy - 50
4 Velke podniky - 27
5 Zahranicni mensi klienti - 14
6 Zahranicni vetsi klienti - 11
7 Statni sprava - 2
8 Zdravotnictvi - 1
6. Pouzivam doplnkove knihovny:
1 Zakoupene komercni - 40
2 Shareware - 18
3 Freeware - 58
4 Svoje vlastni - 52
5 Zadne, staci mi co je v Delphi - 3
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, ...),
pripadne v jake mire (napr. vzhledem k cene me aplikace)
1 Ano - 23
2 Ne - 50
3 Jine, rozvest - 6
8. Pouzivam Delphi (4 a nize) ve verzi
1 Client/Server - 25
2 Professional - 44
3 Standard - 10
9. Pouzivam stale Delphi 1
1 Ano - 23
2 Ne - 52
10. Pokud chci koupit D5, davam prednost verzi:
1 Nechci - 21
2 Enterprise - 13
3 Professional - 45
4 Standard - 0
11. Povazuji cenu verze Delphi, ktera me aktualne zajima (bod 10),
v pomeru k uzitne hodnote, kterou ocekavam, za:
1 Skvelou, nizkou - 0
2 Primerenou - 47
3 Spatnou, drahou - 28
12. Koupil bych si vyssi verzi Delphi, byla-li by cena nizsi:
1 Ano - 1
13. V pripade, ze by Borland dokazal prodavat zvlast nativni
pripojeni k jednotlivym SQL serverum a sl by poskladat si vlastni
verzi Delphi (neco mezi C/S a Profesional):
1 Bych si ji koupil pouze s Oracle - 1
Protoze jsou otazky jednoduche, a navic se nektere doplnovaly
prubezne, lze z vysledku vytvorit celou radu i protichudnych
vykladu. Rozbor tedy necham predevsim na kazdem z vas. Je vsak
nutne si v rade pripadu precist odpovedi, zejmena chcete-li hledat
vzajemny vztah mezi jednotlivymi otazkami.
Zkusim zde nabidnout kousek sveho vykladu a upozornim na
nektere zajimave poznatky. Tak napriklad za povsimnuti stoji
otazka cislo 6 - prakticky nikomu nestaci komponenty, ktere jsou
dodany standardne s Delphi. Z odpovedi je videt, ze vice nez
polovina programatoru dokupuje dalsi komponenty, tedy koupe
Delphi neni jen cenikova investice za Delphi, ale zpravidla jeste za
dalsi komponenty. Coz vrha na ceny Delphi dalsi pohled. To
castecne muze souviset i s otazkou 11, kde je videt znacna
nespokojenost s cenami Delphi. Nejvetsi dil nespokojenosti pripada
na verzi Enterprise (7 drahych : 7 primerenym).
Vysoky podil odpovedi 10. - nechci (8 z 25) pripada take na
stavajici uzivatele verze C/S. Zde vsak musim pripomenout, ze zde
se v tomto pripade vyskytuji odpovedi, jako ze nejvyssi verze
obsahuje veci, ktere zustavaji nevyuzity, nebo je C/S starsi a
prechod na Professional nastal uz u drivejsich verzi, casto je z
odpovedi videt preskoceni verze 4, nebo stiznosti na velkou
chybovost verze 4 a tedy opatrnost vuci verzi 5.
Zajimave (a osobne se domnivam, ze potesujici) je srovnani otazek
3 a 4, kde se obraci pomer mezi SQL a souborovymi databazemi
ve prospech SQL.
Naopak me dost prekvapil vysoky podil programatoru, kteri stale
jeste (a casto ve stavu zoufalstvi :) udrzuji jeste projekty pod Delphi
1. Tento stav urcite uzce souvisi i s vysokym podilem malych a
strednich firem a velkou nechuti zakazniku dokupovat k programu
dalsi licence (nekteri to resi tak, ze licence primo zahrnou do ceny -
ale ne vsude je to mozne), a take stavem naseho hospodarstvi,
kdy firmy casto nemaji penize na upgrade techniky (tedy ani
programu). Podle odpovedi (a zprav z tisku) se lze domnivat, ze
nezanedbatelny podil D1 programu pripada i na velke firmy.
Osobne se nedomnivam, ze by za dnesni situace bylo nejake terno
programovat pro velke ceske podniky. Myslim, ze nejvetsi sance
jsou ve sfere strednich az malych firem - jenze tam je zase
(domnivam se podle svych zkusenosti) problem, ze takova firma
zpravidla nekoupi rozsahle a drahe reseni.
Mno, a dalsi vyklady uz necham na vas. :-)
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
Highlight syntax
[*] Vaclav_Lukes(zv)EUROTEL.CZ - 2.9.1999 09:48:02
J� mimo Delphi pou��v�m Ultra Edit a jsem s n�m moc spokojen. M� toti� mimo jin�
v sob� FTP, tak �e nen� probl�m
p��mo z tohoto editoru otev��t cokoli na Unixu a potom to zase bez probl�m�
ulo�it. A na v�c m� "barevnou" syntaxi.
Va�ek
Odpov�zte pros�m u�ivateli: delphi-l(zv)fwd(tec)cz
Komu: delphi-l(zv)fwd(tec)cz
Kopie: (Na v�dom�: Vaclav Lukes/IT/EuroTel)
P�edm�t zpr�vy: Re: Highlight syntax
Haj hou!
> Nemate, prosim, nekdo zkusenosti s editorem textu, ktery je zavisly na
> klicovych slovech (doufam, ze jsem to v subjectu nazval spravne).
> Objevil jsem nejakou unitu RichTute od Jon Hogan-Dorana. Bohuzel mi ale
> nejak nefunguje.
> Vite-li nekdo o nejakem rozumnem algoritmu nebo necem podobnem, prosim,
> nakopnete, naznacte, ukazte.
Stahni si mwEdit (napr. DSP, Torry). Ten ma syntax highlight a je to se
zdroji (Open Source).
Hodne zdaru
Pavel Cisar pcisar(zv)atlas(tec)cz
TekMetrics Certified Master Delphi Developer
http://www.tekmetrics.com/transcript.shtml?pid=76711
Dedeni vizualne navrzenych komponent
[*] Pavel Bare� <Atoll(zv)telecom(tec)cz> - 2.9.1999 09:59:38
Lze nejak dedit komponentu, kterou vizualne navrhnu.
Jde zhruba o toto:
Mam jeden panel, na kterem je nkolik dalsich komponent a potrebuji za behu vytvorit dalsi 3 stejne.
Neco jako DBCtrlGrid. Ten se mi vsak nedari pouzit proto, ze nemohu zjistit na kterem panelu se nachazim.
Pavel Bares
Atoll s.r.o.
Aktualizace jbEdit a novy jbDBF
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 2.9.1999 10:05:35
Ahoj, na http://www.micrel-dev.com/delphi jsem dal novou verzi komponent
jbEdit (a pridal jsem sedm novych) a prototyp komponentu pro pristup k
tabulce DBF bez BDE.
Jaro B.Vytvareni komponent za behu
[*] Jirka Majvald <majvald(zv)email(tec)cz> - 2.9.1999 10:12:43
Spis by jsi mel napsat
Form1.InsertControl(Panel2)
Jirka
----- P�vodn� zpr�va -----
Od: Pavel �im��ek
Komu: delphi-l(zv)fwd(tec)cz
Odesl�no: 1. z��� 1999 9:00
P�edm�t: Re: Vytvareni komponent za behu
Musi si jeste nastavit jeho rodice.
Napr. Panel2.Parent:= Form1;
P.
-----P�vodn� zpr�va-----
Od: Pavel Bare� <Atoll(zv)telecom(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 2. z��� 1999 7:51
P�edm�t: Vytvareni komponent za behu
Nemohl by mi nekdo prosim poradit jak vytvaret komponenty za behu ?
Zkousel jsem:
Panel2:=TPanel.create(Form1);
Panel se sice vytvori ale nevikresli.
dekuji za radu
Pavel Bares
Atoll s.r.o.
www.atoll(tec)cz
VCL a COM was:ADO + D5
[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 2.9.1999 10:14:43
Haj hou!
From: Erik Salaj <winsoft(zv)napri.sk>
> > 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.
Skutecnost, ze rozhranni neni zdokumentovano jeste neznamena, ze neexistuje.
A o to tu slo.
> > 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
ad 1.) V IUnknown napr. citelne chybi funkce idetifikujici interface (vraci
IID). Kdyz je zavedena dedicnost a assigment compatibilita mezi predkem a
potomkem, pak by je nezbytne umet identifikovat skutecny typ. A musi to byt
obecna vlastnost (spolecna vsem), tedy by mela byt v IUnknown. Rovnez chybi
vyvedeni hodnoty reference countu (aby se dala testovat z venci). Da se sice
zjistit pres AddRef a nasledny Release, ale to je hnusne reseni (neb obe
metody mohou mit vedlejsi ucinky a v distribuovanem prostredi je to primo
kalamita, pres vsechny opozdene snahy MS o optimalizaci). To jsou evidentni
kraviny v samotnem navrhu IUnknown, a uz se s tim neda mnoho delat.
ad 2.) Opravdu ? TObject ma 22 metod. 7 se vaze na vytvareni/ruseni
instance. 2 na message handling. 3 implementace COM interfaces. A zbytek
(10) je RTTI. Nejmene 14 metod by se dalo realizovat jako rutiny, ktere maji
jako parametr TObject, ale takhle jsou vice "handy". Co ti tak vadi ?
ad 3.) Ano, mel jsem na mysli RTTI, ale chtel jsem podtrhnout, ze RTTI je ve
VCL to, co type library v ActiveX.
ad 4.) Protoze TObject ma metodu Dispatch, lze postavit celou aplikaci jen
na TObjectech (rozumej, vsechny tridy jsou pouzivany jako TObject) a misto
volani metod pouzivat messages. Tahle technika je mnohem dynamictejsi nez
prime volani metod a je elegantnim resenim mnoha zapeklitych situaci.
Samozrejme, ze postavit na tom napr. ucetnictvi neni zrovna idealni, ale lze
to. Navic je pouzivani Dispatch a messages vice OOP. Ale to bylo jen tak na
okraj :-)
> 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):
<SNIP>
1.) Kdyz jsou k dispozici zdroje, je to mnohem jednodussi.
2.) Nekdy je zapotrebi mnoha slov k popisu neceho, co je v dialogovem okne
okamzite jasne.
3.) Po instalaci prvniho balicku se z celeho procesu stava trivialni
zalezitost.
> > 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.
Zrejme jsi nepochopil co jsem chtel rici. Jde o to, ze metoda vetsinou NENI
staticka, tzn. ze upravu vetsinou LZE provest. V pripadech, ze to nejde je
pak nutne najit jine reseni. Ale to je snad normalni, ne ?
> > 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.
Nevim, zda ma tohle cenu rozebirat. Ja COM pouzivam dnes a dene, mam ho rad
a cenim si toho, co mi umoznuje. Na druhou stranu ma i radu nedostatku a
podpora COM ve Windows je naprosto HRUZNA, a i COM+ resi jen nektere
problemy. Projekt na kterem poslednich par let delam je cely postaven na
COM/DCOM, ale museli jsme si napsat vlastni podporu, sybsystemy atd. aby to
bylo efektivni a splnovalo nase (dle meho elementarni) pozadavky na
pouzitelnost (napr. povez mi jak dosahnout toho, abych mohl mit na pocitaci
nekolik ruznych implementaci COM serveru: vyvojovou, testovaci a produkcni,
bez nutnosti menit CLSID. Podotykam, ze takovych trid mam nekolik stovek.).
O Windows se opirame minimalne (tam kde to nelze jinak, napr. DCOM).
> 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).
Kdyz svoje objekty napises jako COM servery, pak ano. Jenze zcela prehlizis
SKUTECNY problem. Binarni kompatibilita VMT (COM interface neni nic jineho)
jeste nezarucuje kompatibilitu. Jsou tu jeste DATA, tedy parametry,
navratove hodnoty atd. V tomto smeru jsou VB, C, OP a dalsi jazyky
nekompatibilni. Pokud chces zajistit kompatibilitu, musis se omezit na
nejmensiho spolecneho jmenovatele v datovyvh typech, coj je casto za krvavou
cenu na efektivite, prehlednosti kodu a jeho slozitosti atd. VCL je
kompaktni a velice efektivni. Kdyby nativni VCL komponenty mely byt bez
opouzdreni pouzitelne napr. ve VB, pak by cele Delphi "behalo" jako VB
(dekuji nechci). Navic tuhle kompatibilitu potrebuje malo kdo a malo kdy, a
kdyz ji potrebuje, muze si prevest komponent na ActiveX (je na to i wizard).
Nac si tedy stezujes ?> > 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.
Kde by jsi to potreboval ?
> 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?).
To jsi sklouznul nekam jinam :-) rec byla o velikosti DLL s ActiveX. Podivej
se do adresare Windows\System nebo WinNT\System32 na ruzne VBRUN*** a
MSVC*** a bude ti to jasne. Toho sameho dosahnes i s balicky.
Hodne zdaru
NLM
[*] Ales Radikovsky <radik(zv)seznam(tec)cz> - 02.9.1999 10:16:57
> chtel bych se zeptat, zda nekdo nevite jak lze napsat
> vlastni NLM modul pro Novell 4.x a jake prostredky
> k tomu jsou potreba. Eventuelne, zda k tomu lze vyuzit
> Delphi :-)
> Budu vdecny i za tip na literaturu.
Vsechny potrebne informace jsou na http://developer.novell.com.
Jsou tam knihovny, dokumentace i priklady. Pod Delphi lze vyvijet pouze
klientske aplikace. Pro vyvoj serverovych modulu je nutny prekladac C.
Bud lze pouzit NLM moduly a pro preklad pouzivat tusim Watcom C a par
dalsich, nebo lze pouzit moduly DLL, ktere lze prelozit Borland C++ nebo
Visual C++ s pouizitim knihoven NetWare DLL Developer Components.
Ales
--
Ale� Radikovsk�
mail: radik(zv)seznam(tec)cz
tel: +420 2 6447184, +420 603 300093
ICQ: 10840067
BDE - standard instalace - namet na diskuzi
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 2.9.1999 10:32:32
Omlouvam se za predchozi mejl, zase jsem osel
> -----Original Message-----
> From: Zbysek Hlinka [mailto:zhlinka(zv)login(tec)cz]
> Sent: Thursday, September 02, 1999 9:39 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Re: BDE - standard instalace - namet na diskuzi
>
>
> Milan Schembera wrote:
>
> > ted jsem se docela nastval, protoze jsem si z
> > novyho Chip CD instalovat jeden demo
> > programek, a on mi bez dotazu preinstaloval
> > BDE, takze jsem mel ted asi 2 hodiny reseni,
> > co s tim. BDE Admin mi porad hlasil samou
> > chybu, v Delphi IDE ani nemluvim (nepisu).
> > Nedavno jsem se setkal s podobnym
> > problemem, ovsem ten me stal hodinu prace a
> > 200 kilometru cesty - to kdyz podobny
> > "program" po odinstalovani sam sebe
> > odinstaloval i moje BDE (netusil asi, k cemu je
> > v registru polozka UseCount).
> >
> > Proto bych chtel, aby se domluvila nejaka
> > pravidla standardni instalace BDE s aplikaci
> > pro ty, co treba netusi co a jak. Ona spousta
> > firem ji totiz nedodrzuje a ti, co to dodrzuji, pak
> > na to doplaceji (to Brno me stalo 2000 = cesta
> > + zbytecne ztraceny cas).
>
> Ja se domnivam, ze zadna pravidla stanovit nelze. A to proto, ze
> vzdy se najde nekdo, kdo cosi spacha, supsne to na CD, tuto
> konferenci necte :-), a na problemy je zadelano. Zejmena kdyz je
> jeho databaze v Paradoxu, moje take, a on pouziva jina nastaveni
> nez ja. Pak uz nezbyva nez usilovna modlitba, aby nas zakaznik
> nenadelal jeste vetsi skody marnymi pokusy to nejak rozchodit.
To je jasne, clovek nemuze rucit za neco, co neni v jeho moci.
U dodavatele SW to chce asi trochu jiny pristup k zakaznikum.
Pokud pouzivaji stanovene postupy a maji problemy s mym programem,
je to moje chyba a musim jim ji spravit.
Pokud spousti nejaky srot z freewarovych CD, ktery jim neco zkazi,
mohou si za sve problemy sami a na bezplatnou podporu nemaji narok.
Bud si dokazou program spravit sami anebo jim pojedu problemy vyresit
ja, ale v tom pripade je to sluzba, kterou musi zaplatit.
Takze Milan by mel ty 2000 za cestu do Brna vyuctovat zakaznikovi.
Jura
-------------
Email: Jiri.Polak(zv)tconsult(tec)cz
Co mne nastvalo a na co si dejte pozor:
http://freeweb.coco(tec)cz/jpolak/cernalistina/OT- BDE - standard instalace - namet na diskuzi
[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 2.9.1999 10:55:34
>To je jasne, clovek nemuze rucit za neco, co neni v jeho moci.
>U dodavatele SW to chce asi trochu jiny pristup k zakaznikum.
>Pokud pouzivaji stanovene postupy a maji problemy s mym programem,
>je to moje chyba a musim jim ji spravit.
>Pokud spousti nejaky srot z freewarovych CD, ktery jim neco zkazi,
>mohou si za sve problemy sami a na bezplatnou podporu nemaji narok.
>Bud si dokazou program spravit sami anebo jim pojedu problemy vyresit
>ja, ale v tom pripade je to sluzba, kterou musi zaplatit.
>Takze Milan by mel ty 2000 za cestu do Brna vyuctovat zakaznikovi.
Jenze prave ten problem, jak dokazat klientovi, ze chybu v me aplikaci
zpusobila zcela jina aplikace ( freeware z CD) a on vlastne neproved nic
jineho nez, ze ten shitz CD nainstaloval a zase odinstaloval. Prece spadla
aplikace, dodavana moji firmou. To by potom muselo byt osetrene v
licencnich a prodejnich podminkach, ze do bezplatneho servisu nespadaji
problemy, zpusobene prave takovymi "sroty".
Dale po telefonu byt se to da osetrit, ale zakaznici si obcas vymysli nebo
zatloukaji prave priciny problemu ( NE VSICHNI!!!).
Proto si mylsim, ze standardni pravidla pro pouzivani BDE by to chtelo, ale
stejne je nikdo nebude pri vyvoji dodrzovat. Takze jedine reseni je tuto
platformu opustit a to cim drive, tim lepe.
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
============================================
Off: Ceny D5 a casove omezena nabidka Inprise
[*] Karel Kral <kral(zv)purus(tec)cz> - 02.9.1999 10:57:34
Chtel bych koupit upgrade z D4 Prof na D5 Prof ale problem je, ze ted
neni prilis penez.
Inprise vyhlasuje _mimoradnou_ casove omezenou nabidku atd. Verite tomu
nebo, jak byva zvykem, k zadnemu vzestupu cen nedojde?
--
______________________________________________________
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
______________________________________________________
Probl�m s DWORD, cardinal
[*] Robert Kindl <rob(zv)exec(tec)cz> - 2.9.1999 11:52:17
>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 ?
Jako obvykle ti vsichni odpovidaji aby jsi zacal prepinat
ruzne magicke prepinace (napr. optimalizaci) misto aby to vyzkouseli
a zjistili ze tim to neni.
Jedna se jednoznacne o chybu prekladace Delphi.
Ten totiz uvedeny kus programu prelozi jako
asm
mov a,129 {$81}
test byte(A),128 {$80}
jle konec
xor ax,ax
mov a,ax
konec:
end;
Tedy cesky: Jestlize(nejnizzi byte z A) and 128<=0 tak nic nedelej.
vysledkem leve casti je 0 nebo $80 coz ale v ramci jednoho byte je -127.
JLE je totiz less or equal test se znamenkem. Tady je ta chyba kompilatoru!
Tudiz se cast A:=0 nikdy neprovede.
Zcela spravne jsi take rozeznal ze pro hodnoty <128 je to OK
nebot tam samozdrejme vyjde hodnota vzdy kladna i v ramci jednoho byte.
Delphi 4 to nedelaji (tedy funguji spravne) nebot tam se testuje
pomoci JBE coz je bellow or equal test bez znamenka.
Tedy je to opravene.
Resenim (ktere bude kompatibilni s Delphi 4) je v Delphi 3
testovat nikoliv na vetsi mensi, ale na rovnost nerovnost:
A:=129;
if ((A and 128) <> 0) then
begin
A:=0;
end;
Cau
Rob
Ceny D5 a casove omezena nabidka Inprise
[*] Ing. Jaroslav �ke��k - 2.9.1999 12:26:49
No jestli je tim myslena ta Trial verze, tak to uz funguje.
Je to na 60 dni. Ja jsem s tim mel zpocatku ovsem obrovske problemy.
Nikoliv vsak s Delphi, ale s registraci. Vlastne ani ne s tou registraci,
ale s tim, ze je to osetreno proti zneuziti tak dokonale, ze s instalaci
muze byt
problem. Ostatne jiz jsem to tu popsal drive, tak to nebudu znovu rozvadet.
Od te doby mi to na jednom pocitaci funguje. Zameril jsem se zatim
predevsim na komponenty pro primy pristup k Interbazi a jsem s tim
spokojenej. Konecne jsou lepe vyuzity schopnosti Interbaze, ktere byly
(nektere) diky BDE znepristupneny. Je to opravdu mnohem lepsi
nez BDE.
Dokonce jsem vyresil i ten master-detail. Prokousavam se tim dost pomalu
protoze v trial verzi k tomu nejsou zatim priklady a i v Helpu toho je zatim
velmi poskrovnu.
Rozhodne se na D5 jiz tesim. Je tu videt mnohem vetsi rozdil (skok)
s D4 na D5 nez jaky byl s D3 na D4. Kdo zustal u D3 a cekal na D5,
tak to asi melo duvod. Ted ale asi nema cenu dal cekat na D6.
D5 za upgrade 12.000,- urcite stoji.
Jetli existuje jeste novejsi trial, to nevim - posli jednoduse dotaz na
Borland(tec)cz
Ja jsem od nich odpoved dostal vzdycky.
Jaro
> Chtel bych koupit upgrade z D4 Prof na D5 Prof ale problem je, ze ted
> neni prilis penez.
> Inprise vyhlasuje _mimoradnou_ casove omezenou nabidku atd. Verite tomu
> nebo, jak byva zvykem, k zadnemu vzestupu cen nedojde?
> --
> ______________________________________________________
> 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
> ______________________________________________________
>BDE - standard instalace - namet na diskuzi
[*] Ing. Jaroslav Ske��k - 2.9.1999 12:49:56
To myslis vazne, ze se to da odstranit jen "zgruntu novou instalacei"?
A to ma byt jako vyhoda? Bud jsem to dobre nepochopil nebo bych
si takovej program nekoupil ani za nic. Pro me jsou prijatelny jen
takove programy, ktere po sobe uklidi vsechno tak, jako by nikdy
nebyly instalovany a sdilene prostredky uvedou do puvodniho stavu
(a ne ze je uklidi taky). To je vedle nekompatibility ruznych verzi
velky problem BDE. Ale jestli se OLE DB neda rozume odstranit vubec,
tak nevim v cem je vyhoda. Dovedu si predstavit, ze si od tebe
nainstaluji nejakou DEMO verzi a po case mi tam treba nepujde
nainstalovat jiny program, ktery bude udelanej v novejsi verzi
OLE DB - nebo to nehrozi?? Jestli to tak neni, pak by to melo byt
soucast Windows.
Nebo mi prosim vysvetli jak to vlastne je (obecne),
protoze zatim toho o tom mnoho nevim a docela by me to zajimalo
Jaro
>
> Prave z techto duvodu se mi velice zamlouva OLE DB (potazmo
> ADO), protoze jakmile se to na pocitac jednou nainstaluje, uz to
> tam bude a na jeho odstraneni pomuze jen zgruntu nova instalace
> nejake stare verze Windows. Az dokoncim program pracujici s
> OLE DB a nasadim ho u vsech zakazniku, budu mit (pevne doufam
> :) klidnejsi spani.
>
>
> 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
> BDE - standard instalace - namet na diskuzi
[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 2.9.1999 13:16:58
Predpokladam, ze J.Polak myslel, ze se da takhle odstranit pouze system OLE DB. Vlastni aplikace NE. Pak to prinos ma.
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
============================================
> -----Puvodni zprava-----
> Od: Ing. Jaroslav Skeoik [SMTP:jaro(zv)sinea(tec)cz]
> Odeslano: 2. zaoi 1999 12:50
> Komu: delphi-l(zv)fwd(tec)cz
> Poedmit: Re: BDE - standard instalace - namet na diskuzi
>
> To myslis vazne, ze se to da odstranit jen "zgruntu novou instalacei"?
> A to ma byt jako vyhoda? Bud jsem to dobre nepochopil nebo bych
> si takovej program nekoupil ani za nic. Pro me jsou prijatelny jen
> takove programy, ktere po sobe uklidi vsechno tak, jako by nikdy
> nebyly instalovany a sdilene prostredky uvedou do puvodniho stavu
> (a ne ze je uklidi taky). To je vedle nekompatibility ruznych verzi
> velky problem BDE. Ale jestli se OLE DB neda rozume odstranit vubec,
> tak nevim v cem je vyhoda. Dovedu si predstavit, ze si od tebe
> nainstaluji nejakou DEMO verzi a po case mi tam treba nepujde
> nainstalovat jiny program, ktery bude udelanej v novejsi verzi
> OLE DB - nebo to nehrozi?? Jestli to tak neni, pak by to melo byt
> soucast Windows.
> Nebo mi prosim vysvetli jak to vlastne je (obecne),
> protoze zatim toho o tom mnoho nevim a docela by me to zajimalo
> Jaro
>
>
> >
> > Prave z techto duvodu se mi velice zamlouva OLE DB (potazmo
> > ADO), protoze jakmile se to na pocitac jednou nainstaluje, uz to
> > tam bude a na jeho odstraneni pomuze jen zgruntu nova instalace
> > nejake stare verze Windows. Az dokoncim program pracujici s
> > OLE DB a nasadim ho u vsech zakazniku, budu mit (pevne doufam
> > :) klidnejsi spani.
> >
> >
> > 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
> >
>
>
> Web aplikace pomoci Delphi
[*] Milan N�mec <nemec(zv)goldcard(tec)cz> - 2.9.1999 13:35:58
> >
> Test jsme delali hned po objeveni desifratoru s cilem zjistit miru
> jeho nebezpecnosti pro nasi sit. Do doby objeveni desifratoru nikdo
nevedel,
> ze se da snadno nahlednout do toho, co pouziva jako heslo, nedavali takovy
> pozor co se uziva, ALE uz tehdy vsak byla u nas vynucena delka hesla
alespon
> 8 znaku a pravidelna expirace hesel. I za techto pomerne standardnich
> podminek doslo k uvedenemu nachytani site WinNT v nedbalkach. Muze to byt
> vizitka kvality desifratoru - ci spise nekvality zabezpeceni WinNT. Pro
> informaci - byla to spolecna sit Autocontu Ostrava a.s. a ATComputers
a.s.,
> myslis, ze ma neschopne spravce ? Znam je, nerekl bych.
>
8 znaku je malo. MD4 je 128 bitova = 16 bajtu. I 128 bitovy hash kod
je dnes povazovan za nedostatecny, i kdyz na jednom pocitaci ho
neprolomis ani za sto let (jedine kdyz pouzijes slabe heslo). Nezapomen,
ze s kazdym bitem, kterym prodlouzis hash kod, zdvojnasobis pocet
moznosti hesla = dobu jeho lamani.
Kdyz argumentujes existenci desifratoru, vis o existenci snifferu? Stejne
jako desifrator si kazdy muze stahnout sniffer a mrknout se, jake data
se toulaji po siti. A kdyz tam behaji tvoje nezasifrovane uzivatelske jmena
a hesla, tak si je muze precist kazdy, kdo je na siti, kde ta hesla behaji.
Takze abych to shrnul:
- prolomeni autentizace NT se da zabranit dostatecne dlouhym heslem
- proti prolomeni tve autentizace neexistuje nijaka obrana, kdyz nekdo
kdo je na siti, kterou posilas heslo, pouzije sniffer.
Zkousels sniffer?
Cau Milan
BDE 5.x vs Delphi 3
[*] Ivo.Herles(zv)pvt(tec)cz - 2.9.1999 13:36:51
DDV.
Mam velice zajimavy problem.
Vyvijime produkt pod D3. Ten dynamicky linkuje DLL moduly. Dokud jsme
pouzivali BDE 4.x neprojevoval se zadny podstany problem. Nyni jsme byli
nuceni prejit pod BDE 5.x a zacala se objevovat nasledujici chyba pri
ukonceni aplikace:
"Instrukce na 0x4be344cc se odkazovala na pamet na 0x00000008. Pamet nemuze
byt read"
Tato hlaska se ale objevi pouze tehdy, kdyz je zaveden nejaky modul pomoci
LoadLibrary() a ktery pouziva BDE. Pokud nahradim SQLLink pro Informix
starsi verzi z BDE 4.x problem se tim odstrani, ale objevi jine potize typu
zatuhavani SQL dotazu apod.
Experimentoval jsem s funkci DbiDllExit() (pomoci DllProc v
DLL_PROCESS_DETACH), ale to nepomohlo.
Nesetkal se nekdo s podobnym problemem i s jinou databazi?
Diky za kazdou odpoved.
Delphi 3 C/S, BDE 5.1, Win NT 4.0 SP5, Informix DS 7.3
Ivo HERLES
PVT, a. s., o. z. Chomutov
e-Mail: ivo.herles(zv)pvt(tec)cz
tel.: +42(0396)619216
BDE - standard instalace - namet na diskuzi
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 2.9.1999 13:42:24
> -----Original Message-----
> From: Martin Lasevic [mailto:vyvoj(zv)atlascon(tec)cz]
> Sent: Thursday, September 02, 1999 1:17 PM
> To: 'delphi-l(zv)fwd(tec)cz'
> Subject: RE: BDE - standard instalace - namet na diskuzi
>
>
> Predpokladam, ze J.Polak myslel, ze se da takhle odstranit
> pouze system OLE DB. Vlastni aplikace NE. Pak to prinos ma.
> Preji hezky den .....
Pardon, musim se ohradit. O OLE DB toho moc nevim, to psal Zbysek Hlinka
Jura
BDE - standard instalace - namet na diskuzi
[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 2.9.1999 14:04:26
>Pardon, musim se ohradit. O OLE DB toho moc nevim, to psal Zbysek Hlinka
>
>Jura
Asi jsem se prehlid. Ale podstata je dulezitejsi.
Martens
> -----Puvodni zprava-----
> Od: Polak Jiri [SMTP:Jiri.Polak(zv)tconsult(tec)cz]
> Odeslano: 2. zaoi 1999 13:42
> Komu: 'delphi-l(zv)fwd(tec)cz'
> Poedmit: RE: BDE - standard instalace - namet na diskuzi
>
> <<Soubor: ATT00002.txt; charset = windows-1250>> HOOK & Mys
[*] Rul��ek Daniel <dan.r(zv)avizo(tec)cz> - 2.9.1999 14:09:30
Zdravim vas vsechny,
snazim se napsat HOOK fci pro mys, abych mohl zjisti jeji polohu i mimo
okno aplikace, ale nejak se mi nedari. V HOOK fci, kde by mi do LParam
mel prijit pointer na MOUSEHOOKSTRUCT mi sice neco prijde, ale padaji mi
z toho porad stejna cisla. Nevite, kde delam chybu? Mam D3 & WINNT.
Dok Dan
Web aplikace pomoci Delphi
[*] Ing. �ubom�r G�L - 2.9.1999 14:35:16
Sniffer ziska iba zasifrovane heslo, ak je CHALLENGE/RESPONSE - teda ho
pouzijem vtedy, ked sa neviem dostat k SAM.
Heslo NT moze mat az 14 znakov (rezim LanMan 7+7 alebo NT 14) a pomocou
slusnej masiny a napr. L0phtCrack ho mozete zdolat (jedno heslo) aj radovo
za tyzdne (ak je skutocne dobre). Bezne je mozne zdolat az 80% hesiel za
den - aj hesla generovane systemom (SQL apod.).
LuGa
******************************
Lubomir "Levec" GAL, -LuGa
IS, NUPSESO, a.s. Nitra, SK
mailto:lgal(zv)nupseso.sk
******************************
Data v textovem souboru
[*] MIKE� P�emysl <premysl.mikes(zv)otr.br.ds.mfcr(tec)cz> - 2.9.1999 14:45:52
Knihu bohuzel nemam, pouze M v D1, a D2, jestli muzes, tak to posli na
muj mailbox.. Diky predem.
Premex
mailto:premysl.mikes(zv)otr.br.ds.mfcr(tec)cz
> V knize Mistrostvi v Delhpi 3 je popsan zpusob vytvoreni vlastni tridy
> odvozene od TDataset. Priklad je udelan prave nad textovym souborem.
> Pokud
> knihu nemas a budes mit zajem poslu zdrojak s prikladem.
>
> Mitko Mitev
>
> OnClick a tlacitka mysi
[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 2.9.1999 14:50:40
Zdravim,
pri udalosti OnClick na TToolButtonu potrebuji testovat, zda bylo stisknute
prave, nebo leve tlacitko mysi. Jak na to?
Dekuji.==[ Libor Krayzel ]================================
http://webhost(tec)cz/elka * mailto:libor.krayzel(zv)czech-tv(tec)cz
http://easypad.fwd(tec)cz * mailto:elka(zv)seznam(tec)cz
office: +420-69-620 1375
GSM: +420-603-937 947
============================================== Probl�m s DWORD, cardinal
[*] Petr Voborn�k <vobornik(zv)apel(tec)cz> - 2.9.1999 15:10:15
Diky moc. To jsem chtel vedet.
Petr
-----P�vodn� zpr�va-----
Od: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz] za u�ivatele Robert
Kindl
Odesl�no: 2. z��� 1999 11:52
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Re: Probl�m s DWORD, cardinal
Jako obvykle ti vsichni odpovidaji aby jsi zacal prepinat
ruzne magicke prepinace (napr. optimalizaci) misto aby to vyzkouseli
a zjistili ze tim to neni.
Jedna se jednoznacne o chybu prekladace Delphi.
Ten totiz uvedeny kus programu prelozi jako
asm
mov a,129 {$81}
test byte(A),128 {$80}
jle konec
xor ax,ax
mov a,ax
konec:
end;
Tedy cesky: Jestlize(nejnizzi byte z A) and 128<=0 tak nic nedelej.
vysledkem leve casti je 0 nebo $80 coz ale v ramci jednoho byte je -127.
JLE je totiz less or equal test se znamenkem. Tady je ta chyba kompilatoru!
Tudiz se cast A:=0 nikdy neprovede.
Zcela spravne jsi take rozeznal ze pro hodnoty <128 je to OK
nebot tam samozdrejme vyjde hodnota vzdy kladna i v ramci jednoho byte.
Delphi 4 to nedelaji (tedy funguji spravne) nebot tam se testuje
pomoci JBE coz je bellow or equal test bez znamenka.
Tedy je to opravene.
Resenim (ktere bude kompatibilni s Delphi 4) je v Delphi 3
testovat nikoliv na vetsi mensi, ale na rovnost nerovnost:
A:=129;
if ((A and 128) <> 0) then
begin
A:=0;
end;
Cau
Rob
Hooks
[*] ivan(zv)gratis.sk (Ivan Zernovac) - 02.9.1999 15:40:17
Dobry den,
potreboval by som hookovat mys. Pokial viem, treba na to
SetWindowsHookEx a MouseProc.
Uvital by som konkretny priklad, slepe pokusy totiz viedli k mnohym
resetom.
Ivan Zernov�c
Deravy formular
[*] ivan(zv)gratis.sk (Ivan Zernovac) - 02.9.1999 15:40:11
Neviem, ci poznate CoolForm. To vie viac, ako len derave formulare.
http://www.lawrenz.com/coolform/
Ivan
"Ing. Petr Svejda" wrote:
> Na www.lingvista(tec)cz je na Delphi SuperFAQ pr�klad 0013 s presn�m postupem,
> jak vytvorit derav� okno (s moznost� posouv�n� mys�) :-)
>
> 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/
> |____________________________________________
>
> ----- P�vodn� zpr�va -----
> Od: Tomas Holan <HOLAN(zv)ksvi.mff.cuni(tec)cz>
> Komu: <delphi-l(zv)fwd(tec)cz>
> Odesl�no: 31. srpna 1999 12:17
> P�edm�t: Re: Deravy formular
>
> > > 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
> >DbGrid s CheckBoxom
[*] Iko <iko(zv)kamarad(tec)cz> - 2.9.1999 15:50:27
Zdravim...
nevie niekto o DBGrid komponente, ktora by miesto fieldu boolean
zobrazil CheckBox?
Diky...
iko
iko(zv)kamarad(tec)cz
Web aplikace pomoci Delphi
[*] Z�vada Ji�� <zavada(zv)atcomp(tec)cz> - 2.9.1999 16:03:58
Toto tema jsem povazoval a povazuji za uzavrene - nechci se opakovat s
duvodnymi pochybami o realnosti pozadavku na zadavani 16ti znakoveho hesla
uzivatelem - mas ty sam sestnactiznakove heslo ? Desifrator byl uveden jako
ilustrace, jak nebezpecne je slepe duverovat "overene" technologii - a ze
jsou nasazeni, pro ktera je mozne dosahnout stejneho ci vetsiho
zabezpecovaciho efektu jinymi prostredky. O snifferu vim. Howgh.
J.Z.
((-: taky se pochlubim,
TekMetrics certified:
- Delphi Programmer
- Web Developer
- High IT Aplitude
http://www.tekmetrics.com/transcript.shtml?pid=78701
> -----P�vodn� zpr�va-----
> Od: Milan N�mec [SMTP:nemec(zv)goldcard(tec)cz]
> Odesl�no: 2. z��� 1999 13:36
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Web aplikace pomoci Delphi
>
> > >
> > Test jsme delali hned po objeveni desifratoru s cilem zjistit miru
> > jeho nebezpecnosti pro nasi sit. Do doby objeveni desifratoru nikdo
> nevedel,
> > ze se da snadno nahlednout do toho, co pouziva jako heslo, nedavali
> takovy
> > pozor co se uziva, ALE uz tehdy vsak byla u nas vynucena delka hesla
> alespon
> > 8 znaku a pravidelna expirace hesel. I za techto pomerne standardnich
> > podminek doslo k uvedenemu nachytani site WinNT v nedbalkach. Muze to
> byt
> > vizitka kvality desifratoru - ci spise nekvality zabezpeceni WinNT. Pro
> > informaci - byla to spolecna sit Autocontu Ostrava a.s. a ATComputers
> a.s.,
> > myslis, ze ma neschopne spravce ? Znam je, nerekl bych.
> >
> 8 znaku je malo. MD4 je 128 bitova = 16 bajtu. I 128 bitovy hash kod
> je dnes povazovan za nedostatecny, i kdyz na jednom pocitaci ho
> neprolomis ani za sto let (jedine kdyz pouzijes slabe heslo). Nezapomen,
> ze s kazdym bitem, kterym prodlouzis hash kod, zdvojnasobis pocet
> moznosti hesla = dobu jeho lamani.
>
> Kdyz argumentujes existenci desifratoru, vis o existenci snifferu? Stejne
> jako desifrator si kazdy muze stahnout sniffer a mrknout se, jake data
> se toulaji po siti. A kdyz tam behaji tvoje nezasifrovane uzivatelske
> jmena
> a hesla, tak si je muze precist kazdy, kdo je na siti, kde ta hesla
> behaji.
>
> Takze abych to shrnul:
> - prolomeni autentizace NT se da zabranit dostatecne dlouhym heslem
> - proti prolomeni tve autentizace neexistuje nijaka obrana, kdyz nekdo
> kdo je na siti, kterou posilas heslo, pouzije sniffer.
>
> Zkousels sniffer?
>
> Cau Milan
> databaze bez BDE
[*] Richard Valny <richard.valny(zv)oku-st(tec)cz> - 2.9.1999 16:12:34
Neexistuje nekde komponenta pro spoluoraci s databazi a ktera by splnila nasledujici pozadavky:
1. nepotrebovala by DBE
2. podporovala indexy
3. podporovala volne texty
4. podporovala SQL (tzn. sla napojit na TSQL a ne jen na TTable)
5. byla free nebo za velmi prijatelny poplatek
Format ulozeni dat na disku je libovolny (DBF, Paradox, Text s cimsi, uplne jinak)
Docela mne vypeklo BDE na male lokalni nesdilene databazi pri odinstalovani jineho softu s BDE :-((
P.S: vse toto pro D3
===========mozno pouzit PGP==============
Richard Valny richard.valny(zv)oku-st(tec)cz
Okresni urad Strakonice tel. 0342-441 l. 216
Smetanova 533 fax. 0342-21208
386 22 STRAKONICE FiDoNet 2:423/35
===========mozno pouzit PGP==============
... Windows nemohou byti virem, nebot virus je napsan inteligentne, neco dela a je zcela zdarma :-)archiv
[*] Gebauer Lukas <gebylist(zv)mlp(tec)cz> - 2.9.1999 16:15:53
> > > Tak jinak, co na archivu udelat adresar SMETI (napr.) a z nej bys
> > > to tak po 14 dnech mazal (podle data souboru) ?
>
> Odpovidam na zpravu z 20 cervence
> Mel bych jednu drobnou vyhradu...a to trochu prodlouzit tu dobu, po
> kterou ten dany soubor bude v tom archivu. Duvod: Nejak se mi behem
> prazdnin nahromadily zpravy z konference a doba prokousani bude jeste
> asi hodne velka... Myslim ze podobne problemy maji i jini uzivatele
> (obvzlaste studenti, kteri jsou pres prazdniny doma....)
vzhledem k tomu,z e adresar je, ale automaticke mazani jeste
nikoliv, tak se moc trapit nemusis... ;-)))
Louci se Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
archiv
[*] Petr Vaclavek <bla(zv)atrey.karlin.mff.cuni(tec)cz> - 2.9.1999 16:22:19
> > za archiv teto konference jsme Ti vsichni vdecni a nemyslim to ironicky.
> > Je v tom hodne Tve prace a diky Ti za ni. Ale uz z nazvu vyplyva ucel - je
> > to ARCHIV a to znamena sklad neceho trvaleho. A zanest ho smetim by
> > pouziti archivu jako takoveho znacne zneprehlednilo. Kazdy (vetsina) nema
> > tolik peclivosti pri pojmenovavani souboru jako P. Vones a pochybuji, ze
> > by kdo si vubec vzpomnel Ti napsat, ze uz by se dany soubor mohl smazat.
> >
> > Tak jinak, co na archivu udelat adresar SMETI (napr.) a z nej bys to tak
> > po 14 dnech mazal (podle data souboru) ?
> >
> > Mira
Ahoj
Odpovidam na zpravu z 20 cervence
Mel bych jednu drobnou vyhradu...a to trochu prodlouzit tu dobu, po
kterou ten dany soubor bude v tom archivu.
Duvod: Nejak se mi behem prazdnin nahromadily zpravy z konference
a doba prokousani bude jeste asi hodne velka...
Myslim ze podobne problemy maji i jini uzivatele (obvzlaste studenti,
kteri jsou pres prazdniny doma....)
Petr
P.S. Uz mi zbyva jenom 2797 prispevku k precteni :-)
==< Petr Vaclavek >---- --- --- -- -- - - -
====-----( mailto: bla(zv)atrey.karlin.mff.cuni(tec)cz )-- - -
`=====--( http://atrey.karlin.mff.cuni(tec)cz/~bla )-- - -
`======--- ------ ---- --- -- -- - - - OnClick a tlacitka mysi
[*] Honza Jochman <Jan.Jochman(zv)ais(tec)cz> - 2.9.1999 16:47:30
... sem myslel, ze udalost OnClick prave tlacitko nevyvola ...
Testovat prave, leve se da napr. na OnMouseDown nebo OnMouseUp
Cau Honza
> -----P�vodn� zpr�va-----
> Od: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]za u�ivatele
> Krayzel Libor
> Odesl�no: 2. z��� 1999 14:51
> Komu: '*** Delphi'
> P�edm�t: OnClick a tlacitka mysi
>
>
> Zdravim,
>
> pri udalosti OnClick na TToolButtonu potrebuji testovat, zda bylo
> stisknute
> prave, nebo leve tlacitko mysi. Jak na to?
>
> Dekuji.
>
> ==[ Libor Krayzel ]================================
> http://webhost(tec)cz/elka * mailto:libor.krayzel(zv)czech-tv(tec)cz
> http://easypad.fwd(tec)cz * mailto:elka(zv)seznam(tec)cz
> office: +420-69-620 1375
> GSM: +420-603-937 947
> ==============================================
>Cached Updates
[*] Ing. Jaroslav �ke��k - 2.9.1999 17:55:41
Chyba je ve spatnem poradi prikazu
asi nejak takhle
Databas1.StartTransaction
try
Q1.ApplyUpdates;
Q1.CommitUpdates;
Database1.Commit;
extep
Q1.CancelUpdates;
Database1.Rolback;
ShowMessage('Chyba blblbla ....')
end;
Dale nema smysl pouzivat metodu
CachedUpdates na insert a editaci pouze
jednoho zaznamu. To se hodi na ukladani a zmeny
vice zaznamu najednou.
Key violation hlasi kdyz je chyba klicu.
Primarni klic by se mel generovat jinak
a neukladat pres CachedUpdates
Bud pomoci autoincrementu nebo generatoru.
Jaro
> Mam komponentu database a query s
> vlastnosti CachedUpdates nastavenou na
> True.
> Pridam zaznam, zahajim transakci, zavolam
> metodu query ApplyUpdates (tesne pred tim je
> UpdatesStatus tohoto zaznamu usInserted),
> pak transakci komitnu a zavolam
> CommitUpdates na guery.
> Takto by to melo fungovat.
> Ale pokracuji ...
> Ten samy zaznam zedituju, zahajim transakci,
> zavolam metodu query ApplyUpdates (a v tuto
> chvili bych predpokladal, ze UpdateStatus
> tohoto zaznamu bude usModified. Jenze on je
> zase usInserted. To znamena, ze se snazi
> pridat zaznam se stejnym primarnim klicem. A
> co je jeste zajimavejsi, nekdy to projde bez
> chyby, nekdy volani ApplyUpdates skonci s
> chybou "Key violation", kterou se mi navic
> nepodarilo odchytit v bloku try..except.)
>
> Radek
> Jak se vlastne ten Petr jmenuje a jak je to s jeho
[*] Ing. Jaroslav �ke��k - 2.9.1999 18:01:59
> Druhy rozpor vnimam v podpisu amatersky programator a uvedenim mezi
> odborniky u Inprise.
>
Taky jsem to cetl a kokam koukam, ze ten amater je vlastne profik.
Aby si ho tak u Borlandu nechali a nemel uz na nas cas .... :)
Jaro
TekMetrics (Was: Web aplikace pomoci Delphi)
[*] Robert Kindl <rob(zv)exec(tec)cz> - 2.9.1999 18:03:18
>J.Z.
>((-: taky se pochlubim,
>TekMetrics certified:
>- Delphi Programmer
>- Web Developer
>- High IT Aplitude
> http://www.tekmetrics.com/transcript.shtml?pid=78701
Taky jsem to zkusil, ale o cem to vypovida?
Ja vam nevim...
Otazka na odlisnost Delphi1 a Delphi 3 - no co dodat.
Pak terminologie zejmena z objektove oblasti - to jsem dokonce
kdysi studoval, ale zapomnel jsem to, protoze to proste nepotrebuji.
K cemu je ptat se kterou
z nasledujicich 5 vlastnosti TAnimate nema (ma).
Vetsina otazkek je vylozene lehkych ba primo zakladnich
snadno nalezitelnych v helpu do 10 sekund.
Nejlepe se asi hodi slovo POVRCHNICH.
Vzdyt tam neni snad jedina otazka jdouci do hloubky.
Byl jsem totiz schopen napr. odpovidat i na otazky
ohledne COM o cemz vim zhruba, ze existuje
a ze se zde o nem vedou sahodlouhe diskuse.
Jak tak povrchni test vypovida o tom
jak dany clovek umi koncepcne myslet,
programovat a resit problemy?
Otazkami ma/nema propertu se to zjistit podle mne neda.
Ja bych do firmy neprijal ani cloveka s hodnocenim 5.00.
Ba primo naopak - byl by mi podezdrely
a) ze podvadi (napr. zkousi test opakovane pod ruznymi jmeny)
b) ze nejak moc zna teorii, ale co praxe?
Je pravdou, ze kdyby mel hodnoceni pod 2.50
tak by to asi taky bylo podezdrele.
Proste mi prijde, ze to jen rozlisuje uplne blbce
od tech ostatnich normalnich.
Dobreho od vynikajiciho to nerozlisi.
Rob
PS. Aby jste nerekli:
http://www.tekmetrics.com/transcript.shtml?pid=80319
Jak nacist celou vetu z druhe tabulky pomoci Looku
[*] Ing. Jaroslav Ske��k - 2.9.1999 18:08:56
Pokud spojis Lookupu s tabulkou, tak vzdy je ukazatel nastaven
na vybranou polozku z Lookupu. Staci teda tu vetu nacist z Datasetu
te prvni tabulky
Jaro
Subject: Re: Jak nacist celou vetu z druhe tabulky pomoci Lookupu
> Myslim, ze Delphi toto nemaju. Ale celkom v pohode sa to da
> naprogramovat pomocou Bookmarkov - odpametas si kde si, urobis Locate,
> nacitas co potrebujes a vratis sa spet cez GotoBookmark.
>
> Milan Bla�ek wrote:
>
> > Ahoj - tento dotaz opakuji protoze nikdo zatim nereagoval. Resim
> > problem jak pri provedeni lookupu na druhou tabulku nacist nejenom
> > jeden udaj daneho kl��ov�ho pole,ale pot�ebuji nacist vsechny pole
> > (tzn. celou vetu ). V Paradoxu to slo primo pri vytvareni tabulek
> > zadat tak, ze se nastavilafunkce lookup bud pouze pro nahrani udaje z
> > jednoho pole a nebo se nastavilo nahrani udaju ze vsech identicky
> > poli. V delphi jsem to nenasel. Diky za odpovedMilan Blazek
>BDE - standard instalace - namet na diskuzi
[*] Milan Schembera <milan(zv)missoftware(tec)cz> - 2.9.1999 19:23:41
Takze Milan by mel ty 2000 za cestu do Brna vyuctovat zakaznikovi.
Vsak ja jsem mu je vyfakturoval, ale on je do dnes nezaplatil (od unora 99). :-(
Preji hezky den a jsem s pozdravem
Milan Schembera
mailto:info(zv)missoftware(tec)cz
http://www.missoftware(tec)cz
---------------------------------
- on-line objednavkove, rezervacni a obchodni systemy po internetu
- zakazkovy software pro Windows 3.x/9x/NT
- software pro autoskoly http://www.autoskola99(tec)cz
- servis pro autopujcovny http://www.auto-pujcovny(tec)cz
Zmizeni ikon TToolBar
[*] Jan Naiser <tua(zv)ltm(tec)cz> - 2.9.1999 19:36:20
Preji pekny den,
D4.03S
stalo se mi pri pouziti komponent TToolbar, TImageList a TAction, ze
mi zmizely ikony na buttonech TToolbaru. Rovnez zmizely v komponente
TMainMenu, ale zustaly zachovany v TPopUpMenu. Je to pouze pri
instalaci na Notebook (P200 MHz, color, ale ted nevim, co je tam
presne za kartu), jinak na ostatnich PC vse bezi vporadku. Nesetkal se
nekdo z vas s podobnym kouzlem?
Diky za pripadne odpovedi.
Honza Naiser.
Serazeni v DBGridu
[*] Menfy <menfy(zv)iol(tec)cz> - 2.9.1999 20:50:10
Hi all, nevite nekdo , jak udekat celkem trivialni vec - totiz seradit
radky v dbgridu podle hodnoty jednoho sloupce ? Dam priklad -
mam tabulku se sloupci 1, 2 a 3 a zaznamy x,y, z. Hodnoty jsou
ciselne. Hodnota sloupce 1 zaznamu x je 5, zaznamu y 6 a z 7.
No a ted je potrebuji v dbgridu seradit tak, aby x bylo prvni, protoze
jeho hodnota je nejmensi, y druhe a z treti - nejvetsi hodnota. Uff, to
bylo neco. Poradite ni, prosim nekdo ? Dik moc Filip
_______
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