Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
licencia na MSDE
[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 13.7.2000 10:28:48
> Pokud si koupis software, pak uzaviras smlouvu s majitelem
> autorskych prav. Smlouvu o tom, ze ten software muzes pouzivat.
> Nemuzes se k tomu postavit tak, ze nejsi povinen dodrzovat
> zakony cizi zeme, proto si muzes delat, co chces. Odvolani na
> to, ze nerozumis anglicke smlouve take nepomohou. V prvni rade
> bys mel dodrzovat vsechna ustanoveni licencni smlouvy. Pokud
> ji nerozumis, nech si ji prelozit na sve naklady, nez zacnes
> software pouzivat. V pripade, ze by nektere ustanoveni smlouvy
> bylo v rozporu s nasimi zakony, pak by platil v tomto konkretnim
> ustanoveni (bode) nas zakon platny v nasi zemi. Priklad - kdyby
> se ve smlouve psalo, ze je zakazano vytvaret jakekoliv kopie,
> pak toto neplati, protoze nas autorsky zakon umoznuje vytvorit
> zalozni kopie. Takze bys mohl vytvorit zalozni kopie pro pripad,
> ze by se nosic poskodil, pozar apod.
> Petr Zahradnik, pocitacovy expert
> No nevim, s takovymto pristupem. Licencni ujednani je smlouva
> mezi majitelem a uzivatelem o tom, ze uzivatel bude pouzivat
> produkt stanovenym zpusobem a z toho mu vyplyvaji od majitele
> takova a takova prava. Pokud takove ustanoveni podepises nebo
> jinak naplnis podminku jeho platnosti (rozbalis CD, napr., stavas se
> ucastnikem smlouvy. Pokud takova smlouva obsahuje odkaz na
> zakon platny v nejake zemi, pak se zavazujes dodrzovat ho.
> Vyjimky mohou tvorit pripady, kdy ustanoveni onoho zakona k
> dolicnemu predmetu jsou v rozporu s ustanovenim naseho zakona
> (opet k dolicnemu predmetu).
> S pozdravem Zbysek Hlinka
no, nejsem pravnik,
ale mam pocit, ze:
nejsem povinen prekladat si smlouvu na sve naklady
rozbalenim nosice (cd, diskety) nelze dost dobre souhlasit se smlouvou,
neb nerozumim napisu na prelepce media.
myslim si, ze nektere tyto veci by chteli dotahnout jak ze strany
zakonu, tak ze strany distributoru sw. minimalne bych uvital licencni
smlouvy v cestine (pravne platne), nebot potom je zrejme co je a co neni
mozne.
peca
Praca v team-e
[*] Vito <vito(zv)centrum(tec)cz> - 13.7.2000 10:32:35
Mohol by mi niekto poradit, ako pracovat v team-e pod D4 alebo D5? Sme prepojeny sietou a potrebujeme pracovat naraz na jednom projekte. Pomozte prosom zufalej trojici.
Vito
BorderIcons
[*] p. Jirman <jim.design(zv)iol(tec)cz> - 13.7.2000 11:14:59
----- Original Message -----
From: Milan ��ek <cizek.milan(zv)seznam(tec)cz>
To: Delphi konference <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, July 12, 2000 12:34 PM
Subject: BorderIcons
> ahoj, mam nekolik dalsich dotazu.
>
> Je nejaka moznost, jak vytvorit dalsi ikonu vlastniho vzhledu vedle
> BorderIcons? Napriklad, jak je tomu v programu ConnectionMeter - jedna
ikona
> pro minimalizaci do taskbaru.
To se tu uz jednou resilo bohuzel si nemohu vzpomenout na zadne klicove
slovo abych to nasel, tak se snad nekdo prihlasi
> k tomu programu TipyTriky: docela dobry, velice by mne zajimalo, jakym
> zpusobem si vyresil synchronizaci (upload/download) tipu a jakym zpusobem
> zjistujes, jestli je aplikace na serveru v inetu ve vyssi verzi. Proste
jake
> komponenty k tomu pouzivas a jak na to.
ja jsem to sice nedal, ale pouzil bych NMFTP, a synchronizaci rucne od
uzivatele (musi byt online)
>
> k tomu hned dotaz: nemate nekdo nejakou zarucene funkcni komponentu na
> detekci online pripojeni na internet, je jich cela rada, ale nektere
> nefunguji, neni-li napriklad modem (TCP/IP) vubec instalovan.
Function InternetGetConnectedState (lpdwFlags: LongInt; dwReserved:
LongInt): Boolean; stdcall; external 'wininet.dll';
implementation
{$R *.DFM}
Function TForm1.Test_Pripojeni (): boolean;
var Flagy: LongInt;
begin
Flagy := 0;
Result := InternetGetConnectedState(Flagy, 0);
end;
{pokud funkce vrati hodnotu TRUE, pocitac je prave pripojen na Net}
M.Jirman
Praca v team-e
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 13.7.2000 11:35:45
>Mohol by mi niekto poradit, ako pracovat v team-e pod D4 alebo D5? Sme
prepojeny sietou a potrebujeme pracovat naraz na jednom projekte. Pomozte
prosom zufalej trojici.
>Vito
Zkouseli jste FreeVCS?
Zdravi
Dalibor Toman
Interbase Info
[*] Grind Crusher <Grind_Crusher(zv)DeathsDoor(tec)com> - 13.7.2000 11:42:59
Sorry, vim ze o IB se tady dost diskutuje, ale nemam cas prohledavat archiv
a potreboval bych vedet par zakladnich informaci ... predem dik.
Je IB zadarmo ?
Jaky typ souboru IB vyuziva ?
Ma IB nejaka omezeni (napriklad pocet zaznamu v tabulce) ?
Umi IB indexy ?
Je k IB potreba BDE nebo se to da osetrit jinym nastrojem ?
Vite o nejakych spatnych vlastnostech IB ?
Grind Crusher.Query v Gridu
[*] Petr J�nsk� - 13.7.2000 11:44:31
Ahoj,
Zobrazuji data z Query v Gridu. Po doubleclicku otevru okno, ve kterem edituji
vybrany zaznam, ale primo nad TTable. Po uzavreni okna chci, aby se zmenene
hodnoty zobrazily zase v Gridu. A ted muj problem: vsechno funguje jak ma, pokud
soucasti dotazu v Query neni "order by".
Respektive "order by jinepolenezklic" generuje to divne chovani...
Jakmile se v SQL objevi tahle klauzule,
nefunguje update, ani refresh na Query nepomuze. Musim zavolat Close a Open.
Moc tomu nerozumim...Mel bych editovat pole z toho query primo? Co delam spatne?
Dik, Petr J�nsk�
W2K, D5
licencia na MSDE
[*] Jirka <jnagy(zv)nh-trans(tec)cz> - 13.7.2000 11:59:52
Toto je presne ten problem, co jsem chtel nadhodit. Trocha to prezenu:
Koupim si v obchode japonsky (izraelsky, egyptsky, atd...) SW.
Zaplatim, dostanu pokladni doklad nebo fakturu a dodaci list. To je
vsechno, co mam a mne to nahrazuje pouze kupni smlouvu, resp. rekneme
tomu povoleni k uziti autorskeho dila.
Na krabici mam spoustu krasnych cernobilich obrazku - jak pozdeji
zjistim, je to nejaky text v japonstine (hebrejsky, arabsky,...), na
CD taky. V zadnem jinem jazyku nikde nic.
A ted je otazka: kdyz otevru krabici, rozbalim CD, roztrnu vsechny
obaly, podle ceho se mam ridit? Podle platneho autorskeho zakona, nebo
podle licencniho ujednani napsaneho v japonstine (hebrejsky,
arabsky,...), kde v pohode muze byt napsane, ze se zavazuji autorovi
posilat kazdy den 10000 jenu, dolaru, marek nebo ceho. To si opravdu
nekdo mysli, ze jsem povinny zajistit si preklad vsech textu z
japonstiny atd., abych si vybral a precetl licencni ujednani a
zjistil, ze nechci posilat zadne penize nikomu. Prodavac mi samozrejme
nebude chtit vzit spatky ten SW, ja ho pouzivat nemohu, protoze se
neminim ridit licencnim ujednanim a jeste jsem vydal x-tisic Kc za
preklad.
Tak jak to vlastne je?
Jirka
----- P�vodn� zpr�va -----
Od: Petr Palicka <petr.palicka(zv)atlas(tec)cz>
> > No nevim, s takovymto pristupem. Licencni ujednani je smlouva
> > mezi majitelem a uzivatelem o tom, ze uzivatel bude pouzivat
> > produkt stanovenym zpusobem a z toho mu vyplyvaji od majitele
> > takova a takova prava. Pokud takove ustanoveni podepises nebo
> > jinak naplnis podminku jeho platnosti (rozbalis CD, napr., stavas
se
> > ucastnikem smlouvy. Pokud takova smlouva obsahuje odkaz na
> > zakon platny v nejake zemi, pak se zavazujes dodrzovat ho.
> > Vyjimky mohou tvorit pripady, kdy ustanoveni onoho zakona k
> > dolicnemu predmetu jsou v rozporu s ustanovenim naseho zakona
> > (opet k dolicnemu predmetu).
> > S pozdravem Zbysek Hlinka
>
> no, nejsem pravnik,
> ale mam pocit, ze:
> nejsem povinen prekladat si smlouvu na sve naklady
> rozbalenim nosice (cd, diskety) nelze dost dobre souhlasit se
smlouvou,
> neb nerozumim napisu na prelepce media.
>
> myslim si, ze nektere tyto veci by chteli dotahnout jak ze strany
> zakonu, tak ze strany distributoru sw. minimalne bych uvital
licencni
> smlouvy v cestine (pravne platne), nebot potom je zrejme co je a co
neni
> mozne.
>
> peca
instalacia MSDE
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 13.7.2000 12:11:16
> Instalujem na Win98 MSDE z CD "MS VISUAL STUDIO 6.0 Plus Pack"-
> dostal som
> to ako developer edition. Pokial nainstalujem plnu verziu (aj s
> Enterprise Managerom) nainstaluje sa spravne. Pokial ale skusam
> nainstalovat distribuovatelnu verziu (MSDEx86.exe, .., ..), nahlasi mi
> pocas instalacie hlasku : The Path specified in a command line
> argument is invalid: C:\WINDOWS\TEMP\PFTD195~TMP\X86\SETUP\setup.iss.
>
> pozeral som sa a ten subor setup.iss tam skutocne nie je. Zmenil som
> iba cestu v unattend.iss z C: na D: a spustil MSDEx86.exe. Robim nieco
> zle alebo je ta verzia nejak pokazena?.. prip. ak je pokazena, kde
> najdem dobru verziu???
Pokud se neco nezmenilo, tak MSDE je instalovatelne jedine v
unattended modu, prikazovy radek musi mit parametry, ktere jsou
popsane v nejakem readme. Doporucuji pozornosti i debatu, ktera
na tema instalace MSDE probehla celkem nedavno, zejmena
Zbyskovy zdrojaky.
David
Problem s Domenami atd ve WinNT.
[*] MDvorak(zv)csas(tec)cz - 13.7.2000 12:17:38
Nazdar,
zkus se podivat do Win32 SDK na funkce jako LookupAccountName apod., je jich
tam cely balik.
M. Dvorak
-----Original Message-----
From: Luk� Gallina [mailto:johndelphi(zv)atlas(tec)cz]
Sent: Wednesday, July 12, 2000 6:10 AM
To: delphi-l(zv)fwd(tec)cz
Subject: Re: Problem s Domenami atd ve WinNT.
Cau.
To je skvele, jenze Win2K Server nase firma dlouho jeste pouzivat nebude,
cili ActiveDirectory zatim priliz nehrozi.
:((( Nehlede na to ze je to strasnej plagiat NDSky, kterou bych pouzival
mnohem radeji (tam ty informace ziskat umim). Cili to potrebuji ziskat z
domen.
Lukas Gallina
>Ahoj,
>aspon par poznamek:
>Na W2000 je mozne pouzivat rezim s Active Directory,
>s tou se da (tusim) komunikovat pres LDAP. Zkus se podivat
>do helpu (dokumentace, Resource kit) W2000, myslim, ze tam
>byly i nejake priklady.
>hesla: LDAP, ADSI (Active Directory Service Interfaces)### Luk� Gallina napsal dne 10 Jul 00, v 22:39 :
Zdravim.
Vidim ze muj dotaz zapadl, cili znovu. Nevite nekdo jak v siti WinNT
zjistim informace o uzivateli v domene? Znam jmeno domeny i loginname usera
ale potrebuji zjistit takove ty veci jako cele jmeno, adresu.... a pak jeste
potrebuji zjistit jmeno serveru ktery mu overil pristup do domeny, ke
kteremu je prihlaseny.
A potrebuji to pod Win95, 98, NT, 2000. Nemohu s tim hnout, nakopnete me
nekdo? moc diky.
Lukas Gallina
----------------------------------------------- Ing. Zdenek Drvota e-mail:
drvota(zv)zds(tec)cz director ZDS, spol. s r.o. Hronovicka 708 tel:+420-40-6613756
530 02 Pardubice fax:+420-40-6613756 Czech Republic http://www.zds(tec)cz
e-mail: info(zv)zds(tec)cz Pripojte se k hledani mimozemskych civilizaci: SETI(zv)Home
http://setiathome.ssl.berkeley.edu Darek, ktery nezklame? CeDecko od nas!
http://www.zds(tec)cz/cdrom/cdrom.asp?sender=mail
Packet sniffer
[*] Milan ��ek - 13.7.2000 12:18:43
ahoj,
mohl by mi prosim nekdo pomoci rozchodit Packet Sniffer, ktery jsem stahl z
http://users.swing.be/francois.piette/ingussniffer.htm. Vlastne ani nechapu,
jak to ma pracovat, zrejme se vybere adapter a v memu by se meli objevovat
zachytavana data... ???? Mate-li nekdo vice zkusenosti, prosim podelte se.
diky
S pozdravem Milan Cizek, amatersky programator, D4 CS
Win98 a Win2k, cizek.milan(zv)seznam(tec)cz, ICQ: 59826637
dbGrid a pohyb scrollbaru klavesnicou
[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 13.7.2000 12:19:55
zkus ScrollBy, nebo Position:=xxx
bez zaruky
peca
~~~~~~~~~~~~~~~~~~~~~~~~
[smtp:palicka(zv)aginfo(tec)cz]
~~~~~~~~~~~~~~~~~~~~~~~~
ZEMEDELSKA INZERCE ZDARMA www.aginfo(tec)cz
inzeraty zasilejte pisemne nebo e-mailem: inzerce(zv)aginfo(tec)cz
> Ako je mozne ten scrollbar posuvat??
> Robo
Uzivatele v NT
[*] Milan ��ek - 13.7.2000 12:19:31
Nekdo se tu nedavno ptal, jak zjistit udaje o uzivatelch z WinNT, potrebne
komponenty jsou na
http://www.jgsoftware.com/nt.htm
S pozdravem Milan Cizek, amatersky programator, D4 CS
Win98 a Win2k, cizek.milan(zv)seznam(tec)cz, ICQ: 59826637
Re[2]: Dotaz amatera
[*] raul.endymion(zv)ns1.infima(tec)cz - 13.7.2000 12:24:44
Me nejde o to je ukladat, alespon zatim, me jde o to je vubec
vytvorit.
Proste jak se tvori komponenta typu tpanel, ktera muze obsahovat dalsi
komponenty. a jak se potom tvori tyto komponenty.
Raul
PV> Prestoze mozna presne nechapu druhy dotaz pokusim se na nej navrhnout mozne
PV> reseni.
PV> Jestli ti jde o ulozeni a nacteni komponent do souboru, v helpu Delphi jsou
PV> primo napsane dve funkce. Jedna ti komponentu ulozi do textoveho souboru,
PV> ktery vypada presne jako textovi DFM soubor v Delphi a druho je nacte a
PV> vytvori dane komponenty.
PV> Jestli to chces jako HTML bylo by jednodusi si to prevest na tento "DFM"
PV> text a pote upravit do HTML podoby.
PV> Zde je text onoho prikladu:
PV> This example shows how to use the built-in VCL component streaming support
PV> to convert any component into a string and convert that string back into a
PV> component.
PV> function ComponentToString(Component: TComponent): string;
PV> var
PV> BinStream:TMemoryStream;
PV> StrStream: TStringStream;
PV> s: string;
PV> begin
PV> BinStream := TMemoryStream.Create;
PV> try
PV> StrStream := TStringStream.Create(s);
PV> try
PV> BinStream.WriteComponent(Component);
PV> BinStream.Seek(0, soFromBeginning);
PV> ObjectBinaryToText(BinStream, StrStream);
PV> StrStream.Seek(0, soFromBeginning);
PV> Result:= StrStream.DataString;
PV> finally
PV> StrStream.Free;
PV> end;
PV> finally
PV> BinStream.Free
PV> end;
PV> end;
PV> function StringToComponent(Value: string): TComponent;
PV> var
PV> StrStream:TStringStream;
PV> BinStream: TMemoryStream;
PV> begin
PV> StrStream := TStringStream.Create(Value);
PV> try
PV> BinStream := TMemoryStream.Create;
PV> try
PV> ObjectTextToBinary(StrStream, BinStream);
PV> BinStream.Seek(0, soFromBeginning);
PV> Result := BinStream.ReadComponent(nil);
PV> finally
PV> BinStream.Free;
PV> end;
PV> finally
PV> StrStream.Free;
PV> end;
PV> end;
PV> ----- Original Message -----
PV> From: Raul Endymion <raul.endymion(zv)ns1.infima(tec)cz>
PV> To: <delphi-l(zv)fwd(tec)cz>
PV> Sent: Wednesday, July 12, 2000 9:37 AM
PV> Subject: Dotaz amatera
>> Omlouvam se za dva pro nekoho trapne dotazy.
>> 1) Jak vytvorit proceduru typu Write( a, [... an] : variant);
>> jde mi o ty nepovinne parametry
>> 2) Jak vytvorit komponentu jako je tForm, ktera muze vlastnit dalsi
>> komponenty.
>> Jde mi o model HTML documentu, kde jednotlive tagy jsou vlastne
>> komponenty podobne napr. tpanel. Ostatni neparove tagy jsou potom jen
>> komponenty jako label, text apod.
>> Problem spociva v tom, ze se nemuzu prohrabat zdrojakama konteineru a
>> prijit na to, jak to udelat.
>> Uplne idealni vysledek je..
>>
>> HTML.Bold1.Italic2.Text := 'Ahoj';
>>
>>
>> Nevite nekdo jak na to ?
>>
>>
>> Raul Endymion
>>
>>
>> P.S.> Omlouvam se za nesrozumitelnost, sam nemam presne jasno jak to
>> presne ma fungovat. Nicmene prirovnani k TForm je asi nejlepsi.
>>
IBExpress, FreeIB a dalsi
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 13.7.2000 12:24:22
Ahoj,
hledam nejake komponenty pro primy pristup k IB6 z Delphi. Vim o
IBExpress v D5, z inetu se da stahnout FreeIB. Jsou i dalsi
moznosti? Jake mate zkusenosti s obema uvedenymi, co je lepsi?
Mam D4, takze IBExpress nemam momentalne k dispozici.
Srovnaval to uz nekdo?
Dik, David
Praca v team-e
[*] Honza <delphi(zv)mis-net(tec)cz> - 13.7.2000 12:29:53
Ahoj,
Osobne bych doporucil pracovat "s balicky", tj. .DCP .DPL soubory.
Jestlize jste 3 tak predpokladam, ze bude vysledny projekt vetsi a stejne budete muset resit problem s velikosti samotneho .EXE
........Honza
Mohol by mi niekto poradit, ako pracovat v team-e pod D4 alebo D5? Sme prepojeny sietou a potrebujeme pracovat naraz na jednom projekte. Pomozte prosom zufalej trojici.
Vito
Praca v team-e
[*] Vito <vito(zv)centrum(tec)cz> - 13.7.2000 12:33:18
> >Mohol by mi niekto poradit, ako pracovat v team-e pod D4 alebo D5? Sme
> prepojeny sietou a potrebujeme pracovat naraz na jednom projekte. Pomozte
> prosom zufalej trojici.
> >Vito
>
>
> Zkouseli jste FreeVCS?
>
> Zdravi
> Dalibor Toman
>
Nie FreeVCS nepoznam. Mozes ma odkazat na konkretnu stranku, kde by som si
to mohol stiahnut, popripade nejaky manualy. :-)
Pocul som o TeamSource, ale nemam s tym vobec ziadne skusenosti, resp. nemam
skusenosti so ziadnym takymto nastrojom, ktory by toto umoznoval. Preto by
som potreboval aj nejake referencie, ktory je najlepsi, najspolahlivejsi
atd.
Diky
Vito
Drag'n'Drop
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 13.7.2000 12:42:38
On 11 Jul 2000, at 22:38, Hurricane wrote:
> Probiralo se tady tema, jak zjistit Handle okna, nad kterym je prave
> kurzor. Uz nevim, jestli staci jenom najet mysi nebo se musi kliknout,
> ale podle me by molo stacit najeti. Jak se to dela nevim, ale nekdo
> jinej to urcite vi. No a potom akorat staci testovad Handle Formu
> (popripade jinyho Parenta) a handle z ty funkce.
Clovece, ty odpovidas na uplne neco jineho...
> Hurricane
> ----- Original Message -----
> > Mam problem s implementaci Drag'n'Drop.
> > Vytvoril jsem si komponetu a implementoval na ni vlastni Drag'n'Drop
> > tak,
> ze pokud komponentou pretahuji, zobrazuje se cela (ne napr. pouze
> ramecek, tak jak je to v pri navrhu formulare - v design time). >
> Potrebuji pri pretahovani zjistit, zda-li tato pretahovana komponenta
> se nenachazi nad jinou,tj. zda ji neprekryva. > Pokud ma nekdo namet
> na reseni tohoto problemu, budu velice rad, kdyz odpovi.
Pokud chces ramecek, musis si vytvorit novou komponentu, ze
ktere vymalujes jen ten ramecek, jinak bude pruhledna. S
rameckem budes tahat po formulari, a v okamziku, kdy ji nekde
upustis, presunes vlastni komponentu a pomocny ramecek zrusis.
Pokud chces pri pretahovani testovat prekryti pres jinou
komponentu, pak se podivej na RectInRegion. Kazdopadne budes
muset vzdy otestovat, zda nektery z okraju neprotina jinou
komponentu.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
licencia na MSDE
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 13.7.2000 12:42:38
On 13 Jul 2000, at 7:23, Polak Jiri wrote:
> > Pokud si koupis software, pak uzaviras smlouvu s majitelem
> > autorskych prav.
>
> To teda ne. Pokud koupis software, muzes si s nim delat co chces,
> resp. co ti nezakazuje kupni smlouva (treba prodavat ho se ziskem
> dal). Naopak pokud kupujes krabici se softwarem, nekupujes software,
> ale jenom pravo ho pouzivat.
:-))) Jaky je v tom rozdil? At uz si koupim SW nebo krabici se SW
pro vlastni pouziti, je to uplne stejne. Pokud totez (oboje) kupuji za
ucelem dalsiho prodeje, pak je situace samozrejme odlisna.
> > PS: Pokud cokoliv podepises, at je to v jakemkoliv jazyku,
> > pak dost silne pochybuji, ze se muzes pozdeji vymlouvat, ze jsi to
> > podepsal jen z legrace, protoze tomu proste nerozumis. S tim bys
> > tezko nekde pochodil...
>
> :-)))))
> Jak jsme videli napr. v pripade Novaka z ODS, neni to pravda.
> Staci rict "ja jsem to vubec necetl a nerozumim tomu"
> a nejsi zodpovedny za nic :-(((
> Stejne se hajil i pitomec David (soc. ministr zdrav.).
Asi ne, protoze nejsi velky boss velke strany. Viz pripad obetniho
beranka spravce site, ktery byl potahovan za (nejspis) chyby svych
nadrizenych.
> Nebyla to prece jeho vina, ze podepsal nesmyslny prikaz,
> ale sabotaz jeho podrizenych (ktere si sam vybral - pozn. aut.)
> Podobne neplatici dluhu nejsou zodpovedni za nesplaceni dluhu,
> musis jim dokazat umysl nesplacet dluhy :-(((
Ano, tohle je zhovadilost pravniho systemu. V soucasnem stavu je
prislis riskantni pujcovat penize, takze ani neni divu, ze nefunguji
ani banky jak by mely.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
dbGrid a pohyb scrollbaru klavesnicou
[*] Ond�ej Male�ek <ondrej.malecek(zv)radom-cz(tec)cz> - 13.7.2000 12:53:43
Zrejme by to melo jit zasilanim zprav WM_VSCROLL prip. WM_HSCROLL komponente
obsahujici scrollbar.
Ondrej Malecek
----- Original Message -----
From: "Robert Zak" <nrsys(zv)psn.sk>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, July 13, 2000 9:46 AM
Subject: dbGrid a pohyb scrollbaru klavesnicou
> Dobry den,
> Pouzivam D5prof a potreboval by som pohnut vertikalny scrollbar
> kombinaciou klaves CTRL+sipky (vpravo alebo vlavo). Nenasiel som ale
metodu
> ktorou je mozne scrollbar ovladat.
> Ako je mozne ten scrollbar posuvat??
>
> Robo
>
Praca v team-e
[*] Karel Kral <kral(zv)purus(tec)cz> - 13.7.2000 12:55:01
Tady je Link. Muzu taky doporucit FreeVCS.
http://www.thensle.de/index.htm
Dalibor Toman wrote:
>
> >Mohol by mi niekto poradit, ako pracovat v team-e pod D4 alebo D5? Sme
> prepojeny sietou a potrebujeme pracovat naraz na jednom projekte. Pomozte
> prosom zufalej trojici.
> >Vito
>
> Zkouseli jste FreeVCS?
>
> Zdravi
> Dalibor Toman
--
______________________________________________________
Karel Kral, informatik
Purus, s.r.o., Cezavy 627, 664 56 Blucina, CZ
Tel: 05/47235000, 0602/552432, Fax: 05/47231203
E-Mail: mailto:kral(zv)purus(tec)cz, WWW: http://www.purus(tec)cz
______________________________________________________
Praca v team-e
[*] Zdeno Jasek <zdeno.jasek(zv)corinex.sk> - 13.7.2000 12:56:52
Ahoj,
daj si na webe hladat FreeVCS. Je to zadarmo Version control system pre
zdielanie zdrojakov a kontrolovanie verzii a pouzivam to aj ked som sam.
Zdeno
Vito wrote:
> Mohol by mi niekto poradit, ako pracovat v team-e pod D4 alebo D5? Sme
> prepojeny sietou a potrebujeme pracovat naraz na jednom projekte.
> Pomozte prosom zufalej trojici.Vito
Integracia QuickView
[*] Ing. Csaba Kissi <ckissi(zv)email(tec)cz> - 13.7.2000 13:03:08
Vie my niekto pomoct ako integrovat QuickView priamo do programu a zobrazovat
v nom dokumenty podobne ako to robi PowerDesk ?
Csaba.IBExpress, FreeIB a dalsi
[*] Tomas =?iso-8859-2?Q?Michal=EDk?= <michalik(zv)proca(tec)cz> - 13.7.2000 13:09:23
Ahoj,
David Lebeda wrote:
>
> Ahoj,
>
> hledam nejake komponenty pro primy pristup k IB6 z Delphi. Vim o
> IBExpress v D5, z inetu se da stahnout FreeIB. Jsou i dalsi
> moznosti? Jake mate zkusenosti s obema uvedenymi, co je lepsi?
> Mam D4, takze IBExpress nemam momentalne k dispozici.
> Srovnaval to uz nekdo?
>
> Dik, David
Jeste existuji IBObjects, se kterymi zapolim v soucasne dobe ja. Jsou
dostupne snad i pro D2 a dle mineni mnoha uzivatelu (ja sam jsem
IBExpress ani FreeIB nepouzival) jsou nejpropracovanejsi => taky
nejslozitejsi ...
--
=================================
Tomas Michalik
ProCA, s. r. o.
V Luzich 818, Praha 4
Czech Republic
e-mail: michalik(zv)proca(tec)cz
tel: +420 2 67283446
Borders icons
[*] Radek Hole�ek <holecekr(zv)upfm(tec)cz> - 13.7.2000 13:20:54
>Je nejaka moznost, jak vytvorit dalsi ikonu vlastniho vzhledu vedle
> BorderIcons? Napriklad, jak je tomu v programu ConnectionMeter - jedna
> ikona pro minimalizaci do taskbaru.
Melo by se jednat zrejme o komponentu "TWidget: A Title Bar Button".
S pozdravem
Radek
Praca v team-e
[*] Hynek Svato� <svatos(zv)kam(tec)czu(tec)cz> - 13.7.2000 13:21:01
My pouzivame tento system:
1) kazdy pracovnik ma svoji lokalni kopii projektu, na ktere pracuje.
2) kazdy pracovnik ma svuj pracovni adresar umisteny v adresari, kde se
nachazi projekt a jen v tomto adresari provadi zmeny
3) problem sdilenych dat. struktur a unit je resen pres include soubory
(*.inc), ktere jsou vlozeny do spolecnych unit, do kterych jinak nikdo
nezasahuje
napr.: unit Counts.pas obsahuje toto:
{$I Clovek1.inc}
{$I Clovek2.inc}
const MaxCount = CLOVEK1_MAX_COUNT + CLOVEK2_MAX_COUNT;
a includove soubory obsahjuji deklarace:
napr.: Clovek1.inc:
const CLOVEK1_MAX_COUNT = 1;
takto lze dosahnout pomerne jednoducheho sdileni kodu a dat, pricemz nehrozi
vzajemne zasahovani do kodu.
4) pri procesu synchronizace se proste nahraji do centralniho projektoveho
adresare JEN praqcovni adresare jednotlivych vyvojaru a stai prekompilovat a
vse musi bezet.
Ma to ale i jednu nevyhodu: pri takto definovane strukture je potreba mit
strukturu aplikace dopredu dobre promyslenou a mit vlastne vytvoreny
aplikacni framework (coz ale vlastne neni zase nevyhoda, tak nevim :-O).
PS: FreeVCS neznam, kde se da stahnout? Je to dobry ?
Keep mailing :-)
=========================
Hynek Svato�
svatos(zv)kam(tec)czu(tec)cz
hynek.svatos(zv)atlas(tec)cz
=========================
> >Mohol by mi niekto poradit, ako pracovat v team-e pod D4 alebo D5? Sme
> prepojeny sietou a potrebujeme pracovat naraz na jednom projekte. Pomozte
> prosom zufalej trojici.
> >Vito
>
>
> Zkouseli jste FreeVCS?
>
> Zdravi
> Dalibor Toman
>
>ADONIS - opWithoutAbsolutePosition
[*] Hynek Svato� <svatos(zv)kam(tec)czu(tec)cz> - 13.7.2000 13:28:34
Tak jsem si v helpu k ADONISu precetl, ze nastaveni priznaku
opWithoutAbsolutePosition se zvysi rychlost navigace v klientskem datasetu
asi 10x (!), ale ouha, v tento moment mi prestal chodit scrollbar DBGridu,
ktery tendo DataSet zobrazuje.
Chtel bych zachovat vysokou rychlost navigace ale take funkcnost ScrollBaru,
kudy z toho ven ?
Keep mailing :-)
=========================
Hynek Svato�
svatos(zv)kam(tec)czu(tec)cz
hynek.svatos(zv)atlas(tec)cz
=========================vytvoreni TMenuItem pomoci Designeru
[*] Honza <delphi(zv)mis-net(tec)cz> - 13.7.2000 13:32:44
Ahoj,
V design time chci pridat do PopupMenu nejake polozky tak, aby se samozrejme
obohatila deklarace Formu v unite. Toho umim dosahnout pouze s pouzitim
Designeru.
Kdyz vytvorim TMenuItem klasicky (nedojde k "obohaceni" - nelze pozdeji
upotrebit), tak jde pridat k menu, ale kdyz ho vytvorim Designerem, tak pri
pridani do menu to asi z 80% hodi access v.
Co rozhoduje jestli dojde k chybe nebo se to zdari nejak nemuzu zjistit.
Proste jedou jenom Delphi, klid, zkusim - ano, zkusim - ne, zkusim - ne,
zkusim - ne, zkusim - ne, zkusim - ano, zkusim - ne, zkusim - ano,
zkusim - ano, zkusim - ne, zkusim - ne, zkusim - ne, zkusim - ne,
Ukoncim, vypnu PC, zapnu PC - pockam na klid, pustim Delphi - pockam na
klid, zkusim - ne, zkusim - ne, zkusim - ne, zkusim - ne, zkusim - ne,
zkusim - ano, zkusim - ne
Ja se z toho uz zblaznim :-((((((((
>Zdravim
>
>K vyjimce nedochazi vzdy? Kdyz je pocitac hodne zaneprazdnenej (=jede
>pomalu) taky se t stava? Jestli to neni tim, ze se jeste nestihl vytvorit
>(kvuli zpracovavani zprav ve Windlich). Zkus tam dat nejaky cekani. (to asi
>neni idealni pro trvaly pouziti, ale muze to objasnit pricinu) Nebo druha
>moznost je, ze nemas spravne nastavenyho Parenta, Visible atd, atd. Zkus je
>tam nastavovat (i kdyz je to podle zkusenosti zbytecny). Stalo se mi totiz,
>ze kdyz pomoci Create vytvorim Label, tak se mu NEnastavi automaticky
>hodnoty, ktere dostane v DesignTimu (prave ten Parent, Visible a tusim
jeste
>Bounds).
>
>Hurricane
>----- Original Message -----
>From: Honza <delphi(zv)mis-net(tec)cz>
>To: <delphi-l(zv)fwd(tec)cz>
>Sent: Tuesday, July 11, 2000 6:00 PM
>Subject: vytvoreni TMenuItem pomoci Designeru
>
>
>> Ahoj,
>>
>> Zmineny problem se tu jiz jednou probiral, ale tak nejak se nedoslo k
>> rozumnemu zaveru ...
>>
>> Pekne prosim... neni tu duse, ktera by me dokazala rici co je spatne a
jak
>> to udelat spravne ?
>> :
>>
>> v procedure TMyMenuComponentEditor.ExecuteVerb(Index: Integer);
>>
>> je zmineny kod, kde Item je TMenuItem a Menu je TPopupMenu
>>
>> Item := TMenuItem(Designer.CreateComponent(TMenuItem, Menu, 0, 0, 0,
>0));
>> Menu.Items.Add(Item); ---!!!!!!!!!tady dojde k vyjimce pri pridani
>> vytvorene polozky do menu
>> Designer.Modified;
>>
>> Mam D3, W98, vse opatchovane poslednim patchem a stale dochazi k one
chybe
>> asi pri 80% pripadu zavolani.
>>
>> Prosim o radu, jsem v koncich.
>>
>> .........Honza
>>
>>DirectPlay
[*] Ales Radikovsky <radik(zv)volny(tec)cz> - 13.7.2000 13:35:48
Ahojky,
Nemate nekdo nejake prakticke zkusenosti s DirectPlay, konkretne s
lobby?
Ales
--
Ale� Radikovsk�
mail: radik(zv)seznam(tec)cz
tel: +420 603 300093
dynamicke tabulky
[*] Flon <flon(zv)pobox.sk> - 13.7.2000 13:39:04
Zdravim !
Mam mnozstvo tabuliek, cca 50, zda sa mi blbe hodit na Form 50 komponent Table. Taktiez riesenie, kde by som mal menej komponent (priblizne 10-20), tie by boli len pre tabulky, s ktorymi sa pracuje, sa mi tiez nezda moc optimalne... Mam predstavu o vytvoreni nejakej funkcie, napr. otvor(tabulka) a zatvor(tabulka), ktora by dynamicky alokovala a uvolnovala prostriedky, lenze neviem ako na to....
Je potrebne si uvedomit, ze tabulky nebudu otvarane a zatvarane v rovnakom poradi a taktiez, ze ich bude naraz otvorenych viacero...
Za kazdu radu Vdaka... Flon...
P.S. : Win95/98,D3
____________________________________
P. S. V. P. U.
http://www.pobox.sk/
dynamicke tabulky
[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 13.7.2000 13:46:20
Tak tabulky vytvarej dynamicky. Tabulka := TTable.Create(Self); A muzes si to zastresit nejakou svoji funkci Otevri a Zavri, neco jako
Provedure Otevri(Tabulka : String);
Begin
Tabulka := TTable.Create(Self);
Tabulka.Name := Tabulka;
Tabulka.TableName := Tabulka;
Tabulka.Open;
End;
Procedure Zavri(Tabulka : String);
Begin
Tabulka.Close;
Tabulka.Free;
End;
K tabulkam pak pristupujes pres jejich jmeno. Pokud udelas Otevri('Adresy'), tak pak Adresy.FieldByName(.... Jedine omezeni je, ze nemuzes otevrit 2 tabulky se stejnym jmenem - kolize jmen objektu. Je to pouze hruba kostra bez osetreni chyb.
Jan Fiala
----- Original Message -----
From: "Flon" <flon(zv)pobox.sk>> Zdravim !
>
> Mam mnozstvo tabuliek, cca 50, zda sa mi blbe hodit na Form 50 komponent Table. Taktiez riesenie, kde by som mal menej komponent (priblizne 10-20), tie by boli len pre tabulky, s ktorymi sa pracuje, sa mi tiez nezda moc optimalne... Mam predstavu o vytvoreni nejakej funkcie, napr. otvor(tabulka) a zatvor(tabulka), ktora by dynamicky alokovala a uvolnovala prostriedky, lenze neviem ako na to....
> Je potrebne si uvedomit, ze tabulky nebudu otvarane a zatvarane v rovnakom poradi a taktiez, ze ich bude naraz otvorenych viacero...
>
> Za kazdu radu Vdaka... Flon...
>
> P.S. : Win95/98,D3
> ____________________________________
> P. S. V. P. U.
> http://www.pobox.sk/
>
> IBExpress, FreeIB a dalsi
[*] Lu�ek Tenkr�t - 13.7.2000 14:01:20
Pouzivam FreeIB. IBExpress vychazeji , da se rici, z nich. Jsem s nimi velmi
spokojen. O jinych dalsich nevim, tak nemohu porovnavat.
Kitty
licencia na MSDE
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 13.7.2000 13:02:38
Puvodni zprava, kterou napsal Polak Jiri dne 13 Jul 00,:
> > Pokud si koupis software, pak uzaviras smlouvu s majitelem
> > autorskych prav.
>
> To teda ne. Pokud koupis software, muzes si s nim delat co chces,
> resp. co ti nezakazuje kupni smlouva (treba prodavat ho se ziskem dal).
> Naopak pokud kupujes krabici se softwarem, nekupujes software, ale
> jenom pravo ho pouzivat. Asi tim "nakupem software" mel Petr na mysli
> pouze koupi licence. Povazuji za dobre se vyjadrit presne,
> aby si kazdy nedomyslel neco jineho.
Aha, takze budeme zase slovickarit. To nechci a jako administrator
timto zakazuji tuhle debatu, ktera povede jedine k flame-war.
S pozdravem
Petr Zahradnik, pocitacovy expert
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917, PGP vitano
instalacia MSDE
[*] Tom� Vlad�k������V��?���o�� - 13.7.2000 14:03:08
Musis nastavit nejake parametry, jako napr. cestu k souboru UNATTEND.ISS a
podobne
MSDEx86.exe -s -a -f1 "<path>unattend.iss"
viz. ReadMe.TXT a dokumentace.
Tom
----- Original Message -----
From: "Robert Zak" <nrsys(zv)psn.sk>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, July 13, 2000 9:23 AM
Subject: instalacia MSDE
> distribuovatelnu verziu (MSDEx86.exe, .., ..), nahlasi mi pocas instalacie
> hlasku :
> The Path specified in a command line argument is invalid:
> C:\WINDOWS\TEMP\PFTD195~TMP\X86\SETUP\setup.iss.
>
> pozeral som sa a ten subor setup.iss tam skutocne nie je. Zmenil som iba
> cestu v unattend.iss z C: na D: a spustil MSDEx86.exe. Robim nieco zle
alebo
> je ta verzia nejak pokazena?.. prip. ak je pokazena, kde najdem dobru
> verziu???
Cestina z FoxPro do Delphi
[*] Lu�ek Tenkr�t - 13.7.2000 14:09:22
Co to je dfb cestinu do Delphi !!! .
Jinak
Otevri *.dbf DB Desktopem. Nastav cestinu dle puvodu ve fox. Vytvor stejnou strukturu treba v Paradoxu, zadej cestinu a
DB Desktopu dej tools - add to db (nebo jak to tam je ).Pak si s tim delej co chces.
Me to fungovalo . Fox-ka to byla ale myslim 2. xx nebo tak n�jak . Query v Gridu
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 13.7.2000 14:10:35
> Zobrazuji data z Query v Gridu. Po doubleclicku otevru okno, ve kterem
> edituji vybrany zaznam, ale primo nad TTable. Po uzavreni okna chci,
> aby se zmenene hodnoty zobrazily zase v Gridu. A ted muj problem:
> vsechno funguje jak ma, pokud soucasti dotazu v Query neni "order by".
> Respektive "order by jinepolenezklic" generuje to divne chovani...
> Jakmile se v SQL objevi tahle klauzule, nefunguje update, ani refresh
> na Query nepomuze. Musim zavolat Close a Open. Moc tomu
> nerozumim...Mel bych editovat pole z toho query primo? Co delam
> spatne?
Jen si tak nejak matne vzpominam, ze query s ORDER BY neco
udelat nejde, mozna requestlive, ale ted nevim. Urcite to je v
archivu. Mimochodem, o jakou databazi jde?
David
Interbase Info
[*] Lu�ek Tenkr�t - 13.7.2000 14:19:45
> Je IB zadarmo ? - zatim ne ,ale vsichni doufame , ze brzy bude
> Jaky typ souboru IB vyuziva ? - jak to myslis ?. IB je SQL database.
> Ma IB nejaka omezeni (napriklad pocet zaznamu v tabulce) ? - nevsim jsem
si. zatim mam jen par milionu zaznamu
> Umi IB indexy ? - na to se radsi neptej , nebo ti uz nikdo neodpovi-
samozrejme, ze jo.
> Je k IB potreba BDE nebo se to da osetrit jinym nastrojem ? Ane i ne.
Pouzivam ne.FreeIBComponens. V D5 mas komponenty komplet
> Vite o nejakych spatnych vlastnostech IB ? - To se zeptej tech co ji nemaj
radi, ja to nejsem
instalacia MSDE
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 13.7.2000 13:20:42
Puvodni zprava, kterou napsal Robert Zak dne 13 Jul 00,:
> Instalujem na Win98 MSDE z CD "MS VISUAL STUDIO 6.0 Plus Pack"- dostal som
> to ako developer edition. Pokial nainstalujem plnu verziu (aj s Enterprise
> Managerom) nainstaluje sa spravne. Pokial ale skusam nainstalovat
> distribuovatelnu verziu (MSDEx86.exe, .., ..), nahlasi mi pocas instalacie
> hlasku :
> The Path specified in a command line argument is invalid:
> C:\WINDOWS\TEMP\PFTD195~TMP\X86\SETUP\setup.iss.
Prekontroluj si ten .BAT soubor, zda obsahuje spravne cesty,
to bude ten problem...
S pozdravem
Petr Zahradnik, pocitacovy expert
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917, PGP vitano
IBExpress, FreeIB a dalsi
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 13.7.2000 14:43:00
> > hledam nejake komponenty pro primy pristup k IB6 z Delphi. Vim o
> > IBExpress v D5, z inetu se da stahnout FreeIB. Jsou i dalsi
> > moznosti? Jake mate zkusenosti s obema uvedenymi, co je lepsi? Mam
> > D4, takze IBExpress nemam momentalne k dispozici. Srovnaval to uz
> > nekdo?
> >
> > Dik, David
>
> Jeste existuji IBObjects, se kterymi zapolim v soucasne dobe ja. Jsou
> dostupne snad i pro D2 a dle mineni mnoha uzivatelu (ja sam jsem
> IBExpress ani FreeIB nepouzival) jsou nejpropracovanejsi => taky
> nejslozitejsi ...
Pravda, nekde v archivu jsem to zahledl, ale taky tam stalo, ze
stoji 400 dolaru. Je ale mozne, ze uz to treba neplati. Nebo se mi
to s necim plete?
David
Praca v team-e
[*] Vito <vito(zv)centrum(tec)cz> - 13.7.2000 15:08:37
FreeVCS sa da stiahnut na:
http://www.thensle.de/index.htm
uzi si ho. Ja to idem prave skusat.
Vito
----- Original Message -----
From: Hynek Svato� <svatos(zv)kam(tec)czu(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, July 13, 2000 1:21 PM
Subject: RE: Praca v team-e
> My pouzivame tento system:
>
> 1) kazdy pracovnik ma svoji lokalni kopii projektu, na ktere pracuje.
> 2) kazdy pracovnik ma svuj pracovni adresar umisteny v adresari, kde se
> nachazi projekt a jen v tomto adresari provadi zmeny
> 3) problem sdilenych dat. struktur a unit je resen pres include soubory
> (*.inc), ktere jsou vlozeny do spolecnych unit, do kterych jinak nikdo
> nezasahuje
> napr.: unit Counts.pas obsahuje toto:
> {$I Clovek1.inc}
> {$I Clovek2.inc}
> const MaxCount = CLOVEK1_MAX_COUNT + CLOVEK2_MAX_COUNT;
>
> a includove soubory obsahjuji deklarace:
> napr.: Clovek1.inc:
> const CLOVEK1_MAX_COUNT = 1;
>
> takto lze dosahnout pomerne jednoducheho sdileni kodu a dat, pricemz
nehrozi
> vzajemne zasahovani do kodu.
>
> 4) pri procesu synchronizace se proste nahraji do centralniho projektoveho
> adresare JEN praqcovni adresare jednotlivych vyvojaru a stai prekompilovat
a
> vse musi bezet.
>
> Ma to ale i jednu nevyhodu: pri takto definovane strukture je potreba mit
> strukturu aplikace dopredu dobre promyslenou a mit vlastne vytvoreny
> aplikacni framework (coz ale vlastne neni zase nevyhoda, tak nevim :-O).
>
> PS: FreeVCS neznam, kde se da stahnout? Je to dobry ?
>
> Keep mailing :-)
> =========================
> Hynek Svato�
> svatos(zv)kam(tec)czu(tec)cz
> hynek.svatos(zv)atlas(tec)cz
> =========================
>
> > >Mohol by mi niekto poradit, ako pracovat v team-e pod D4 alebo D5? Sme
> > prepojeny sietou a potrebujeme pracovat naraz na jednom projekte.
Pomozte
> > prosom zufalej trojici.
> > >Vito
> >
> >
> > Zkouseli jste FreeVCS?
> >
> > Zdravi
> > Dalibor Toman
> >
> >
>
>instalacia MSDE
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 13.7.2000 15:13:10
On 13 Jul 2000, at 9:23, Robert Zak wrote:
> Instalujem na Win98 MSDE z CD "MS VISUAL STUDIO 6.0 Plus Pack"-
> dostal som
> to ako developer edition. Pokial nainstalujem plnu verziu (aj s
> Enterprise Managerom) nainstaluje sa spravne. Pokial ale skusam
> nainstalovat distribuovatelnu verziu (MSDEx86.exe, .., ..), nahlasi mi
> pocas instalacie hlasku : The Path specified in a command line
> argument is invalid: C:\WINDOWS\TEMP\PFTD195~TMP\X86\SETUP\setup.iss.
Precti si poradne prilozene readme a delej to presne podle toho. To
znamena, ze musis uvadet plnou cestu na iss soubor.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
DDE v podruznem threadu pod Windows NT (D5prof+U1,
[*] Petr Fejfar <Petr.Fejfar(zv)callnet(tec)cz> - 13.7.2000 15:43:13
Hi all,
od dob D1 pouzivame DDE komunikaci s MS Excelem a s dalsimi programy. Bez problemu jsme ji prenesli do 32-bitu, ale kdyz jsme aplikaci prepsali jako multithreaded, zjistili jsme, ze pod NT+SP5 spojeni nepracuje, kdyz se pouziva v podruznem threadu (pracuje to jen v main threadu). SetLink() sice spusti Excel, ale vrati chybu. Pokus chybu ignorovat take nevysel.
Nevi nekdo, proc to pod NT nebezi, kdyz napr. pod W98 to pracuje bez ohledu na thread, ze ktereho se spojeni navazuje? Neni zde nejaky trik jako u OLE, kdy se pro obdobny pripad musi vhodne nastavit jeste pred Application.Init() globalni promenna CoInitFlags?
Thanx pf, Petr.Fejfar(zv)callnet(tec)cz
IBExpress, FreeIB a dalsi
[*] Tomas =?iso-8859-2?Q?Michal=EDk?= <michalik(zv)proca(tec)cz> - 13.7.2000 15:47:22
Ahoj,
David Lebeda wrote:
>
> > > hledam nejake komponenty pro primy pristup k IB6 z Delphi. Vim o
> > > IBExpress v D5, z inetu se da stahnout FreeIB. Jsou i dalsi
> > > moznosti? Jake mate zkusenosti s obema uvedenymi, co je lepsi? Mam
> > > D4, takze IBExpress nemam momentalne k dispozici. Srovnaval to uz
> > > nekdo?
> > >
> > > Dik, David
> >
> > Jeste existuji IBObjects, se kterymi zapolim v soucasne dobe ja. Jsou
> > dostupne snad i pro D2 a dle mineni mnoha uzivatelu (ja sam jsem
> > IBExpress ani FreeIB nepouzival) jsou nejpropracovanejsi => taky
> > nejslozitejsi ...
>
> Pravda, nekde v archivu jsem to zahledl, ale taky tam stalo, ze
> stoji 400 dolaru. Je ale mozne, ze uz to treba neplati. Nebo se mi
> to s necim plete?
Neplete, ale je to trochu jinak. $400.- stoji verze s plnymi zdrojovymi
kody (s castecnymi stoji $200.-), pokud ale prohlasis, ze to chces pro
nekomercni vyuziti (nebo jsi student, nebo se jen chces neco noveho
naucit), dostanes plnou verzi zdarma s tim, ze cenu zaplatis pouze
tehdy, budes-li diky IBObjects sam neco vydelavat - tzv. "trustware
license". Plnou verzi dostanes i tehdy, budes-li prispivat k dalsimu
vyvoji. Vice informaci je na nasledujici adrese http://www.ibobjects.com
>
> David
Tom
=================================
Tomas Michalik
ProCA, s. r. o.
V Luzich 818, Praha 4
Czech Republic
e-mail: michalik(zv)proca(tec)cz
tel: +420 2 67283446
algoritmus AND OR
[*] JmisekDelphi <JmisekDelphi(zv)atlas(tec)cz> - 13.7.2000 16:38:48
Zdravim
Nemmate nekdo priklad jak se da naprogramovat algoritmus vyhledani souboru
dle stringu a s AND a OR. Castecne jsem se jiz chytil ale potreboval bych
popostrcit dal.
Je mi jasne ze rekruizivne budu projizdet vsechny soubory na disku pomoci
findfirst a findnext
v kazdem cyklu pak budu analizovat jmeno souboru:
Dejme tomu ze mam retezec Find
((Filename:aaa.txt)OR(filename:bbb.txt))AND((dir:CastJmenaAdresare)AND(Dir:J
estemusiobsahovattoto))
mi jasne ze pro kazdou polozku budu mit nejakou funkci napriklad
Dirname(CastJmenaDir : string) : boolean
kterou budu poustet pro kazdou polozku dir, to same pro jmena souboru.
Dale si myslim ze budu mit funkci ktera bude analizovat string Zanalizuj(s :
string) ktera bude volat sama sebe. vzdy zanalizuje dve polozky mezi dvema
zavorkami a pokud se polozka sklada z vice polozek zavola sama sebe.
Asi to bude masitej algoritmus. Prosim pokud uz jste nekdo neco podbneho
resil, nebo mate priklad jak na to prosim dejte mi zpravu.
dynamicke tabulky
[*] Flon <flon(zv)pobox.sk> - 13.7.2000 16:42:06
Tak tabulky vytvarej dynamicky. Tabulka := TTable.Create(Self); A muzes si to zastresit nejakou svoji funkci Otevri a Zavri, neco jako
Provedure Otevri(Tabulka : String);
Begin
Tabulka := TTable.Create(Self);
*************************************************
****** nebude tu konflikt String a TTable ???????
**************************************************
Tabulka.Name := Tabulka;
Tabulka.TableName := Tabulka;
Tabulka.Open;
End;
Procedure Zavri(Tabulka : String);
Begin
Tabulka.Close;
Tabulka.Free;
End;
K tabulkam pak pristupujes pres jejich jmeno. Pokud udelas Otevri('Adresy'), tak pak Adresy.FieldByName(.... Jedine omezeni je, ze nemuzes otevrit 2 tabulky se stejnym jmenem - kolize jmen objektu. Je to pouze hruba kostra bez osetreni chyb.
Jan Fiala
----- Original Message -----
From: "Flon" <flon(zv)pobox.sk>> Zdravim !
>
> Mam mnozstvo tabuliek, cca 50, zda sa mi blbe hodit na Form 50 komponent Table. Taktiez riesenie, kde by som mal menej komponent (priblizne 10-20), tie by boli len pre tabulky, s ktorymi sa pracuje, sa mi tiez nezda moc optimalne... Mam predstavu o vytvoreni nejakej funkcie, napr. otvor(tabulka) a zatvor(tabulka), ktora by dynamicky alokovala a uvolnovala prostriedky, lenze neviem ako na to....
> Je potrebne si uvedomit, ze tabulky nebudu otvarane a zatvarane v rovnakom poradi a taktiez, ze ich bude naraz otvorenych viacero...
>
> Za kazdu radu Vdaka... Flon...
>
> P.S. : Win95/98,D3
____________________________________
P. S. V. P. U.
http://www.pobox.sk/
Nstaveni kurozru mysi
[*] JmisekDelphi <JmisekDelphi(zv)atlas(tec)cz> - 13.7.2000 16:56:46
Zdravim
Nevite nekdo jak se da v delphi nastavit kurzor mysi na pozici x,y na
dektopu, pripadne jak vyvolat kliknuti
diky
dynamicke tabulky
[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 13.7.2000 18:43:22
Mas pravdu. Ja hlava dubova pouze zkopiroval prvni radek. Upravene by to
mohlo byt asi takhle :
Procedure Otevri(Tabulka : String);
Begin
With TTable.Create(Self) do begin
Name := Tabulka;
TableName := Tabulka;
{ tady pak nastavit dalsi vlastnosti jako napr. database, TableType apod. Je
to pouze priklad}
Open;
End;
End;
Procedure Zavri(Tabulka : TTable);
Begin
Tabulka.Close;
Tabulka.Free;
End;
Jan Fiala
----- Original Message -----
From: "Flon" <flon(zv)pobox.sk>> Tak tabulky vytvarej dynamicky. Tabulka := TTable.Create(Self); A muzes si
to zastresit nejakou svoji funkci Otevri a Zavri, neco jako
>
> Provedure Otevri(Tabulka : String);
> Begin
> Tabulka := TTable.Create(Self);
>
>
> Tabulka.Name := Tabulka;
> Tabulka.TableName := Tabulka;
> Tabulka.Open;
> End;
>
> Procedure Zavri(Tabulka : String);
> Begin
> Tabulka.Close;
> Tabulka.Free;
> End;
>
> K tabulkam pak pristupujes pres jejich jmeno. Pokud udelas
Otevri('Adresy'), tak pak Adresy.FieldByName(.... Jedine omezeni je, ze
nemuzes otevrit 2 tabulky se stejnym jmenem - kolize jmen objektu. Je to
pouze hruba kostra bez osetreni chyb.
>
> Jan Fiala
>
> ----- Original Message -----
> From: "Flon" <flon(zv)pobox.sk>
>
> > Zdravim !
> >
> > Mam mnozstvo tabuliek, cca 50, zda sa mi blbe hodit na Form 50 komponent
Table. Taktiez riesenie, kde by som mal menej komponent (priblizne 10-20),
tie by boli len pre tabulky, s ktorymi sa pracuje, sa mi tiez nezda moc
optimalne... Mam predstavu o vytvoreni nejakej funkcie, napr. otvor(tabulka)
a zatvor(tabulka), ktora by dynamicky alokovala a uvolnovala prostriedky,
lenze neviem ako na to....
> > Je potrebne si uvedomit, ze tabulky nebudu otvarane a zatvarane v
rovnakom poradi a taktiez, ze ich bude naraz otvorenych viacero...
> >
> > Za kazdu radu Vdaka... Flon...
> >
> > P.S. : Win95/98,D3
> ____________________________________
> P. S. V. P. U.
> http://www.pobox.sk/
>
>Jak docilit presmerovani focusu do zvoleneho formu
[*] Pavel �ern� - 13.7.2000 20:36:29
Prosim o pomoc. Oteviram formy v nejakem poradi, treba
MAIN - FormA - FormB.
Pokud za teto situace zavru FormB, automaticky dostane
focus FormA.
Potrebuji docilit toho, aby po zavreni FormB (a jeho uvolneni z pameti)
dostal focus MAIN. Ten totiz provede ReLogin uzivatele, pritom
zavre vsechna otevrena okna .... Pokud tento ReLogin spustim z
jineho nez MAIN formu, zavru vsechny formy okolo, tak si
uriznu vetev pod zadkem a pada to na chybu.
Poradi nekdo kudy na to ? Diky.
Pavel �ern�
email: pavel(zv)cerny-ps(tec)cz
Vybarven� ��dky DBGrid po cliku
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 13.7.2000 21:09:05
From: "Jirka Virt" <virt(zv)volny(tec)cz>
> nezkousel jste nekdo vybarvovat aktualni radku v DBGRIDU. Jedna se mi o to,
> jakmile stknu mys na radce, aby se cela vybarvila.Options RowSelect mi
> nevyhovuje,protoze pri ni nezjistim cislo sloupce, na kterem stojim resp.
> vraci stale cislo prvniho sloupce.
Ahoj,
pokud jsem to dobre pochopil, tak ti jde o to aby se vybrany zaznam vykreslil
jinou barvou. Nastav u DBGridu v OI DefaultDrawing na False a pak do udalosti
OnDrawColumnCell zapis tohle:
type
TDBGridHack = class(TDBGrid);
procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
var
TitlesOfs: Integer;
begin
with TDBGridHack(Sender) do
begin
if dgTitles in Options then TitlesOfs := 1 else TitlesOfs := 0;
if DataLink.ActiveRecord = Row - TitlesOfs then
Canvas.Brush.Color := clRed;
DefaultDrawColumnCell(Rect, DataCol, Column, State);
if gdFocused in State then DrawFocusRect(Canvas.Handle, Rect);
end;
end;
Petr Vones, amatersky programator
DDE v podruznem threadu pod Windows NT (D5prof+U1,
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 13.7.2000 21:09:21
From: "Petr Fejfar" <Petr.Fejfar(zv)callnet(tec)cz>
> od dob D1 pouzivame DDE komunikaci s MS Excelem a s dalsimi programy. Bez
> problemu jsme ji prenesli do 32-bitu, ale kdyz jsme aplikaci prepsali jako
> multithreaded, zjistili jsme, ze pod NT+SP5 spojeni nepracuje, kdyz se
> pouziva v podruznem threadu (pracuje to jen v main threadu). SetLink()
> sice spusti Excel, ale vrati chybu. Pokus chybu ignorovat take nevysel.
>
> Nevi nekdo, proc to pod NT nebezi, kdyz napr. pod W98 to pracuje bez ohledu
> na thread, ze ktereho se spojeni navazuje? Neni zde nejaky trik jako u OLE,
> kdy se pro obdobny pripad musi vhodne nastavit jeste pred Application.Init()
> globalni promenna CoInitFlags?
Ahoj,
pokud je to jen trochu mozne tak bych DDE rychle zahodil a pouzil spise OLE
Automation (to totiz funguje vzdycky). Ohledne pouziti DDE komponent z threadu,
je zvlastni ze to pod Win98 funguje. DDE se inicializuje pomoci DdeInitialize,
pricemz tato inicializace je platna pro dany thread (alespon jak tvrdi MS).
Dale pri pouziti VCL komponent je treba brat zretel na to, ze VCL neni thread
safe. Pokud by jsi presto nejakym zpusobem pracoval s DDE ve vlastni threadu
bude asi take nutne aby mel vlastni smycku zpracovani zprav, protoze DDE je na
nich zalozene. Zkratka jsou s tim jen problemy a Excel se pres OLE Automation
ovlada pomerne dobre.
Petr Vones, amatersky programator
WinBase 602
[*] igor klepoch <klepoch(zv)ba.sknet.sk> - 13.7.2000 21:29:44
Ja som zatial skusal mODBC. Ide to celkom spolahlivo,
az na male chybicky, resp. rozdiely oproti BDE + paradox.
----- Original Message -----
From: <rjunga(zv)oku-ka(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, July 12, 2000 2:17 PM
Subject: WinBase 602
> Ahoj vsichni.
>
> Nepouziva nekdo z vas SQL server WinBase602 a komponenty pro Delphi?
> Potreboval bych prave ty komponenty pro Delphi5. Soft602 sice komponenty
> dodava, ale jen pro Delphi3.
>
> Pomozte mi nekdo.
>
> Dik, Roman
> CASE & mySQL
[*] L. ZITA <konference(zv)sales(tec)cz> - 13.7.2000 21:58:52
Behalf Of Martin Lasevic
> Zdravim a omlouvam se za OT. Nevite nekdo o nejakem slusnem CASE
> nastroji pro praci s mySQL?
>
> Diky
>
Ahoj.
Neco jsem zpatlal.
Najdes to na http://www.sales(tec)cz/download/index.phtml?sw=mydbex
Ludek
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.145 / Virov� b�ze: 69 - datum vyd�n�: 4.5.2000
Re[2]: Dotaz amatera
[*] Hurricane <hurricane(zv)email(tec)cz> - 13.7.2000 22:48:08
Zdravim
Nevim jestli sem dobre pochopil, ale pokusim se. Pro vytvoreni nove
komponenty pouzij pruvodce (asi New component) a jako Ancestora zvol
TPanel. Kdyz tu komponentu nainstalujes, bude to UPLNE stejny jako TPanel.
Do procedury Create ty komponenty si potom nahazej vytvareni dalsich
komponent (pomoci Create) a nastaveni jejich vlastnosti atd.
Hurricane
----- Original Message -----
> Proste jak se tvori komponenta typu tpanel, ktera muze obsahovat dalsi
> komponenty. a jak se potom tvori tyto komponenty.Drag'n'Drop
[*] Hurricane <hurricane(zv)email(tec)cz> - 13.7.2000 22:54:29
Zdravim
A jak to, podle me by se takhle dalo vyresit to testovani, jestli je
pretahovana komponenta (a tudiz i mys a kurzor) nad jinou. Tim, ze se Handle
z funkce shoduje s Handlem Parenta te pretahovane komponenty znamena, ze
komponenta (resp. mysi kurzor) nic neprekryva. To tys odpovidal na
nepolozenou otazku, Zbysek se NEptal, jak udelat pouze ramecek, ten
oznamoval, ze udelal komponentu, ktera se zobrazuje cela.
Hurricane
----- Original Message -----
> > Probiralo se tady tema, jak zjistit Handle okna, nad kterym je prave
> > kurzor. Uz nevim, jestli staci jenom najet mysi nebo se musi kliknout,
> > ale podle me by molo stacit najeti. Jak se to dela nevim, ale nekdo
> > jinej to urcite vi. No a potom akorat staci testovad Handle Formu
> > (popripade jinyho Parenta) a handle z ty funkce.
>
> Clovece, ty odpovidas na uplne neco jineho...
>
> > ----- Original Message -----
> > > Mam problem s implementaci Drag'n'Drop.
> > > Vytvoril jsem si komponetu a implementoval na ni vlastni Drag'n'Drop
> > > tak,
> > ze pokud komponentou pretahuji, zobrazuje se cela (ne napr. pouze
> > ramecek, tak jak je to v pri navrhu formulare - v design time). >
> > Potrebuji pri pretahovani zjistit, zda-li tato pretahovana komponenta
> > se nenachazi nad jinou,tj. zda ji neprekryva. > Pokud ma nekdo namet
> > na reseni tohoto problemu, budu velice rad, kdyz odpovi.
>
> Pokud chces ramecek, musis si vytvorit novou komponentu, ze
> ktere vymalujes jen ten ramecek, jinak bude pruhledna. S
> rameckem budes tahat po formulari, a v okamziku, kdy ji nekde
> upustis, presunes vlastni komponentu a pomocny ramecek zrusis.
>
> Pokud chces pri pretahovani testovat prekryti pres jinou
> komponentu, pak se podivej na RectInRegion. Kazdopadne budes
> muset vzdy otestovat, zda nektery z okraju neprotina jinou
> komponentu.Tipy do Delphi
[*] Petr Voborn�k <vobornik(zv)ssakhk(tec)cz> - 14.7.2000 04:44:48
Program Tipy & Triky do Delphi jsem na cetne zadosti vylepsil o trideni do
kategorii. Novou verzi programu s muzete st�hnout na stej� adrese,
nebo nechat progam automaticky updatovat (mate-li ho jiz). Databaze s Tipy
bude v budoucnu vzrustat! Take ocekavam vase na UpLoad vasich Tipu.
http://www.mujweb(tec)cz/pocitace/testy/tips/tips.zip
MIKMIK company
Petr Voborn�k - P�tr
vobornik(zv)ssakhk(tec)cz
ICQ: #23132120
www.ssakhk(tec)cz/home/vobornik/Jak docilit presmerovani focusu do zvoleneho formu
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 14.7.2000 06:45:38
> Prosim o pomoc. Oteviram formy v nejakem poradi, treba
> MAIN - FormA - FormB.
>
> Pokud za teto situace zavru FormB, automaticky dostane
> focus FormA.
>
> Potrebuji docilit toho, aby po zavreni FormB (a jeho uvolneni z
> pameti) dostal focus MAIN. Ten totiz provede ReLogin uzivatele, pritom
> zavre vsechna otevrena okna .... Pokud tento ReLogin spustim z jineho
> nez MAIN formu, zavru vsechny formy okolo, tak si uriznu vetev pod
> zadkem a pada to na chybu.
Nevim, zda v tom neni nejaky zakopany pes, ale Main.SetFocus
by nekde vhodne umistene nestacilo?
David
Praca v team-e
[*] Ji�� Fait���}���6���3 - 14.7.2000 06:49:25
FVCS Pouzivame uz vice nez rok. Teamsource jsme take zkusily ale je to jen
takove "�id�tko". FVCS vrele doporucuji, ale ne s BDE server. Pouzivame
DBISAM variantu.
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Hynek Svato�
Sent: Thursday, July 13, 2000 1:21 PM
To: delphi-l(zv)fwd(tec)cz
Subject: RE: Praca v team-e
My pouzivame tento system:
1) kazdy pracovnik ma svoji lokalni kopii projektu, na ktere pracuje.
2) kazdy pracovnik ma svuj pracovni adresar umisteny v adresari, kde se
nachazi projekt a jen v tomto adresari provadi zmeny
3) problem sdilenych dat. struktur a unit je resen pres include soubory
(*.inc), ktere jsou vlozeny do spolecnych unit, do kterych jinak nikdo
nezasahuje
napr.: unit Counts.pas obsahuje toto:
{$I Clovek1.inc}
{$I Clovek2.inc}
const MaxCount = CLOVEK1_MAX_COUNT + CLOVEK2_MAX_COUNT;
a includove soubory obsahjuji deklarace:
napr.: Clovek1.inc:
const CLOVEK1_MAX_COUNT = 1;
takto lze dosahnout pomerne jednoducheho sdileni kodu a dat, pricemz nehrozi
vzajemne zasahovani do kodu.
4) pri procesu synchronizace se proste nahraji do centralniho projektoveho
adresare JEN praqcovni adresare jednotlivych vyvojaru a stai prekompilovat a
vse musi bezet.
Ma to ale i jednu nevyhodu: pri takto definovane strukture je potreba mit
strukturu aplikace dopredu dobre promyslenou a mit vlastne vytvoreny
aplikacni framework (coz ale vlastne neni zase nevyhoda, tak nevim :-O).
PS: FreeVCS neznam, kde se da stahnout? Je to dobry ?
Keep mailing :-)
=========================
Hynek Svato�
svatos(zv)kam(tec)czu(tec)cz
hynek.svatos(zv)atlas(tec)cz
=========================
> >Mohol by mi niekto poradit, ako pracovat v team-e pod D4 alebo D5? Sme
> prepojeny sietou a potrebujeme pracovat naraz na jednom projekte. Pomozte
> prosom zufalej trojici.
> >Vito
>
>
> Zkouseli jste FreeVCS?
>
> Zdravi
> Dalibor Toman
>
>
---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.167 / Virov� b�ze: 80 - datum vyd�n�: 29.6.2000
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.167 / Virov� b�ze: 80 - datum vyd�n�: 29.6.2000
WinBase 602
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 14.7.2000 07:02:43
> Ja som zatial skusal mODBC. Ide to celkom spolahlivo,
> az na male chybicky, resp. rozdiely oproti BDE + paradox.
S mODBC jsem chvilku delal na MSSQL7 a nelibilo se mi.
1) Ve srovnani s jinymi variantami vcetne BDE + ODBC bylo
znatelne pomalejsi
2) Problematicke ulozene procedury (nevim, zda na Winbase602
existuji, ale presto) - neumi vratit dataset (ta komponenta),
pomerne tezko se pouziva predavani parametru.
3) Ziskal jsem dojem, ze nektere veci jsou neimplementovane nebo
jsou implementovane spatne (napr. pri pouziti kurzor library (klient,
server, ODBC driver) mi fungovala jen jedna volba, ted nevim ktera,
nejake chyby pri praci s kurzory - to bude vedet asi Sroub, pokud
se nepletu).
Doporucuji prostudovat ODBCe od L. Fuleho, ktere funkcnost
mODBC nejen pokryva, ale dalece prevysuje. (Ale nikoho
samozrejme nenutim - doufam, ze to tak nevyznelo).
Uznavam, ze ve vztahu k puvodnimu dotazu je to tak trochu OT,
protoze z dotazu neplyne, zda by pro tazatele byla cesta pres
ODBC prijatelna, ale nemuzu si to odpustit :)
David
Tipy do Delphi
[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 14.7.2000 07:46:57
ahoj
> Program Tipy & Triky do Delphi jsem na cetne zadosti vylepsil
program vypada dobre, ale pokus o download vyhodi chybu spojeni.
jsem za proxinou a mame pevnou lajnu. nikde jsem nenasel zadne nastaveni
zpusobu pripojeni.
plz help.
dekuji peca
btw: sdilena databaze TaT po netu je docela dobrej napad :)
~~~~~~~~~~~~~~~~~~~~~~~~
[smtp:palicka(zv)aginfo(tec)cz]
~~~~~~~~~~~~~~~~~~~~~~~~
ZEMEDELSKA INZERCE ZDARMA www.aginfo(tec)cz
inzeraty zasilejte pisemne nebo e-mailem: inzerce(zv)aginfo(tec)cz
Dotaz na stored proc
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 14.7.2000 07:49:24
Ahoj,
uz delsi dobu nejak nemuzu prijit na to, zda jde provest SQL dotaz
nad daty vracenymi ulozenou procedurou. Konkretne mi jde o
vestavenou ulozenou proceduru MSSQL serveru sp_tables, ktera
vraci seznam tabulek. Jeste vice konkretne - rad bych se v triggeru
presvedcil, zda existuje tabulka s urcitym jmenem. Vim, ze to sice
muzu udelat selectem nad sysobjects, ale to muze byt v
budoucich verzich SQL serveru upraveno, kdezto u pouziti
sp_tables toto nehrozi.
Jde mi ted o to, zda vubec existuje zpusob, jak delat dotazy
nad ulozenymi procedurami.
Dik, David
DDE v podruznem threadu pod Windows NT (D5prof+U1,
[*] Petr Fejfar <Petr.Fejfar(zv)callnet(tec)cz> - 14.7.2000 07:54:21
Petr Vones <pvones(zv)mbox.vol(tec)cz> wrote:> pokud je to jen trochu mozne tak bych DDE rychle zahodil
O.K. Pro Excel jsme samozrejme na OLE presli, ale pouzivali jsme to i pro jine servery, na ktere se pres OLE nedostaneme.> pouzil spise OLE Automation (to totiz funguje vzdycky).
Vzdycky ne :-) Nejdriv musis v .dpr souboru zmenit default nastaveni promenne CoInitFlags, jinak to v podruznem threadu taky nepracuje:
CoInitFlags := COINIT_MULTITHREADED;
...
Appliction.Initialize;
...
>Ohledne pouziti DDE komponent z threadu,
>je zvlastni ze to pod Win98 funguje.
Ano, zvlastni to je - nakonec - nam ten bug nasli az zakaznici, protoze kdyz jsme testovali pristup na Excel lokalne prikazy z GUI, tak se to poustelo v hlavnim threadu a pracovalo to i pod NT. A pod W95/98 to jede vsechno bez problemu.>safe. Pokud by jsi presto nejakym zpusobem pracoval s DDE ve vlastni threadu
>bude asi take nutne aby mel vlastni smycku zpracovani zprav, protoze DDE je na
>nich zalozene.
Mas na mysli, ze by se mel motat v necem takovem?
...
if PeekMessage(Msg,0,0,0,PM_REMOVE) do
begin
...
TranslateMessage(Msg);
DispatchMessage (Msg);
end;
...
bye pf, Petr.Fejfar(zv)callnet(tec)cz
Query v Gridu
[*] Ren� Otisk - 14.7.2000 08:04:29
Hi
Jo, kdyz je SQL prikazu klauzule ORDER BY tak vysledek nelze editovat - je
ReadOnly.
Sroub
> > Zobrazuji data z Query v Gridu. Po doubleclicku otevru okno, ve kterem
> > edituji vybrany zaznam, ale primo nad TTable. Po uzavreni okna chci,
> > aby se zmenene hodnoty zobrazily zase v Gridu. A ted muj problem:
> > vsechno funguje jak ma, pokud soucasti dotazu v Query neni "order by".
> > Respektive "order by jinepolenezklic" generuje to divne chovani...
> > Jakmile se v SQL objevi tahle klauzule, nefunguje update, ani refresh
> > na Query nepomuze. Musim zavolat Close a Open. Moc tomu
> > nerozumim...Mel bych editovat pole z toho query primo? Co delam
> > spatne?
>
> Jen si tak nejak matne vzpominam, ze query s ORDER BY neco
> udelat nejde, mozna requestlive, ale ted nevim. Urcite to je v
> archivu. Mimochodem, o jakou databazi jde?
>
> David
Dotaz na stored proc
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 14.7.2000 08:05:41
> -----P�vodn� zpr�va-----
> Od: David Lebeda [mailto:david.lebeda(zv)comarr(tec)cz]
> Odesl�no: 14. �ervence 2000 7:49
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Dotaz na stored proc
>
>
> Ahoj,
>
> uz delsi dobu nejak nemuzu prijit na to, zda jde provest SQL dotaz
> nad daty vracenymi ulozenou procedurou. Konkretne mi jde o
> vestavenou ulozenou proceduru MSSQL serveru sp_tables, ktera
> vraci seznam tabulek. Jeste vice konkretne - rad bych se v triggeru
> presvedcil, zda existuje tabulka s urcitym jmenem. Vim, ze to sice
> muzu udelat selectem nad sysobjects, ale to muze byt v
> budoucich verzich SQL serveru upraveno, kdezto u pouziti
> sp_tables toto nehrozi.
> Jde mi ted o to, zda vubec existuje zpusob, jak delat dotazy
> nad ulozenymi procedurami.
>
> Dik, David
Nejsem velky databazista, nevim jestli lze nad procedurou udelat treba view,
ale co by slo urcite, je vyhrnout vysledek procedury do temporary table
a udelat select nad temp tabulkou.
Jura
WinBase 602
[*] Ren� Otisk - 14.7.2000 08:10:16
Hi,
S MODBC jsem se spalil. Neumi dynamic cursor...
Sroub
> Ja som zatial skusal mODBC. Ide to celkom spolahlivo,
> az na male chybicky, resp. rozdiely oproti BDE + paradox.
>
>
>
> > Ahoj vsichni.
> >
> > Nepouziva nekdo z vas SQL server WinBase602 a komponenty pro Delphi?
> > Potreboval bych prave ty komponenty pro Delphi5. Soft602 sice komponenty
> > dodava, ale jen pro Delphi3.
> >
> > Pomozte mi nekdo.
> >
> > Dik, Roman
> >Jak docilit presmerovani focusu do zvoleneho formu
[*] Hynek Svato� <svatos(zv)kam(tec)czu(tec)cz> - 14.7.2000 08:39:41
Co zkusit zaregistrovat vlastni message a poslat ho tomu mainFormu ?
unit MainForm;
var MSG_RELOGIN: Integer;
initialization
MSG_RELOGIN = RegisterWindowMessage('MSG_RELOGIN');
unit FormB;
OnClose:
PostMessage(MainForm.Handle, MSG_RELOGIN);
...
Keep mailing :-)
=========================
Hynek Svato�
svatos(zv)kam(tec)czu(tec)cz
hynek.svatos(zv)atlas(tec)cz
=========================
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Pavel �ern�
> Sent: Thursday, July 13, 2000 8:36 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Jak docilit presmerovani focusu do zvoleneho formu poForm.Close
>
>
> Prosim o pomoc. Oteviram formy v nejakem poradi, treba
> MAIN - FormA - FormB.
>
> Pokud za teto situace zavru FormB, automaticky dostane
> focus FormA.
>
> Potrebuji docilit toho, aby po zavreni FormB (a jeho uvolneni z pameti)
> dostal focus MAIN. Ten totiz provede ReLogin uzivatele, pritom
> zavre vsechna otevrena okna .... Pokud tento ReLogin spustim z
> jineho nez MAIN formu, zavru vsechny formy okolo, tak si
> uriznu vetev pod zadkem a pada to na chybu.
>
> Poradi nekdo kudy na to ? Diky.
>
> Pavel �ern�
> email: pavel(zv)cerny-ps(tec)cz
>Zaloha komponent
[*] Milan ��ek - 14.7.2000 08:41:59
ahoj,
mam nasledujici dotaz: jakym zpusem se daji uchovat nainstalovane komponenty
a konfigurace palety komponent, abych je mohl pri pripadne reinstalaci
delphi rychle a bez problemu nacist. Uz me porad nebavi pri kazde
reinstalaci instalovat vse znovu a stale konfigurovat paletu podle mych
predstav...
Mozna by stacilo zazalohovat LIB\*.* (jinam komponenty nedavam),
dclust40.bpl, pripadne neco dalsiho.... potrebuju to upresnit. Dik
S pozdravem Milan Cizek, amatersky programator, D4 CS
Win98 a Win2k, cizek.milan(zv)seznam(tec)cz, ICQ: 59826637
Integracia QuickView
[*] Ing. Csaba Kissi <ckissi(zv)email(tec)cz> - 14.7.2000 09:11:14
Vie my niekto pomoct ako integrovat QuickView priamo do programu a zobrazovat
v nom dokumenty podobne ako to robi PowerDesk ?
Csaba.Tipy do Delphi
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 14.7.2000 09:22:51
> > Program Tipy & Triky do Delphi jsem na cetne zadosti vylepsil
> program vypada dobre, ale pokus o download vyhodi chybu spojeni.
> jsem za proxinou a mame pevnou lajnu. nikde jsem nenasel zadne
> nastaveni zpusobu pripojeni. plz help.
>
> dekuji peca
>
> btw: sdilena databaze TaT po netu je docela dobrej napad :)
Zdravim,
nemam momentalne cas se na ten program podivat, proto prosim o
vysvetleni.
Kdyz mam nejaky problem, obvykle projdu archiv a casto tam
najdu reseni. Pokud jsem to dobre pochopil, program Tipy a Triky
spravuje nejakou vlastni databazi, ktera se casem zrejme naplni.
Ale: ma to vubec sanci konkurovat archivu teto konference?
Povazuji obecne za zbytecne, kdyz kdejaky fanousek Delphi zalozi
na sve strance stranku s cilem shromazdovat tam finty k Delphi
(napr. web.telecom(tec)cz/mister, pokud to jeste plati), protoze tam je
obvykle jen malo veci a takovych stranek se toula po inetu
spousta, takze je prakticky vyloucene je prohledavat.
Nepovede T&T zase k situaci, kdy kdyz clovek bude chtit neco
najit, bude muset prohledat celou radu zdroju?
Aby bylo jasno - nic ve zlym, mozna se mylim a vsechno je jinak.
Ja se jen ptam, jak je to doopravdy.
David
Jak vypnout Explorer ?
[*] Tom�s Janta��������{����Y��̿ - 14.7.2000 09:29:52
Ahoj,
Mam problem se zabezpecenim pocitace na kterem by mel bezet merici soft.
Je treba zabranit obsluze hrat hry a hrabat se v systemu.
Protoze bude pocitac urcen pouze pro mereni, neni nutny pristup k zadnym
funkcim windows ani na zadny disk.
Zpristupneni systemu by melo byt pouze pod heslem. Zatim jsem tento problem
vyresil tak ze jsem schoval Taskbar a vypnul klavesove zkratky Windows.
Napadlo me ze lepsim resenim by bylo vypnout explorer a v pripade potreby ho
za pomoci programu opet zapnout.
Nevite nekdo jak na to ?
NT, Linux nebo jiny system pro tuto aplikaci neni vhodny.
Tomas Jantac
Praca v team-e
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 14.7.2000 09:45:41
Ahoj,
existuje relativne dost nastroju:
FreeVCS... nemam zkusenosti
TeamSource... byt to semestralni prace, reknu, ze je pekna, ale vzhledem k
tomu, ze se to Borland nestydi prodavat, rikam, ze jde o hruzu
Visual SourceSafe... je to dobry, ale ma to jiste veci, ktere se mi nelibi (wiz
recenze na VSS v SWN 4/00 nebo jeji zneni na MS:
http://www.microsoft.com/cze/clanky/vyvoj/200004_SN_6566.htm)
PVCS... dooost dobry nastroj
Existuje i integrace VSS ci PVCS s Delphi, ale nemam u sebe ty spravne
linky.
Slavek
Re[2]: Dotaz amatera
[*] Pavel Vasek <pavel.vasek(zv)wige-mic(tec)cz> - 14.7.2000 10:01:32
No to je velice jednoduche, ale myslim, ze nejlepe udelas, kdyz jsi koupis
nejakou knizku
napr. na komponenty je skvela Borland Delphi-Pruvodce vyvojare III. od Steve
Teixeira & Xavier Pacheco z vydavatelstvi Unis (290 KC),
tam najdes o komponentach opravdu hodne. Urcite o vse a i o komponentach je
kazda z knih Mistrovstvi v Delphi, nejlepsi asi ta o Delphi 3, ale ta je uz
dost draha (cca 1000KC). Jestli jsem te nepresvedcil zkusim napsat nejaky
priklad takove kontejnerove komponenty.
vytvoris potomka TPanelu, mozna lepe TCustomPanel. Kod by mohl vypadat asi
nasledovne.
type
TMyPanel = class(TCustomPanel)
private
FButton: TButton;
function GetButtonCaption: string;
procedure SetButtonCaption(const Value: string);
protected
public
constructor Create(AOwner: TComponent); override;
destructor Destroy; override;
published
property ButtonCaption: string read GetButtonCaption write
SetButtonCaption; // pr. zapouzdreni property buttonu
property Button: TButton read FButton; // pr. property pro primy pristup
k buttonu
end;
implementation
{ TMyPanel }
constructor TMyPanel.Create(AOwner: TComponent);
begin
inherited Create(AOwner);
FButton := TButton.Create(nil);
FButton.Parent := Self;
FButton.Top := 10;
FButton.Left := 10;
end;
destructor TMyPanel.Destroy;
begin
FButton.Destroy;
inherited Destroy;
end;
function TMyPanel.GetButtonCaption: string;
begin
Result := FButton.Caption;
end;
procedure TMyPanel.SetButtonCaption(const Value: string);
begin
FButton.Caption := Value;
end;
Preji hodne zdaru.
Pavel Vasek
----- Original Message -----
From: <raul.endymion(zv)ns1.infima(tec)cz>
To: Pavel Vasek <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, July 13, 2000 12:24 PM
Subject: Re[2]: Dotaz amatera
> Me nejde o to je ukladat, alespon zatim, me jde o to je vubec
> vytvorit.
> Proste jak se tvori komponenta typu tpanel, ktera muze obsahovat dalsi
> komponenty. a jak se potom tvori tyto komponenty.
>
> Raul
>
> PV> Prestoze mozna presne nechapu druhy dotaz pokusim se na nej navrhnout
mozne
> PV> reseni.
> PV> Jestli ti jde o ulozeni a nacteni komponent do souboru, v helpu Delphi
jsou
> PV> primo napsane dve funkce. Jedna ti komponentu ulozi do textoveho
souboru,
> PV> ktery vypada presne jako textovi DFM soubor v Delphi a druho je nacte
a
> PV> vytvori dane komponenty.
>
> PV> Jestli to chces jako HTML bylo by jednodusi si to prevest na tento
"DFM"
> PV> text a pote upravit do HTML podoby.
>
> PV> Zde je text onoho prikladu:
> PV> This example shows how to use the built-in VCL component streaming
support
> PV> to convert any component into a string and convert that string back
into a
> PV> component.
TADODataset a TThread
[*] Petr Sadovsk� <petr(zv)slunce(tec)cz> - 14.7.2000 11:06:23
Ahojte,
potreboval bych poradit se %subj%. Nejak mi to nechce chodit.Poznamky a
chybove hlaseni jsou primo v kodu.
Predpokladam, ze, kdyz ADODatasetu nejde pripojit Session (nema property
SessionName), se to dela nejak uplne jinak.
Diky za jakekoli pokopnuti kupredu.
Petr
P.S. D5E,W98
unit ThreadU;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, Db, Grids, DBGrids, ADODB, DBTables;
type
TForm1 = class(TForm)
ADODataSet1: TADODataSet; // CommandText:='select * from
tabulka1';Active:=False;Provider MSDASQL -dBaseIV
DBGrid1: TDBGrid;
DataSource1: TDataSource; // Dataset:=''
Button1: TButton;
Button2: TButton;
Session1: TSession; // Active:=True; Autoname:=True ---- ADODataset
nema property SessionName !?!?
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
TMyThread = class(TThread)
private
ThrSession:TSession;
ThrADODataset:TADODataset;
ThrDatasource:TDatasource;
procedure ConnectDatasource;
protected
procedure Execute; override;
public
constructor
Create(Session:TSession;ADODataset:TADODataset;Datasource:TDatasource);virtu
al;
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TMyThread.Execute;
begin
try
ThrADODataset.Open; // tady rve EOLEException with Message "Nebyla
volana procedura Colninitialize"
Synchronize(ConnectDatasource);
except
Application.Terminate;
end;
end;
constructor
TMyThread.Create(Session:TSession;ADODataset:TADODataset;Datasource:TDatasou
rce);
begin
inherited Create(True);
ThrSession:=Session;
ThrADODataset:=ADODataset;
ThrDatasource:=Datasource;
FreeOnTerminate:=True;
Resume;
end;
procedure TMyThread.ConnectDatasource;
begin
ThrDatasource.Dataset:=ThrADODataset;
end;
procedure
RunBackGroundQuery(Session:TSession;ADODataset:TADODataset;Datasource:TDatas
ource);
begin
TMyThread.Create(Session,ADODataset,Datasource);
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
Close;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
RunBackGroundQuery(Session1,ADODataset1,Datasource1);
end;
end.
P.S.2 Potrebuju vlastne, aby se program pri otevirani tabulky nechoval
jakoby zamrzl.Tabulka je dBaseIV a je velka a je na NW serveru, takze to
nejakou chvilku trva. a uzivatele jsou "vselijaci" a vetsinou
nevypocitatelni...
CASE & mySQL
[*] Daniel Sichta <dano(zv)customweb.sk> - 14.7.2000 11:12:37
Ten SW navyzera zle, ale podla mojho nazoru pod pojmom CASE si predstavujem
nieco ine. Napr ERWin.
Dan
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
L. ZITA
Sent: Thursday, July 13, 2000 9:59 PM
To: delphi-l(zv)fwd(tec)cz
Subject: RE: CASE & mySQL
Behalf Of Martin Lasevic
> Zdravim a omlouvam se za OT. Nevite nekdo o nejakem slusnem CASE
> nastroji pro praci s mySQL?
>
> Diky
>
Ahoj.
Neco jsem zpatlal.
Najdes to na http://www.sales(tec)cz/download/index.phtml?sw=mydbex
Ludek
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.145 / Virov� b�ze: 69 - datum vyd�n�: 4.5.2000
Re[2]: Tipy do Delphi
[*] Jan Cejka <jan.cejka(zv)mensa(tec)cz> - 14.7.2000 11:21:00
Taky se primlouvam za podporu proxy ;-)
--
Windows 98 supports real multitasking - it can boot and crash simultaneously.
--
S pozdravem,
Jan Cejka mailto:jan.cejka(zv)mensa(tec)cz
--
Friday, July 14, 2000 v 7:46:57 AM, Petr Palicka pise:
PP> program vypada dobre, ale pokus o download vyhodi chybu spojeni.
PP> jsem za proxinou a mame pevnou lajnu. nikde jsem nenasel zadne nastaveni
PP> zpusobu pripojeni.
PP> plz help.
PP> dekuji peca
Jak docilit presmerovani focusu do zvoleneho formu
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 14.7.2000 12:59:38
On 13 Jul 2000, at 20:36, Pavel �ern� wrote:
> Prosim o pomoc. Oteviram formy v nejakem poradi, treba
> MAIN - FormA - FormB.
>
> Pokud za teto situace zavru FormB, automaticky dostane
> focus FormA.
>
> Potrebuji docilit toho, aby po zavreni FormB (a jeho uvolneni z
> pameti) dostal focus MAIN. Ten totiz provede ReLogin uzivatele, pritom
> zavre vsechna otevrena okna .... Pokud tento ReLogin spustim z jineho
> nez MAIN formu, zavru vsechny formy okolo, tak si uriznu vetev pod
> zadkem a pada to na chybu.
V FormB.OnDestroy posli
PostMessage(Application.MainForm, ...
(Ted lovim z hlavy, pokud nahodou nezabare Application, dej
Screen).
V hlavnim formulari odchyt poslanou zpravu, kde zajistis potrebne.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
dynamicke tabulky
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 14.7.2000 12:59:38
On 13 Jul 2000, at 18:43, Jan Fiala wrote:
> Mas pravdu. Ja hlava dubova pouze zkopiroval prvni radek. Upravene by
> to mohlo byt asi takhle :
>
> Procedure Otevri(Tabulka : String);
> Begin
> With TTable.Create(Self) do begin
> Name := Tabulka;
> TableName := Tabulka;
> { tady pak nastavit dalsi vlastnosti jako napr. database, TableType
> apod. Je to pouze priklad}
> Open;
> End;
> End;
>
> Procedure Zavri(Tabulka : TTable);
> Begin
> Tabulka.Close;
> Tabulka.Free;
> End;
Nechci ti do toho kecat :-)), ale abys mohl uplatnit Zavri, budes si
muset nekde instanci z Otevri pamatovat. Tedy bych to udelal
napriklad jako
function Otevri(Tabulka: string):TTable;
begin
Result:=TTable.Create....
i kdyz to neni prave nejcistsi, inicializovat objekt timto zpusobem.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Ulozeni casti komponenty na disk ?
[*] Petr.Dana(zv)pvt(tec)cz - 14.7.2000 13:03:38
Zdravim,
chtel jsem se zeptat, jestli nekdo nevite o jednoduchem zpusobu, jak ulozit
polozku Items (TTreeNodes) z TreeView se vsim, co k ni patri (hlavne polozka
Data - ale i s daty, ne jenom s ukazatelem) do souboru na disk? Nebo budu
muset ulozit vsechno postupne ruco fuco? Potrebuju neco, co mi to velice
rychle ulozi a nacte.
Pro komponenty je to jednoduch� - WriteComponent z TFileStream. Ale problem
je, ze Items nema predka TComponent, ale az TPersistent, takze
WriteComponent nejde pouzit.
Jestli nekdo o necem vite, tak to hodte prosim do placu.
Diky
Petr
Re[2]: Tipy do Delphi
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 14.7.2000 13:10:06
>Taky se primlouvam za podporu proxy ;-)
primlouval bych se za zastreleni netopyra. Nabo alespon jeho konfiguraci,
aby nepridaval tu pitomou [2] do Re. Trideni zprav podle subjektu pak v
jinych mailerech jaksi nefunguje...
Zdravi
D. Toman
Nastaveni priority jednovlaknove aplikace
[*] Petr Zednik <Zednik(zv)prospeks-it(tec)cz> - 14.7.2000 13:48:02
Zdravim vsechny,
Mam dotaz ohledne nastavovani priority aplikace.
Vim, ze se pro tohle pouziva API funkce SetThreadPriority.
Tato funkce ma jako parametry handle na TThread a vlastni uroven priority.
V pripade, kdy vytvarim v aplikaci Thread, tak je pouziti zcela jasne,
ale me by zajimalo, zda se neda nejakym zpusobem nastavit priorita
jednovlaknove aplikace, ve ktere zadne thready nevytvarim.
Takova aplikace ma jeden thread a snad by se k nemu dalo nejak dostat.
Zkousel jsem to, ze jsem funkci SetThreadPriority predaval
misto handle na TThread handle na moji aplikaci, tzn. Application.Handle.
Take jsem zkousel pouzit Handle hlavniho formulare okna.
Zadna z techto "fint", ale nepomohla (funkce SetThreadPriority vratila chybu).
Mozna je potreba to v tomto pripade udelat jinak nez pres SetThreadPriority.
Mozna, ze chci udelat nemozne, ale pokud to nejak jde
tak prosim o radu.
Diky
Petr Zednik
DDE v podruznem threadu pod Windows NT (D5prof+U1,
[*] Ond�ej Male�ek <ondrej.malecek(zv)radom-cz(tec)cz> - 14.7.2000 13:52:17
Pouzivani DDE v separatnim threadu s pomoci komponent Delphi nelze prilis
doporucit, nebot je dosti problematicke zajistit, aby volani fce
DDEInitialize (kterou VCL nekde pri vytvareni komponent vola) probehlo prave
v danem threadu. Vcelku splehlive je pouzivani DDE na urovni API, kde je
obsluha na separatni threadu bezproblemova. Staci z tohoto threadu volat
zminenou fci DDEInitialize a pak v nem mit pustenou smycku zpracovani zprav
(jak psal P.Vones). Dale je nutno dodrzovat zasadu, ze vsechna komunikace
pres DDE musi byt obsluhovana z tohoto thread (zejmena tedy odesilani ven z
aplikace, volani z vnejsku jde pres nej vzdy). Dle Vami zminene zavislosti
chovani na OS to vypada, ze NT jsou na nedorzeni vyse zminenych zasad
citlivejsi. Pokud je DDE obsluhovano viz. vyse pak to chodi jak na Win9x,
tak NT.
S pozdravem
Ondrej Malecek
----- Original Message -----
From: "Petr Fejfar" <Petr.Fejfar(zv)callnet(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, July 14, 2000 7:54 AM
Subject: Re: DDE v podruznem threadu pod Windows NT (D5prof+U1,
NTSrv4.0+SP5)> Petr Vones <pvones(zv)mbox.vol(tec)cz> wrote:
>
> > pokud je to jen trochu mozne tak bych DDE rychle zahodil
>
> O.K. Pro Excel jsme samozrejme na OLE presli, ale pouzivali jsme to i pro
jine servery, na ktere se pres OLE nedostaneme.
>
> > pouzil spise OLE Automation (to totiz funguje vzdycky).
>
> Vzdycky ne :-) Nejdriv musis v .dpr souboru zmenit default nastaveni
promenne CoInitFlags, jinak to v podruznem threadu taky nepracuje:
>
> CoInitFlags := COINIT_MULTITHREADED;
> ...
> Appliction.Initialize;
> ...
>
> >Ohledne pouziti DDE komponent z threadu,
> >je zvlastni ze to pod Win98 funguje.
>
> Ano, zvlastni to je - nakonec - nam ten bug nasli az zakaznici, protoze
kdyz jsme testovali pristup na Excel lokalne prikazy z GUI, tak se to
poustelo v hlavnim threadu a pracovalo to i pod NT. A pod W95/98 to jede
vsechno bez problemu.
>
> >safe. Pokud by jsi presto nejakym zpusobem pracoval s DDE ve vlastni
threadu
> >bude asi take nutne aby mel vlastni smycku zpracovani zprav, protoze DDE
je na
> >nich zalozene.
>
> Mas na mysli, ze by se mel motat v necem takovem?
>
> ...
> if PeekMessage(Msg,0,0,0,PM_REMOVE) do
> begin
> ...
> TranslateMessage(Msg);
> DispatchMessage (Msg);
> end;
> ...
>
>
> bye pf, Petr.Fejfar(zv)callnet(tec)cz
>
>
>
Nastaveni priority jednovlaknove aplikace
[*] Vaclav Sazima <sazima(zv)comp(tec)cz> - 14.7.2000 14:15:43
Ahoj,
Petr Zednik wrote:
> Mozna je potreba to v tomto pripade udelat jinak nez pres SetThreadPriority.
SetPriorityClass(GetCurrentProcess,HIGH_PRIORITY_CLASS);
Vaclav Sazima
dynamicke tabulky
[*] Flon <flon(zv)pobox.sk> - 14.7.2000 14:20:39
Skusal som urobit toto :
Procedure TForm1.Otevri(Tabulka : String);
Begin
with TTable.Create(self) do
begin
Name := Tabulka;
DatabaseName:='skuska';
TableType:=ttDBase;
TableName := Tabulka;
Open;
DataSource1.DataSet:=Name; -> nekompatibilita typov, co tam mam dat ???
end;
End;
Procedure TForm1.Zavri(Tabulka : TTable); -> tu je taktiez chyba...
Begin
Tabulka.Close;
Tabulka.Free;
End;
Prosim o pomoc... ako to ma byt...??? Vdaka... Flon...
____________________________________
P. S. V. P. U.
http://www.pobox.sk/
Dotaz na stored proc
[*] Hynek Svatos <svatos(zv)kam(tec)czu(tec)cz> - 14.7.2000 14:39:39
A co zkusit StoredProc.Open ?
Keep mailing :-)
=========================
Hynek Svato�
svatos(zv)kam(tec)czu(tec)cz
hynek.svatos(zv)atlas(tec)cz
=========================
> > uz delsi dobu nejak nemuzu prijit na to, zda jde provest SQL dotaz
> > nad daty vracenymi ulozenou procedurou. Konkretne mi jde o
> > vestavenou ulozenou proceduru MSSQL serveru sp_tables, ktera
> > vraci seznam tabulek. Jeste vice konkretne - rad bych se v triggeru
> > presvedcil, zda existuje tabulka s urcitym jmenem. Vim, ze to sice
> > muzu udelat selectem nad sysobjects, ale to muze byt v
> > budoucich verzich SQL serveru upraveno, kdezto u pouziti
> > sp_tables toto nehrozi.
> > Jde mi ted o to, zda vubec existuje zpusob, jak delat dotazy
> > nad ulozenymi procedurami.
> >
> > Dik, David
>
> Nejsem velky databazista, nevim jestli lze nad procedurou udelat
> treba view,
> ale co by slo urcite, je vyhrnout vysledek procedury do temporary table
> a udelat select nad temp tabulkou.
>
> Jura
OT:W2000
[*] Martin <geoplan(zv)pp.sinet.sk> - 14.7.2000 14:42:07
Dobry,
sorry za OT ale neviem si rady.
Mam nainstalovane W2000 . V pohode isli az do vypadku elelktriky.
Teraz ostanu vysiet vtedy, ked je na ciernej obrazovke dole tensivy pasik, co ukazuje start systemu.
Neviete mi niekto poradit co stym ?OT:W2000
[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 14.7.2000 15:08:11
Pokud muzes, nabootuj z CD a dej opravu instalace.
Jan Fiala
----- Original Message -----
From: "Martin" <geoplan(zv)pp.sinet.sk>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, July 14, 2000 2:42 PM
Subject: OT:W2000
Dobry,
sorry za OT ale neviem si rady.
Mam nainstalovane W2000 . V pohode isli az do vypadku elelktriky.
Teraz ostanu vysiet vtedy, ked je na ciernej obrazovke dole tensivy pasik, co ukazuje start systemu.
Neviete mi niekto poradit co stym ?dynamicke tabulky
[*] Flon <flon(zv)pobox.sk> - 14.7.2000 15:44:57
Nechci ti do toho kecat :-)), ale abys mohl uplatnit Zavri, budes si
muset nekde instanci z Otevri pamatovat. Tedy bych to udelal
napriklad jako
function Otevri(Tabulka: string):TTable;
begin
Result:=TTable.Create....... Uz mi to vcelku dobre chodi, len neviem ako alebo kde si mam uchovavat zoznam instancii... Myslim ked si otvorim tabulky 1,2,3,4,5 ale chcem ich zatvarat napr. 3,2,4,5,1 aby som presne vedel co zatvaram... Mam si ich ukladat do nejakeho array of TTable...?????
Vdaka.... Flon...
____________________________________
P. S. V. P. U.
http://www.pobox.sk/
Nastaveni priority jednovlaknove aplikace
[*] Ondrej Malecek <ondrej.malecek(zv)radom-cz(tec)cz> - 14.7.2000 15:46:56
Handle aktualniho threadu lze ziskat pomoci API GetCurrentThread a ten pak
jde pouzit pro volani SetThreadPriority. Jak se to ale chova pro primarni
thread nevim.
Ondrej Malecek
----- Original Message -----
From: "Petr Zednik" <Zednik(zv)prospeks-it(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, July 14, 2000 1:48 PM
Subject: Nastaveni priority jednovlaknove aplikace
> Zdravim vsechny,
>
> Mam dotaz ohledne nastavovani priority aplikace.
> Vim, ze se pro tohle pouziva API funkce SetThreadPriority.
> Tato funkce ma jako parametry handle na TThread a vlastni uroven priority.
>
> V pripade, kdy vytvarim v aplikaci Thread, tak je pouziti zcela jasne,
> ale me by zajimalo, zda se neda nejakym zpusobem nastavit priorita
> jednovlaknove aplikace, ve ktere zadne thready nevytvarim.
> Takova aplikace ma jeden thread a snad by se k nemu dalo nejak dostat.
>
> Zkousel jsem to, ze jsem funkci SetThreadPriority predaval
> misto handle na TThread handle na moji aplikaci, tzn. Application.Handle.
> Take jsem zkousel pouzit Handle hlavniho formulare okna.
>
> Zadna z techto "fint", ale nepomohla (funkce SetThreadPriority vratila
chybu).
> Mozna je potreba to v tomto pripade udelat jinak nez pres
SetThreadPriority.
> Mozna, ze chci udelat nemozne, ale pokud to nejak jde
> tak prosim o radu.
>
> Diky
>
> Petr Zednik
>
Tipy do Delphi
[*] Tomas Burger <slune(zv)yahoo(tec)com> - 14.7.2000 07:09:38 -0700 (pdt)
--- David Lebeda <david.lebeda(zv)comarr(tec)cz> wrote:
> > > Program Tipy & Triky do Delphi jsem na cetne zadosti vylepsil
> > btw: sdilena databaze TaT po netu je docela dobrej napad :)
No, nechci, aby to vypadalo, ze si prihrivam vlastni polivcicku, ale berte to
jako dobre minenou radu/zoufaly postesk: zalozili jsme na serveru
http://delphi(tec)cz/ FAQ sekci a vyhlasili soutez o ceny (!) v zadavani tech FAQ.
A stejne skoro nikdo skoro nic nezadal.
Predstava, ze nabidnes lidem prazdnou databazi a oni ti ji naplni, je
scestna...
Pojdme se domluvit na jednotne databazi na jednom serveru s jednotnym
interfacem, treba v XML. Klientu at si pak napise kolik chce...
Tomas
=====
Tomas 'Slune' Burger
-----------------------------------------------
Tomas.Burger(zv)delphi(tec)cz http://delphi(tec)cz/
__________________________________________________
Do You Yahoo!?
Get Yahoo! Mail � Free email you can access from anywhere!
http://mail.yahoo.com/UpLoad souboru
[*] Tomas Burger <slune(zv)yahoo(tec)com> - 14.7.2000 07:14:12 -0700 (pdt)
--- Petr_Voborn�k <vobornik(zv)ssakhk(tec)cz> wrote:
> to nebylo slozite, ale jak by se daly uploudnout soubory, treba na
> www.mujweb(tec)cz, ci na jine servery, kde mam pristup na sve stranky pouze pres
> web?
To je serverovy problem - a server ti musi nabidnout reseni. Pokud je to free
web, asi si nebudes moct pomoct sam, ale musis hledat v jejich nabidce.
Jedno je ale jiste: nema to co do cineni s Delphi - je to obecny problem
zpracovani http requestu a jak to zpracovani probehne a v jakem nastroji se pro
to napise nejake udelatko - to je problem provozovatele.
Ale moc sanci bych ti nedaval - nekontrolovany upload muze byt dost kriticky
security bug...
Tomas
=====
Tomas 'Slune' Burger
-----------------------------------------------
Tomas.Burger(zv)delphi(tec)cz http://delphi(tec)cz/
__________________________________________________
Do You Yahoo!?
Get Yahoo! Mail � Free email you can access from anywhere!
http://mail.yahoo.com/Ako prehrat AVI nie zo suboru?
[*] Robert Zak <nrsys(zv)psn.sk> - 14.7.2000 16:26:02
Potrebujem prilinkovat k programu subor aa.avi a prehrat ho v TMediaplayeri.
Pokial ho vlozim do MediaPlayeru, ten ma property FileName a kedze ho mam
prilinkovany a nie v subore, neviem ako mu ho podhodit ..
Mozete mi prosim napisat postup spravneho zlinkovania + vlozenie do
mediaplayeru?
robim to prvy raz, mozno mam niekde chybu ale prilinkoval som to takto:
1. Vytvoril som subor "pril.rc" a napisal do neho:
VIDEO1 AVI "aa.avi"
2. zlinkoval som ho cez "brcc32.exe pril.rc"
3. do programu som vlozil {$R pril.res}
4. Na mieste kde som chcel subor pouzit som pouzil:
ResHandle :=FindResource(hInstance,'VIDEO1','AVI');
MemHandle:=LoadResource(hInstance,ResHandle);
MemPointer :=LockResource(MemHandle);
5. Teraz potrebujem vlozit handle do mediaplayeru a spustit
TMeiaplayer.Play. Rovnako to potrebjem aj do TAnimate.
Dakujem
Robo
ActiveX VB - kalendar
[*] Mrk��ek Ale� <Mrkacek(zv)sieza(tec)cz> - 14.7.2000 16:29:52
Zdrav�m,
Porad� mi n�kdo, kde naj�t �esk� verze objekt� ActiveX pro Visual Basic z
Visual Studia 6.0 enterprise eng.?
P�vodn� kalend�� toti� neum� �esky je anglick�.
potrebuji do programu vkladat kalendar s ceskymi mesici, nazvy, datumy,..
Na helpu Microsoftu mi rekli, ze je to nekde na webu a sami ale nevi kde,
at si to najdu!!! a ja to taky nemohu najit.
Dekuji za pomoc.
Ales
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.167 / Virov� b�ze: 80 - datum vyd�n�: 29.6.2000
dynamicke tabulky
[*] Ju�ica Marek <marekj(zv)tdat(tec)cz> - 14.7.2000 16:43:48
Ahoj,
do dynamickeho pole si to muzes taky ulozit, ale da se
na to dobre pouzit TStringList.
Pridani: AddObject(Table.Name, Table)
Vyhledani: IndexOfObject(Table)
Marek Jurica
> -----Original Message-----
> From: Flon [mailto:flon(zv)pobox.sk]
> Sent: Friday, July 14, 2000 3:45 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Re: dynamicke tabulky
>
>
> ... Uz mi to vcelku dobre chodi, len neviem ako alebo kde si
> mam uchovavat zoznam instancii... Myslim ked si otvorim
> tabulky 1,2,3,4,5 ale chcem ich zatvarat napr. 3,2,4,5,1 aby
> som presne vedel co zatvaram... Mam si ich ukladat do
> nejakeho array of TTable...?????
>
> Vdaka.... Flon...
>
>
>
> ____________________________________
> P. S. V. P. U.
> http://www.pobox.sk/
>
> Prenos souboru pomoci FTP
[*] Ing. Lud�k Florian <Ludek.Florian(zv)bluerose(tec)cz> - 14.7.2000 17:24:14
Hezky den vsem,
muze mi nekdo poradit, jak by se programoval prenos souboru na www server z
Delphi ? Potrebuju aktualizovat nektere soubory a taky provest zmeny v
databazi na www serveru, ale prenos souboru na server pomoci ftp jsem nikdy
nedelal.
Diky za kazdou radu.
Bye Ludan
Odchyceni klavesy F5
[*] Hurricane <hurricane(zv)email(tec)cz> - 14.7.2000 18:24:26
Zdravim
Pottebuji v programu odchytavat klavesu F5 pomoci procedury KeyPress. Pomoci
Label1.Caption := IntToStr(Ord(Key)); jsem ascii hodnotu neyjistil (Fka
totiz nejsou v ascii tabulce). Nevite nekdo, jak to udelat.
Dekuji za jakekoli nakopnuti, ale pouze spravnym smerem
Hurricane
hurricane(zv)email(tec)cz
TADODataset a TThread
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 14.7.2000 18:43:29
On 14 Jul 2000, at 11:06, Petr Sadovsk� wrote:
> Ahojte,
> potreboval bych poradit se %subj%. Nejak mi to nechce chodit.Poznamky
> a
> chybove hlaseni jsou primo v kodu.
> Predpokladam, ze, kdyz ADODatasetu nejde pripojit Session (nema
> property SessionName), se to dela nejak uplne jinak.
TSession je BDE komponenta, takze ji ani nemuzes s ADO michat
dohromady.
ADO si nejdrive nacita data do sveho vlastniho bufferu. Pokud
oteviras nejaka vzdalena a jeste k tomu velka data, pak holt musis
chvili cekat. Resenim je napriklad otevrit pouze nejakou dilci cast
dat - pocet pozadovanych zaznamu lze v ADO nastavit.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
ADONIS - opWithoutAbsolutePosition
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 14.7.2000 19:55:03
To IMHO nejde, pokud nevis KDE se nachazis v recordsetu (nevis aktualni
pozici) tak to pak samozrejme nemuze vedet ani DBGrid natoz jeho scrollbar
;-) Ale takhle se napr. chova cele BDE pokud jdes na nejaky SQL server,
takze nezoufej ;-)
Mac
----- Original Message -----
From: "Hynek Svato�" <svatos(zv)kam(tec)czu(tec)cz>
> Tak jsem si v helpu k ADONISu precetl, ze nastaveni priznaku
> opWithoutAbsolutePosition se zvysi rychlost navigace v klientskem datasetu
> asi 10x (!), ale ouha, v tento moment mi prestal chodit scrollbar DBGridu,
> ktery tendo DataSet zobrazuje.
> Chtel bych zachovat vysokou rychlost navigace ale take funkcnost
ScrollBaru,
> kudy z toho ven ?
SHFileOperation?
[*] Ren� Otisk - 14.7.2000 20:35:00
Hi,
Mam nasledujici problem se %subj%. Pokud totiz parametr Kam obsahuje retezec
(podaresar) Data, tak mi to vynada, ze nemuze najit cestu a nebo ze nelze
vytvorit soubor... Bohuzel adresar Data jest vyzadovan aplikaci postavenou
na dosovskem paradoxu 4.0, takze nelze jej zmenit. Zatim mam tento usek kodu
osetren pres CopyFile, nicmene by mne zajimalo jestli tam mam chybu ja nebo
Gejts.
Kopiruj(DirectoryEdit4.Text + '\Sklad\*.?b', DirectoryEdit4.Text +
'\Sklad\Datam\Fata', FOF_NOCONFIRMMKDIR, FO_COPY);
procedure TZaloha.Kopiruj(Odkud, Kam: string; fMyFlags, wMyFunc: Integer);
var
FileOp: TSHFileOpStruct;
A, B: array [0..128] of Char;
begin
StrPCopy(A, Odkud + #0);
StrPCopy(B, Kam + #0);
A[Length(Odkud) + 1] := #0;
B[Length(Kam) + 1] := #0;
ZeroMemory((zv)FileOp, Sizeof(FileOp));
with FileOp do
begin
Wnd := 0;
wFunc := wMyFunc;
pFrom := A;
pTo := B;
fFlags := fMyFlags;
end;
try
if (SHFileOperation(FileOp) <> 0) or (FileOp.fAnyOperationsAborted) then
ShowMessage('A mas po ptakach');
except
end;
end;dynamicke tabulky
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 14.7.2000 20:57:11
On 14 Jul 2000, at 15:44, Flon wrote:
> ... Uz mi to vcelku dobre chodi, len neviem ako alebo kde si mam
> uchovavat zoznam instancii... Myslim ked si otvorim tabulky 1,2,3,4,5
> ale chcem ich zatvarat napr. 3,2,4,5,1 aby som presne vedel co
> zatvaram... Mam si ich ukladat do nejakeho array of TTable...?????
Napriklad v TList.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Optimalizacia SQL
[*] Michal Hlavac <7hlavac(zv)st.fmph.uniba.sk> - 14.7.2000 21:48:48
Zdravim,
Neviem si rady. Mam tabulku usmev, dealeri.
usmev2: Id, nazov, adresa, mesto, Id_dealer
dealeri: Id_dealer, popis, spravca
Databaza je rozdelena na sekcie, ktore urcuje spravca. To znamena, ze viac
dealerov ma spolocneho spravcu (spravca je cislo). Ja robim hlavne view
podla spravcu, lenze na to musim pouzit JOIN, co znamena ze uz do view
nemozem pouzit insert. Dalo by sa to s tym view nejako rozumnejsie urobit.
Nechcem robit insert do povodnej tabulky kvoli pravam uzivatelov.
View vyzera asi takto:
SELECT usmev2.*
FROM users.dealeri JOIN users.usmev2 ON dealeri.ID_dealer=usmev2.Dealer
WHERE (dealeri.Spravca=1)
Toto je sekcia, ktora zgrupuje delaerov spravcu cislo 1.
No vlastne potrebujem jednoduchy view, na ktory budem moct pouzit prikazy
insert, delete, update a aby splnal tieto kriteria.
Jedna moznost je dat atribut spravca do tabulky usmev2, lenze, ked budem
napriklad menit dealerovi spravcu, potom by som ho musel menit aj vo
vsetkych zaznamoch v tabulke usmev2, co je blbost.
Dik za pomoc. Miso
Import z TTable
[*] Michal Zimen <zimen(zv)nextra.sk> - 14.7.2000 22:00:26
Ahoj
Mozno to tu uz bolo.
Mam tabulku z ktorej si uzivatel vyberie cez "grid.togglerowselection"
cast a tu importujem do dalsej tabulky.
Robil som to klasicky cez tabulky selectedRows[index] u gridu,
po jednom zazname som to kopiroval do druhej tabulky.
A vysledok bol sice plne funkcny ale velmi! zdlhavy.
Urcite existuje iny sposob aby to slo rychlejsie.
Dakujem za radu
Mizu
_ _ _ _._ _ _
( | ( | ( | <_ > ( | ( |
( |\/( | ( | / / ( |_( |
(_| (_| (_| <___> (_____|
mizu(zv)nextra.sk
/\ LINUX INSIDE /\
Function a jej navratova hodnota
[*] Michal Zimen <zimen(zv)nextra.sk> - 14.7.2000 22:08:56
Ahoj
Pokusal som sa urobit si nasl funkciu.
function GetNames:TStrings;
Begin
Result:=TStrings.Create;
Result.add(..
.
.
end;
Vyzera to normalne, len pri nejakej funkcii s Result to vyhodi hlasku
"Abstract Error".
Zatial neviem kde moze byt chyba. Myslim ze alokovanie pameti som
zvolil spravne, teda v tele funkcie.
Alebo kompiler si automaticky alokuje navratovu hodnotu ?
------------------------------
next Question:
Mam funkciu
function GetNieco(var Zoznam:TStrings):TStrings;
begin
..
..
end;
Kde je vhodne vytvorit (Create) premennu zoznam. (Zoznam:=TStrings.Create)
-pred volanim mimo funkcie
-alebo priamo vo funkcii
Dakujem za trpezlivost
Mizu
_ _ _ _._ _ _
( | ( | ( | <_ > ( | ( |
( |\/( | ( | / / ( |_( |
(_| (_| (_| <___> (_____|
mizu(zv)nextra.sk
/\ LINUX INSIDE /\
Ktera aplikace je navrchu
[*] Straka Josef <strakaj(zv)hba(tec)czn(tec)cz> - 14.7.2000 22:42:58
Prijemny den,
D4 Standard, W95 OSR2.
Nevite nekdo, jak zjistit, jaka aplikace je zrovna navrchu? Napr uzivatel ma
spusten Word, Photoshop a kalkulacku, ale napr. i jine programy, o kterych
predem nemohu vedet. Vim jak zjistit, jestli jsou programy spusteny a cestu
k nim (pred casem Petr Vones), ale ja bych potreboval svym programkem
otestovat, jestli uzivatel ma aktivni (tzn. ze s ni pracuje) aplikaci Word
nebo Kalkulacku atd.
Zkousel jsem to zjistit pres Application.Activate. To chodi pekne, ale jen
pro mou (Delphi) aplikaci. Ja bych to potreboval pro cizi aplikace.
Dekuji predem, protoze zadem se v teto konferenci dekovat nesmi.
Zacinajici programator Straka Josef
email: strakaj(zv)hba(tec)czn(tec)cz
www: http://mujweb(tec)cz/www/strakaj/
Updaty SW
[*] Lud�k P�ral - 14.7.2000 23:49:03
Toto je zpr�va ve form�tu MIME obsahuj�c� v�ce ��st�.
Potrebuji posilat nove verze produktu s tim, aby instalace vzdy nasla instalacni cestu. Existuje nejaky freewarovy produkt ? Stacila by mi i procedura nebo API funkce, ktera nalezne na PC cestu k urcenemu souboru.
Ludek Paral
Sadova 2/503
352 01 As
ludek.paral(zv)telecom(tec)cz
www.mujweb(tec)cz/pocitace/lupasoft
Chcete dostavat penize za zapnuty monitor ?
http://www.intecom(tec)cz/viewbar/index.asp?parentID=1310012
Tisk paletovych listku
[*] Lud�k P�ral - 14.7.2000 23:55:52
Toto je zpr�va ve form�tu MIME obsahuj�c� v�ce ��st�.
Mam pripraveny projekt na tisk paletovych listku, chybi mi ovsem laser.tiskarna a vlastni tiskova sestava. Jedna se o 1200 stran denne, takze je potreba zvolit "RYCHLY a LEVNY TISK".
1. Muze nekdo doporucit tiskarnu (s instalovanym tiskem car.kodu) a postup tisku ? Zatim se mi zamlouva OKIPAGE 20.
2. Jasky mam zvolit tisk, aby se tiskarna nezdrzovala downloadem grafiky - pres SINEA - graf. mod, nebo utilitu, ktera nastavi znakovou sadu a bude posilat primo znaky ?
Ludek Paral
Sadov� 2/503
352 01 As
ludek.paral(zv)telecom(tec)cz
www.mujweb(tec)cz/pocitace/lupasoft
Chcete dostavat penize za zapnuty monitor ?
http://www.intecom(tec)cz/viewbar/index.asp?parentID=1310012
Updaty SW
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 15.7.2000 00:21:36
Puvodni zprava, kterou napsal Lud�k P�ral dne 14 Jul 00,:
> Potrebuji posilat nove verze produktu s tim, aby instalace vzdy nasla =
> instalacni cestu. Existuje nejaky freewarovy produkt ? Stacila by mi i =
> procedura nebo API funkce, ktera nalezne na PC cestu k urcenemu souboru. =
To se vetsinou nedela tak, ze prochazis cely disk nebo
vsechny disky, ale tak, ze si cestu na program napises
do registru a pak si ji tam najdes...
S pozdravem
Petr Zahradnik, pocitacovy expert
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917, PGP vitano
IB6 predlzenie licencie
[*] Roland Tur�an \(RoTurSoft\) <rotursoft(zv)nextra.sk> - 15.7.2000 02:31:19
Zdravim.
Preco IB zase predlzuju datum funkcnosti beta verzie ?
Dakujem
Roland.Tipy do Delphi
[*] Petr Voborn�k <vobornik(zv)ssakhk(tec)cz> - 15.7.2000 05:00:14
Ja pouzivam jednu komponentu na stahovani souboru a ta se o vsechna
nastaveni stara sama. Ovsem Upload I Downolad me i znamym beha dobre, jako
po pevne lince, tak i pres modem. Proxi ovsem nepouzivame, to je pravda.
Dokud nenajdu nezjistim, proc to proxi nebere, tak zatim mate zrejme smulu.
MIKMIK company
Petr Voborn�k - P�tr
vobornik(zv)ssakhk(tec)cz
ICQ: #23132120
www.ssakhk(tec)cz/home/vobornik/
----- Original Message -----
From: Petr Palicka <petr.palicka(zv)atlas(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, July 14, 2000 7:46 AM
Subject: RE: Tipy do Delphi
> ahoj
> > Program Tipy & Triky do Delphi jsem na cetne zadosti vylepsil
> program vypada dobre, ale pokus o download vyhodi chybu spojeni.
> jsem za proxinou a mame pevnou lajnu. nikde jsem nenasel zadne nastaveni
> zpusobu pripojeni.
> plz help.
>
> dekuji peca
>
> btw: sdilena databaze TaT po netu je docela dobrej napad :)
>
> ~~~~~~~~~~~~~~~~~~~~~~~~
> [smtp:palicka(zv)aginfo(tec)cz]
> ~~~~~~~~~~~~~~~~~~~~~~~~
> ZEMEDELSKA INZERCE ZDARMA www.aginfo(tec)cz
> inzeraty zasilejte pisemne nebo e-mailem: inzerce(zv)aginfo(tec)cz
>Tipy do Delphi
[*] Petr Voborn�k <vobornik(zv)ssakhk(tec)cz> - 15.7.2000 05:05:22
Myslim si, ze to tak spatnej napad neni, protoze vyhledavani pres tento
program je snazsi a rychlejsi nez v stourani ve strych mailech. V
totmoprogramu jde predevsim o Tipy a Triky, uzitecne pro programatory,
kdezto v konferenci se resi urcity problem. A pres Inet to jde, aby se
database Tipu po jednom procteni netala neatraktivni. Navic v soucasne dobe
je jiz k dispozici 85 Tipu a doufam, ze budou pribivat.
MIKMIK company
Petr Voborn�k - P�tr
vobornik(zv)ssakhk(tec)cz
ICQ: #23132120
www.ssakhk(tec)cz/home/vobornik/
----- Original Message -----
From: David Lebeda <david.lebeda(zv)comarr(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, July 14, 2000 9:22 AM
Subject: RE: Tipy do Delphi
> > > Program Tipy & Triky do Delphi jsem na cetne zadosti vylepsil
> > program vypada dobre, ale pokus o download vyhodi chybu spojeni.
> > jsem za proxinou a mame pevnou lajnu. nikde jsem nenasel zadne
> > nastaveni zpusobu pripojeni. plz help.
> >
> > dekuji peca
> >
> > btw: sdilena databaze TaT po netu je docela dobrej napad :)
>
> Zdravim,
>
> nemam momentalne cas se na ten program podivat, proto prosim o
> vysvetleni.
> Kdyz mam nejaky problem, obvykle projdu archiv a casto tam
> najdu reseni. Pokud jsem to dobre pochopil, program Tipy a Triky
> spravuje nejakou vlastni databazi, ktera se casem zrejme naplni.
> Ale: ma to vubec sanci konkurovat archivu teto konference?
> Povazuji obecne za zbytecne, kdyz kdejaky fanousek Delphi zalozi
> na sve strance stranku s cilem shromazdovat tam finty k Delphi
> (napr. web.telecom(tec)cz/mister, pokud to jeste plati), protoze tam je
> obvykle jen malo veci a takovych stranek se toula po inetu
> spousta, takze je prakticky vyloucene je prohledavat.
> Nepovede T&T zase k situaci, kdy kdyz clovek bude chtit neco
> najit, bude muset prohledat celou radu zdroju?
>
> Aby bylo jasno - nic ve zlym, mozna se mylim a vsechno je jinak.
> Ja se jen ptam, jak je to doopravdy.
>
> David
>SHFileOperation
[*] Ren� Otisk - 15.7.2000 08:16:33
Hi,
Jaka je adekvatni fce pro kopirovani, presouvani a mazani pro NT. Tahle je
jen pro W95?
Dekuji
Sroub
User
[*] <bejcek(zv)centrum(tec)cz> - 15.7.2000 09:40:48
Ahoj kluci,
Zase dotaz, ja vam davam co? Nejak nemohu najit jak zjistit
prihlaseneho uzivatele a jmeno pocitace ve WIN98... urcite to
jde, jen nevim jak... taky potrebuji vedet, jak vyvolam klasickej
ping.. nebo tak neco, potrebuji na zaklade jmena PC si natahnout
IP adresu... Vim ze je to zase nejaka trivialni vec, ale moje
brozurka na to bohuzel nestaci.....
Amater vsech amateru
Ale� Pavel
Jeron�mova 981
Havl��k�v Brod
580 01
Privat: Ales.Pavel(zv)worldonline(tec)cz
Office: ales(zv)cml(tec)cz
Objevujte Internet s http://www.centrum(tec)cz
Zalo�te si svuj mail na http://mail.centrum(tec)cz
Odchyceni klavesy F5
[*] Surfman <surfman(zv)volny(tec)cz> - 15.7.2000 10:36:28
Ahoj,
musis pouzit OnKeyDown nebo OnKeyUp.
Pavel
----- Original Message -----
From: "Hurricane" <hurricane(zv)email(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, July 14, 2000 6:24 PM
Subject: Odchyceni klavesy F5
> Pottebuji v programu odchytavat klavesu F5 pomoci procedury KeyPress.
Pomoci
Function a jej navratova hodnota
[*] Tomas Skoda <tomas.skoda(zv)jdsoftware.sk> - 15.7.2000 11:04:00
Ahoj
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On
> Pokusal som sa urobit si nasl funkciu.
>
> function GetNames:TStrings;
> Begin
> Result:=TStrings.Create;
> Result.add(..
> end;
>
> Vyzera to normalne, len pri nejakej funkcii s Result to vyhodi hlasku
> "Abstract Error".
>
> Zatial neviem kde moze byt chyba. Myslim ze alokovanie pameti som
> zvolil spravne, teda v tele funkcie.
> Alebo kompiler si automaticky alokuje navratovu hodnotu ?
Problem nie je v tom ako objekt vytvaras, ale AKY objekt vytvaras. TStrings
je predkom objektov,
ktore maju za ulohu udrziavat zoznam retazcov. Ako predok nemusi (a tiez
nemoze) poznat
implementacne detaily potomkov a preto niektore jeho metody nie su
definovane - napr.
metoda Clear je definovana ako ABSTRACT - je urcene len jej rozharanie, nie
jej telo.
A ty sa pokusas vo svojom kode volat prave nejaku takuto metodu.
Riesenie: Miesto TStrings pouzit objekt TStringList ktory je potomkom
TStrings.
BTW: Ak mas zapnute zobrazovanie "warningov" pri kompilacii, prekladac by ta
mal upozornit na
vytvaranie abstraktneho objektu napr.:
[Warning] PSCandidateDataU.pas(282): Constructing instance of
'TPSDataObject' containing abstract methods
Tomas
User
[*] L. ZITA <konference(zv)sales(tec)cz> - 15.7.2000 11:26:51
Behalf Of bejcek(zv)centrum(tec)cz
> Ahoj kluci,
> Zase dotaz, ja vam davam co? Nejak nemohu najit jak zjistit
> prihlaseneho uzivatele a jmeno pocitace ve WIN98... urcite to
> jde, jen nevim jak... taky potrebuji vedet, jak vyvolam klasickej
> ping.. nebo tak neco, potrebuji na zaklade jmena PC si natahnout
> IP adresu... Vim ze je to zase nejaka trivialni vec, ale moje
> brozurka na to bohuzel nestaci.....
Ahoj.
Treba takhle:
function FUserName: String;
const
MAX_USERNAME_LENGTH = 255;
var
C: array[0..MAX_USERNAME_LENGTH] of Char;
L: DWORD;
begin
L := MAX_USERNAME_LENGTH;
if GetUserName(C, L) then
Result := C
else
Result := 'nobody';
end;
Ludek
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.145 / Virov� b�ze: 69 - datum vyd�n�: 4.5.2000
Updaty SW
[*] Surfman <surfman(zv)volny(tec)cz> - 15.7.2000 11:32:19
Ahoj,
Napis si pri nstalaci sestu do registru a pri update si ji zase vyzvedni.
Pokud uz je na to pozde, aplikuj to v tom updatu, ktery chces posilat.
Jinak pouzij funkci FindFirst/FindNext v procedure, ktera bude
volana rekurzivne
Pavel
----- Original Message -----
From: "Lud�k P�ral" <ludek.paral(zv)telecom(tec)cz>
To: "Konference" <delphi-l(zv)fwd(tec)cz>
Sent: Friday, July 14, 2000 11:49 PM
Subject: Updaty SW
Potrebuji posilat nove verze produktu s tim, aby instalace vzdy nasla
instalacni cestu. Existuje nejaky freewarovy produkt ? Stacila by mi i
procedura nebo API funkce, ktera nalezne na PC cestu k urcenemu souboru.
Ludek Paral
Sadova 2/503
352 01 As
ludek.paral(zv)telecom(tec)cz
www.mujweb(tec)cz/pocitace/lupasoft
Chcete dostavat penize za zapnuty monitor ?
http://www.intecom(tec)cz/viewbar/index.asp?parentID=1310012
Function a jej navratova hodnota
[*] Surfman <surfman(zv)volny(tec)cz> - 15.7.2000 11:36:18
Ahoj,
problem je v tom, ze TStrings je abstraktni trida.
Pouzij TStringList - potomka TStrings
Pavel
----- Original Message -----
From: "Michal Zimen" <zimen(zv)nextra.sk>
To: "Konferencia o Delphi" <delphi-l(zv)fwd(tec)cz>
Sent: Friday, July 14, 2000 10:08 PM
Subject: Function a jej navratova hodnota
> function GetNames:TStrings;
> Begin
> Result:=TStrings.Create;
> Result.add(..
> .
> .
> end;
>
> Vyzera to normalne, len pri nejakej funkcii s Result to vyhodi hlasku
> "Abstract Error".
The Bat!
[*] Als <Als.FofrsIT(zv)worldonline(tec)cz> - 15.7.2000 12:02:23
Ahoj,
Friday, July 14, 2000, 1:10:06 PM, you wrote:
D> primlouval bych se za zastreleni netopyra. Nabo alespon jeho konfiguraci,
D> aby nepridaval tu pitomou [2] do Re. Trideni zprav podle subjektu pak v
D> jinych mailerech jaksi nefunguje...
D> Zdravi
D> D. Toman
Ja samozrejme taky(je totiz nejlepsi). Pokud by nekdo vedel jak se to v nem
da nastavit tak se ozvete. Ja jsem to nenasel.
--
S pozdravem
Ji�� Kubelka ��� Als.FofrsIT(zv)worldonline(tec)cz ���
Odchyceni klavesy F5
[*] Als <Als.FofrsIT(zv)worldonline(tec)cz> - 15.7.2000 12:03:57
Ahoj,
Friday, July 14, 2000, 6:24:26 PM, you wrote:
> Zdravim
> Pottebuji v programu odchytavat klavesu F5 pomoci procedury KeyPress. Pomoci
> Label1.Caption := IntToStr(Ord(Key)); jsem ascii hodnotu neyjistil (Fka
> totiz nejsou v ascii tabulce). Nevite nekdo, jak to udelat.
> Dekuji za jakekoli nakopnuti, ale pouze spravnym smerem
> Hurricane
> hurricane(zv)email(tec)cz
Zkus to pres udalost OnKeyDown :
If key=116 then .... {F5}
--
S pozdravem
Ji�� Kubelka ��� Als.FofrsIT(zv)worldonline(tec)cz ���
Tipy do Delphi
[*] Michal Hlavac <7hlavac(zv)st.fmph.uniba.sk> - 15.7.2000 12:04:15
Zdravim,
ale na druhej strane suhlasim s Tomasom. Omnoho lepsie (IMHO) by bolo urobit
centralny server na, ktoreho by sa mohlo urobit milion klientov. Ale hlave
by bol jeden, a mal by urcite sirsiu klientelu ako 5 mensich samostatne
beziacich. Ide predsa o kvalitu.
S pozdravom, Miso
----- Original Message -----
> Myslim si, ze to tak spatnej napad neni, protoze vyhledavani pres tento
> program je snazsi a rychlejsi nez v stourani ve strych mailech. V
> totmoprogramu jde predevsim o Tipy a Triky, uzitecne pro programatory,
> kdezto v konferenci se resi urcity problem. A pres Inet to jde, aby se
> database Tipu po jednom procteni netala neatraktivni. Navic v soucasne
dobe
> je jiz k dispozici 85 Tipu a doufam, ze budou pribivat.
>
The Bat!
[*] Als <Als.FofrsIT(zv)worldonline(tec)cz> - 15.7.2000 13:27:31
Ahoj,
Friday, July 14, 2000, 1:10:06 PM, you wrote:
D> primlouval bych se za zastreleni netopyra. Nabo alespon jeho konfiguraci,
D> aby nepridaval tu pitomou [2] do Re. Trideni zprav podle subjektu pak v
D> jinych mailerech jaksi nefunguje...
D> Zdravi
D> D. Toman
A> Ja samozrejme taky(je totiz nejlepsi). Pokud by nekdo vedel jak se to v nem
A> da nastavit tak se ozvete. Ja jsem to nenasel.
Uz jsem na to prisel. Pokud by to nekdo potreboval :
do reply template daneho adresare staci napsat %SUBJECT="RE: %OSUBJ"
--
S pozdravem
Ji�� Kubelka ��� Als.FofrsIT(zv)worldonline(tec)cz ���
Ako prehrat AVI nie zo suboru?
[*] Pavol Stolc <pstolc(zv)sc.sknet.sk> - 15.7.2000 14:01:29
Ahoj,
pre TAnimate pouzi
Animate1.ResName := 'AVI';
pre TMediaPlayer neviem.
Pavol Stolc
pstolc(zv)sc.sknet.sk
----- Original Message -----
From: Robert Zak <nrsys(zv)psn.sk>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, July 14, 2000 4:26 PM
Subject: Ako prehrat AVI nie zo suboru?> Potrebujem prilinkovat k programu subor aa.avi a prehrat ho v
TMediaplayeri.
> Pokial ho vlozim do MediaPlayeru, ten ma property FileName a kedze ho mam
> prilinkovany a nie v subore, neviem ako mu ho podhodit ..
> Mozete mi prosim napisat postup spravneho zlinkovania + vlozenie do
> mediaplayeru?
>
> robim to prvy raz, mozno mam niekde chybu ale prilinkoval som to takto:
> 1. Vytvoril som subor "pril.rc" a napisal do neho:
> VIDEO1 AVI "aa.avi"
> 2. zlinkoval som ho cez "brcc32.exe pril.rc"
> 3. do programu som vlozil {$R pril.res}
> 4. Na mieste kde som chcel subor pouzit som pouzil:
> ResHandle :=FindResource(hInstance,'VIDEO1','AVI');
> MemHandle:=LoadResource(hInstance,ResHandle);
> MemPointer :=LockResource(MemHandle);
> 5. Teraz potrebujem vlozit handle do mediaplayeru a spustit
> TMeiaplayer.Play. Rovnako to potrebjem aj do TAnimate.
>
> Dakujem
>
> Robo
Updaty SW
[*] Pavol Stolc <pstolc(zv)sc.sknet.sk> - 15.7.2000 14:21:22
Ahoj,
podla mna je najlepsie urobit KOREKTNU instalaciu, ktora obsahuje zapis do
registru napr:
HKLM\Software\Microsoft\Windows\CurrentVersion\App
Path\(default)='c:\programy\myapp\myapp.exe'
HKLM\Software\Microsoft\Windows\CurrentVersion\App
Path\Path='c:\programy\myapp'
potom uz update lahko najde co potrebuje.
ak si to takto neurobil, ostava ti len prehladat vsetky podadresare vsetkych
diskov :-)).
Win32 API fcie, FindFirstFile, FindNextFile, FindClose, (FindFileInTree?),
GetDriveType
Pavol Stolc
pstolc(zv)sc.sknet.sk
----- Original Message -----
From: Lud�k P�ral
To: Konference
Sent: Friday, July 14, 2000 11:49 PM
Subject: Updaty SW
Potrebuji posilat nove verze produktu s tim, aby instalace vzdy nasla
instalacni cestu. Existuje nejaky freewarovy produkt ? Stacila by mi i
procedura nebo API funkce, ktera nalezne na PC cestu k urcenemu souboru.
Ludek Paral
Sadova 2/503
352 01 As
ludek.paral(zv)telecom(tec)cz
www.mujweb(tec)cz/pocitace/lupasoft
Chcete dostavat penize za zapnuty monitor ?
http://www.intecom(tec)cz/viewbar/index.asp?parentID=1310012
Cache updates, Master/detail na IB
[*] Tomas Vesely <veselyt(zv)atlas(tec)cz> - 15.7.2000 15:32:49
Ahoj Delphinaci,
Omlouvam, se vsem minulou zpravu jsem poslal v HTML formatu, proto ji poslu
jeste jednou.
Mam problem ktery nemuzu vubec vyresit, probiralo se to tu vicekrat, ale
odpoved jsem take nenasel. Mam master a detail IBQuery chache update je
zapnut pokud ale zapisi novy zaznam do masteru i do detailu a pak poslu
applyupdates tak me ulozi jen master. Kde je problem.Kod vypada asi
nasledovne: /pisu to z hlavy/
try
Master.ApplyUpdates;
Detail.ApplyUpdates;
Transaction.CommitRetaining;
except
Transaction.RollbackRetaining;
end;
Master.CancelUpdates;
Detail.CancelUpdates;
Samozrejme transakce je aktivni, protoze pouzivam IB komponenty. Dokonce me
nefunguje toto ani s tabulkama, i kdyz pred touto procedurou odstranim
mastersource. Kdyz vypnu cache tak to funguje.
Diky za jakykoli tip
Tomas
TADODataset a TThread
[*] Erik Salaj <winsoft(zv)napri.sk> - 15.7.2000 16:12:16
> procedure TMyThread.Execute;
> begin
> try
> ThrADODataset.Open; // tady rve EOLEException with Message "Nebyla
> volana procedura Colninitialize"
> Synchronize(ConnectDatasource);
> except
> Application.Terminate;
> end;
> end;
Tak tam CoInitialize dopln, takisto CoUninitialize.
> P.S.2 Potrebuju vlastne, aby se program pri otevirani tabulky nechoval
> jakoby zamrzl.Tabulka je dBaseIV a je velka a je na NW serveru, takze to
> nejakou chvilku trva. a uzivatele jsou "vselijaci" a vetsinou
> nevypocitatelni...
ADO podporuje asynchronne citanie zaznamov.
Erik Salaj, WINSOFT
ADONIS - opWithoutAbsolutePosition
[*] Erik Salaj <winsoft(zv)napri.sk> - 15.7.2000 16:39:03
> Tak jsem si v helpu k ADONISu precetl, ze nastaveni priznaku
> opWithoutAbsolutePosition se zvysi rychlost navigace v klientskem datasetu
> asi 10x (!), ale ouha, v tento moment mi prestal chodit scrollbar DBGridu,
> ktery tendo DataSet zobrazuje.
>
> Chtel bych zachovat vysokou rychlost navigace ale take funkcnost
ScrollBaru,
> kudy z toho ven ?
Asi to nepojde. Bez pozicie zaznamu DBGrid nezobrazuje korektne scrollbar.
Erik Salaj, WINSOFT
Detekce stavu online
[*] Milan ��ek - 15.7.2000 17:08:30
To je presne ten problem. Zkousel jsem tu funkci, cos poskytl, ale vraci
true, i kdyz internet vubec nemam. Mam ale nainstalovane TCP/IP, pres
LoopBack adapter (pouze na testovani), a modem GVC (ovladace), konfigurace
pripojeni internetu neni vubec nastavena. Testuju to ve Win98.
Poradi nekdo, proc se tak deje?
S pozdravem Milan Cizek, amatersky programator, D4 CS
Win98 a Win2k, cizek.milan(zv)seznam(tec)cz, ICQ:59826637
----- Original Message -----
From: "p. Jirman" <jim.design(zv)iol(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, July 13, 2000 11:14 AM
Subject: Re: BorderIcons
> > k tomu hned dotaz: nemate nekdo nejakou zarucene funkcni komponentu na
> > detekci online pripojeni na internet, je jich cela rada, ale nektere
> > nefunguji, neni-li napriklad modem (TCP/IP) vubec instalovan.
>
> Function InternetGetConnectedState (lpdwFlags: LongInt; dwReserved:
> LongInt): Boolean; stdcall; external 'wininet.dll';
>
> implementation
>
> {$R *.DFM}
>
> Function TForm1.Test_Pripojeni (): boolean;
> var Flagy: LongInt;
> begin
> Flagy := 0;
> Result := InternetGetConnectedState(Flagy, 0);
> end;
>
> {pokud funkce vrati hodnotu TRUE, pocitac je prave pripojen na Net}
>
> M.Jirman
Pervasive SQL
[*] Jan Naiser <tua(zv)wo(tec)cz> - 15.7.2000 17:23:08
Preji pekny den,
nedela tu nahodou nekdo s vyse uvedenym serverem? Obcas narazim na problem a
potreboval bych ho zkonzultovat.
Diky, Honza.
QR a tiskarna Star LC-1511
[*] Ing. Petr �vejda <lingvista(zv)lingvista(tec)cz> - 15.7.2000 17:41:07
nemate nahodou nekdo zkusenosti s tiskem QR na vyse uvedene Starce?
Mam spravny a nenovejsi ovladac, normalni sestavy v QR, ktere na jinych
tiskarnach chodi a na Starce to tiskne nesmyslne znaky, spatne strankuje,...
ve Wordu, Excelu, DOSu tiskne normalne. Akorat s QR si nerozumi. Co s tim?
Dik za kazdy namet a zkusenost
Ing. Petr Svejda
software specialist
CASE & mySQL
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 15.7.2000 18:04:12
Nebo Power Designer (drahy) ci CaseStudio (http://www.casestudio.com) -
levny, cesky ale neumi toho tolik a asi ani MySQL (ale slo by to urcite
dodelat ;-)
Mac
----- Original Message -----
From: "Daniel Sichta" <dano(zv)customweb.sk>
Ten SW navyzera zle, ale podla mojho nazoru pod pojmom CASE si predstavujem
nieco ine. Napr ERWin.
Dan
OT: CASE & mySQL
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 15.7.2000 18:05:03
A neni zdarma, jak se vetsina lidi domniva ;-)
----- Original Message -----
From: "Dalibor Toman" <dtoman(zv)fortech(tec)cz>
> Ono taky existuje spousta aplikaci, ktere transakce vubec nepotrebuji
> (napriklad vyhledavaci stroje) a napak potrebuji rychlost - kterou podle
> ruznych zdroju prave MySQL ma. Navic je pomerne dost rozsirene a existuje
> pro vice platforem.
instalacia MSDE
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 15.7.2000 18:07:09
From: "Zbysek Hlinka" <zhlinka(zv)login(tec)cz>
>
> > Instalujem na Win98 MSDE z CD "MS VISUAL STUDIO 6.0 Plus Pack"-
>
> Precti si poradne prilozene readme a delej to presne podle toho. To
> znamena, ze musis uvadet plnou cestu na iss soubor.
Presne tak, ta cesta MUSI byt plna (tzn. vcetne jmena disku) ...
Mac
Updaty SW
[*] L. ZITA <konference(zv)sales(tec)cz> - 15.7.2000 18:25:04
Behalf Of Surfman
> Ahoj,
>
> Napis si pri nstalaci sestu do registru a pri update si ji zase vyzvedni.
> Pokud uz je na to pozde, aplikuj to v tom updatu, ktery chces posilat.
> Jinak pouzij funkci FindFirst/FindNext v procedure, ktera bude
> volana rekurzivne
>
> Pavel
Zdravim.
Mozna mene prace je pouzit fci SearchTreeForFile.
napr :
uses imagehlp;
var
FoundPath: array[0..MAX_PATH] of Char;
begin
if SearchTreeForFile('C:\', 'notepad.exe', FoundPath) then
ShowMessage(FoundPath);
Ludek
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.145 / Virov� b�ze: 69 - datum vyd�n�: 4.5.2000
Tipy do Delphi
[*] Milan C�zek - 15.7.2000 19:43:58
Tvuj program se mi docela libi. Ve win2k ale pada, jak listi na podzim.
Vetsinou pri zavirani, ale stava se, ze se databaze tipu vubec nenacte, a
pokud ji dam otevrit, tak se objevi okno, abych vyckal, ale to bych cekal do
nekonecna... Predchozi verze takove problemy nemela - i kdyz nejake byly.
Ale zajimalo by me, jak vyresis, aby se nektere typy neopakovali ap. Ja jsem
napr. zkusil 1typ co jsem ti tam uploadnul prepsat a poopravit nazev, tudiz
jsou tam ted asi 2, s uplne stejnym obsahem. Jinak souhlasim s TomasemB -
databaze by mela byt asi jednotna, ale tvuj klient je docela dobrej (teda az
vychytas vsechny mouchy a padani ve Win2k) :-).
S pozdravem Milan Cizek, amatersky programator, D4 CS
Win98 a Win2k, cizek.milan(zv)seznam(tec)cz, ICQ:59826637
----- Original Message -----
From: "Dalibor Toman" <dtoman(zv)fortech(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, July 14, 2000 1:10 PM
Subject: Re: Re[2]: Tipy do Delphi
>
> >Taky se primlouvam za podporu proxy ;-)
>
> primlouval bych se za zastreleni netopyra. Nabo alespon jeho konfiguraci,
> aby nepridaval tu pitomou [2] do Re. Trideni zprav podle subjektu pak v
> jinych mailerech jaksi nefunguje...
>
> Zdravi
> D. Toman
>
>
>Poznamky - drive Tipy do Delphi
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 15.7.2000 18:56:09
Puvodni zprava, kterou napsal Petr Vaclavek dne 11 Jul 00,:
> Mrkni na http://atrey.karlin.mff.cuni(tec)cz/~bla/poznamky.shtml
> Umi to defacto to same co tvoje (krome uploadu a downloadu na
> Inet), a v mnoha vecech to je lepsi -- treba prehledna stromova
> struktura, moznost pridavat i netextove soubory, RTF, kodovani,
> Zalozky (i kdyz to tam mas asi taky). A ty tvoje tipy do toho
> prekllopis velmi snadno :-)
Petre,
jen tak pro zajimavost jsem se dival na Tvuj programek a mam
malou pripominku. Prosim neber to jako, ze Ti chci znechutit
praci nebo tak neco. Ale jsi malinko dezorientovany, takze
Ti chci spis neco malo vysvetlit. A mozna to bude zajimat
i ostatni (uz jsem videl nespocet podobnych chyb v mnoha
programech), proto to pisi i do konference. Tyka se to pojmu
kodovani a sifrovani. Tvuj program ani nekoduje a ani nesifruje.
Oba zcela rozdilne pojmy ale v programu pouzivas pro tu samou
vec.
Kodovani, ktere se dost casto zamenuje za sifrovani, znamena
prideleni urciteho kodu nejake informaci. Typickym prikladem
je treba kodovani ASCII, kdy jednotlivym znakum jsou pridelena
urcita cisla. Jeden znak ma stale stejne cislo.
Sifrovani znamena, ze pomoci nejake sifrovaci funkce a
sifrovaciho klice vytvoris z otevreneho textu text sifrovy.
Desifrovani pak znamena, ze pomoci desifrovaci funkce
a desifrovaciho klice vytvoris z sifroveho textu text
otevreny.
Koukal jsem se, co dela Tvuj program pri kodovani/sifrovani.
Pravda, spise koduje nez sifruje. Takze ulozis do souboru
slovo (zv)Coded a za nej soucet ASCII hodnot vsech znaku hesla.
Priklad - pismeno "a" ma ASCII hodnotu 97, takze napises:
(zv)Coded97 pro heslo "a". Pro heslo "ab" to bude 97+98=195.
Tak a tady je prvni problem. Za prve toto je velmi pruzracny
system, ale za druhe take heslo "ab" se chova uplne stejne
jako "ba" a nasli bychom spoustu takovych podobnych. Dale
pak zakodujes text tak, ze ASCII hodnotu kazdeho znaku
odectes od 256. Takze znak "a" s hodnotou 97 ($61) bude tady
reprezentovan jako 256 - 97 = 159 ($9F).
Takze vlastne v tom souboru je ulozeno zcela otevrene heslo
jako soucet pismen a otevreny text zakododovany podle stale
stejne tabulky. Neni to bezpecne. Opakuji, ze Ti to nepisi
proto, ze bych snad neco proti Tobe mel, ale pro pouceni,
co delat a co nedelat. Predpokladam, ze kdyz neco takoveho
delas, mas zajem na tom, aby to opravdu fungovalo. Doporucil
bych zapomenout na tento zpusob a nasadit opravdove sifrovani.
S pozdravem
Petr Zahradnik, pocitacovy expert
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917, PGP vitano
Tipy do Delphi
[*] Pavel ZIDEK <kopr(zv)kopr(tec)cz> - 15.7.2000 19:56:14
No ja si myslim, ze takovy programek je uzitecny. Jakmile naprogramuji
nejaky fajny kousek a vim, ze bych to mohl nekde v budoucnu potrevovat, tak
si jej nekam zapisi (napr. kousek komponenty). Problem je to ale najit.
Jakmile ale mam na to nastroj, archivace i hledani se usnadni. A jakmile
nekdo neco nevi a ja vim, ze jsem jiz cosi podobneho delal, tak se s radosti
podelim s ostatnima.
Pavel ZIDEK
----- Original Message -----
From: David Lebeda <david.lebeda(zv)comarr(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, July 14, 2000 9:22 AM
Subject: RE: Tipy do Delphi
> > > Program Tipy & Triky do Delphi jsem na cetne zadosti vylepsil
> > program vypada dobre, ale pokus o download vyhodi chybu spojeni.
> > jsem za proxinou a mame pevnou lajnu. nikde jsem nenasel zadne
> > nastaveni zpusobu pripojeni. plz help.
> >
> > dekuji peca
> >
> > btw: sdilena databaze TaT po netu je docela dobrej napad :)
>
> Zdravim,
>
> nemam momentalne cas se na ten program podivat, proto prosim o
> vysvetleni.
> Kdyz mam nejaky problem, obvykle projdu archiv a casto tam
> najdu reseni. Pokud jsem to dobre pochopil, program Tipy a Triky
> spravuje nejakou vlastni databazi, ktera se casem zrejme naplni.
> Ale: ma to vubec sanci konkurovat archivu teto konference?
> Povazuji obecne za zbytecne, kdyz kdejaky fanousek Delphi zalozi
> na sve strance stranku s cilem shromazdovat tam finty k Delphi
> (napr. web.telecom(tec)cz/mister, pokud to jeste plati), protoze tam je
> obvykle jen malo veci a takovych stranek se toula po inetu
> spousta, takze je prakticky vyloucene je prohledavat.
> Nepovede T&T zase k situaci, kdy kdyz clovek bude chtit neco
> najit, bude muset prohledat celou radu zdroju?
>
> Aby bylo jasno - nic ve zlym, mozna se mylim a vsechno je jinak.
> Ja se jen ptam, jak je to doopravdy.
>
> David
>onclick na dynamicky vytvorene komponente
[*] Pavel Kahle <kahle(zv)atlas(tec)cz> - 16.7.2000 02:12:55
Zdravim,
v kodu komponenty odvozene z TdbGridu vytvarim dynamicky TUpDown,
ale bohuzel se mi nedari priradit udalost onclick u teto komponenty.
Pokud vytvorim TspeedButton - vsechno funguje pokud puziji Tbutton tak ne,
prestoze typy procedur odpovidaji.
Poradi nekdo, kde bych mohl delat chybu ?
Odchyceni klavesy F5
[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 16.7.2000 08:12:15
Do OnKeyDown si dej ShowMessage(IntToStr(Key)) a mas ASCII hodnotu jakekoliv
klavesy
Jan Fiala
----- Original Message -----
From: "Hurricane" <hurricane(zv)email(tec)cz>
> Zdravim
>
> Pottebuji v programu odchytavat klavesu F5 pomoci procedury KeyPress.
Pomoci
> Label1.Caption := IntToStr(Ord(Key)); jsem ascii hodnotu neyjistil (Fka
> totiz nejsou v ascii tabulce). Nevite nekdo, jak to udelat.
>
> Dekuji za jakekoli nakopnuti, ale pouze spravnym smerem
>
> Hurricane
> hurricane(zv)email(tec)cz
>
>Pervasive SQL
[*] Michal K�s <kus(zv)tangosw(tec)cz> - 16.7.2000 10:01:03
Ahoj,
pouzivame ho, ale jen castecne.
Vyuzivame ho jako Btrieve, SQL cast nepouzivame.
Michal Kus
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Jan Naiser
> Sent: Saturday, July 15, 2000 5:23 PM
> To: Delphi konference
> Subject: Pervasive SQL
>
>
> Preji pekny den,
>
> nedela tu nahodou nekdo s vyse uvedenym serverem? Obcas
> narazim na problem a
> potreboval bych ho zkonzultovat.
>
> Diky, Honza.
>
>
>
>
>
> Odchyceni klavesy F5
[*] Petr Kejval <petr.kejval(zv)worldonline(tec)cz> - 16.7.2000 10:33:28
Nap�. takhle:
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key = vk_F5 then
ShowMessage('F5');
end;
Petr Kejval
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Hurricane
Sent: Friday, July 14, 2000 6:24 PM
To: delphi-l(zv)fwd(tec)cz
Subject: Odchyceni klavesy F5
Zdravim
Pottebuji v programu odchytavat klavesu F5 pomoci procedury KeyPress. Pomoci
Label1.Caption := IntToStr(Ord(Key)); jsem ascii hodnotu neyjistil (Fka
totiz nejsou v ascii tabulce). Nevite nekdo, jak to udelat.
Dekuji za jakekoli nakopnuti, ale pouze spravnym smerem
Hurricane
hurricane(zv)email(tec)cz
---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.167 / Virov� b�ze: 80 - datum vyd�n�: 29.6.2000
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.167 / Virov� b�ze: 80 - datum vyd�n�: 29.6.2000
restart sama sebe
[*] Heinisch Jiri <deis(zv)deis(tec)cz> - 16.7.2000 10:44:47
Ahoj
Ano tak jsem to nakonec udelal , jeste musim ale vyresit vlozeni timeru
pro zpozdeni, jinak nelze pri zakazu spusteni vice instanci pouzit.
Pri polozeni teto otazky jsem tajne doufal v existenci tajne formule v WIN
API a jeji odhaleni Petrem Vonesem. Bohuzel zazraky se deji jen nekdy :-)))
S pozdravem Heinisch Jiri
> > - aplikace je volana jinou aplikaci (jednoucelova treba neviditelna,
> > tj. bez ikony v taskbaru, ..., aplikace, ktera po svem spusteni tu
>
> to je ono. Tento zpusob se pouziva relativne casto.
>
> Petr Vones, amatersky programator
IB6 predlzenie licencie
[*] Michal K�s <kus(zv)tangosw(tec)cz> - 16.7.2000 12:21:06
Me prijde dost podivne, �e prodlouzeni je tak dlouhe.
Michal Kus
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Roland Tur�an (RoTurSoft)
> Sent: Saturday, July 15, 2000 2:31 AM
> To: Delphi CZ konferencia
> Subject: IB6 predlzenie licencie
>
>
> Zdravim.
>
> Preco IB zase predlzuju datum funkcnosti beta verzie ?
>
> Dakujem
>
> Roland.
>
>
>
Optimalizacia SQL
[*] Michal Hlavac <7hlavac(zv)st.fmph.uniba.sk> - 16.7.2000 13:12:46
Zdravim,
pokusim sa este raz. Pouzivam Sybase SQL, Delphi 5, SQLDirect komponenty;
Neviem si rady. Mam tabulky usmev2, dealeri.
usmev2: Id, nazov, adresa, mesto, Id_dealer
dealeri: Id_dealer, popis, spravca
Databaza je rozdelena na sekcie(query), ktore urcuje spravca. To znamena, ze
viac
dealerov ma spolocneho spravcu (spravca je cislo). Ja robim hlavne view
podla spravcu, lenze na to musim pouzit JOIN, co znamena ze uz do view
nemozem pouzit insert. Dalo by sa to s tym view nejako rozumnejsie urobit.
Nechcem robit insert do povodnej tabulky kvoli pravam uzivatelov.
View vyzera asi takto:
SELECT usmev2.*
FROM users.dealeri JOIN users.usmev2 ON dealeri.ID_dealer=usmev2.Dealer
WHERE (dealeri.Spravca=1)
Toto je sekcia, ktora zgrupuje delaerov spravcu cislo 1.
No vlastne potrebujem jednoduchy view, na ktory budem moct pouzit prikazy
insert, delete, update a aby splnal tieto kriteria.
Jedna moznost je dat atribut spravca do tabulky usmev2, lenze, ked budem
napriklad menit dealerovi spravcu, potom by som ho musel menit aj vo
vsetkych zaznamoch v tabulke usmev2, co je blbost.
Dik za pomoc. Miso
Optimalizacia SQL
[*] Jaro <jaro(zv)sinea(tec)cz> - 16.7.2000 15:04:05
Asi bude rozumnejsi to akladat pres ulozenou proceduru pro Insert,
update a delete
pro obe tabulky
Jaro
Subject: Optimalizacia SQL
> Zdravim,
>
> pokusim sa este raz. Pouzivam Sybase SQL, Delphi 5, SQLDirect
komponenty;
>
> Neviem si rady. Mam tabulky usmev2, dealeri.
>
> usmev2: Id, nazov, adresa, mesto, Id_dealer
> dealeri: Id_dealer, popis, spravca
>
> Databaza je rozdelena na sekcie(query), ktore urcuje spravca. To
znamena, ze
> viac
> dealerov ma spolocneho spravcu (spravca je cislo). Ja robim hlavne
view
> podla spravcu, lenze na to musim pouzit JOIN, co znamena ze uz do
view
> nemozem pouzit insert. Dalo by sa to s tym view nejako rozumnejsie
urobit.
> Nechcem robit insert do povodnej tabulky kvoli pravam uzivatelov.
>
> View vyzera asi takto:
>
> SELECT usmev2.*
> FROM users.dealeri JOIN users.usmev2 ON
dealeri.ID_dealer=usmev2.Dealer
> WHERE (dealeri.Spravca=1)
>
> Toto je sekcia, ktora zgrupuje delaerov spravcu cislo 1.
>
> No vlastne potrebujem jednoduchy view, na ktory budem moct pouzit
prikazy
> insert, delete, update a aby splnal tieto kriteria.
>
> Jedna moznost je dat atribut spravca do tabulky usmev2, lenze, ked
budem
> napriklad menit dealerovi spravcu, potom by som ho musel menit aj vo
> vsetkych zaznamoch v tabulke usmev2, co je blbost.
>
> Dik za pomoc. Miso
>Jak vypnout Explorer ?
[*] Jirka Virt <virt(zv)volny(tec)cz> - 16.7.2000 16:06:47
Ahoj ,
do WIN.INI adresare Windows zadej
RUN = Moje.exe
Spusti se pouze tento program bez Windows.
Jirka Virt
email: virt(zv)volny(tec)cz
----- Original Message -----
From: Tom�s Janta� <tomasnusle(zv)volny(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, July 14, 2000 9:29 AM
Subject: Jak vypnout Explorer ?> Ahoj,
>
> Mam problem se zabezpecenim pocitace na kterem by mel bezet merici soft.
> Je treba zabranit obsluze hrat hry a hrabat se v systemu.
> Protoze bude pocitac urcen pouze pro mereni, neni nutny pristup k zadnym
> funkcim windows ani na zadny disk.
> Zpristupneni systemu by melo byt pouze pod heslem. Zatim jsem tento
problem
> vyresil tak ze jsem schoval Taskbar a vypnul klavesove zkratky Windows.
> Napadlo me ze lepsim resenim by bylo vypnout explorer a v pripade potreby
ho
> za pomoci programu opet zapnout.
> Nevite nekdo jak na to ?
> NT, Linux nebo jiny system pro tuto aplikaci neni vhodny.
>
> Tomas Jantac
>
>
>TToolButton.AutoSize
[*] Heinisch Jiri <deis(zv)deis(tec)cz> - 16.7.2000 19:10:49
Ahoj
Potreboval bych nastavit pevnou sirku ToolButton , bohuzel vlastnost
vlastnostTToolButton.AutoSize mi nejak nefunguje.
Porad se to automaticky nastavuje podle aktualni delky textu v tlacitku.
Vyzkousel jsem snad uz vsechny nastaveni od Wrapu po Wrapeable a
porad je to stejne.
S pozdravem Heinisch Jiri
BorderIcons a Tipy&Triky
[*] Milan ��ek - 16.7.2000 19:29:35
ahoj,
pro vytvoreni novych BorderIkon jsem nasel docela peknou komponentu od
UtilMindu TCaptionButton. Funguje spolehlive a dobre, ale mam 1takovou
detailni otazku: pokud vytvorim dalsi tlacitko, ktere je "prilepene" na
sousedni (vzdalenost noveho tlacitka od souseda = vzdalenosti tlacitek pro
zavreni a maximalizaci aplikace), tak pokud treba hybnu Formem, tak se mi
cast meho noveho tlacitka zprava prekresli barvou pozadi (jedna se asi o
1pixel). Zrejme to ma neco spolecneho s prekreslenim formu.
Poradi nekdo, jak udelat, abych mohl mit svou ikonu presne tam, kde ji mit
potrebuju (nazornou ukazkou je program ConnectionMeter)? Pripadne mate-li
zkusenosti s nejakou obdobnou komponentou, ktera tento problem resi,
doporucte...
k programu T&T: jestli jsem to dobre pochopil, tak pro upload komponenty se
pouziva SMTPprotokol, a posila se normalne mailem na adresu (asi autora)??
Me se ale vse, co jsem uploadnul vratilo klasicky mailem jako
nedorucitelne!!!
S pozdravem Milan Cizek, amatersky programator, D4 CS
Win98 a Win2k, cizek.milan(zv)seznam(tec)cz, ICQ:59826637
Updaty SW
[*] Lud�k P�ral - 16.7.2000 20:55:21
Korektni instalaci jsem provedl., ale nejsem zbehly v API funkcich, takze
neznam funkci, ktera mi cestu vyhleda.
Ahoj,
podla mna je najlepsie urobit KOREKTNU instalaciu, ktora obsahuje zapis do
registru napr:
HKLM\Software\Microsoft\Windows\CurrentVersion\App
Path\(default)='c:\programy\myapp\myapp.exe'
HKLM\Software\Microsoft\Windows\CurrentVersion\App
Path\Path='c:\programy\myapp'
potom uz update lahko najde co potrebuje.
ak si to takto neurobil, ostava ti len prehladat vsetky podadresare vsetkych
diskov :-)).
Win32 API fcie, FindFirstFile, FindNextFile, FindClose, (FindFileInTree?),
GetDriveType
Potrebuji posilat nove verze produktu s tim, aby instalace vzdy nasla
instalacni cestu. Existuje nejaky freewarovy produkt ? Stacila by mi i
procedura nebo API funkce, ktera nalezne na PC cestu k urcenemu souboru.
Updaty SW
[*] Lud�k P�ral - 16.7.2000 21:26:22
Ano, v instalaci (Installshield Express) mam nastaven HKEY_CURRENT_CONFIG
,atd, ovsem nevim, jaky postup zvolit pri updatu, zda to umoznuje
Inst.Express nebo zda si musim vytvorit vlastni utilitu.
> Potrebuji posilat nove verze produktu s tim, aby instalace vzdy nasla =
> instalacni cestu. Existuje nejaky freewarovy produkt ? Stacila by mi i =
> procedura nebo API funkce, ktera nalezne na PC cestu k urcenemu souboru. =
To se vetsinou nedela tak, ze prochazis cely disk nebo
vsechny disky, ale tak, ze si cestu na program napises
do registru a pak si ji tam najdes...
S pozdravem
Petr Zahradnik, pocitacovy expert
BorderIcons a Tipy&Triky
[*] Hurricane <hurricane(zv)email(tec)cz> - 16.7.2000 22:23:36
> ahoj,
> pro vytvoreni novych BorderIkon jsem nasel docela peknou komponentu od
> UtilMindu TCaptionButton. Funguje spolehlive a dobre, ale mam 1takovou
> detailni otazku: pokud vytvorim dalsi tlacitko, ktere je "prilepene" na
> sousedni (vzdalenost noveho tlacitka od souseda = vzdalenosti tlacitek pro
> zavreni a maximalizaci aplikace), tak pokud treba hybnu Formem, tak se mi
> cast meho noveho tlacitka zprava prekresli barvou pozadi (jedna se asi o
> 1pixel). Zrejme to ma neco spolecneho s prekreslenim formu.
> Poradi nekdo, jak udelat, abych mohl mit svou ikonu presne tam, kde ji mit
> potrebuju (nazornou ukazkou je program ConnectionMeter)? Pripadne mate-li
> zkusenosti s nejakou obdobnou komponentou, ktera tento problem resi,
> doporucte...
Uz sem psal o komponentach R&A Library (adresa je v archivu) S ni jsem zadne
problemy nemel.
Hurricane
Updaty SW
[*] Hurricane <hurricane(zv)email(tec)cz> - 16.7.2000 22:28:15
Zdravim
Ty potrebujes cestu k tvoji aplikaci, at je kdekoliv? To je takhle:
Application.ExeName (vraci napr. C:\soft\Project1.exe). Nebo pouzij toto:
ExtractFilePath(Application.ExeName) To ti vrati jenom C:\soft\ .
Snad je to, to cos chtel.
Hurricane
----- Original Message -----
From: Lud�k P�ral <ludek.paral(zv)telecom(tec)cz>
To: Konference <delphi-l(zv)fwd(tec)cz>
Sent: Sunday, July 16, 2000 8:55 PM
Subject: Fw: Updaty SW
> Korektni instalaci jsem provedl., ale nejsem zbehly v API funkcich, takze
> neznam funkci, ktera mi cestu vyhleda.Tipy do Delphi
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 17.7.2000 00:14:56
From: "Michal Hlavac" <7hlavac(zv)st.fmph.uniba.sk>
> ale na druhej strane suhlasim s Tomasom. Omnoho lepsie (IMHO) by bolo urobit
> centralny server na, ktoreho by sa mohlo urobit milion klientov. Ale hlave
> by bol jeden, a mal by urcite sirsiu klientelu ako 5 mensich samostatne
> beziacich. Ide predsa o kvalitu.
Ahoj,
podobne je udelana CodeCentral (http://community.borland.com/codecentral).
V soucasne dobe je pristup jen pres WWW, ale kdysi existoval i klient (casem
snad opet bude). Je to jedna z moznosti jak muze takova databaze vypadat,
navic v tomto pripade i demonstruje prakticke pouziti Borland technologii.
Uz jsme to s Tomasem nekolikrat probirali. Problem neni tak ani v klientske
aplikaci, ale spis v tom ze "nejsou lidi" :-) Ze zacatku by klidne jednotlive
FAQ mohly byt ulozene v databazi na serveru (WWW pristup) a pro offline cteni
jako vygenerovane HTML stranky v ZIP archivu (tak jako napriklad UNDU FAQ)
nebo v CHM formatu. Casem by se to samozrejme dalo predelat, treba s vyuzitim
InternetExpress ci podobnych komponent. To ted ale neni dulezite. Jde predevsim
o *OBSAH*, jeho rozdeleni, overovani a podobne. Tohle je totiz prace na mnoho
clovekohodin. Databaze FAQ uz existuje u Borlandu (i ke stazeni), takze (se
souhlasem Borlandu) by slo treba neco pouzit. Zakladni idea byla aby veskery
obsah byl v cestine, castecne lze vyuzit bohaty archiv konference (nekdo jej
ale musi projit ;-), neco lze udelat dodatecne po rozdeleni do kategorii. Dale
v zajmu zachovani dusevniho zdravi vsech zucastnenych by bylo dobre nejak
dohodnout rozsah 'podporovanych verzi' Delphi. Z vlastni zkusenosti vim, ze
neni mozne plne podporovat vsechny verze (o 16bit uz vubec nemluve). Jako
rozumny kompromis se jevi soucasna a predchozi verze Delphi. To neznamena ze
by ostatni byly uplne zatraceny, ale v pripade vetsich problemu s odlisnostmi
zdrojaku by podpora starsich verzi byla odsunuta do oblasti s nizsi prioritou.
Samozrejme lze udelat anketu ktere verze jsou v soucasne dobe pouzivany a dle
toho celou zalezitost trochu optimalizovat. Soucasti ankety by take mohlo byt
jak velky zajem je vubec o existenci takovych tuzemskych FAQ. Internet vyznamne
obohatil moznosti komunikace a ziskavani informaci. Nelze tedy jednoznacne rict
kolika procentum je blizsi si najit danou informaci v nekterem ze zahranicnich
zdroju a kdo da naopak prednost obsahu v cestine.
Nechci tim tedy nijak kazit nadseni autoru vsech moznych FAQ prohlizecu, ale s
prihlednutim k tomu, ze nejsme zase tak velka zeme a tedy zde nejsou tisice
vyvojaru by bylo lepsi vynalozeny cas venovat predevsim na tvorbu kvalitniho
obsahu.
Petr Vones, amatersky programator
Updaty SW
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 17.7.2000 00:15:46
From: "Lud�k P�ral" <ludek.paral(zv)telecom(tec)cz>
> Korektni instalaci jsem provedl., ale nejsem zbehly v API funkcich, takze
> neznam funkci, ktera mi cestu vyhleda.
Ahoj,
napriklad takhle:
uses
ImageHlp;
function TreeFileSearch(const RootPath, FileName: string): TFileName;
begin
SetLength(Result, MAX_PATH);
if SearchTreeForFile(PChar(RootPath), PChar(FileName), PChar(Result)) then
Result := PChar(Result)
else
Result := '';
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage(TreeFileSearch('C:\', 'notepad.exe'));
end;
Petr Vones, amatersky programator