Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
D5 - ano ci ne ?
[*] Jaro <jaro(zv)sinea(tec)cz> - 1.12.1999 20:46:19 -0800
D5 snad ani neni narocnejsi na pamet, ale mnohem horsi je to se systemovymi
zdroji.
Proto je lepsi D5 provozovat na NT4 nebo NT2000.
Pro tyto systemy je potreba mit 64 MB RAM Zato ziskate
stabilitu, lepsi vykon a precerpat zdroje se vam hned tak nepodari.
Jaro
> Zdravim
>
> Rad bych dotaz doplnil o narocnost na HW.
> Napriklad na notebooku (Pentium 150Mhz, 16MB RAM) D3 behala celkem OK ale
D4
> uz nebylo pouzitelne. Po rozsireni RAM na 48MB uz to celkem jde.
> Jak je to s D5 ? O kolik je zase narocnejsi.
>
> Mam na mysli spise chovani editoru nez dobu prekladu (ta samozrejme zavisi
> na rozsahu projektu)
>
>
> eL..
>Volani funkce z DLL
[*] Petr Brant <p.brant(zv)samo(tec)cz> - 2.12.1999 06:34:29
Ahoj,
s nizsi verzi Win95 nez je OSR2 mas smulu. V helpu se pise, ze tato
funkce je podporovana az od Win95 OSR2. Takze upgradovat nebo kompilovat
u kolegy. Tim padem ani funkcni ukazka nepripada v uvahu. :-((
**************************************************
Petr Brant [p.brant(zv)samo(tec)cz], programator v MSVC++,
obcas Delphi
**************************************************> Ahoj
>
> Pokusim se volat funkci z DLL a ne a ne a nedari se mi to :(
>
> Potrebuji zavolat fci:
> GetDiskFreeSpaceEx(
> PChar (Path),
> lpFreeBytesAvailableToCaller,
> lpTotalNumberOfBytes,
> lpTotalNumberOfFreeBytes bytes on disk
> );
>
> Takze podle starsich prispevku jsem postupoval asi takto:
> var
> lpFreeBytesAvailableToCaller,
> lpTotalNumberOfBytes: Int64;
> lpTotal: int64;
> lpTotalNumberOfFreeBytes: PLargeInteger;
> HInst: HMODULE;
>
> F: function (lpDirectoryName: LPCTSTR;
> var lpFreeBytesAvailableToCaller : int64;
> var lpTotalNumberOfBytes : int64;
> var lpTotalNumberOfFreeBytes : PLargeInteger
> ): BOOLean;
>
> begin
> // Nahrani knihovny
> HInst := LoadLibrary(PChar ('KERNEL32.DLL'));
> if (HInst = NULL) then ShowMessage ('fail LoadLibrary');
>
> (zv)F := GetProcAddress(HInst, PChar ('GetDiskFreeSpaceEx'));
> if ((zv)F = nil) then ShowMessage ('fail GetProcAddress'); // TADY
> UZ TO VRACI nil
>
> // Zjisteni velikosti disku
> F (
> PChar (Path),
> lpFreeBytesAvailableToCaller,
> lpTotalNumberOfBytes,
> lpTotalNumberOfFreeBytes
> );
> lpTotal := int64 (lpTotalNumberOfFreeBytes);
> end;
>
> Problem je, ze to potrebuji rozchodit na Win 95 OSR 2 a ja mam prvni
> disketovou verzi Windows :( Takze pokud by mi nekdo poslal funkcni
> ukazku na zjisteni volneho mista a kapacity disku, kde by se vyuzila
> tato procedura ( A NE GetDiskFreeSpace (ta vraci spatne vysledky pro
> disky vetsi nez 2GB)) tak bych byl neskonale stastny.
> OT Re: Instalace *.DPK
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 2.12.1999 07:40:24
Petr Vones wrote:
> > Preinstaloval jsem to, a vyrazne se to zlepsilo. I kdyz, jedno
> > tlacitko se stale prekresluje spatne. Protoze nevidim do zdrojaku,
> > nevim, jestli je stale chyba v ovladacich nebo maji chybu v
> > programu, nebo se chyba tahne z VCL.
>
> Tezko rict, v jake verzi Delphi je to udelany ?
Take tezko rict, ale podle vnitrku to tipuji na D4, ovsem nevim, s
jakou zaplatou. Nicmene nemel by byt problem to zjistit dotazem
(panu Soukupovi jsem odebirani teto konference vrele doporucil -
ostatne stejne jako Delphi :-), takze pokud ji jeho programatori
neodebiraji, neni to moje chyba :).
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
D5 - ano ci ne ?
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 2.12.1999 07:40:24
Miroslav �ipel wrote:
> proc ? VCL je mnohem lepsi nez MFC (proc asi v MS delaj COOL ?) napr.
> MFC neobsahuje nic co by se podobalo DBGridu a navic v C++ Builderu
> muzes pracovat jak s MFC tak i s VCL
Mno, muzu zde odprisahnout, ze DBGrid (a CustomGrid taktez) je
pekny zmetek, tedy v tom smyslu ze je silne prasacky napsany.
Zrovna se pokousim toto prevest na OLE DB Grid a narazim na
takove problemy, ze asi budu muset sahnout primo do CustomGrid
a opravit tam radu veci, aby vse fungovalo jak je treba. :-((
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, ADO & RDS do hloubky - prakticke zkuseno
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 2.12.1999 07:40:24
Ladislav Nagy wrote:
> PS: Zda se mi, ze jsem prisel na chybicku v Adonisech.
Kdyz je rec o ADO komponentach, pridam poznatek z testu nad
ADOExpress.
Testoval jsem na siti (slozene z Windows NT 4 Workstation)
pristup k MS SQL 7. Testovaci program SpeedTest, z Delphree
OLE DB komponent. Jeden pocitac jsem prohlasil za "server", na
nem lezi MS SQL. Na druhem pocitaci, "klientu", jsem spustil
SpeedTest. Dale jsem na obou pocitacich pustil sledovani
procesoru a pameti. SpeedTest zalozil databazi, v ni jednoduchou
tabulku.
CREATE TABLE TESTTABLE
(
ID int NOT NULL IDENTITY(1,1) PRIMARY KEY,
NAME varchar(40) NOT NULL UNIQUE,
AGE int NULL,
DATE_ datetime DEFAULT GETDATE()
)
Do tabulky jsem vkladal postupne 10 000 zaznamu, kde NAME a
AGE jsem nahodne generoval a posilal to cyklicky do databaze
jako prikaz INSERT. Tedy, vlastne jsem provadel srovnavaci testy s
BDE Query, BDE Table (oboje pres nativni link), BDE + ODBC
Table a Query, MS ADO (prime pouziti bez zapouzdreni) a moje
OLE DB komponenty. ADOExpress v tomto testu dopadly celkove
nejhure, v tesnem zavesu bylo BDE (nativ) Table. U Table jsem
samozrejme neukladal pres (sql) INSERT, ale metodami Insert,
naplneni fieldu, Post. Nejlepe si v tomto testu naopak vedly moje
OLE DB komponenty a kombinace BDE + ODBC Query.
Co vsak provadelo ADOExpress oproti jinym komponentam. Na
"klientu" pohltily na dost dlouhou dobu (ve srovnani s jinymi
pristupy, vyjma BDE (nativ) Table, ktery je take pomaly, ale
potrebuje mensi vykon) vykon procesoru, prakticky na 100% (bez
ohledu na to, zda jsem nastavil ADO Connect na klienta nebo
server). Na "serveru" vytizily procesor na kratkou dobu, a potom
zacaly (narozdil od ostatnich pristupu) alokovat na serveru pamet,
a spotrebovaly ji cca 70MB (sic!!!), a uz ji nevratily (tedy ukazatel
zustal trvale na dane hodnote).
Kazdemu doporucuji obdobne testy provest, protoze se pri tom
dozvite radu zajimavych vlastnosti.
BTW - zaroven jsem totez zkusil s InterBase, tam byly vysledky
popsaneho testu obecne zhruba 4-5x pomalejsi.
BTW2 - aby byla rovnovaha nastolena, zkuste si vytvorene
zaznamy natahnout do DBGridu pomoci BDE Query a
ADOExpress, a navic tridit zaznamy podle vybraneho sloupce. Zde
zase horce zaplacete nad BDE. :-O
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
Okno s BorderStyle "bsSizeable", ale bez "Caption"
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 2.12.1999 07:40:24
Vladimir Sladky wrote:
> Nevi prosim nekdo, jak se da udelat okno, ktere se chova jako
> normalni "bsSizeable", ale ma jen "klientskou cast" bez oblasti,
> ve ktere je "Caption" a "SysMenu" ?
Prohledni si TWinControl.CreateParams a Params.Style, pripadne
ExStyle a v helpu CreateWindow ci CreateWindowEx.
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
Pristup na PDX tabulku ze dvou pocitacu
[*] Ren� Otisk - 2.12.1999 07:59:13
Hi,
A kdyz znovu spustis klienta na tom druhem, tak se zmeny asi promitaji, ze?
Bud Table1.Refresh nebo Table1.Close a Open (pro zachovani aktualniho
zaznamu muzes pouzit TBookmark)
Sroub
> Mam dva pocitace v siti. Na jednom bezi "server" a "klient",
> na druhem bezi pouze "klient". "Server" zapisuje do tabulky,
> ktera je na stejnem pocitaci, a "klienti" z ni ctou
> a jistym zpusobem nactena data interpretuji.
> Problem je v tom, ze zmeny v tabulce vidi pouze "klient" na pocitaci
> na kterem bezi i "server". "Klient" na druhem pocitaci zmeny nevidi.
>
> Nevite nekdo cim by to mohlo byt?
>
> Jedna se o tabulku Paradox, Delphi 3, BDE 5.1, sit Windows NT TCP/IP.
> V driveru Paradoxu je na obou pocitacich polozka NetDir nastavena
> na adresar s tabulkou. U druheho pocitace je disk namapovany.
Pristup na PDX tabulku ze dvou pocitacu
[*] Jirka <jnagy(zv)nh-trans(tec)cz> - 2.12.1999 08:16:11
----- P�vodn� zpr�va -----
> Mam dva pocitace v siti. Na jednom bezi "server" a "klient",
> na druhem bezi pouze "klient". "Server" zapisuje do tabulky,
> ktera je na stejnem pocitaci, a "klienti" z ni ctou
> a jistym zpusobem nactena data interpretuji.
> Problem je v tom, ze zmeny v tabulce vidi pouze "klient" na pocitaci
> na kterem bezi i "server". "Klient" na druhem pocitaci zmeny nevidi.
Nekdo uz poradil zavolat FlashBuffers, ja bych (po vlastnich
zkusenostech) jeste doplnil:
- vypni smartdrive na vsechny disky (ono by to sitove disky nemelo
cachovat, ale mne se to pravidelne stalo na Novellu, ze kazdy pocitac
jako kdyby mel "svoji" verzi tabulky)
-pokud to nepomuze, nastav v BDE Local share na true. Bude to
pomalejsi, ale pomuze to (asi).
Jirka
On-line
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 2.12.1999 08:32:50
> -----P�vodn� zpr�va-----
> Od: martin.falta(zv)obi(tec)cz [mailto:martin.falta(zv)obi(tec)cz]
>
> Zkus testovat stav modemu.
:-( V praci nemam modem, presto mam k dispozici pristup na internet.
> Jak zjistim, je-li uzivatel pripojen k Internetu (cili online)?
To, ze je uzivatel pripojen k internetu, se pozna tak,
ze ma zakoupeno internetove pripojeni.
Nevim co znamena byti pripojen online k internetu.
Znamena to, jestli je pripojen k nejakemu proxy serveru? nebo to znamena,
jestli je pripojen nejakemu postovnimu serveru? Nebo neco jineho?
Jinak (a o to tazateli mozna jde), kdyz chci zjistit, jestli je pro dany
pocitac
dostupny nejaky server na internetu, zkusim na nej pingnout.
Juras
TStoredProc a MS SQL 7
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 2.12.1999 08:41:25
> -----P�vodn� zpr�va-----
> Od: Jiri Kral [mailto:admin(zv)printo.com]
> normalne nadefinuju session, database, procname (krasne ji lze najit v
> Ob.Insp.), nadefinuju parametry
> a po zActivneni najednou milostpan breci, ze pry:
>
> General SQL error, cannot find procedure 'mojekrasnaprocedurka'
Treba nejsi pripojen k databazi, jsi pripojen k databazi, kde
mojekrasnaprocedurka vubec neni anebo pouzivas spatne pripojeni k db.
Nepises o zadnych verzich (Delphi ani BDE), ani jaky driver
pouzivas (nativni, ODBC).
Je mozne, ze pouze nespecifikujes
schema (zastarale vlastnika), pouzivas nejaky starsi nativni link, ktery
spatne
pracuje s procedurami jinych schemat, nez je prihlaseny uzivatel.
Asi lze na takto nedostatecne formulovanou otazku rici vice a odhalit pravou
pricinu
Jura
Pomoc pri vyvoji
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 2.12.1999 08:54:23
> -----P�vodn� zpr�va-----
> Od: Tomas Kouba [mailto:tomas(zv)neo(tec)cz]
>
> Zdravim a preji pekny den,
>
> pripravuji podklady pro vetsi program (zatim ani radka kodu)
> a potreboval
> bych nastroj, ktery by mi pomohl pripravit navrh jake
> formulare potrebuji,
> jake jsou z nich volany a tak navzajem; a pokud by to umelo
> vic, bylo by to
> super.
Nejaky jednodussi share CASE byl na Delphi Super Page.
Nezkoumal jsem ho moc a ani si nepamatuju, jak se jmenoval.
Mozna neposkytuje takovou miru abstrakce, jakou pozadujes,
a je zameren spise na programatorinu nez analyzu uzivatelskych cinnosti atd,
ale treba by se Ti mohl hodit. Zkus se podivat na tu DSP
http://delphi.icm.edu.pl/
http://sunsite.cnlab-switch.ch/www/mirror/delphi/
(Asi bych tam zkusil vyhledavat "CASE")
Jura
TDataset vyhlkedavani ?
[*] Pavol Stolc <pstolc(zv)sc.sknet.sk> - 2.12.1999 09:04:40
if (TDataset is TTable) then begin
... FindNearest ...
end
else if (TDataset is TQuery) then begin
... ??? ...
end;
Alebo skus pouzit TDataSet.Locate(...); vhodne pre obidva typy.
Pavol
pstolc(zv)sc.sknet.sk
----- Original Message -----
From: Thom
To: Konference Delphi
Sent: Monday, November 29, 1999 2:14 PM
Subject: TDataset vyhlkedavani ? ahoj,
primitivni dotaz:
mam komponentu, ktera vidi pouze TDataset, ale nevi, jestli je napojen na TTable, nebo TQuery,
potreboval bych v ni vyhledavat neco jako FindNearest ...
ale nevim jak nato... prosim pomozte
diky TH
Pomoc pri vyvoji
[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 2.12.1999 09:08:42
Haj hou!
----- Original Message -----
From: Tomas Kouba <tomas(zv)neo(tec)cz>
> pripravuji podklady pro vetsi program (zatim ani radka kodu) a potreboval
> bych nastroj, ktery by mi pomohl pripravit navrh jake formulare potrebuji,
> jake jsou z nich volany a tak navzajem; a pokud by to umelo vic, bylo by
to
> super.
>
> Predem dekuji za radu. POkud to bude zdarma, nebo to budu moci vyzkouset
> (shareware), byl bych velmi spokojen.
Pokud ti nevadi, ze je to v ciste Jave (musis mit nainstalovan SDK 1.2, ke
stazeni u Sunu), tak tady mas hned tri a zadarmo
http://europa.it.swin.edu.au
Hodne zdaru
Pavel Cisar <pcisar(zv)atlas(tec)cz>
Delphree.org CEO
http://delphree.clexpert.com
Nexus project coordinator
http://delphree.clexpert.com/pages/projects/nexus/default.htm
Drag-and-Drop z DBGrid
[*] marcant <marcant(zv)sct.sk> - 2.12.1999 09:15:40
> Win98, D4Prof
>
> Nevite nekdo, jak se dela Drag-and-Drop z DBGridu? Kdyz nastavim
> dmAutomatic, tak nedokazu prejit na konkretni radek, ktery chci chytit a
> hodit konkretni hodnoty treba do TListu. Nejak mi chybi udalost
OnMouseDown,
> abych odchytil BeginDrag.
>
To je presne, ak chces pouzit OnMouseDown musis si odvodit vlastnu DBGrid
(alebo pouzit tu s RX a pod.). Inak obsluha MouseDown je v odvodenej DBGrid
pomerne easy, ale nechcelo sa mi hrat s vytvaranim Event-u a tak som kod
strcil priamo do MouseDown (override).
procedure TMDBGrid.MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y:
Integer);
var
coord: TGridCoord;
begin
coord:= MouseCoord(X, Y);
if coord.Y > 0 then // Overenie, ci nie je MouseDown na titulku
if not DataSource.DataSet.IsEmpty then // Overenie, ci su nejake data
begin
if SelectedRows.Count > 1 then
DragCursor:= crMultiDrag
else
DragCursor:= crDrag;
BeginDrag(False, 10);
end;
inherited MouseDown(Button,Shift,X,Y);
end;
Volani funkce z DLL
[*] Petr Vaclavek <bla(zv)atrey.karlin.mff.cuni(tec)cz> - 2.12.1999 09:32:43
> Ahoj,
> s nizsi verzi Win95 nez je OSR2 mas smulu. V helpu se pise, ze tato
> funkce je podporovana az od Win95 OSR2. Takze upgradovat nebo kompilovat
> u kolegy. Tim padem ani funkcni ukazka nepripada v uvahu. :-((
**** No to je mi jasne, zapomel jsem dodat, ze pred tim testuji verzi
Windowsu - to je ale v pohode...
Ja proste potrebuji zjistit, jak je velky disk a kolik je na nem
volneho mista.
Pokud OS = win 95 tak pouziji fukci GetDiskFreeSpace,
pokud OS = win95 OSR2 nebo win NT tak pouziju fci GetDiskFreeSpaceEx.
(Jeste nevim, jestli vubec jde SPRAVNE zjistit velikost tech udaju
(kapacita, volne misto) na systemu WIN 95 (ne OSR2), protoze fce
GetDiskFreeSpace vraci nesmysly u disku > 2GB)
Myslim ze kompilace na mych WIN 95 (ne OSR2) neni na zavadu a exac
zkousim samozrejme u kolegy.
Tak prosim poradte, kde delam chybu.
Diky
Petr
==< Petr Vaclavek >---- --- --- -- -- - - -
====-----( mailto: bla(zv)atrey.karlin.mff.cuni(tec)cz )-- - -
`=====--( http://atrey.karlin.mff.cuni(tec)cz/~bla )-- - -
`======--- ------ ---- --- -- -- - - - Text v DBMemo se ztraci
[*] Pavel ZIDEK <kopr(zv)kopr(tec)cz> - 2.12.1999 09:35:02
Zdravim,
potrebuji zjistit, proc se ztraci text v DBMemo (taky v DBRichEdit).
Zapisi do DBMemo text nejakym prikazem - pomoci buttonu. jakmile ale potrebuji text opravit, vlezu do DBMemo a zacnu psat, tak text zmizi.
1. takhle vlozim text
procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
with Table1 do
begin
DBMemo1.Text:='Jakysi text' + ^M^J + 'Dalsi radek';
end;
end;
No a jakmile zacnu text opravovat - mysi kliknu naDBMemo - text zmizi. Ale jakmile opetovne kliknu na button a vygeneruji ten text znovu, tak oprava textu nezpusoi zmizeni.
Asi je treba nejak Memo inicializovat, ze jo.
Pavel
Pekny den (rano, vecer i noc) preje
~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
KOPR software Pavel ZIDEK mailto:kopr(zv)kopr(tec)cz
http://www.kopr(tec)cz/w-delphi.htm
~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~Volani funkce z DLL
[*] Bosnis <bosnis(zv)atlas(tec)cz> - 2.12.1999 09:58:35
Cely problem je v tom, ze v knihovne je jmeno funkce jine
// Nahrani knihovny
HInst := LoadLibrary(PChar ('KERNEL32.DLL'));
if (HInst = NULL) then ShowMessage ('fail LoadLibrary');
//nazev ulozeny v DLL je GetDiskFreeSpaceExA
(zv)F := GetProcAddress(HInst, PChar ('GetDiskFreeSpaceExA')); (!!!!!)
if ((zv)F = nil) then ShowMessage ('fail GetProcAddress');
Funkce v DLL lze prohlednout treba pres Salamandra, urcite existuji i
utilitky, ktere dokazi vypsat funce a procedury v DLL.
Pavel SPEJTEK
adresa sitove karty
[*] Doller.Jozef(zv)zsr.sk - 2.12.1999 09:59:27
Nno, to by som potreboval aj ja, ak to niekto vie ...
> -----P�vodn� zpr�va-----
> Od: Thom [SMTP:thom(zv)comberg(tec)cz]
> Odesl�no: 29. november 1999 10:27
> Komu: Konference Delphi
> P�edm�t: Fw: adresa sitove karty
>
>
> ----- Original Message -----
> From: Thom <thom(zv)comberg(tec)cz>
> To: Vaclav Sazima <sazima(zv)comp(tec)cz>
> Sent: Monday, November 29, 1999 10:25 AM
> Subject: Re: adresa sitove karty
>
>
> > to je dobre, ale ja bych to potreboval jako valani nejake API funkce
> >
> > diky TH
> >
> > ----- Original Message -----
> > From: Vaclav Sazima <sazima(zv)comp(tec)cz>
> > To: <delphi-l(zv)fwd(tec)cz>
> > Sent: Thursday, November 11, 1999 5:13 PM
> > Subject: Re: adresa sitove karty
> >
> >
> > >
> > >
> > > Doller.Jozef(zv)zsr.sk wrote:
> > > >
> > > > Ak myslis MAC adresu (fyzicku) tak je to prikaz
> > > >nbtstat -A xxx.xxx.xxx.xxx
> > > >nbtstat -A meno_pc
> > >
> > > spravne nbtstat -a meno_pc
> > >
> > > Vaclav Sazima
> > Nastaveni osetreni udalosti za behu
[*] Ondrej ZAHRADNIK <zahrad(zv)gymvr(tec)cz> - 2.12.1999 10:05:20
Ahoj,
mam tento problem. Za behu programu jsem si vytvoril TPaintBox.
Potrebuji nastavit osetreni metod OnMouseDown, OnMouseUp,
OnMouseMove. Jak tyto udalosti presmeruji na mnou definovane
procedury.
Diky za vsechny navrhy.
**********************************
Ondrej Zahradnik
e-mail:zahrad(zv)gymvr(tec)cz
ICQ:50242897
*********************************Nastaveni CodePage u Pdx tabulky
[*] Miroslav Mare� <sm(zv)sct(tec)cz> - 2.12.1999 10:32:12
Diky za odpoved, ale to je pres restrukturovani tabulky. Copak to nejde pres
tu funkci DbiSetProp?? Vzdyt jeden z moznych parametru je CodePage. Pripada
mi to jednodussi nez delat restrukturovani.
Mirek
----- Original Message -----
From: Petr Vones <pvones(zv)mbox.vol(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Sunday, November 28, 1999 11:52 PM
Subject: Re: Nastaveni CodePage u Pdx tabulky
> Ahoj,
>
> Priklad na zmenu langdriveru Paradox tabulky najdes tady:
>
>
http://www.delphi(tec)cz/soubor.asp?rok=1998&mesic=Jul&den=21&first=31&soubor=dl
faaabr.htm
>
> --
>
> Petr Vones, amatersky programator
otevreni databaze na CD-ROM...
[*] Gebauer Lukas <gebylist(zv)mlp(tec)cz> - 2.12.1999 10:41:58
Dobry den.
jak se da pracovat pres BDE s tabulkami na CD-ROMu? (mam na
mysli konkretne MDB databazi pres nativni BDE driver...)
BDE se vytrvale snazi u databaze vytvorit LDB soubor, ktery se mu
na CD-ROMu pochopitelne nepodari vytvorit.. jak se tohle resi?
Louci se Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
WEB: http://www.mlp(tec)cz/space/gebauerl/synapse - Synapse Delphi TCP/IP Library
Nastaveni osetreni udalosti za behu
[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 2.12.1999 10:50:17
Ahoj,
udelej to napr. takto :
type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
Button2: TButton;
procedure MyClick(Sender: TObject);
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.MyClick(Sender: TObject);
begin
ShowMessage(' B2 click ');
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
Button2:=TButton.Create(Form1);
with Button2 do
begin
Parent:=Form1;
Caption:='T&lacitko 2';
Left:=10;
Top:=10;
Visible:=true;
OnClick:=MyClick;
end;
end;> ----------
> Od: Vladimir Sladky[SMTP:sladky_vladimir(zv)hotmail.com]
>
> >mam tento problem. Za behu programu jsem si vytvoril TPaintBox.
> >Potrebuji nastavit osetreni metod OnMouseDown, OnMouseUp,
> >OnMouseMove. Jak tyto udalosti presmeruji na mnou definovane
> >procedury.
>
> AfterPrint QR1 pro D2
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 2.12.1999 10:51:23
Ahoj,
tisknu z QR1 ze standardniho preview a potreboval bych nejak zjistit, zda
uzivatel opravdu tisknul na tiskarnu. Je to mozne nejak zjistit?
QR.AfterPrint se mi vraci i po tisku na tiskarnu nebo jenom z preview bez
tisku.
Diky za kazdou radu
Jaro B.Nacteni ikon z SHELL32.DLL
[*] Mik Radim <mik(zv)oce(tec)cz> - 2.12.1999 11:04:12
Prosim Vas,
potreboval bych nacist ikony z SHELL32.DLL do image listu. Mam D3 a
zkousim to takhle:
H := LoadLibrary( 'shell32.dll');
If H > 31 Then
Begin
R := TResourceStream.CreateFromID( H, 1, 'RT_ICON'); ???
Image1.Picture.Icon.LoadFromStream( R);
R.Free;
End;
FreeLibrary( H);
na ??? mi to vyhodi hlasku, ze lezu do cizi pameti FFFF...
Neznate jiny zpusob nacitani ikon z DLL?
Dekuji
---------------------------------------
Radim Mik, SyCo DPS
Oc� �esk� republika, spol. s r.o.
Hanusova 18, 140 21 Praha 4
tel.: +420(2)440 103 60
fax: +420(2)440 103 90
e-mail: mik(zv)oce(tec)cz
ICQ: 32730861
---------------------------------------
Interbase
[*] Ji�� Kr�l jr. - 2.12.1999 11:08:24
>>Interbase neprepisuje zaznamy! Po kazde zmene vytvori novou kopii zaznamu.
>>Sweep odstrani nadbytecne zaznamy z DB (soubor neskrati, to nedela zadna
DB).
Dovolim si polemizovat, nebot MS SQL 7 _UMI_ zvetsit i zmensit soubor s dB
dynamicky podle parametru.
Jiri Kral
Nastaveni osetreni udalosti za behu
[*] Vladimir Sladky <sladky_vladimir(zv)hotmail(tec)com> - 02.12.1999 10:41:32 cet
>mam tento problem. Za behu programu jsem si vytvoril TPaintBox.
>Potrebuji nastavit osetreni metod OnMouseDown, OnMouseUp,
>OnMouseMove. Jak tyto udalosti presmeruji na mnou definovane
>procedury.
Nevim, jestli ti to pomuze, ale udalosti mysi chytam nejak takto:
procedure WMMouseMove(var Message: TWMMouse);
message WM_MouseMOVE;
//Vlastni osetreni pohybu mysi
procedure TMainForm.WMMouseMove(var Message: TWMMouse);
begin
Caption:=Format('Mouse: [%d , %d]',[(Message.XPos),(Message.YPos)]);
end;
Puvodni "OnMouseMove" snad pujde potlacit pomoci "override",
ale urcite bych zavolal radeji i ty puvodni ...
______________________________________________________
Get Your Private, Free Email at http://www.hotmail.com
Drag-and-Drop z DBGrid -> p�echod na D5
[*] Tom� Br�dle������i�^����? - 2.12.1999 11:44:47
Zdravim,
nedavno se tu probiralo jaky ma vyznam prejit na D5. Tohle bych povazoval za
jeden z plus pro prechod na D5, protoze tam v DBGrid udalost OnMouseDown je.
Takovych veci je tam vic.
V D4 bych si udelal novou komponentu, do sekce published bych zaradil :
property OnMouseDown;
Tomas
t.bradle(zv)pvtnet(tec)cz
-----P�vodn� zpr�va-----
Od: Ing. Petr �vejda <lingvista(zv)lingvista(tec)cz>>Win98, D4Prof
>
>Nevite nekdo, jak se dela Drag-and-Drop z DBGridu? Kdyz nastavim
>dmAutomatic, tak nedokazu prejit na konkretni radek, ktery chci chytit a
>hodit konkretni hodnoty treba do TListu. Nejak mi chybi udalost
OnMouseDown,
>abych odchytil BeginDrag.
>
>Diky
>
>Petr Svejda
>
>Spolecny posun nekolika okny najednou
[*] Vladimir Sladky <sladky_vladimir(zv)hotmail(tec)com> - 02.12.1999 10:50:18 cet
Nevi prosim nekdo, jak "chytit" mysi nekolik oken (patricich
k jedne aplikaci a ne MDI) najednou a pohybovat jimi po obrazovce soucasne ?
Mam to zatim stylem "zjisti, ze se pohnulo jedno okno a prilep
vsechny ostatni", ale vubec se mi to nelibi ...
______________________________________________________
Get Your Private, Free Email at http://www.hotmail.com
Spolecny posun nekolika okny najednou
[*] Martin <geoplan(zv)pp.sinet.sk> - 2.12.1999 12:04:43
Zdravim,
skusam dao komponenty od E. Salaje. Aky je rozdiel medzi komponentou DAODATASET a DAOQUERY ? Ktore je lepsie pouzit ?
Martin
Nastaveni osetreni udalosti za behu
[*] Petr Smol�k <psmolik(zv)fides(tec)cz> - 2.12.1999 12:11:15
> Ahoj,
> mam tento problem. Za behu programu jsem si vytvoril TPaintBox.
> Potrebuji nastavit osetreni metod OnMouseDown, OnMouseUp,
> OnMouseMove. Jak tyto udalosti presmeruji na mnou definovane
> procedury.
> Diky za vsechny navrhy.
A co:
{procedure MyPaintBoxMouseDown(Sender: TObject; Button: TMouseButton; Shift:
TShiftState; X, Y: Integer)}
MyPaintBox.OnMouseDown:= MyPaintBoxMouseDown;
MyPaintBox.OnMouseUp:= MyPaintBoxMouseUp;
.
.
Petr Smol�k
psmolik(zv)fides(tec)cz
Nacteni ikon z SHELL32.DLL
[*] Fryz, Zdenek <fryz(zv)dcb(tec)cz> - 2.12.1999 12:14:07
>potreboval bych nacist ikony z SHELL32.DLL do image listu. Mam D3 a
>zkousim to takhle:
> H := LoadLibrary( 'shell32.dll');
> If H > 31 Then
> Begin
> R := TResourceStream.CreateFromID( H, 1, 'RT_ICON'); ???
> Image1.Picture.Icon.LoadFromStream( R);
> R.Free;
> End;
> FreeLibrary( H);
>na ??? mi to vyhodi hlasku, ze lezu do cizi pameti FFFF...
>Neznate jiny zpusob nacitani ikon z DLL?
Image1.Picture.Icon.handle:=ExtractIcon(HInstance,PChar('Shell32.dll'),1);
Z.Fryz
__________________________________________________________________
Tato komunikace je urcena vyhradne pro adresata a je duverna.
This communication is intended solely for the addressee and is confidential.
Volani funkce z DLL
[*] Miroslav �ipel <Miroslav.Cipel(zv)oku-tu(tec)cz> - 2.12.1999 12:17:31
proc proste nepouzijes funkci DiskFree z unitu Sysutils ?
M.
Databaze
[*] mkotaska(zv)post(tec)cz - 2.12.1999 12:38:52
Ahoj.
Prosim o pomoc s vyresenim nasledujiciho problemu.
Ve sve aplikaci pristupuji k databazovym tabulkam (Paradox 7) prostrednitvim
BDE.
Pokud v aplikaci nastane nejaka vyjimka (aplikace \"spadne\") vsechna data
zapsana do tabulek zmizi.
Zapisuji standardnim postupem:
Table1.Append;
...
...
..
Table1.Post;
Lze nejakym zpusobem zajistit to, aby se data do tabulek ulozila primo do
souboru na disku a ne do pameti ?
Dekuji vsem za kazdy namet.
Milan Kotaska
mkotaska(zv)post(tec)cz
Sledujte zpravodajstvi, TV-program, pocasi, kursy, ...:
*** http://PRESS.CZ
AfterPrint QR1 pro D2
[*] Petr.Motlicek(zv)bcbrno(tec)cz - 2.12.1999 12:44:23
> tisknu z QR1 ze standardniho preview a potreboval bych nejak zjistit, zda
> uzivatel opravdu tisknul na tiskarnu. Je to mozne nejak zjistit?
> QR.AfterPrint se mi vraci i po tisku na tiskarnu nebo jenom z preview bez
> tisku.
Ahoj,
no nev�m jestli je to v QR1, ale v QR2 je
QRPrinter.Status....mpBusy,mbReady,mpFinish
ed....
Tak snad, kdyz je jenom preview, tak je Status
mbReady....(?)
Petr Motlicek
Delphi - ODBC - MSAccess - TQuery - Param
[*] Fi�er Ji�� - 2.12.1999 13:13:36
Mam problem, ktery se mi nedari vyresit. Pristupuji k MSAccess pres ODBC. Protrebuji pouzit TQuery na vytvoreny dotaz v MSAccessu. V dotazu v MSAccessu je ovsem potreba zadat PARAMETR. I kdyz ho do TQuery rucne zadam, stale mi to hazi chybu, ze v dotazu chyby jeden PARAMETR.
Poradi mi nekdo, jak tento parametr poslu z TQuery do MSAccesu ???
Dekuji Jirka.
SQL a parametry
[*] Vlastimil Zden�k <milesoft(zv)mi.cesnet(tec)cz> - 2.12.1999 13:14:34
Toto je zpr�va ve form�tu MIME obsahuj�c�n�kolik ��st�.
Nazdar Deplhisti,
prosim o radu nebi odpoved:
Lze jako parametru StoredProc pouzit jmeno tabulky nebo sloupce?
napr:
CREATE PROCEDURE FINDKLIENT
(zv)Tabulka varchar(20)='',
(zv)Sloupec varchar(20)='',
(zv)Promena varchar(40)=''
AS
SELECT Nazev
FROM (zv)Tabulka
WHERE (zv)Sloupec LIKE (zv)Promena+'%'
GO
Diky moc
Vlasta
Databaze
[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 2.12.1999 13:18:56
Ahoj,
ted se tu o tom psalo: Table1.FlushBuffers;
FlushBuffers posts all changes that have
been written to the record buffer.
procedure FlushBuffers;
Description
Call FlushBuffers to cause the dataset to post
all pending changes to the database, including
any cached updates. Use FlushBuffers instead
of CheckBrowseMode if it is important that
cached record buffers are posted.
> ----------
> Od: mkotaska(zv)post(tec)cz[SMTP:mkotaska(zv)post(tec)cz]
> Ve sve aplikaci pristupuji k databazovym tabulkam (Paradox 7)
> prostrednitvim
> BDE.
> Pokud v aplikaci nastane nejaka vyjimka (aplikace \"spadne\") vsechna
> data
> zapsana do tabulek zmizi.
> Zapisuji standardnim postupem:
>
> Table1.Append;
> ...
> ...
> ..
> Table1.Post;
>
> Lze nejakym zpusobem zajistit to, aby se data do tabulek ulozila primo
> do
> souboru na disku a ne do pameti ?
>
> AfterPrint QR1 pro D2
[*] TUNGLI Jan <tungli(zv)pvt.sk> - 2.12.1999 13:26:31
SQL Report Builder (free) to vie.
Ak mas zdrojove kody k QR tak je to sanadne, ak nie tak to asi nespravis.
TUNGLI J�nos
EMail: jan.tungli(zv)seznam(tec)cz
My Home Page: http://free.netlap.hu/4321/
or: http://freeweb.coco(tec)cz/tungli/
-----P�vodn� zpr�va-----
Od: Bene� Jaroslav <JBenes(zv)cpoj(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 2. december 1999 11:29
P�edm�t: AfterPrint QR1 pro D2
>Ahoj,
>
>tisknu z QR1 ze standardniho preview a potreboval bych nejak zjistit, zda
>uzivatel opravdu tisknul na tiskarnu. Je to mozne nejak zjistit?
>QR.AfterPrint se mi vraci i po tisku na tiskarnu nebo jenom z preview bez
>tisku.
>
>Diky za kazdou radu
>
>Jaro B.
>Delphi - ODBC - MSAccess - TQuery - Param
[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 2.12.1999 13:27:52
Ahoj,
nevim jestli tomu rozumim spravne; mas v databazi accessu
vytvoren nejaky dotaz, ktery vypada napriklad nejak takto:
SELECT ID, Jmeno, Prijmeni FROM T_Prac WHERE ID=[ID:]
a ty chces vysledky takoveho dotazu zobrazit v Delphi,
je to tak ?
Dobra.
> ----------
> Od: Fi�er Ji��[SMTP:fiser(zv)volny(tec)cz]
>
> Mam problem, ktery se mi nedari vyresit. Pristupuji k MSAccess pres
> ODBC.
> Protrebuji pouzit TQuery na vytvoreny dotaz v MSAccessu.
> V�dotazu v MSAccessu je ovsem potreba zadat PARAMETR.
> I kdyz ho do TQuery rucne zadam, stale mi to hazi chybu,
> ze v dotazu chyby jeden PARAMETR. Poradi mi nekdo,
> jak tento parametr poslu z TQuery do MSAccesu ???
> Databaze
[*] TUNGLI Jan <tungli(zv)pvt.sk> - 2.12.1999 13:32:00
Paradox kesuje udaje a preto je potrebne obcas ulozit udaje aj fyzicky napr.
Close a Open.
TUNGLI J�nos
EMail: jan.tungli(zv)seznam(tec)cz
My Home Page: http://free.netlap.hu/4321/
or: http://freeweb.coco(tec)cz/tungli/
-----P�vodn� zpr�va-----
Od: mkotaska(zv)post(tec)cz <mkotaska(zv)post(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 2. december 1999 13:10
P�edm�t: Databaze
>Ahoj.
>
>Prosim o pomoc s vyresenim nasledujiciho problemu.
>Ve sve aplikaci pristupuji k databazovym tabulkam (Paradox 7)
prostrednitvim
>BDE.
>Pokud v aplikaci nastane nejaka vyjimka (aplikace \"spadne\") vsechna data
>zapsana do tabulek zmizi.
>Zapisuji standardnim postupem:
>
>Table1.Append;
>...
>...
>..
>Table1.Post;
>
>Lze nejakym zpusobem zajistit to, aby se data do tabulek ulozila primo do
>souboru na disku a ne do pameti ?
>
>Dekuji vsem za kazdy namet.
>
>Milan Kotaska
>mkotaska(zv)post(tec)cz
>
>
> Sledujte zpravodajstvi, TV-program, pocasi, kursy, ...:
> *** http://PRESS.CZ
>
>
>TDataset vyhlkedavani ?
[*] Thom <thom(zv)comberg(tec)cz> - 2.12.1999 13:39:38
TO ASI BUDU MUSET, PROTOZE V PRIPADE JINYCH KOMPONENT NEZ ttABLE A tgUERY, BY TO NECHODILO NE (NAPR dao,ado APOD ...)
TH
----- Original Message -----
From: Pavol Stolc
To: delphi-l(zv)fwd(tec)cz
Sent: Thursday, December 02, 1999 9:04 AM
Subject: RE: TDataset vyhlkedavani ? if (TDataset is TTable) then begin
... FindNearest ...
end
else if (TDataset is TQuery) then begin
... ??? ...
end;
Alebo skus pouzit TDataSet.Locate(...); vhodne pre obidva typy.
Pavol
pstolc(zv)sc.sknet.sk
----- Original Message -----
From: Thom
To: Konference Delphi
Sent: Monday, November 29, 1999 2:14 PM
Subject: TDataset vyhlkedavani ? ahoj,
primitivni dotaz:
mam komponentu, ktera vidi pouze TDataset, ale nevi, jestli je napojen na TTable, nebo TQuery,
potreboval bych v ni vyhledavat neco jako FindNearest ...
ale nevim jak nato... prosim pomozte
diky TH
Nastaveni osetreni udalosti za behu
[*] Tom� Br�dle������i�^����? - 2.12.1999 13:50:19
Zdravim,
zkus dat do formulare procedurku osetrujici danou Event :
private
procedure PBoxMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
v te obslouzis danou udalost
a po vytvoreni toho paintboxu prirad:
PBox.OnMouseDown:=PBoxMouseDown;
tot vse.
Tomas
-----P�vodn� zpr�va-----
Od: Ondrej ZAHRADNIK <zahrad(zv)gymvr(tec)cz>
Ahoj,
mam tento problem. Za behu programu jsem si vytvoril TPaintBox.
Potrebuji nastavit osetreni metod OnMouseDown, OnMouseUp,
OnMouseMove. Jak tyto udalosti presmeruji na mnou definovane
procedury.
Diky za vsechny navrhy.
Databaze
[*] Vladimir POnechal <vladimir_ponechal(zv)tesco-europe(tec)com> - 2.12.1999 14:05:22
Da se to, ja to resim takto:
do AfterPost tabulky vlozim:
dbisavechanges(table1.handle);
pozor v uses musi byt 'dbiprocs'.
Vlada Ponechal
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
mkotaska(zv)post(tec)cz
Sent: Thursday, December 02, 1999 12:39 PM
To: delphi-l(zv)fwd(tec)cz
Subject: Databaze
Ahoj.
Prosim o pomoc s vyresenim nasledujiciho problemu.
Ve sve aplikaci pristupuji k databazovym tabulkam (Paradox 7) prostrednitvim
BDE.
Pokud v aplikaci nastane nejaka vyjimka (aplikace \"spadne\") vsechna data
zapsana do tabulek zmizi.
Zapisuji standardnim postupem:
Table1.Append;
...
...
..
Table1.Post;
Lze nejakym zpusobem zajistit to, aby se data do tabulek ulozila primo do
souboru na disku a ne do pameti ?
Dekuji vsem za kazdy namet.
Milan Kotaska
mkotaska(zv)post(tec)cz
Sledujte zpravodajstvi, TV-program, pocasi, kursy, ...:
*** http://PRESS.CZ
Text v DBMemo se ztraci
[*] marcant <marcant(zv)sct.sk> - 2.12.1999 14:10:57
Skus priradovat prikazom DBMemo1.DataSource.DataSet.FieldByName DBMemo1.DataField).AsString:= ... alebo priamo XXX.FieldByName('YYY').AsString:= ... kde XXX je tabulka a YYY meno stlpca na ktory je DBMemo1 napojeny (samozrejme tabulka musi byt v editacnom (Edit) alebo vkladacom (Insert) mode).
Zdravim,
potrebuji zjistit, proc se ztraci text v DBMemo (taky v DBRichEdit).
Zapisi do DBMemo text nejakym prikazem - pomoci buttonu. jakmile ale potrebuji text opravit, vlezu do DBMemo a zacnu psat, tak text zmizi.
1. takhle vlozim text
procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
with Table1 do
begin
DBMemo1.Text:='Jakysi text' + ^M^J + 'Dalsi radek';
end;
end;
No a jakmile zacnu text opravovat - mysi kliknu naDBMemo - text zmizi. Ale jakmile opetovne kliknu na button a vygeneruji ten text znovu, tak oprava textu nezpusoi zmizeni.
Asi je treba nejak Memo inicializovat, ze jo.
SQL a parametry
[*] JAHODA Jozef <jahoda(zv)asset.sk> - 2.12.1999 14:21:07
milesoft(zv)mi.cesnet(tec)cz wrote
> Lze jako parametru StoredProc pouzit jmeno tabulky nebo sloupce?
> napr:
> CREATE PROCEDURE FINDKLIENT
> (zv)Tabulka varchar(20)='',
> (zv)Sloupec varchar(20)='',
> (zv)Promena varchar(40)=''
> AS
> SELECT Nazev
> FROM (zv)Tabulka
> WHERE (zv)Sloupec LIKE (zv)Promena+'%'
> GO
>
Ide, ale Server musi nejak podporovat Dynamicke SQL
JJ ODBC registry u Win98
[*] Petr Vale� - 2.12.1999 14:22:59
Ahoj,
nevite nahodou prosim nekdo proc tento kod :
Reg->OpenKey( "SOFTWARE\\ODBC\\ODBC.INI\\ODBC Data Sources", FALSE);
Reg->WriteString( w_DSN, "Microsoft Access Driver (*.mdb)");
Reg->CloseKey();
se na NTckach provede a u Win98 ne ?
nejsou nejake problemy s pravami nebo tak neco. Dekuji za kazdou informaci.
S pozdravem
Petr
Volani funkce z DLL
[*] Petr Vaclavek <bla(zv)atrey.karlin.mff.cuni(tec)cz> - 2.12.1999 14:25:12
> proc proste nepouzijes funkci DiskFree z unitu Sysutils ?
> M.
*** Protoze jsem na ni uplne zapomel :-)
Diky za nakopnuti.
Jeste jeden dotaz: Funguje dobre i na discich (oddilech) s velikosti
> 2 GB???
Petr
==< Petr Vaclavek >---- --- --- -- -- - - -
====-----( mailto: bla(zv)atrey.karlin.mff.cuni(tec)cz )-- - -
`=====--( http://atrey.karlin.mff.cuni(tec)cz/~bla )-- - -
`======--- ------ ---- --- -- -- - - - Delphi - ODBC - MSAccess - TQuery - Param
[*] Fi�er Ji�� - 2.12.1999 15:01:11
Je to presne tak. Nevis jak to udelat ???
----- Original Message -----
From: Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, December 02, 1999 1:27 PM
Subject: RE: Delphi - ODBC - MSAccess - TQuery - Param
> Ahoj,
> nevim jestli tomu rozumim spravne; mas v databazi accessu
> vytvoren nejaky dotaz, ktery vypada napriklad nejak takto:
>
> SELECT ID, Jmeno, Prijmeni FROM T_Prac WHERE ID=[ID:]
>
> a ty chces vysledky takoveho dotazu zobrazit v Delphi,
> je to tak ?
>
> Dobra.
>
> > ----------
> > Od: Fi�er Ji��[SMTP:fiser(zv)volny(tec)cz]
> >
> > Mam problem, ktery se mi nedari vyresit. Pristupuji k MSAccess pres
> > ODBC.
> > Protrebuji pouzit TQuery na vytvoreny dotaz v MSAccessu.
> > V dotazu v MSAccessu je ovsem potreba zadat PARAMETR.
> > I kdyz ho do TQuery rucne zadam, stale mi to hazi chybu,
> > ze v dotazu chyby jeden PARAMETR. Poradi mi nekdo,
> > jak tento parametr poslu z TQuery do MSAccesu ???
> >
>
Delphi - ODBC - MSAccess - TQuery - Param
[*] Jaroslav ��pek <jaroslav.sipek(zv)idea(tec)cz> - 2.12.1999 15:21:33
Dobry den,
nevite nekdo, jak zabranit tomu, aby kdyz si odvodim od TComboBoxu svou komponentu
a predefinuji metodu DropDown, aby se pod touto komponentou zobrazoval prazdny seznam.
TMojeCombo = class(TComboBox)
private
{ Private declarations }
protected
{ Protected declarations }
public
{ Public declarations }
procedure DropDown; override;
published
{ Published declarations }
end;
procedure Register;
implementation
procedure Register;
begin
RegisterComponents('Samples', [TMojeCombo]);
end;
procedure TMojeCombo.DropDown;
begin
... muj kod nap�. ShowMessage('ahoj');
end;
end.
Kdyz na vyse uvedenou komponentu kliknu mysi, tak mi to sice provede ShowMessage, ale pak se pod comboboxem rozbali prazdny seznam.
Zkousel jsem za ShowMessage napsat DroppedDown:=false, ale to nepomaha.
S pozdravem
Jaroslav Sipek
E-mail: jaroslav.sipek(zv)idea(tec)cz
Databaze
[*] supervisor(zv)unicontrols(tec)cz - 2.12.1999 14:43:50
> Table1.Append;
> Table1.Post;
>
> Lze nejakym zpusobem zajistit to, aby se data do tabulek ulozila primo do
> souboru na disku a ne do pameti ?
>
Ja pouzivam tuto notaci
dbiSaveChanges(TABLE1.Handle)
-----------------------------
- Vojtech Albrecht -
- supervisor(zv)unicontrols(tec)cz -
- ICQ 33995541 -
-----------------------------
Volani funkce z DLL
[*] Mirun <forcom(zv)telecom(tec)cz> - 2.12.1999 15:44:36
No, protoze tim ten problem nevyresi. SysUtils si nastavuje dle systemu bud
volani GetDiskFreeSpace (neOSR2) a nebo GetDiskFreeSpaceEx, cimz se dostanes
zase tam, kde jsi byl.
Mirun
>
> proc proste nepouzijes funkci DiskFree z unitu Sysutils ?
>
> M.
>
>
>SQL View
[*] Vlastimil Zden�k <milesoft(zv)mi.cesnet(tec)cz> - 2.12.1999 15:52:34
Toto je zpr�va ve form�tu MIME obsahuj�c�n�kolik ��st�.
Nazdar Delphisti,
D5,NT4;
Opet prosim o radu.
SITUACE: Telefoni spojeni se servrem
IDEA: pomoci StoredProc vytvorit z klienta na serveru VIEW:
CREATE PROCEDURE FIND
AS
(zv)Sloupec varchar(20)='',
(zv)Promena varchar(20)=''
GO
CREATE VIEW FINDFIRMY
AS
SELECT Nazev
FROM FIRMY
WHERE (zv)Sloupec LIKE (zv)Promena+'%'
GO
a podat klientovi 'x' zaznamu a informovat ho o skutecnem poctu.
VYSLEDEK: Nezna a nechce pouzit parametry.
OTAZKA: Lze takto tvorit parametrizovane VIEW?
Diky moc za kazde postrceni.
Vlasta
Volani funkce z DLL
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 2.12.1999 17:01:15
>GetDiskFreeSpace (ta vraci spatne vysledky pro
>disky vetsi nez 2GB)) tak bych byl neskonale stastny.
zajimave...
http://support.microsoft.com/support/kb/articles/Q231/4/97.ASP
Zdravi
D. Toman
Volani funkce z DLL
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 2.12.1999 17:07:50
Jeste jednou. Na URL:
http://msdn.microsoft.com/library/psdk/winbase/filesio_8bso.htm
je pekny priklad jak pouzivat GetDiskFreeSpaceEx:
pGetDiskFreeSpaceEx = GetProcAddress( GetModuleHandle("kernel32.dll"),
"GetDiskFreeSpaceExA");
if (pGetDiskFreeSpaceEx)
{
fResult = pGetDiskFreeSpaceEx (pszDrive,
(PULARGE_INTEGER)&i64FreeBytesToCaller,
(PULARGE_INTEGER)&i64TotalBytes,
(PULARGE_INTEGER)&i64FreeBytes);
// Process GetDiskFreeSpaceEx results.
}
else
{
fResult = GetDiskFreeSpace (pszDrive,
&dwSectPerClust,
&dwBytesPerSect,
&dwFreeClusters,
&dwTotalClusters)
// Process GetDiskFreeSpace results.
}
It is not necessary to call LoadLibrary on Kernel32.dll because it is already loaded into every Win32 process's address space.
-------
D. Toman
Ako vypnut ATX case z Dosu II ?
[*] Radoslav =?iso-8859-1?Q?Krehl=EDk?= <heretic(zv)softok(tec)cz> - 02.12.1999 08:14:45 -0800
>nevite nekdo jak toto dosahnout take pod WinNT 4.0, myslim tim uplne
>vypnuti bez zaseku na nejakem okne "Nyni muzete pocitac vypnout".
Na <www.nt(tec)cz> jsem nekdy daval utilitu, ktera presne tohle pro WinNT 4.0
umi, zkus prohrabat archiv newsu...
Heretic-X
Program stale na popredi...
[*] Zdenek Drvota <drvota(zv)zds(tec)cz> - 2.12.1999 17:34:12
...no, tak nevim...
Muze mi nekdo rici, proc bych mel zadarmo (a vubec)
pomahat nekomu nepoctive ziskavat penize?
Holt my poctivi zustaneme dal chudymi...
Mozna bych mel toho vykuka nahlasit sponzorovi akce ;-)
------- Forwarded Message Follows -------
Od: tmara(zv)itsys(tec)cz
Komu: drvota(zv)zds(tec)cz
V�c: RE: Program stale na popredi...
Datum odesl�n�: Thu, 2 Dec 1999 10:47:07 +0100
Po�tovn� prog.: Internet Mail Service (5.5.2232.9)
Je to wono, ale ted sem zjistil, ze je este t�eba obcas hejbnout
krysou a
kliknout na reklamu. Muzete mi poradit, jak nastavim pozici kurzoru,
simulovat pohyb mysi a jak udelat klik mysi ? Tnx a lot.
P.S. http://www.spedia.net/cgi-bin/tz.cgi?run=show_svc&fl=8&vid=305355
<http://www.spedia.net/cgi-bin/tz.cgi?run=show_svc&fl=8&vid=305355>
-----P�vodn� zpr�va-----
Od: Zdenek Drvota [mailto:drvota(zv)zds(tec)cz]
Odesl�no: 1. prosince 1999 17:30
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Re: Program stale na popredi...
:-)))
neni to jedna z tech akci "vydelavejte $ pri browseni"?
Kdyz neni browser active-top window, cas se nezapocitava...
### tmara(zv)itsys(tec)cz napsal dne 1 Dec 99, v 10:09 :
> Hezky den,
> potreboval bych napsat programek, kter� kazde 4 minuty nastavi
nastavi
> zapnuty browser jako aktivni a sam se stahne na pozadi. Proste
potrebuji
> mit browser (nebo jiny program) st�le aktivni, ale on se mi po 5
minutach
> sam stahne na pozadi. A tomu chci zabranit. Nejde o nic
nelegalniho, jenom
> chci, aby program bezel st�le na popredi bez jakehokoliv meho
prispeni.
> Mam Delphi 4 Prof. Nakopnete me? Zkuste to prosim se standartnima
> komponentama. Tnx a lot. ByE.
>
-----------------------------------------------
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
Internet proti monopolu http://www.bojkot(tec)cz
Pripojte se k hledani mimozemskych civilizaci:
SETI(zv)Home http://setiathome.ssl.berkeley.edu
TStoredProc a MS SQL 7
[*] Ji�� Kr�l���i٢��k�{h��& - 2.12.1999 19:29:40
> normalne nadefinuju session, database, procname (krasne ji lze najit v
> Ob.Insp.), nadefinuju parametry
> a po zActivneni najednou milostpan breci, ze pry:
> General SQL error, cannot find procedure 'mojekrasnaprocedurka'
omlouvam se , upresneni:
D5E, BDE 5.10, MS SQL 7, cili vsechno cerstve
ta zatr. procedura tam, je pouzivam STEJNOU TDatabase a TSession jako pro
cely zbytek aplikace, kde to funguje. Pomoci ADO to taky funguje. Procedura
je vyzkousena. a kdyz mi ji zobrazi Obj. Insp. tak tam asi je.
jinymi slovy, pres Borlandi storedproc mi nejde zadna SP spustit, ale proc,
to je oc tu bezi...
JK
ADMIN: Re: (Fwd) RE: Program stale na popredi...
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 2.12.1999 19:59:32
Puvodni zprava, kterou napsal Zdenek Drvota dne 2 Dec 99,:
> ...no, tak nevim...
> Muze mi nekdo rici, proc bych mel zadarmo (a vubec)
> pomahat nekomu nepoctive ziskavat penize?
> Holt my poctivi zustaneme dal chudymi...
> Mozna bych mel toho vykuka nahlasit sponzorovi akce ;-)
>
> [... odstrizeno ...]
Prosim o ukonceni takove debaty. Bud mu nekdo poradte (to muzete
do konference) nebo ho poslete nekam (to ale pouze soukromym
mailem), ale prosim bez diskusi na tema, zda to delat nebo ne...
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
problem z nazvom zlozky "CDROM"
[*] Igor Klepoch <klepoch(zv)ba.sknet.sk> - 2.12.1999 21:34:33
ahoj,
stretol som s takym malym problemom : preinstaloval som si Windows 98
(samozrejme na Win 98). Po preinstalovani zacal byt problem zo vsetkymi
nazvami CDROM, konkretne na instalackach Delphi je myslim CDROM.GIF
a s adresarom, ktory sa volal CDROM. Bol odmietnuty pristup k nim.
Ak som dal disk pod Win95 SR2, szlozka sa dala premenovat a pouzivat normalne.
V tom case som este skusal IE 5.0 - mozno je on na pricine.
Neviete co s tym ? Hlavne vadi, ze padne intalacia Delphi.
D5 - ano ci ne ?
[*] Erik Salaj <winsoft(zv)napri.sk> - 2.12.1999 22:30:49
> Mno, muzu zde odprisahnout, ze DBGrid (a CustomGrid taktez) je
> pekny zmetek, tedy v tom smyslu ze je silne prasacky napsany.
> Zrovna se pokousim toto prevest na OLE DB Grid a narazim na
> takove problemy, ze asi budu muset sahnout primo do CustomGrid
> a opravit tam radu veci, aby vse fungovalo jak je treba. :-((
Ano, VCL je napisane tak, ze akakolvek uprava bez zasahu
do zdrojovych kodov sa podari len za velmi priaznivej konstelacie
hviezd. Ale vecsinou ani vtedy nie. Jedinou zachranou je zdrojovy
kod. Mam pocit, ze k uplnej dokonalosti tu uz chyba len zdrojovy
kod Delphi, Windows a schema Pentia. Alebo mozno zmena
myslenia a pisanie takehoto softwaru rozumnejsim sposobom.
Erik Salaj
hot key
[*] bures <bures(zv)ssakhk(tec)cz> - 2.12.1999 22:39:05
Ahoj, mam takovy maly problem, mam form na kterem je par komponent (na ktere se hazi focus) a potreboval bych jak zajitit nejekej ten "hot key" treba klavesu esc.
Pridani do pricedury form1keypress nebo form1keydown nepripada v uvahu a pouzit komponetu main menu , ktera umi zajistit nejakej ten hot key nemohu kvuli vzhledu.
dekuji
Vladimir Bures
bures(zv)ssakhk(tec)cz
MDI a Thread
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 02.12.1999 22:41:38
Pavel Bansky wrote:
>
> ave Pratele !
>
> Pomozte mi prosim z nasledujicim,
> potrebuji aby kazde mdi okno bezelo
> jako samostatny thread. Nejak se me
> to stale nedari.
> Nebo by stacilo znat jak ze Thradu
> zmenit nebo cist urcitou promenou toho
> mdi formulare. Metodu zavolat umim
> pres Synchronize, ale kdyz chci menit
> promennou (prefernci) toho objektu tak
> to vyhodi excpetion.
Ahoj,
Ve VCL tezko muze bezet kazde okno v jinem threadu, muzes mit vsak thread
ktery bude pres Synchronize volat nejake metody toho formulare. Ohledne
cteni a zapisu promennych mezi thready, asi by to chtelo ukazku kodu. Ale
obecne plati, ze musis pouzivat nejake synchonizacni objekty jadra jako
napriklad kriticke sekce nebo mutexy.
--
Petr Vones, amatersky programator
Integer a LongWord (Was:D5 - ano ci ne ?)
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 02.12.1999 22:41:56
Dalibor Toman wrote:
> Sranda je ovsem ta, ze definice od MS je :
> INVALID_HANDLE_VALUE = -1
> :-) a presto jim komparace s DWORDY chodi...
V Delphi je to definovane jako DWORD :-)
INVALID_HANDLE_VALUE = DWORD(-1);
> >Coz je IMHO spravne, viz priklad:
> samozrejme, ze ano. Ja jsem netvrdil, ze to je spatne. Akorat zrovne me by se
libilo kdybych mohl rici at se na nejake rozsirovani vykasle a (treba v
compiler
options). Pak by -1 byla fakticky totozna s $FFFFFFFF v podani Cardinalu
V nouzi to muzes resit pretypovanim pri porovnavani, ale to nastaveni v
kompilatoru by nebylo spatny, souhlasim (napriklad misto ponekud ne zrovna
stastneho Assignable typed constants :-)
--
Petr Vones, amatersky programator
Nacteni ikon z SHELL32.DLL
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 02.12.1999 22:42:43
Mik Radim wrote:
>
> Prosim Vas,
> potreboval bych nacist ikony z SHELL32.DLL do image listu. Mam D3 a
> zkousim to takhle:
Ahoj,
Lze to udelat napriklad takhle (pro D3 si akorat budes muset nahradit
dynamicka pole pomoci GetMem/FreeMem):
uses
ShellAPI;
procedure LoadIconsFromFile(const FileName: TFileName; SmallImageList, LargeImageList: TImageList);
var
I, IconCount: Integer;
SmallIcons, LargeIcons: array of HICON;
Icon: TIcon;
begin
Icon := TIcon.Create;
try
if SmallImageList <> nil then
begin
SmallImageList.Width := GetSystemMetrics(SM_CXSMICON);
SmallImageList.Height := GetSystemMetrics(SM_CYSMICON);
end;
if LargeImageList <> nil then
begin
LargeImageList.Width := GetSystemMetrics(SM_CXICON);
LargeImageList.Height := GetSystemMetrics(SM_CYICON);
end;
SmallIcons := nil;
LargeIcons := nil;
IconCount := ExtractIconEx(PChar(FileName), -1, LargeIcons[0], SmallIcons[0], 0);
if IconCount = 0 then RaiseLastWin32Error;
SetLength(SmallIcons, IconCount);
SetLength(LargeIcons, IconCount);
ExtractIconEx(PChar(FileName), 0, LargeIcons[0], SmallIcons[0], IconCount);
for I := 0 to IconCount - 1 do
begin
if SmallImageList <> nil then
begin
Icon.Handle := SmallIcons[I];
SmallImageList.AddIcon(Icon);
end;
if LargeImageList <> nil then
begin
Icon.Handle := LargeIcons[I];
LargeImageList.AddIcon(Icon);
end;
end;
finally
Icon.Free;
end;
end;
--
Petr Vones, amatersky programator
Spolecny posun nekolika okny najednou
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 02.12.1999 22:42:57
Vladimir Sladky wrote:
>
> Nevi prosim nekdo, jak "chytit" mysi nekolik oken (patricich
> k jedne aplikaci a ne MDI) najednou a pohybovat jimi po obrazovce soucasne ?
Ahoj,
Slo by to treba takhle:
unit Global;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
type
TGlobalDataModule = class(TDataModule)
procedure DataModuleCreate(Sender: TObject);
procedure DataModuleDestroy(Sender: TObject);
private
MovingForms: TList;
public
procedure MovingHandler(AForm: TCustomForm; ARect: TRect);
procedure RegisterMovingForm(AForm: TCustomForm);
procedure UnregisterMovingForm(AForm: TCustomForm);
end;
var
GlobalDataModule: TGlobalDataModule;
implementation
{$R *.DFM}
procedure TGlobalDataModule.DataModuleCreate(Sender: TObject);
begin
MovingForms := TList.Create;
end;
procedure TGlobalDataModule.DataModuleDestroy(Sender: TObject);
begin
MovingForms.Free;
end;
procedure TGlobalDataModule.MovingHandler(AForm: TCustomForm; ARect: TRect);
var
MoveOfs: TPoint;
I: Integer;
DeferHandle: HDWP;
begin
MoveOfs.X := ARect.Left - AForm.Left;
MoveOfs.Y := ARect.Top - AForm.Top;
DeferHandle := BeginDeferWindowPos(MovingForms.Count - 1);
try
for I := 0 to MovingForms.Count - 1 do
if MovingForms[I] <> AForm then with TCustomForm(MovingForms[I]) do
if not IsIconic(Handle) then
DeferHandle := DeferWindowPos(DeferHandle, Handle, 0,
Left + MoveOfs.X, Top + MoveOfs.Y, 0, 0,
SWP_NOZORDER or SWP_NOACTIVATE or SWP_NOSIZE)
else
SetBounds(Left + MoveOfs.X, Top + MoveOfs.Y, Width, Height);
finally
EndDeferWindowPos(DeferHandle);
end;
end;
procedure TGlobalDataModule.RegisterMovingForm(AForm: TCustomForm);
begin
MovingForms.Add(Pointer(AForm));
end;
procedure TGlobalDataModule.UnregisterMovingForm(AForm: TCustomForm);
begin
MovingForms.Remove(Pointer(AForm));
end;
end.
----------------------------------------------------------------------------
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject);
private
procedure WMMoving(var Message: TMessage); message WM_MOVING;
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
uses Global;
{$R *.DFM}
{ TForm1 }
procedure TForm1.WMMoving(var Message: TMessage);
begin
inherited;
GlobalDataModule.MovingHandler(Self, PRect(Message.LParam)^);
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
GlobalDataModule.RegisterMovingForm(Self);
end;
procedure TForm1.FormDestroy(Sender: TObject);
begin
GlobalDataModule.UnregisterMovingForm(Self);
end;
end.
----------------------------------------------------------------------------
unit Unit2;
(...)
type
TForm2 = class(TForm1)
... atd.
--
Petr Vones, amatersky programator
Databaze
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 02.12.1999 22:42:11
supervisor(zv)unicontrols(tec)cz wrote:
> > Lze nejakym zpusobem zajistit to, aby se data do tabulek ulozila primo do
> > souboru na disku a ne do pameti ?
> >
>
> Ja pouzivam tuto notaci
>
> dbiSaveChanges(TABLE1.Handle)
Ahoj,
Pri volani BDE API je vhodne kontrolovat navratovou hodnotu, k tomu slouzi
funkce Check:
Check(DbiSaveChanges(TABLE1.Handle));
--
Petr Vones, amatersky programator
None
[*] Erik Salaj <winsoft(zv)napri.sk> - 3.12.1999 00:08:09
TDAOQuery je TDAODataSet ale so zredukovanym poctom properties koli kompatibilite s TQuery.
Lepsie je pouzivat priamo TDAODataSet.
Erik Salaj
skusam dao komponenty od E. Salaje. Aky je rozdiel medzi komponentou DAODATASET a DAOQUERY ? Ktore je lepsie pouzit ?Databaze
[*] Mirek Junek <mjunek(zv)uo.fairnet(tec)cz> - 3.12.1999 00:16:36
Ahoj,
pridavam treti moznost ke dvema uvedenym (a fungujicim):
nastav si BDE | Paradox na LocalShare = true (obzvlast na siti Peer to Peer
to vidim jako nutnost). Trochu to zpomali pristup, ale kesuje to mnohem
opatrneji.
Mirek Junek
----- Original Message -----
From: <mkotaska(zv)post(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, December 02, 1999 12:38 PM
Subject: Databaze
| Ahoj.
|
| Prosim o pomoc s vyresenim nasledujiciho problemu.
| Ve sve aplikaci pristupuji k databazovym tabulkam (Paradox 7)
prostrednitvim
| BDE.
| Pokud v aplikaci nastane nejaka vyjimka (aplikace \"spadne\") vsechna data
| zapsana do tabulek zmizi.
| Zapisuji standardnim postupem:
|
| Table1.Append;
| ...
| ...
| ..
| Table1.Post;
|
| Lze nejakym zpusobem zajistit to, aby se data do tabulek ulozila primo do
| souboru na disku a ne do pameti ?
|
| Dekuji vsem za kazdy namet.
|
| Milan Kotaska
| mkotaska(zv)post(tec)cz
|
|
| Sledujte zpravodajstvi, TV-program, pocasi, kursy, ...:
| *** http://PRESS.CZ
|
|Pristup na PDX tabulku ze dvou pocitacu
[*] eL.. <eL_z_Prahy(zv)seznam(tec)cz> - 3.12.1999 03:35:00
----- Original Message -----
From: Jirka <jnagy(zv)nh-trans(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, December 02, 1999 8:16 AM
Subject: Re: Pristup na PDX tabulku ze dvou pocitacu
> ----- P�vodn� zpr�va -----
> > Mam dva pocitace v siti. Na jednom bezi "server" a "klient",
> > na druhem bezi pouze "klient". "Server" zapisuje do tabulky,
> > ktera je na stejnem pocitaci, a "klienti" z ni ctou
> > a jistym zpusobem nactena data interpretuji.
> > Problem je v tom, ze zmeny v tabulce vidi pouze "klient" na pocitaci
> > na kterem bezi i "server". "Klient" na druhem pocitaci zmeny nevidi.
> Nekdo uz poradil zavolat FlashBuffers, ja bych (po vlastnich
> zkusenostech) jeste doplnil:
> - vypni smartdrive na vsechny disky (ono by to sitove disky nemelo
> cachovat, ale mne se to pravidelne stalo na Novellu, ze kazdy pocitac
> jako kdyby mel "svoji" verzi tabulky)
> -pokud to nepomuze, nastav v BDE Local share na true. Bude to
> pomalejsi, ale pomuze to (asi).
>
> Jirka
>
Nastaveni Local SHARE= TRUE je NUTNE!!!
eL..hot key
[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 3.12.1999 06:08:18
Pouzij Popup menu, ktere bude Visible:=false a tam si muzes udelat hotkeys kolik chces.
Jan Fiala
----- Original Message -----
From: bures Ahoj, mam takovy maly problem, mam form na kterem je par komponent (na ktere se hazi focus) a potreboval bych jak zajitit nejekej ten "hot key" treba klavesu esc.
Pridani do pricedury form1keypress nebo form1keydown nepripada v uvahu a pouzit komponetu main menu , ktera umi zajistit nejakej ten hot key nemohu kvuli vzhledu.
dekuji
Vladimir Bures
bures(zv)ssakhk(tec)cz
MS SQL server a TQuery
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 3.12.1999 07:45:33
Dobry den,
narazil jsem na zajimavy problem, ktery se mi nepodarilo vyresit.
Mam aplikaci , ktera pristupuje na SQL server vyhradne pomoci
TQuery. Tato aplikace je spoustena z ruznych duvodu ze site.
Problem: prestoze v kodu neni ani zminka o paradoxu, z nejakych
zahadnych duvodu se paradox driver k necemu interne pouziva.
Zjistil jsem toto: je-li na siti zakazan zapis, aplikace se vzteka, ze
nemuze zalozit soubor Pdoxusr.LCK (nebo tak nejak). Pokud se
zapis povoli, program vytvori dve paradoxi(!) tabulky DEL1.DB,
DEL2.DB spolu s DEL1.MB, DEL2.MB, vzapeti je okamzite smaze
a pak uz bezi normalne. Toto se mi stava, kdyz chci naplnit
DBGrid.
Zkousel jsem vsechno mozne vcetne konfigurovani BDE a hrani
si s Windows Registry, ale nic nepomohlo. Zajimave je, ze veskere
soubory vcetne toho LCK, ktere ten paradoxi driver vytvori, po sobe
ihned zase smaze. Podivam-li se napr. pruzkumnikem za behu
aplikace do prislusneho adresare, tak tam nic navic neni. Existenci
techto souboru jsem zjistil tak, ze jsem nastavil pravo vytvaret
soubory a zakazal pravo je mazat.
Dekuji predem za nazory a pripadne namety, jak se paradoxu
zbavit.
David Lebeda
lebeda(zv)comarr(tec)cz
TStoredProc a MS SQL 7
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 3.12.1999 08:06:00
> -----P�vodn� zpr�va-----
> Od: Ji�� Kr�l [mailto:admin(zv)printo.com]
> Odesl�no: 2. prosince 1999 19:30
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: RE: TStoredProc a MS SQL 7
>
>
>
> omlouvam se , upresneni:
>
> D5E, BDE 5.10, MS SQL 7, cili vsechno cerstve
>
> ta zatr. procedura tam, je pouzivam STEJNOU TDatabase a
> TSession jako pro
> cely zbytek aplikace, kde to funguje. Pomoci ADO to taky
> funguje. Procedura
> je vyzkousena. a kdyz mi ji zobrazi Obj. Insp. tak tam asi je.
No, m�l jsem star�� konfiguraci (BDE 5.0, Delphi4), Obj.Insp. mi
proceduru uk�zal a program ji nena�el. Probl�m byl sice v tom,
�e Obj.Insp. nevlo�il do identifikace jm�no schematu (vlastn�ka),
ale ani kdy� jsem je tam doplnil ru�n�, nejelo to. Kv�li tomu
jsem musel pou��t m�sto nativn�ho driveru ODBC.
S Tvou konfigurac� nem�m osobn� ��dn� zku�enosti, ale sly�el jsem
o ur�it�ch probl�mech s TStoredProc. Ti lid� to vy�e�ili tak,
�e proceduru volaj� pomoc� TQuery a p��kazu EXECUTE. Nev�m,
jak� p�esn� byly probl�my s TStoredProc, ale mo�n� by i pro
Tebe bylo lep�� pou��t rad�ji TQuery. Mysl�m, �e to je l�pe
odlad�n� komponenta.
Jura
MS SQL server a TQuery
[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 3.12.1999 08:18:08
Pokud pouzivas pristup pres BDE, pouziva Delphi
pro docasne tabulky
prave format Paradox a s tim souvisi veskere
problemy s .LCK
soubory atd.
Jan Fiala
----- Original Message -----
From: David Lebeda <david.lebeda(zv)comarr(tec)cz>
> Dobry den,
>
> narazil jsem na zajimavy problem, ktery se mi
nepodarilo vyresit.
> Mam aplikaci , ktera pristupuje na SQL server
vyhradne pomoci
> TQuery. Tato aplikace je spoustena z ruznych
duvodu ze site.
> Problem: prestoze v kodu neni ani zminka o
paradoxu, z nejakych
> zahadnych duvodu se paradox driver k necemu
interne pouziva.
> Zjistil jsem toto: je-li na siti zakazan zapis,
aplikace se vzteka, ze
> nemuze zalozit soubor Pdoxusr.LCK (nebo tak
nejak). Pokud se
> zapis povoli, program vytvori dve paradoxi(!)
tabulky DEL1.DB,
> DEL2.DB spolu s DEL1.MB, DEL2.MB, vzapeti je
okamzite smaze
> a pak uz bezi normalne. Toto se mi stava, kdyz
chci naplnit
> DBGrid.
> Zkousel jsem vsechno mozne vcetne konfigurovani
BDE a hrani
> si s Windows Registry, ale nic nepomohlo.
Zajimave je, ze veskere
> soubory vcetne toho LCK, ktere ten paradoxi
driver vytvori, po sobe
> ihned zase smaze. Podivam-li se napr.
pruzkumnikem za behu
> aplikace do prislusneho adresare, tak tam nic
navic neni. Existenci
> techto souboru jsem zjistil tak, ze jsem
nastavil pravo vytvaret
> soubory a zakazal pravo je mazat.
>
> Dekuji predem za nazory a pripadne namety, jak
se paradoxu
> zbavit.
MS SQL server a TQuery
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 3.12.1999 08:22:48
> -----P�vodn� zpr�va-----
> Od: David Lebeda [mailto:david.lebeda(zv)comarr(tec)cz]
> Dobry den,
>
> narazil jsem na zajimavy problem, ktery se mi nepodarilo vyresit.
> Mam aplikaci , ktera pristupuje na SQL server vyhradne pomoci
> TQuery. Tato aplikace je spoustena z ruznych duvodu ze site.
> Problem: prestoze v kodu neni ani zminka o paradoxu, z nejakych
> zahadnych duvodu se paradox driver k necemu interne pouziva.
> Zjistil jsem toto: je-li na siti zakazan zapis, aplikace se
> vzteka, ze
> nemuze zalozit soubor Pdoxusr.LCK (nebo tak nejak). Pokud se
> zapis povoli, program vytvori dve paradoxi(!) tabulky DEL1.DB,
> DEL2.DB spolu s DEL1.MB, DEL2.MB, vzapeti je okamzite smaze
> a pak uz bezi normalne. Toto se mi stava, kdyz chci naplnit
> DBGrid.
> Zkousel jsem vsechno mozne vcetne konfigurovani BDE a hrani
> si s Windows Registry, ale nic nepomohlo. Zajimave je, ze veskere
> soubory vcetne toho LCK, ktere ten paradoxi driver vytvori, po sobe
> ihned zase smaze. Podivam-li se napr. pruzkumnikem za behu
> aplikace do prislusneho adresare, tak tam nic navic neni. Existenci
> techto souboru jsem zjistil tak, ze jsem nastavil pravo vytvaret
> soubory a zakazal pravo je mazat.
>
Hm ... :-(
Myslim, ze to nejde. Nepodarilo se mi zjistit, jak se Paradoxu zbavit.
Vysledovali jsme dve lokality, kam musi mit uzivatel pravo zapisu, aby mu
vubec slo prihlasit se k MS SQL Serveru. Jsou dve lokality, ve kterych
se pracuje se sdilenymi nebo lokalnimi soubory (Mluvim o BDE 5.01):
Adresar nastaveny v BDE/Configuration/Drivers/Native/PARADOX/Net Dir
Aktualni adresar spustene aplikace
V prvni lokalite jsou sdilene soubory se zamky - ty muzeme ignorovat,
meli bychom nastavit cestu v BDE nekam do C:\TEMP aby nedoslo ke kolizi.
V aktualnim adresari aplikace vznikaji docasne soubory, uzivatel tam
musi mit pravo zapisu. Pokud spousti aplikaci z lokalniho pocitace,
neni problem, ale pokud vice uzivatelu ze sitoveho disku, nastava problem,
ze tam musi mit pravo zapisu, mohou se tlouct atp. Je potreba nastavit
aplikaci jiny aktualni adresar - nejlepe asi po startu zmenit adresar
na GetTempPath, naopak nejjednodussi reseni je vytvorit zastupce s cestou
nastavenou na %TEMP%, aby uzivatele misto exe spousteli zastupce.
Jura
SQL View
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 3.12.1999 08:42:57
----P�vodn� zpr�va-----
Od: Vlastimil Zden�k [mailto:milesoft(zv)mi.cesnet(tec)cz]
Odesl�no: 2. prosince 1999 15:53
Komu: Delphi konference
P�edm�t: SQL View
Nazdar Delphisti,
D5,NT4;
Opet prosim o radu.
SITUACE: Telefoni spojeni se servrem
IDEA: pomoci StoredProc vytvorit z klienta na serveru VIEW:
CREATE PROCEDURE FIND
AS
(zv)Sloupec varchar(20)='',
(zv)Promena varchar(20)=''
GO
CREATE VIEW FINDFIRMY
AS
SELECT Nazev
FROM FIRMY
WHERE (zv)Sloupec LIKE (zv)Promena+'%'
GO
Zalezi na databazovem serveru. Jestli umoznuje dynamicke SQL,
tak to pujde. Nemuzes potom ale napsat prikaz CREATE VIEW primo,
musis pouzit nejake EXECUTE IMMEDIATE (nebo jiny prikaz, kterym se
na danem DB provadi dynamicke SQL) a tomuto prikazu predat
prikaz jako textovy retezec. Ten textovy retezec muze byt treba
promenna, kterou si poskladas pomoci parametru.
ze syntaxe tve procedury mi pripada, ze jde o MS SQL Server,
tam by to, myslim, bylo takto:
EXEC 'CREATE VIEW FINDFIRMY ' +
'AS ' +
'SELECT Nazev ' +
'FROM FIRMY ' +
'WHERE (zv)Sloupec LIKE ' + (zv)Promena + '%'
Jura
SQL Report Builder
[*] TUNGLI Jan <tungli(zv)pvt.sk> - 3.12.1999 08:45:22
Nova verzia 1.4j SQL Report Builder
a nova verzia SQLParse su na http://free.netlap.hu/4321/
(free)
TUNGLI J�nos
EMail: jan.tungli(zv)seznam(tec)cz
My Home Page: http://free.netlap.hu/4321/
or: http://freeweb.coco(tec)cz/tungli/
Volani funkce z DLL
[*] Miroslav �ipel <Miroslav.Cipel(zv)oku-tu(tec)cz> - 3.12.1999 09:02:31
prave ze resi (a je to presne to co doporucuje MS) protoze W95 pred OSR2
nepodporujou FAT32 tudis disk nemuze bejt vetsi nez 2GB
M.
----- Original Message -----
.
.
> No, protoze tim ten problem nevyresi. SysUtils si nastavuje dle systemu
bud
> volani GetDiskFreeSpace (neOSR2) a nebo GetDiskFreeSpaceEx, cimz se
dostanes
> zase tam, kde jsi byl.
>
> Mirun
>
D5 - ano ci ne ?
[*] Miroslav �ipel <Miroslav.Cipel(zv)oku-tu(tec)cz> - 3.12.1999 09:10:59
jo jenze ten bordel mnohdy zacina uplne nekde jinde viz tahanice kolem
GetDiskFreeSpace
M.
----- Original Message -----
> Ano, VCL je napisane tak, ze akakolvek uprava bez zasahu
> do zdrojovych kodov sa podari len za velmi priaznivej konstelacie
> hviezd. Ale vecsinou ani vtedy nie. Jedinou zachranou je zdrojovy
> kod. Mam pocit, ze k uplnej dokonalosti tu uz chyba len zdrojovy
> kod Delphi, Windows a schema Pentia. Alebo mozno zmena
> myslenia a pisanie takehoto softwaru rozumnejsim sposobom.
>
> Erik Salaj
>
>
Text v DBMemo se ztraci - VYRESENO
[*] Pavel ZIDEK <kopr(zv)kopr(tec)cz> - 3.12.1999 09:18:12
Diky za odpovedi, ale reseni je daleko jednodussi,
Pred zapisem
DBMemo1.Text:='Jakysi text' + ^M^J + 'Dalsi radek';
jsem vlozil
Table1.Edit;
takze vysledek vypada nasledovne:
procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
with Table1 do
begin
Edit; {takova malickost a kolik udela prace}
DBMemo1.Text:='Jakysi text' + ^M^J + 'Dalsi radek';
end;
end; Skus priradovat prikazom DBMemo1.DataSource.DataSet.FieldByName DBMemo1.DataField).AsString:= ... alebo priamo XXX.FieldByName('YYY').AsString:= ... kde XXX je tabulka a YYY meno stlpca na ktory je DBMemo1 napojeny (samozrejme tabulka musi byt v editacnom (Edit) alebo vkladacom (Insert) mode).
Zdravim,
potrebuji zjistit, proc se ztraci text v DBMemo (taky v DBRichEdit).
Zapisi do DBMemo text nejakym prikazem - pomoci buttonu. jakmile ale potrebuji text opravit, vlezu do DBMemo a zacnu psat, tak text zmizi.
1. takhle vlozim text
procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
with Table1 do
begin
DBMemo1.Text:='Jakysi text' + ^M^J + 'Dalsi radek';
end;
end;
No a jakmile zacnu text opravovat - mysi kliknu naDBMemo - text zmizi. Ale jakmile opetovne kliknu na button a vygeneruji ten text znovu, tak oprava textu nezpusoi zmizeni.
Asi je treba nejak Memo inicializovat, ze jo.
Delphi - MSAccess
[*] Fi�er Ji�� - 3.12.1999 09:38:57
Setkal jsem se s dal��m probl�mem. Mam v MSAccess vytvorenou tabulku, kde je field KOD typu AUTOMATICKE CISLO. Pokud chci z delphi pridat dalsi zaznam, musim field KOD zadat rucne, jinak se mi zaznam neulozi.
Temto problem mam jen u Win98, jinak to vsude funguje.
Software: Win98, Delphi 3, BDE 5.10
Text v DBMemo se ztraci - VYRESENO
[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 3.12.1999 10:04:02
----- Original Message -----
From: Pavel ZIDEK Diky za odpovedi, ale reseni je daleko jednodussi,
Pred zapisem
DBMemo1.Text:='Jakysi text' + ^M^J + 'Dalsi radek';
jsem vlozil
Table1.Edit;
takze vysledek vypada nasledovne:
procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
with Table1 do
begin
Edit; {takova malickost a kolik udela prace}
DBMemo1.Text:='Jakysi text' + ^M^J + 'Dalsi radek';
end;
end;
Doufam, ze tam nekde delas POST za tou editaci. jinak se ti text neulozi !
Melo by to vypadat :
Edit;
prirazeni ...
Post;
Jan Fiala
MS SQL server a TQuery
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 3.12.1999 10:15:55
Od: "Jan Fiala" <jan.fiala(zv)iol(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
V�c: Re: MS SQL server a TQuery
Datum odesl�n�: Fri, 3 Dec 1999 08:18:08 +0100
Po�tovn� prog.: Microsoft Outlook Express 5.00.2615.200
Odpov�� kam: delphi-l(zv)fwd(tec)cz
> Pokud pouzivas pristup pres BDE, pouziva Delphi
> pro docasne tabulky
> prave format Paradox a s tim souvisi veskere
> problemy s .LCK
> soubory atd.
> > Problem: prestoze v kodu neni ani zminka o
> paradoxu, z nejakych
> > zahadnych duvodu se paradox driver k necemu
> interne pouziva.
Ja na BDE netrvam - proc taky? Pristup na SQL server je pres
ODBC. Da se nejak snadno BDE obejit? Snadno zde znamena bez
nutnosti razantniho prestaveni aplikace. Komponenty TQuery a
TStoredProc jsou ale asi o BDE opreny. Nebo existuji nejake jejich
non BDE nahrady?
Dik.
David Lebeda,
David.Lebeda(zv)comarr(tec)cz
Printer change
[*] tpplus(zv)zasova(tec)cz - 3.12.1999 10:19:55
Hezky den vespolek
Nevite prosim nekdo jak korektne zmenit tiskarnu tak, aby se pouzilo i nastaveni pro tuto tiskarnu ?
Pri zmene vlastnosti pro jednu tiskarnu se mi tyto vlastnosti pouziji i pri zmene tiskarny (i kdyz ma vlastnosti uplne jine :( ). Diky za kazde nakopnuti uz se tim prubezne zabyvam druhy den a nevim kudy kam :-(
D3, W98
Bye
T.B.D5 - ano ci ne ?
[*] Robert Kindl <rob(zv)exec(tec)cz> - 3.12.1999 10:36:36
> > Mno, muzu zde odprisahnout, ze DBGrid (a CustomGrid taktez) je
> > pekny zmetek, tedy v tom smyslu ze je silne prasacky napsany.
> > Zrovna se pokousim toto prevest na OLE DB Grid a narazim na
> > takove problemy, ze asi budu muset sahnout primo do CustomGrid
> > a opravit tam radu veci, aby vse fungovalo jak je treba. :-((
> > Zbysek Hlinka
Kydat hnuj umim taky.
Nemohl by jsi se vyjadrit konkretneji?
DBGrid pozivame a mame i VELMI rozsahleho dedice CustomGrid,
rad bych vedel v cem je tak HROZNY problem.
Zatim jsem nenarazil na nic co by neslo resit nebo by nejak zpomalovalo
ci jinak znehodnocovalo pouzitelnost zminenych komponent.
Proste zdroje v grids.pas nebo dbgrids.pas jsem nemenil.
Vim o cem mluvim, zdroje meho RDBGridu maji 105kB
a RTreeGridu 160kB + dalsi podpora v okolnich komponentach.
Samozdrejme ted muzes rici "Tak vidis kolik jsi toho
musel doprogramovat". Pravda, ale ja necekal, ze
by TCustomGrid byl nejaky obvzlast super.
On je totiz jen spolecny predek vsech Gridu a jako takovy
by mel umet jen to zakladni - delat grid.
A to umi zcela dostatecne.
A totez se da rici o DBGridu. Jako spolecny predek je OK.
> Ano, VCL je napisane tak, ze akakolvek uprava bez zasahu
> do zdrojovych kodov sa podari len za velmi priaznivej konstelacie
> hviezd. Ale vecsinou ani vtedy nie. Jedinou zachranou je zdrojovy
> kod. Mam pocit, ze k uplnej dokonalosti tu uz chyba len zdrojovy
> kod Delphi, Windows a schema Pentia. Alebo mozno zmena
> myslenia a pisanie takehoto softwaru rozumnejsim sposobom.
> Erik Salaj
Zase ten plac nad tim dodavanim zdroju...
Opravdu bych te chtel videt jak bez zdroju udelas noveho
rozsahleho dedice se spoustou novych nebo lepsich
vlastnosti (napr. Zbyskuv OLE DB Grid).
Proste pokud tvoje vychozi komponenta napr. nema podporu
zobrazovani stromove struktury tak jak ji tam doplnis.
Nebo o to pozadas autory puvodni komponenty?
To by jsi asi mnoho komponent nenaprogramoval!
A budou to tam chtit dodelat, kdyz tak specialni pozadavek
mas jen ty?
A aby jsi se doplatil...
Nechces zkusit SAP/R3 tam se pry uz neprogramuje,
ale jen customizuje :-)))
Pravdou je, ze ve VCL neni vse uplne idealni,
ale na druhou stranu pokud ne DBGrid popr. CustomGrid z VCL tak
zbyva jen:
1) naprogramovat si vlastni grid
2) pouzit cizi komponentu
3) pouzivat nejakou ActiveX potvoru
a ted:
ad 1) to zvladne tak 1% ucastniku teto konference a z toho jen 1% ma na to
cas
suma sumarum se do toho pustil akorat Zbysek :-))
Myslim, ze pri hlasovani jestli Gridy z VCL nebo nic by 99.9% lidi zvedlo
ruku pro VCL a pak nadavalo, upravovalo, patchovalo...
ad 2a) komercni reseni stoji to penize a zaruka, ze vysledek bude lepsi je
NULOVA
a zdroje budu chtit v kazdem pripade.
ad 2b) freeware reseni je mozne jen se zdroji, abych zarucil kontinuitu a
tudiz
je to stejne ne-li horsi nez puvodni VCL reseni+upravy.
ad 3) Neni to nativni reseni.
Navic totez co ad 2) ale zde pravdepodobne nejsou zdroje.
To jiste Erika uspokoji :-), ale pokud je problem musim zhavit
nejakou podporu coz se muze tahnout prinejmensim
dny, ale spise tydne a cekani na opravu i mesice.
Pokud mam zdroje mohu udelat patch hned a
po oficialni oprave ho zase zrusim nebo necham.
Rob
Text v DBMemo se ztraci - VYRESENO
[*] Bednar��k Dalibor - 3.12.1999 10:45:59
Jeste by jsi mel napsat POST za radkou DBMemo1.Text:='Jakysi text' + ^M^J + 'Dalsi radek';
Takze FINAL verze
procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
with Table1 do
begin
Edit; {takova malickost a kolik udela prace}
DBMemo1.Text:='Jakysi text' + ^M^J + 'Dalsi radek';
POST;
end;
end;
----- Original Message -----
From: Pavel ZIDEK
To: delphi-l(zv)fwd(tec)cz
Sent: Friday, December 03, 1999 9:18 AM
Subject: Re: Text v DBMemo se ztraci - VYRESENO
Diky za odpovedi, ale reseni je daleko jednodussi,
Pred zapisem
DBMemo1.Text:='Jakysi text' + ^M^J + 'Dalsi radek';
jsem vlozil
Table1.Edit;
takze vysledek vypada nasledovne:
procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
with Table1 do
begin
Edit; {takova malickost a kolik udela prace}
DBMemo1.Text:='Jakysi text' + ^M^J + 'Dalsi radek';
end;
end; Skus priradovat prikazom DBMemo1.DataSource.DataSet.FieldByName DBMemo1.DataField).AsString:= ... alebo priamo XXX.FieldByName('YYY').AsString:= ... kde XXX je tabulka a YYY meno stlpca na ktory je DBMemo1 napojeny (samozrejme tabulka musi byt v editacnom (Edit) alebo vkladacom (Insert) mode).
Zdravim,
potrebuji zjistit, proc se ztraci text v DBMemo (taky v DBRichEdit).
Zapisi do DBMemo text nejakym prikazem - pomoci buttonu. jakmile ale potrebuji text opravit, vlezu do DBMemo a zacnu psat, tak text zmizi.
1. takhle vlozim text
procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
with Table1 do
begin
DBMemo1.Text:='Jakysi text' + ^M^J + 'Dalsi radek';
end;
end;
No a jakmile zacnu text opravovat - mysi kliknu naDBMemo - text zmizi. Ale jakmile opetovne kliknu na button a vygeneruji ten text znovu, tak oprava textu nezpusoi zmizeni.
Asi je treba nejak Memo inicializovat, ze jo.
Ukryti aplikace v D1
[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 3.12.1999 11:01:06
This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
Ahoj,
vazne nikdo nevi, jak uplne schovat aplikaci v D1 a Win 3.11 ?
(ShowWindow(SW_HIDE) sice skryje ikonu, ale s seznamu uloh (napr
po Alt-Tab) je stale videt) a RegisterServiceProcess se Win 3.11
absolutne netyka...)
Dobra.Konverze WAV na MP3
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 3.12.1999 11:17:34
Dobry den,
chtel bych se zeptat, zda jste nahodou nekdo nekde nerazil na
komponenty ci knihovny, pomoci nichz by se dal v Delphi
naprogramovat prevod z Wav do MP3. Na internetu jsem nasel bud
jiz hotove aplikace nebo pomerne dost drahe knihovny. Nejlepsi by
byl freeware nebo i placena licence, ale aby bylo mozne vysledne
aplikace prodavat (napr. Dialog-Medien ma odpovidajici OCX reseni,
ale licencni poplatek se musi platit za kazdou jednotlivou instalaci,
coz prakticky znemoznuje sireni takoveto aplikace).
Dekuji a zdravim.
David Lebeda
Lebeda(zv)comarr(tec)cz
Vymulovat AutoIncrement
[*] Pavel ZIDEK <kopr(zv)kopr(tec)cz> - 3.12.1999 11:20:36
Zdravim,
v DB jsem vymazal velou tabulku pomoci Delete. Ale tim bych potreboval i vynulovat AutoIncrement.
Umi to nekdo?
Pavel
Pekny den (rano, vecer i noc) preje
~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
KOPR software Pavel ZIDEK mailto:kopr(zv)kopr(tec)cz
http://www.kopr(tec)cz/w-delphi.htm
~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~Text v DBMemo se ztraci - VYRESENO
[*] Pavel ZIDEK <kopr(zv)kopr(tec)cz> - 3.12.1999 11:23:20
----- Original Message -----
From: Pavel ZIDEK Diky za odpovedi, ale reseni je daleko jednodussi,
Pred zapisem
DBMemo1.Text:='Jakysi text' + ^M^J + 'Dalsi radek';
jsem vlozil
Table1.Edit;
takze vysledek vypada nasledovne:
procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
with Table1 do
begin
Edit; {takova malickost a kolik udela prace}
DBMemo1.Text:='Jakysi text' + ^M^J + 'Dalsi radek';
end;
end; Doufam, ze tam nekde delas POST za tou editaci. jinak se ti text neulozi !
Melo by to vypadat :
Edit;
prirazeni ...
Post;
Ten Post je samozrejme, zde byl problem v prvotnim zapisu do DBMemo. Dal jsem opravu dat, resp. doplnei nekterych poloze a zapomel jsem dat table1.Edit - dost blba chyba.
Jinak diky Pavel
Konverze WAV na MP3
[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 3.12.1999 11:43:43
Zkus se podivat na http://www.surf.to/cdex
Je tam freeware program na prevod WAV na MP3 a
videl jsem tam i nejake DLL
Jan Fiala
----- Original Message -----
From: David Lebeda <david.lebeda(zv)comarr(tec)cz>> Dobry den,
>
> chtel bych se zeptat, zda jste nahodou nekdo
nekde nerazil na
> komponenty ci knihovny, pomoci nichz by se dal v
Delphi
> naprogramovat prevod z Wav do MP3. Na internetu
jsem nasel bud
> jiz hotove aplikace nebo pomerne dost drahe
knihovny. Nejlepsi by
> byl freeware nebo i placena licence, ale aby
bylo mozne vysledne
> aplikace prodavat (napr. Dialog-Medien ma
odpovidajici OCX reseni,
> ale licencni poplatek se musi platit za kazdou
jednotlivou instalaci,
> coz prakticky znemoznuje sireni takoveto
aplikace).
>
> Dekuji a zdravim.
> David Lebeda
> Lebeda(zv)comarr(tec)cz
>Zotavovani se z ESocketError 10055 (WSAENOBUFS)
[*] Petr Fejfar <callnet(zv)telecom(tec)cz> - 3.12.1999 11:54:30
Hi all,
jiz pomerne dlouho se snazim vyporadat s chybou 10055 u Windows socketu, ale zatim marne, takze se obracim na forum s prosbou o pomoc.
Problem:
Aplikace 7x24 posila v hodne slozitem intranetu protokolem TCP/IP na konkretni adresu:port zpravy v rezimu connect-send-disconnect. Vse osetreno pomoci exceptions s logovanim a merenim casu jednotlivych operaci.
S cetnosti nekolika dni se objevuje chyba 10055 pri pokusu o connect. Vyprsi time-out, zadost se zopakuje, data prenesou a vse se zda O.K. Ovsem kdyz se chyba opakuje resp. potize s prenosovou trasou pretrvaji, dostane se system do stavu, kdy kazdy pokus o connect skonci s chybou 10055. Pomuze jedine exit, protoze to se uvolni vsechny prostredky, ktere ty neuspesne connecty zrejme konzumuji.
Podminky:
Aplikace D3Prof+U? bezela v LANu na W95 zcela bez problemu asi rok. Pak se cilovy pocitac presunul mimo budovu a zacali se objevovat potize s cetnosti tak 1 za 14 dni. Kdyz se rozrostl intranet, tak cetnost stoupla do radu dni.
Puvodne jsem pro obsluhu TCP/IP pouzival vlastni komponenty nad winsockem v asynchronnim rezimu, aplikace pouzivala kooperativni multithreading.
S prechodem na D4 jsme ji prepsali do preemptivniho multithreadingu a pro klienta pouzili tClientSocket v samostatnem threadu v synchronnim rezimu a provozujeme to pod W98.
Nema s tim nekdo nejake zkusenosti ci napady, jak tuhle chybu zotavovat? (Jine chyby se zotavuji bez problemu).
Thanx pf, Petr.Fejfar(zv)callnet(tec)cz
Pomoc pri vyvoji SQL Report Builder
[*] TUNGLI Jan <tungli(zv)pvt.sk> - 3.12.1999 11:59:58
Ak ma niekto zaujem spolupracovat na vyvoji SQL Report Builder,
moze dostat zdrojove kody - napiste mi email.
TUNGLI J�nos
EMail: jan.tungli(zv)seznam(tec)cz
My Home Page: http://free.netlap.hu/4321/
or: http://freeweb.coco(tec)cz/tungli/
Delphi - ODBC - MSAccess - TQuery - Param
[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 3.12.1999 12:04:10
Proc ten dotaz neudelas v Delphi ? Vloz na formular
komponentu TQuery a do Query1.SQL napis
SELECT ID, Jmeno, Prijmeni FROM T_Prac WHERE ID=:ID
V kodu potom muzes volat
Query1.ParamByName('ID').AsString:=Edit1.Text;
Query1.Prepare;
try
Query1.Open;
except
Neco_se_nepovedlo;
end;
Na tento Query1 napoj TDataSource a nej zase treba DBGrid;
Pokud by jsi presto ten dotaz chtel mit v te databazi,
zkus pouzit TStoredProc (ja takto napriklad vkladam
nove zaznamy a pod, ale nikdy jsem je nepouzival
pro zobrazovani dat)
Nastav u ni jmeno toho dotazu MDB (StoredProcName),
nastav parametry (Params), pripoj na DataSource
a pouzij bud ExecProc nebo dej Active:=true
Dobra.
> ----------
> Od: Fi�er Ji��[SMTP:fiser(zv)volny(tec)cz]
> Je to presne tak. Nevis jak to udelat ???
>
> ----- Original Message -----
> > nevim jestli tomu rozumim spravne; mas v databazi accessu
> > vytvoren nejaky dotaz, ktery vypada napriklad nejak takto:
> >
> > SELECT ID, Jmeno, Prijmeni FROM T_Prac WHERE ID=[ID:]
> >
> > a ty chces vysledky takoveho dotazu zobrazit v Delphi,
> > je to tak ?
> >
> > Dobra.
> > > ----------
> > > Od: Fi�er Ji��[SMTP:fiser(zv)volny(tec)cz]
> > >
> > > Mam problem, ktery se mi nedari vyresit. Pristupuji k MSAccess
> pres
> > > ODBC.
> > > Protrebuji pouzit TQuery na vytvoreny dotaz v MSAccessu.
> > > V dotazu v MSAccessu je ovsem potreba zadat PARAMETR.
> > > I kdyz ho do TQuery rucne zadam, stale mi to hazi chybu,
> > > ze v dotazu chyby jeden PARAMETR. Poradi mi nekdo,
> > > jak tento parametr poslu z TQuery do MSAccesu ???
> > >
>
> Delphi - MSACCESS
[*] Fi�er Ji�� - 3.12.1999 12:06:01
Zdravim vsechy. Nevi nekdo jak zobrazit v Delphi dotaz z MSAccess, ve kterem je zadany parametr ???. Nevim jak tento parametr poslat z DELPHI do MSAccess.
Pripojeni pres ODBC, Delphi 3, BDE 5.10, Win NT
Predem dekuji za dobre napady !!! Jirka.
Vymulovat AutoIncrement
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 3.12.1999 12:29:15
----P�vodn� zpr�va-----
Od: Pavel ZIDEK [mailto:kopr(zv)kopr(tec)cz]
Odesl�no: 3. prosince 1999 11:21
Komu: Konference DELPHI forum
P�edm�t: Vymulovat AutoIncrement
Zdravim,
v DB jsem vymazal velou tabulku pomoci Delete. Ale tim bych potreboval i
vynulovat AutoIncrement.
Umi to nekdo?
Obecne asi ne.
Ale kdyz uz je tabulka prazdna, sel by udelat DROP a CREATE, pokud tomu
nebrani referencni integrita.
Jura
Vymulovat AutoIncrement
[*] Tomas =?iso-8859-2?Q?Michal=EDk?= <michalik(zv)proca(tec)cz> - 03.12.1999 12:30:45
snad by to melo jit restrukturalizaci
Pavel ZIDEK wrote:
> Zdravim,v DB jsem vymazal velou tabulku pomoci Delete. Ale tim bych
> potreboval i vynulovat AutoIncrement.Umi to nekdo?Pavel
> Pekny den (rano, vecer i noc) preje
> ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
> KOPR software Pavel ZIDEK mailto:kopr(zv)kopr(tec)cz
> http://www.kopr(tec)cz/w-delphi.htm
> ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
=================================
Tomas Michalik
ProCA, s. r. o.
V Luzich 818, Praha 4
Czech Republic
e-mail: michalik(zv)proca(tec)cz
tel: +420 2 67283446
Konverze WAV na MP3
[*] Miroslav �ipel <Miroslav.Cipel(zv)oku-tu(tec)cz> - 3.12.1999 12:35:48
http://www.swiftsoft.de/free.html
MP3 Blade Encoder Component 1.0 (Free)
Component to use the freeware Blade MP3 encoder with the MMTools. VCL Source
included.
M.
Vymulovat AutoIncrement
[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 3.12.1999 13:13:49
V jake DB ?
Nebude jednodusi vytvorit novou, stejnou tabulku ?
(V Accessu to jde napr. komprimaci MDB)
Predpokladam, ze takovato tabulka NEMA ZADNOU detail
tabulku...
Dobra.
> ----------
> v DB�jsem vymazal�velou tabulku pomoci Delete. Ale tim bych potreboval
> i vynulovat AutoIncrement.
> ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~� ~ ~ ~ ~ ~� ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
> KOPR software����� Pavel ZIDEK���� mailto:kopr(zv)kopr(tec)cz
> http://www.kopr(tec)cz/w-delphi.htm
> ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~� ~ ~ ~ ~ ~� ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
> TStoredProc a MS SQL 7
[*] Ji�� Kr�l jr. - 3.12.1999 13:46:50
Vzhledem k tomu, �e u� to jede faaaajne pres ADOStoredProc, me to tak
neboli, pouze jsem z principu chtel vedet if jsem blby ja nebo ta
komponenta, ci zda jsem takto postizen jen ja. Takze diky. Toto by slo na
tvujsoukr. mail, ale nenasel jsem jej.
dik
taky Jura
Delphi - MSAccess - Automaticke cislo
[*] Daniel Rott <roxton(zv)atlas(tec)cz> - 3.12.1999 14:14:29
> Fiser Jiri napsal
> Mam v MSAccess vytvorenou tabulku, kde je field KOD typu
> AUTOMATICKE CISLO. Pokud chci z delphi pridat dalsi zaznam,
> musim field KOD zadat rucne, jinak se mi zaznam neulozi.
Radu nemam, ale chtel bych se pridat. Jak u tohoto typu zjistim
pridelenou hodnotu po Insertu ? Pracuji bez BDE, primo s ODBC
API. Na SQL serveru lze hodnotu vycist z (zv)(zv)IDENTITY. Existuje
u Accessu neco podobneho ?
P.S. Predpokladam ze tento typ zajisti jedinecnost i pri
nevyhradnim pristupu k databazi.
Daniel Rott
Delphi - ODBC - MSAccess - TQuery - Param
[*] Fi�er Ji�� - 3.12.1999 14:18:56
Dotaz vytvorit nemuzu v TQuery, protoze PARAMETR v ACCESU navazuje na dalsi
dotazy.
Zkusil jsem TStoredProc, ale pise mi to chybovou hlasku << Capability not
supported, driver not capable >>.
----- Original Message -----
From: Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, December 03, 1999 12:04 PM
Subject: RE: Delphi - ODBC - MSAccess - TQuery - Param
> Proc ten dotaz neudelas v Delphi ? Vloz na formular
> komponentu TQuery a do Query1.SQL napis
> SELECT ID, Jmeno, Prijmeni FROM T_Prac WHERE ID=:ID
>
> V kodu potom muzes volat
> Query1.ParamByName('ID').AsString:=Edit1.Text;
> Query1.Prepare;
> try
> Query1.Open;
> except
> Neco_se_nepovedlo;
> end;
>
> Na tento Query1 napoj TDataSource a nej zase treba DBGrid;
>
> Pokud by jsi presto ten dotaz chtel mit v te databazi,
> zkus pouzit TStoredProc (ja takto napriklad vkladam
> nove zaznamy a pod, ale nikdy jsem je nepouzival
> pro zobrazovani dat)
> Nastav u ni jmeno toho dotazu MDB (StoredProcName),
> nastav parametry (Params), pripoj na DataSource
> a pouzij bud ExecProc nebo dej Active:=true
>
> Dobra.
>
> > ----------
> > Od: Fi�er Ji��[SMTP:fiser(zv)volny(tec)cz]
> > Je to presne tak. Nevis jak to udelat ???
> >
> > ----- Original Message -----
> > > nevim jestli tomu rozumim spravne; mas v databazi accessu
> > > vytvoren nejaky dotaz, ktery vypada napriklad nejak takto:
> > >
> > > SELECT ID, Jmeno, Prijmeni FROM T_Prac WHERE ID=[ID:]
> > >
> > > a ty chces vysledky takoveho dotazu zobrazit v Delphi,
> > > je to tak ?
> > >
> > > Dobra.
> > > > ----------
> > > > Od: Fi�er Ji��[SMTP:fiser(zv)volny(tec)cz]
> > > >
> > > > Mam problem, ktery se mi nedari vyresit. Pristupuji k MSAccess
> > pres
> > > > ODBC.
> > > > Protrebuji pouzit TQuery na vytvoreny dotaz v MSAccessu.
> > > > V dotazu v MSAccessu je ovsem potreba zadat PARAMETR.
> > > > I kdyz ho do TQuery rucne zadam, stale mi to hazi chybu,
> > > > ze v dotazu chyby jeden PARAMETR. Poradi mi nekdo,
> > > > jak tento parametr poslu z TQuery do MSAccesu ???
> > > >
> >
> >
>
D5 - ano ci ne ?
[*] Kriz Pavel, TDS <kriz.tds(zv)ms.easynet(tec)cz> - 3.12.1999 14:24:09
Ackoliv v tomto pripade nejsem "potrefena husa", rad pridal svoji konkretni
zkusenost:
Nemyslim si, ze by Gridy z VCL byly spatne. Ale co je hodne spatne, je
obliba Borlandu v "private" promennych a metodach.
Ja jsem si take odvozoval svuj TGrid = class (TStringGrid) (celkova velikost
unity: 67 kB), protoze v programu potrebujeme delat tabulky, kde se ramecky
kresli jen nekde a nekdy treba teckovanou carou. Take jsem si treba pridaval
indikator, ktery je v TDbGridu, ale ja jsem ho chtel mit volitelne i v
Ne-DbGridu...
Co vsak nepochopim, proc Borlandi zarputile schovavaji takove zakladni
metody, jako CalcDrawInfo, CalcFixedInfo atd. To same plati pro procedury
ModifyExtents, UpdateExtents apod.
Nakonec to totiz dopadlo tak, ze jsem si musel prekopirovat desitky radku
kodu, kde se nic nezmenilo. Jenom jsem to potreboval volat.
Takze muj zaver: "Grids.pas" ano, ale s viditelnosti "protected" (misto
"private").
Pavel Kriz, TDS
----- Original Message -----
From: Robert Kindl <rob(zv)exec(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, December 03, 1999 10:36 AM
Subject: Re: D5 - ano ci ne ?> > > Mno, muzu zde odprisahnout, ze DBGrid (a CustomGrid taktez) je
> > > pekny zmetek, tedy v tom smyslu ze je silne prasacky napsany.
> > > Zrovna se pokousim toto prevest na OLE DB Grid a narazim na
> > > takove problemy, ze asi budu muset sahnout primo do CustomGrid
> > > a opravit tam radu veci, aby vse fungovalo jak je treba. :-((
> > > Zbysek Hlinka
>
> Kydat hnuj umim taky.
> Nemohl by jsi se vyjadrit konkretneji?
> DBGrid pozivame a mame i VELMI rozsahleho dedice CustomGrid,
> rad bych vedel v cem je tak HROZNY problem.
> Zatim jsem nenarazil na nic co by neslo resit nebo by nejak zpomalovalo
> ci jinak znehodnocovalo pouzitelnost zminenych komponent.
> Proste zdroje v grids.pas nebo dbgrids.pas jsem nemenil.
> Vim o cem mluvim, zdroje meho RDBGridu maji 105kB
> a RTreeGridu 160kB + dalsi podpora v okolnich komponentach.
> Samozdrejme ted muzes rici "Tak vidis kolik jsi toho
> musel doprogramovat". Pravda, ale ja necekal, ze
> by TCustomGrid byl nejaky obvzlast super.
> On je totiz jen spolecny predek vsech Gridu a jako takovy
> by mel umet jen to zakladni - delat grid.
> A to umi zcela dostatecne.
> A totez se da rici o DBGridu. Jako spolecny predek je OK.
>
> > Ano, VCL je napisane tak, ze akakolvek uprava bez zasahu
> > do zdrojovych kodov sa podari len za velmi priaznivej konstelacie
> > hviezd. Ale vecsinou ani vtedy nie. Jedinou zachranou je zdrojovy
> > kod. Mam pocit, ze k uplnej dokonalosti tu uz chyba len zdrojovy
> > kod Delphi, Windows a schema Pentia. Alebo mozno zmena
> > myslenia a pisanie takehoto softwaru rozumnejsim sposobom.
> > Erik Salaj
>
> Zase ten plac nad tim dodavanim zdroju...
> Opravdu bych te chtel videt jak bez zdroju udelas noveho
> rozsahleho dedice se spoustou novych nebo lepsich
> vlastnosti (napr. Zbyskuv OLE DB Grid).
> Proste pokud tvoje vychozi komponenta napr. nema podporu
> zobrazovani stromove struktury tak jak ji tam doplnis.
> Nebo o to pozadas autory puvodni komponenty?
> To by jsi asi mnoho komponent nenaprogramoval!
> A budou to tam chtit dodelat, kdyz tak specialni pozadavek
> mas jen ty?
> A aby jsi se doplatil...
>
> Nechces zkusit SAP/R3 tam se pry uz neprogramuje,
> ale jen customizuje :-)))
>
> Pravdou je, ze ve VCL neni vse uplne idealni,
> ale na druhou stranu pokud ne DBGrid popr. CustomGrid z VCL tak
> zbyva jen:
> 1) naprogramovat si vlastni grid
> 2) pouzit cizi komponentu
> 3) pouzivat nejakou ActiveX potvoru
>
> a ted:
> ad 1) to zvladne tak 1% ucastniku teto konference a z toho jen 1% ma na to
> cas
> suma sumarum se do toho pustil akorat Zbysek :-))
> Myslim, ze pri hlasovani jestli Gridy z VCL nebo nic by 99.9% lidi zvedlo
> ruku pro VCL a pak nadavalo, upravovalo, patchovalo...
> ad 2a) komercni reseni stoji to penize a zaruka, ze vysledek bude lepsi je
> NULOVA
> a zdroje budu chtit v kazdem pripade.
> ad 2b) freeware reseni je mozne jen se zdroji, abych zarucil kontinuitu a
> tudiz
> je to stejne ne-li horsi nez puvodni VCL reseni+upravy.
> ad 3) Neni to nativni reseni.
> Navic totez co ad 2) ale zde pravdepodobne nejsou zdroje.
> To jiste Erika uspokoji :-), ale pokud je problem musim zhavit
> nejakou podporu coz se muze tahnout prinejmensim
> dny, ale spise tydne a cekani na opravu i mesice.
> Pokud mam zdroje mohu udelat patch hned a
> po oficialni oprave ho zase zrusim nebo necham.
>
> Rob
>
>
>
Spolecny posun nekolika okny najednou
[*] Vladimir Sladky <sladky_vladimir(zv)hotmail(tec)com> - 03.12.1999 13:25:01 cet
Dik - ale tady:
>procedure TDataModule1.RegisterMovingForm(AForm: TCustomForm);
>begin
> MovingForms.Add(Pointer(AForm));
>end;
mi to porad hazi EAccessViolation.
Zkousel jsem to pri volani take pretypovat na pointer, i tam
dosazovat (zv)FormX (pokud to neni blbe), ale porad stejne.
Co je spatne ?
Nemaji mit ty Formy neco zvlastniho nastaveneho ?
______________________________________________________
Get Your Private, Free Email at http://www.hotmail.com
Vymulovat AutoIncrement
[*] Pavel Junek <junek(zv)hrk.pvtnet(tec)cz> - 3.12.1999 14:28:33
A co restructure tabulky ?
Pavel
Zdravim,
v DB jsem vymazal velou tabulku pomoci Delete. Ale tim bych potreboval i
vynulovat AutoIncrement.
Umi to nekdo?
Pavel
Pavel ZIDEK
Konverze WAV na MP3
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 3.12.1999 14:36:38
>
> http://www.swiftsoft.de/free.html
>
> MP3 Blade Encoder Component 1.0 (Free)
> Component to use the freeware Blade MP3 encoder with the MMTools. VCL Source
> included.
>
> M.
>
>
Vim, videl jsem. Ale tohle neni to, co by se mi libilo z nasledujicich
duvodu:
Blade Encoder je jiz hotovy freeware encoder ve forme DLL nebo
EXE. Swiftsoft vystavel kompontu, ktera je o tuto DLL oprena.
Az posud bych byl plne spokojen. Ale: Tato komponenta
predpoklada, ze uzivatel ma jiz zakoupene prislusne baliky z
knihovny MMTools od teze firmy a vyuziva nektere unity z teto
knihovny. Koupe prislusnych baliku z MMTools ale je pro me prilis
draha.
Cili to, co je od SwiftSoftu jako freeware, je bez zakoupeni
dalsiho software nanic.
Presto dekuju.
David Lebeda
Trendy v DB & InterBase
[*] Ondrej Jaura <jaura(zv)datalock.sk> - 3.12.1999 14:44:52
Zdravim :) Zaujimali by ma trendy v oblasti tvorby databazovych programov - co dnes
"leti", co sa povazuje za osvedceny a vyvazeny prostriedok, atd. atd.
Moj zaujem smeruje najma k InterBase - vas nazor a najma skusenosti,
pripadne testy (nejake uz mam, ale o InterBase tam toho moc nieto), a pod.
A posledna (dnesna :) otazka: co doporucujete ako jednotny prostriedok
pre databazy: lokalne, server ako jeden uzivatel, server pre max. 5
uzivatelov.
Vopred dakujem za odpovede
Ondrej
------
Ondrej Jaura
Datalock a.s.
jaura(zv)datalock.sk
------ :)Trendy v DB & InterBase
[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 3.12.1999 15:05:41
Haj hou!
> Zaujimali by ma trendy v oblasti tvorby databazovych programov - co
dnes
> "leti", co sa povazuje za osvedceny a vyvazeny prostriedok, atd. atd.
a) Vicevrstve aplikace
b) Objektovy pristup k datum (mapovani objektu do databaze a jine techniky)
> Moj zaujem smeruje najma k InterBase - vas nazor a najma skusenosti,
> pripadne testy (nejake uz mam, ale o InterBase tam toho moc nieto), a pod.
Takovy dotaz je lepsi polozit v konferenci zamerene na IB jako je napr:
interbase(zv)mers.com (www.mers.com)
V kostce: IB zvladne ledacos, s ohledem na cenu je to dobra investice. Pokud
jsou s IB vykonostni problemy, pak je to na Windows a verze pro Linux/Unix
to vyresi :o) Jedna verze IB je na vsech platformach 100% shodna.
> A posledna (dnesna :) otazka: co doporucujete ako jednotny prostriedok
> pre databazy: lokalne, server ako jeden uzivatel, server pre max. 5
> uzivatelov.
SQLServer 7 nebo InterBase. Preferuji IB.
Pavel Cisar <pcisar(zv)atlas(tec)cz>
Delphree.org CEO
http://delphree.clexpert.com
Nexus project coordinator
http://delphree.clexpert.com/pages/projects/nexus/default.htm
Sinea a docasne subory
[*] Jozef Strnadik <strnadik(zv)mbox.mrp(tec)cz> - 03.12.1999 15:06:32
Zdravim,
pouzivam D5 a generator tlacovych zostav Sinea. Pri pouziti metody
PreviewWhere mi Sinea vytvori subor
C:\TISK.WMF.
Ako zabezpecit, aby sa tento pracovny subor nevytvaral v C:\ ale v
C:\WINDOWS\TEMP ?
--
S pozdravom
Jozef Strnadik
E-mail: strnadik(zv)mbox.mrp(tec)cz
Vymulovat AutoIncrement
[*] eL.. <eL_z_Prahy(zv)seznam(tec)cz> - 3.12.1999 15:34:21
---- Original Message -----
From: Pavel ZIDEK <kopr(zv)kopr(tec)cz>
To: Konference DELPHI forum <delphi-l(zv)fwd(tec)cz>
Sent: Friday, December 03, 1999 11:20 AM
Subject: Vymulovat AutoIncrement
Zdravim,
v DB jsem vymazal velou tabulku pomoci Delete. Ale tim bych potreboval i
vynulovat AutoIncrement.
Umi to nekdo?
Ja bych ten autoincrement zrestrukturoval na LongInt a pak zase zpet.
eL..LIMIT v local SQL
[*] eL.. <eL_z_Prahy(zv)seznam(tec)cz> - 3.12.1999 15:46:17
Zdravim.
Nepodarilo se mi zjistit jak omezit pocet vracenych radku pri SQL dotazu pro
Paradoxi tabulky.
Napr. v mySQL napisu
SELECT * FROM TABULKA WHERE PODMINKA LIMIT 50
a vrati se mi jen prvnich 50 zaznamu odpovidajici vysledku.
Pripadne pak pisu
SELECT * FROM TABULKA WHERE PODMINKA LIMIT 51,50
a dostanu zase zaznamy od 51 dale.
Jak se to da aplikovat na Paradox tabulkach pomoci local SQL v BDE ?
Prikaz LIMIT ani zadny podobny se mi nepodarilo v helpu najit ale myslim, ze
by to mohlo jit nejak obejit.
Nevite nekdo jak na to ?
Dik eL..Ukonceni externi aplikace
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 3.12.1999 15:59:31
Prosim o nakopnuti v teto veci:
Ze sveho programu potrebuji spustit externi aplikaci a po skonceni
sveho programu ji zase ukoncit. Muj stavajici postup je asi takovyto:
var h: THandle
procedure TMainForm.FormCreate(...)
begin
h := ShellApi(...)
end;
procedure TMainForm.FormDestroy(...)
begin
PostMessage(h, WM_QUIT, 0, 0);
end;
Aplikace se spusti, i kdyz navzdory uvedeni parametru SW_HIDE
nebo SW_MINIMIZED neni minimalizovana, hlavne ale neskonci.
Proste jako kdyby to WM_QUIT vubec nedostala. Jde o hotovou
aplikaci, o jejimz vnitrku nic nevim. Delam neco spatne?FormDestroy se nevola pri retrartu Win?
[*] Karel Kral <kral(zv)purus(tec)cz> - 03.12.1999 16:18:18
Nevite nekdo, jak se to s volanim udalosti FormDestroy hlavniho
formulare pri prikazu Win Vypnout|Restartovat? Podle vsecho, co jsem
dosud ladil (ono se to ladi sakra spatne), tak to vypada, ze se nevola.
Ale proc?
Env: Win95, D4SP3
--
______________________________________________________
Karel Kral, informatik
Purus, s.r.o., Cezavy 627, 664 56 Blucina
Tel: 05/47235000, 0602/552432, Fax: 05/47231203
E-Mail: mailto:kral(zv)purus(tec)cz, WWW: http://www.purus(tec)cz
______________________________________________________
nulovani autoinc
[*] tomas.mazurek(zv)vitkovice(tec)cz - 3.12.1999 15:22:48
Hello,
pokud je to paradoxi tabulka, pak staci po vymazu dat zmenit typ na
longInt, provest restr. a pote opet dat typ Autoinc.
Pro zvidavejsi a znale paradoxi hlavicky staci samozrejme
hexadecimalne prepsat ono cislo, na kt. se autoinc. zastavil.
TM
TStoredProc a MS SQL 7
[*] Vlastimil Bardon <ineq-soft(zv)ova.eridan(tec)cz> - 3.12.1999 16:28:32
Ja to resim takto:
type
TZpusobStorProc = (zpNative65, zpNative70, zpODBC ) ;
... a nekde v kodu ...
timhle prochroustam kazdy fromular a on mi upravi ulozene procedury tak, aby behaly na prislusne platforme
{*****************************************************************************}
procedure TdmHlavni.UpravJmenaUlozenychProcedur( AForm: TComponent;
AZpusob: TZpusobStorProc ) ;
var
i: integer ;
LParams: TParams ;
begin
LParams := TParams.Create ;
try
For i:= 0 to AForm.ComponentCount-1 do
begin
if AForm.Components[i] is TStoredProc then
begin
case AZpusob of
zpODBC:
if copy( (AForm.Components[i] as TStoredProc).StoredProcName,
1, 4) = 'dbo.' then
begin // obsahuje dbo
// pokud obsahuje dbo a chci ODBC, pak se dbo vymaze
LParams.Assign((AForm.Components[i] as TStoredProc).Params);
(AForm.Components[i] as TStoredProc).StoredProcName :=
copy( (AForm.Components[i] as TStoredProc).StoredProcName,
5, length((AForm.Components[i] as TStoredProc).StoredProcName));
(AForm.Components[i] as TStoredProc).Params.Assign(
LParams ) ;
end ;// obsahuje dbo
zpNative65:
if copy( (AForm.Components[i] as TStoredProc).StoredProcName,
1, 4) <> 'dbo.' then
begin // neobsahuje dbo
// pokud neobsahuje dbo a nechci ODBC, pak p�id�m dbo
LParams.Assign((AForm.Components[i] as TStoredProc).Params);
(AForm.Components[i] as TStoredProc).StoredProcName := 'dbo.'+
(AForm.Components[i] as TStoredProc).StoredProcName ;
(AForm.Components[i] as TStoredProc).Params.Assign(
LParams ) ;
end ;
zpNative70:
if Pos(';',(AForm.Components[i] as TStoredProc).StoredProcName)
> 0 then
begin
LParams.Assign((AForm.Components[i] as TStoredProc).Params);
(AForm.Components[i] as TStoredProc).StoredProcName :=
copy( (AForm.Components[i] as TStoredProc).StoredProcName,
1,
Pos(';',(AForm.Components[i] as TStoredProc).StoredProcName)-1);
(AForm.Components[i] as TStoredProc).Params.Assign(
LParams ) ;
end ;
end ; // case
end ; // if TStoredProc
end ;
finally
LParams.Free ;
end ; // try
end ;
-----P�vodn� zpr�va-----
Od: Ji�� Kr�l [SMTP:admin(zv)printo.com]
Odesl�no: 2. prosince 1999 19:30
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: RE: TStoredProc a MS SQL 7
> normalne nadefinuju session, database, procname (krasne ji lze najit v
> Ob.Insp.), nadefinuju parametry
> a po zActivneni najednou milostpan breci, ze pry:
> General SQL error, cannot find procedure 'mojekrasnaprocedurka'
omlouvam se , upresneni:
D5E, BDE 5.10, MS SQL 7, cili vsechno cerstve
ta zatr. procedura tam, je pouzivam STEJNOU TDatabase a TSession jako pro
cely zbytek aplikace, kde to funguje. Pomoci ADO to taky funguje. Procedura
je vyzkousena. a kdyz mi ji zobrazi Obj. Insp. tak tam asi je.
jinymi slovy, pres Borlandi storedproc mi nejde zadna SP spustit, ale proc,
to je oc tu bezi...
JK
MS SQL server a TQuery
[*] Slab� Petr (Pilsen) <slaby(zv)kadel(tec)cz> - 3.12.1999 16:49:14
Slab�, Petr (Pilsen), 03.12.1999 15:18:56
Jan Fiala wrote:
> Pokud pouzivas pristup pres BDE, pouziva Delphi
> pro docasne tabulky
> prave format Paradox a s tim souvisi veskere
> problemy s .LCK
> soubory atd.
Je otazkou, proc se vytvareji docasne tabulky. Zrejme se ti vloudila nejaka query, ktera nebezi na SQL serveru, ale lokalne. Pro paradox se mi kazdopadne nejlepe osvedcilo programove nastaveni adresaru pomoci vlastnosti komponenty Session:
Session.NetFileDir
je adresar, kde vznikaji soubory *.lck, musi byt pro vsechny fyzicky stejny a mit i stejne jmeno. Default je nastaveni z konfigurace BDE, ale je lepsi se o to nejakym zpusobem postarat sam, protoze nastaveni BDE dokaze znicit kdejaka demoverze sharewaroveho programu.
Session.PrivateDir
je adresar, ve kterem vznikaji docasne soubory. Default je startovaci adresar programu. Kdyz ho sam nenastavis a startovaci adresar programu je read-only, tak mas problem. Osobne nastavuju do temp adresare windows.
Obe je nutno nastavit pred otevrenim prvni tabulky/query, pozdeji uz je pozde.
Best regards,
PS.
D5 - ano ci ne ?
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 3.12.1999 18:12:19
Erik Salaj wrote:
> Ano, VCL je napisane tak, ze akakolvek uprava bez zasahu
> do zdrojovych kodov sa podari len za velmi priaznivej konstelacie
> hviezd. Ale vecsinou ani vtedy nie. Jedinou zachranou je zdrojovy kod.
> Mam pocit, ze k uplnej dokonalosti tu uz chyba len zdrojovy kod
> Delphi, Windows a schema Pentia. Alebo mozno zmena myslenia a pisanie
> takehoto softwaru rozumnejsim sposobom.
Asi mam nejakou smulu, hvezdy mi nepreji. Kazdopadne by urcite
stalo za pokus vyvolat celosvetove natlak na Borlandy, aby
zverejnili veskery potrebny kod k tvorbe komponent. Protoze kdyz
chce jit clovek trochu hloubeji, neustale narazi na prekazky
absence dulezitych knihoven. Za ty penize, ktere za Delphi chteji,
bych to povazoval za povinnost.
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
EOleSysError
[*] Roman Svoboda <roman.svoboda(zv)pha.inecnet(tec)cz> - 3.12.1999 18:44:02
Mam tento problem, po instalaci aplikace na PC (W95) aplikace hlasi:
EOleSysError at ... in module ...
Trida neni zaregistrovana.
(Duvodem by mohla byt v komponenta "HTML" z palety "Internet", protoze bez ni to funguje.)
Na instalaci pouzivam InstallShield 2.02 for D4
Byl bych rad, aby ona registrace probehla pri instalaci automaticky, je-li to mo�n�.
Za kazdou odpoved predem dekuji.
Roman Svoboda D4 Pro, W98
roman.svoboda(zv)pha.inecnet(tec)cz
Zotavovani se z ESocketError 10055 (WSAENOBUFS)
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 3.12.1999 18:45:30
>jiz pomerne dlouho se snazim vyporadat s chybou 10055 u Windows socketu, ale zatim marne, takze se obracim na forum s prosbou o pomoc.
>
>
>Problem:
>
>Aplikace 7x24 posila v hodne slozitem intranetu protokolem TCP/IP na konkretni adresu:port zpravy v rezimu connect-send-disconnect. Vse osetreno pomoci exceptions s logovanim a merenim casu jednotlivych operaci.
>
>S cetnosti nekolika dni se objevuje chyba 10055 pri pokusu o connect. Vyprsi time-out, zadost se zopakuje, data prenesou a vse se zda O.K. Ovsem kdyz se chyba opakuje resp. potize s prenosovou trasou pretrvaji, dostane se system do stavu, kdy kazdy pokus o connect skonci s chybou 10055. Pomuze jedine exit, protoze to se uvolni vsechny prostredky, ktere ty neuspesne connecty zrejme konzumuji.
>
>
>Podminky:
>
>Aplikace D3Prof+U? bezela v LANu na W95 zcela bez problemu asi rok. Pak se cilovy pocitac presunul mimo budovu a zacali se objevovat potize s cetnosti tak 1 za 14 dni. Kdyz se rozrostl intranet, tak cetnost stoupla do radu dni.
>
>Puvodne jsem pro obsluhu TCP/IP pouzival vlastni komponenty nad winsockem v asynchronnim rezimu, aplikace pouzivala kooperativni multithreading.
>
>S prechodem na D4 jsme ji prepsali do preemptivniho multithreadingu a pro klienta pouzili tClientSocket v samostatnem threadu v synchronnim rezimu a provozujeme to pod W98.
>
>Nema s tim nekdo nejake zkusenosti ci napady, jak tuhle chybu zotavovat? (Jine chyby se zotavuji bez problemu).
>
Problemy pri pouzivani metod connect(), listen(), socket()?
Tohle jsem nasel ted na WWW
http://www.jsiinc.com/TIP0900/rh0914.htm se sice odvolava jen na Windows NT, ale podava reseni i vysvetleni. Popis je evidentne z MS knowledge base http://support.microsoft.com/support/kb/articles/Q196/2/71.ASP
A konecne na http://support.microsoft.com/support/kb/articles/Q170/7/91.ASP se tyka i Win95.
S chybou 10055 se potukam take jiz delsi dobu (neuspesne). Vyse uvedene linky jsou pro me v teto chvili take novinkou (v dobe kdy jsem se znazil intenzivne hledat na WWW vystevleni nejak prohledavace nic nenabidly)
Pokud cokoliv z tohoto pomuze dejte mi prosim vedet (rad bych zkousel, ale nemam po ruce PC na kterem se pravidelne objevuje 10055).
Zdravi
D. Toman
dtoman(zv)fortech(tec)cz
problem z nazvom zlozky "CDROM"
[*] Roman Fiser <rfiser(zv)leknet(tec)cz> - 3.12.1999 19:29:19
Ahoj,
Thursday, December 02, 1999, 9:34:33 PM, Igor Klepoch napsal(a):
> stretol som s takym malym problemom : preinstaloval som si Windows 98
> (samozrejme na Win 98). Po preinstalovani zacal byt problem zo vsetkymi
> nazvami CDROM, konkretne na instalackach Delphi je myslim CDROM.GIF
> a s adresarom, ktory sa volal CDROM. Bol odmietnuty pristup k nim.
> Ak som dal disk pod Win95 SR2, szlozka sa dala premenovat a pouzivat normalne.
Smazal si predtim adresar s puvodnima Windows ? .. Pokud to totiz
neudelas dirve se zacnou vyskytovat ruznorode problemy.
V tomto pripade doporucuji reinstalaci Windows. Osobne povazuji za
stabilnejsi Win95 SR2.
S pozdravem,
Roman Fiser,
NG Soft
lokalizace anglickych Win98
[*] Radoslav =?iso-8859-1?Q?Krehl=EDk?= <heretic(zv)softok(tec)cz> - 03.12.1999 11:36:42 -0800
Hi all,
mate nekdo zkusenost s pocestenim anglickych Win98 (konkretne Win98 SE
build 4.1.2222), pouzil jsem fonty z Ceskych Win98, vsechny je tvrde
nainstaloval, pak jsem v registrech zmenil
[HKEY_LOCAL_MACHINE\Config\0001\Display\Settings]
"fonts.fon"="85S1250.FON"
"fixedfon.fon"="85F1250.FON"
"oemfonts.fon"="85F1250.FON"
, kodovou stranku 1250 vsude v registrech mam taky.
Problem je, ze Windowsy stejne porad zobrazuji misto nekterych ceskych
znaku podrzitka (V delphi, FARu apod), navic samozrejme pokud se uklada
pak na disk soubor s diakritikou v nazvu (treba z posty), je to prusvih,
protoze se ulozi spatne a je pro Windows necitelny. Nemate nekdo nejakou
zkusenost co s tema english wokanama delat, mam dojem ze to trapi vic lidi
nez jenom mne. Diky
Heretic-X, SOFTWARE specialist,<www.nt(tec)cz>ListView - odlisne radky
[*] Petr Reichl <reichl(zv)atlas(tec)cz> - 3.12.1999 20:55:46
Zdravim vsechny,
muzete mi prosim poradit jak v ListView odlisit urcite radky napr. tucne? Viz. Outlook Express (neprectene zpravy).
Dekuji.
Preji prijemny den.
--
Petr Reichl
reichl(zv)centrum(tec)cz
Poslat soubor pres protokol HTTP
[*] Petr Reichl <reichl(zv)atlas(tec)cz> - 3.12.1999 20:57:17
Zdravim vsechny,
potrebuji poslat soubor na server pres protokol HTTP. Download jde, ale upload nikoli. Pouzivam komponenty od F.Piette.
Preji prijemny den.
--
Petr Reichl
reichl(zv)centrum(tec)cz
Zotavovani se z ESocketError 10055 (WSAENOBUFS)
[*] Petr Fejfar <callnet(zv)telecom(tec)cz> - 3.12.1999 22:32:48
dtoman(zv)fortech(tec)cz wrote:> http://www.jsiinc.com/TIP0900/rh0914.htm se sice odvolava
> jen na Windows NT, ale podava reseni i vysvetleni.
> Popis je evidentne z MS knowledge base >http://support.microsoft.com/support/kb/articles/Q196/2/71.ASP
>A konecne na http://support.microsoft.com/support/kb/articles/Q170/7/91.ASP
Diky,
to bude skutecne ono, alespon to co tam pisou se presne kryje s mymi poznatky o problemu. Opravdu pouzivam port nad 5000 a cekat na resend 4 minuty, to by me ani ve snu nenapadlo...
> Pokud cokoliv z tohoto pomuze dejte mi prosim vedet
>(rad bych zkousel, ale nemam po ruce PC na kterem se
> pravidelne objevuje 10055).
V nedeli vyzkousim, co se z toho da pouzit pod W98 a za par dni by mel byt videt vysledek.
Thanx, Petr.Fejfar(zv)callnet(tec)cz
Poslat soubor pres protokol HTTP
[*] V�clav Muchna <apscomp(zv)seznam(tec)cz> - 03.12.1999 22:37:03
Zdar
> Petr Reichl wrote:
> potrebuji poslat soubor na server pres protokol HTTP. Download jde, ale upload nikoli. Pouzivam
> komponenty od F.Piette.
Ja to resim tak, ze mam na serveru nejaky skript (typicky v Perlu nebo PHP, ale muze byt i Delphi,
ASP apod.), ktery kdyz dostane postem urcite parametry, tak z nich vytvori soubor.
Dejme tomu myscript.dll dostane postem (pozor, nelze getem - doslo by k oriznuti) neco jako:
auth=d18et8etr&filename=testovaci+soubor.dat&data=bagr........
kde to auth je proste nejaky retezec, kterym testuju opravnenost, aby kazde zavolani skriptu
nevytvorilo nejaky soubor - velice dobre zneuzitelne hackery. Aby to melo smysl, chce to samozrejme
hnat SSL kanalem. K tomu pouzivam komponentu advhttp, ktera zapouzruje fce InetAPI. Problem tady mam
s tim, ze odmita ignorovat neplatne certifikaty, ale to je jina.
No a ten skript pak proste sproste vytvori dany soubor, uploaduje data do databaze, cokoliv.
Velice dulezite je, aby data byla prepsana do bezpecne podoby, to znamena krome pismen a cislic
vse kodovano ve tvaru %xx, kde xx je hexa vyjadreni daneho znaku. To pekne prodlouzi provoz, takze
ja vyuzizam toho, ze data souboru zakodouju algoritmem Base64 (implementaci pro Delphi jsem jeste
nevidel, ale je to nejspis tim, ze jsem ji nehledal). Timto algoritmem se take koduji mailove
zpravy.
Tenhle algoritmus prevadi 8bitovou podobu do 6bitove, a to prave na v reci regularnich vyrazu na
[A-Za-z0-9]*
Jinak HTML ma (tusim od 3.6) k dispozici <INPUT TYPE=FILE>. To umoznuje spolecne se zbytkem
formaldehydare odeslat i obsah souboru. Pomoci atributu accept se urcuje mime typ souboru,
do tagy u formu je treba pridat jeste ENCTYPE="multipart/form-data" (standardni hodnota je
application/x-www-form-urlencoded. Na zpracovani skriptem zalezi na pouzitem programovacim
jazyku.
Zdravi
Vasek Muchna
--
Vaclav Muchna
APS computer
sekce internetova/intranetova podnikova reseni
tel. +420 603 475653
email: apscomp(zv)seznam(tec)cz
muchna(zv)apscomputer(tec)cz
APS computer
Frantiska divise 105
Praha 10 - Uhrineves
tel.: 02/677 10 368
verejny pgp klic: http://www.apscomputer(tec)cz/vasek/pubring.html
Sinea a docasne subory
[*] Vaclav Krmela <krmela(zv)pecomp(tec)cz> - 3.12.1999 22:41:56
Tento soubor neni pracovni. Generator sestav SINEA ho nijak nepouziva.
Tento soubor vznika pouze u nekolika verzi nekdy z poloviny letosniho roku.
Je to pozustatek ladici faze, kdy kazda stranka zobrazena v Preview
automaticky vytvarela tento soubor. Cilem bylo vytvorit verzi schopnou
exportu vysledne sestavy do nejakeho jineho formatu, nez je jenom
tiskova sestava nebo textovy soubor.
Nepozornosti vyvojaru se tvorba tohoto souboru dostala i do distribucni
verze. V nekolika poslednich verzich by se jiz tento soubor nemel tvorit.
Vaclav Krmela
----- Original Message -----
From: Jozef Strnadik <strnadik(zv)mbox.mrp(tec)cz>
To: Delphi konferencia <delphi-l(zv)fwd(tec)cz>
Sent: Friday, December 03, 1999 3:06 PM
Subject: Sinea a docasne subory
> Zdravim,
>
>
> pouzivam D5 a generator tlacovych zostav Sinea. Pri pouziti metody
> PreviewWhere mi Sinea vytvori subor
> C:\TISK.WMF.
>
> Ako zabezpecit, aby sa tento pracovny subor nevytvaral v C:\ ale v
> C:\WINDOWS\TEMP ?
>
> --
> S pozdravom
>
> Jozef Strnadik
> E-mail: strnadik(zv)mbox.mrp(tec)cz
> Sinea a docasne subory
[*] Pavel Bansky <pbansky(zv)volny(tec)cz> - 3.12.1999 23:48:45
Ahoj,
Ve VCL tezko muze bezet kazde okno v jinem threadu, muzes
mit vsak thread
ktery bude pres Synchronize volat nejake metody toho
formulare. Ohledne
cteni a zapisu promennych mezi thready, asi by to chtelo
ukazku kodu. Ale
obecne plati, ze musis pouzivat nejake synchonizacni
objekty jadra jako
napriklad kriticke sekce nebo mutexy.
-------------------------
Pavel Bansky
mailto: pbansky(zv)volny(tec)cz
MDI a Thread
[*] Pavel Bansky <pbansky(zv)volny(tec)cz> - 3.12.1999 23:53:27
No ukazka kodu by byla trochu problem (je takovej rozlehlej) ale jde
o to v mdi kliknu na button a ten spusti thread s Winsock konexi. Jenze
ta konexe potrebuje promenne z toho objektu Form1 a to jak pro cteni
tak pro zapis. A na tom to skonci.
Myslite, ze by pomohlo vytvorit to mdi okno ve threadu v kodu bez pouziti
visualni tvorby.
diky Pavel
Ve VCL tezko muze bezet kazde okno v jinem threadu, muzes mit vsak thread
ktery bude pres Synchronize volat nejake metody toho formulare. Ohledne
cteni a zapisu promennych mezi thready, asi by to chtelo ukazku kodu. Ale
obecne plati, ze musis pouzivat nejake synchonizacni objekty jadra jako
napriklad kriticke sekce nebo mutexy.
-------------------------
Pavel Bansky
mailto: pbansky(zv)volny(tec)cz
D5 - ano ci ne ?
[*] Erik Salaj <winsoft(zv)napri.sk> - 4.12.1999 00:30:28
> Zase ten plac nad tim dodavanim zdroju...
Proti dodavaniu zrojakov nemam nic, skor proti
nevyhnutnosti programovania so zdrojakmi.
> Opravdu bych te chtel videt jak bez zdroju udelas noveho
> rozsahleho dedice se spoustou novych nebo lepsich
> vlastnosti (napr. Zbyskuv OLE DB Grid).
Nijak a to je presne to, co sa mi nepaci - nutnost
pouzit zdrojaky. Nechcem tym povedat, ze zdrojaky
su zle, ale ze programovanie bez zdrojakov moze byt
daleko lepsie. V samotnych aplikaciach sa to ani tak
neprejavuje pokial VCL komponenty vyhovuju
tak ako su napisane. Pokial nie, tak bez zdrojakov
VCL (a niekedy aj s nimi) je programator strateny.
> Nebo o to pozadas autory puvodni komponenty?
> To by jsi asi mnoho komponent nenaprogramoval!
Vies mi vysvetlit potom tento "zazrak", ze som
naprogramoval celkom slusny komunikacny ComPort
komponent pomocou WinAPI, bez windowsackych
zdrojakov (a bez schemy UARTu ;-) )? Prezradim este,
ze MS som nepoziadal aby mi pomohli ;-). Myslis,
ze by sa mi to jednoduchsie programovalo, keby som
mal namiesto WinAPI dokumentacie zdrojovy kod
Windowsu, pripadne aj jedno aj druhe?
> Nechces zkusit SAP/R3 tam se pry uz neprogramuje,
> ale jen customizuje :-)))
Neviem, nepoznam. Mozno na tom nieco je ;-).
> Pravdou je, ze ve VCL neni vse uplne idealni,
> ale na druhou stranu pokud ne DBGrid popr. CustomGrid z VCL tak
Vecsinou "ano" koli VCL kompatibilite (inac ako dedenim z TCustomGrid
ju asi nedosiahnem).
> zbyva jen:
> 1) naprogramovat si vlastni grid
Ibaze to musi "zapadnut" do VCL, cize niecomu sa da vyhnut (niekedy)
a niecomu nie.
> 2) pouzit cizi komponentu
V principe rovnake ako bod 1, moze byt vyhodnejsie
(rychlejsie, lacnejsie) alebo aj nie.
> 3) pouzivat nejakou ActiveX potvoru
To je uz odlisny system, postaveny podla mojho nazoru na lepsich
zakladoch oproti VCL, ale snad nie celkom dobre realizovany.
Erik Salaj
D5 - ano ci ne ?
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 4.12.1999 08:41:05
Robert Kindl wrote:
> > > Mno, muzu zde odprisahnout, ze DBGrid (a CustomGrid taktez) je
> > > pekny zmetek, tedy v tom smyslu ze je silne prasacky napsany.
> > > Zrovna se pokousim toto prevest na OLE DB Grid a narazim na takove
> > > problemy, ze asi budu muset sahnout primo do CustomGrid a opravit
> > > tam radu veci, aby vse fungovalo jak je treba. :-(( Zbysek Hlinka
>
> Kydat hnuj umim taky.
> Nemohl by jsi se vyjadrit konkretneji?
Ja nastesti umim i neco jineho, aspon doufam. :-) Tedy konkretne:
v D5, DBGrid, pokud tam pridam sloupce pres vlastnost Columns a
sloupec 0 oznacim Visible=false, tak se objevi spodni soupatko a
na urovni potomka TCustomGrid to nelze opravit, protoze prislusne
metody v TCustomGrid jsou zasite v private a neprekrytelne. A
vzhledem k tomu, ze mam z�va�n� duvod nekdy zneviditelnit prvni
sloupec, stve me to.
> DBGrid pozivame a mame i VELMI rozsahleho dedice CustomGrid,
> rad bych vedel v cem je tak HROZNY problem.
> Zatim jsem nenarazil na nic co by neslo resit nebo by nejak
> zpomalovalo ci jinak znehodnocovalo pouzitelnost zminenych komponent.
> Proste zdroje v grids.pas nebo dbgrids.pas jsem nemenil. Vim o cem
> mluvim,
:-)) Hm, to ja take.
> zdroje meho RDBGridu maji 105kB a RTreeGridu 160kB + dalsi
:-)) Kila u me nemaji zadnou vetsi vahu. Ja posuzuji prednostne jine
vlastnosti.
> podpora v okolnich komponentach. Samozdrejme ted muzes rici "Tak vidis
> kolik jsi toho musel doprogramovat". Pravda, ale ja necekal, ze by
> TCustomGrid byl nejaky obvzlast super. On je totiz jen spolecny predek
> vsech Gridu a jako takovy by mel umet jen to zakladni - delat grid. A
> to umi zcela dostatecne. A totez se da rici o DBGridu. Jako spolecny
> predek je OK.
Mno, mam na to ponekud jiny nazor. Tvrdim, ze neni OK. Jako
zaklad by mohl byt dobry, kdyby nektere dulezite metody nebyly
zasite v private.
> > Ano, VCL je napisane tak, ze akakolvek uprava bez zasahu
> > do zdrojovych kodov sa podari len za velmi priaznivej konstelacie
> > hviezd. Ale vecsinou ani vtedy nie. Jedinou zachranou je zdrojovy
> > kod. Mam pocit, ze k uplnej dokonalosti tu uz chyba len zdrojovy kod
> > Delphi, Windows a schema Pentia. Alebo mozno zmena myslenia a
> > pisanie takehoto softwaru rozumnejsim sposobom. Erik Salaj
>
> Zase ten plac nad tim dodavanim zdroju...
> Opravdu bych te chtel videt jak bez zdroju udelas noveho
> rozsahleho dedice se spoustou novych nebo lepsich
> vlastnosti (napr. Zbyskuv OLE DB Grid).
No prave. Napriklad mi velice chybeji zdrojaky DesignWindow a
podobne. Bez zdrojaku, ktere mi umozni radne instalovat
komponentu, se opravdu programuje spatne. A chybi i
dokumentace.
> Proste pokud tvoje vychozi komponenta napr. nema podporu
> zobrazovani stromove struktury tak jak ji tam doplnis.
> Nebo o to pozadas autory puvodni komponenty?
Ano, rad bych, aby Borland dodaval _vsechny_ potrebne zdrojaky.
Protoze na zadosti reaguji (Borland) velice vlazne.
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
Program stale na popredi...
[*] Jirka Virt <virt(zv)volny(tec)cz> - 4.12.1999 10:20:24
Ahoj,
presne takovy program jsem delal brachovi - pro Spedia.
Popis: nastavi se cas spusteni (treba 23:00) a cas ukonceni (treba 3:00).
Jakmile nastane 23:00 navazu spojeni na internet a pak spustim program
spedia.exe.Tam vnutim uzivatele a heslo a spustim MSIExplorer(MSIE).Zjistim
souradnice okna MSIE a v nem se nahodne pohybuje mys intervalu 5sec.Protoze
je treba jeste menit stranky, mam seznam stranek, ktere se meni podle
uzivatelem nastaveneho intervalu(cca 2min). Pred prechodem na novou stranku
ovsem musim vyprazdnit cache. Lze nastavovat spusteni podle dnu v tydnu a
spojeni s modemem nebo pres proxy(Winproxy atd.).
Mam to naladeny s Win98 a IE 5.0. Jestli to funguje i jinde (Win95 a IE4.x)
nevim.
Vlastne u toho nemusi nikdo sedet.Maka to samo.A to byl ucel.
No a jestli to jsou nepoctive ziskane penize??
Asi ne, protoze za hodinu pripojeni ke Spedia netu dostanete po
odecteni poplatku tak 15Kc(a to jeste mozna), coz stoji zhruba hodina
spojeni Telecomu.(Kdopak by posila penize za reklamu nekam do stredni
Evropy, kde si stejne z USA nikdo nic nekoupi , ne??)
Nicmene je to zajimava aplikace a myslim si, ze jsem ji slusne zvladnul.
PS: par veci jsem pouzil na program zalohovani.Sam se prihlasi do
Novellu(vlozi uzivatele a heslo) a po ukonceni zalohovani se zase odhlasi.
Jirka Virt
email: virt(zv)volny(tec)cz
----- Original Message -----
From: Zdenek Drvota <drvota(zv)zds(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Thursday, December 02, 1999 5:34 PM
Subject: (Fwd) RE: Program stale na popredi...> ...no, tak nevim...
> Muze mi nekdo rici, proc bych mel zadarmo (a vubec)
> pomahat nekomu nepoctive ziskavat penize?
> Holt my poctivi zustaneme dal chudymi...
> Mozna bych mel toho vykuka nahlasit sponzorovi akce ;-)
>
> ------- Forwarded Message Follows -------
> Od: tmara(zv)itsys(tec)cz
> Komu: drvota(zv)zds(tec)cz
> V�c: RE: Program stale na popredi...
> Datum odesl�n�: Thu, 2 Dec 1999 10:47:07 +0100
> Po�tovn� prog.: Internet Mail Service (5.5.2232.9)
>
> Je to wono, ale ted sem zjistil, ze je este t�eba obcas hejbnout
> krysou a
> kliknout na reklamu. Muzete mi poradit, jak nastavim pozici kurzoru,
> simulovat pohyb mysi a jak udelat klik mysi ? Tnx a lot.
>
> P.S. http://www.spedia.net/cgi-bin/tz.cgi?run=show_svc&fl=8&vid=305355
> <http://www.spedia.net/cgi-bin/tz.cgi?run=show_svc&fl=8&vid=305355>
Run dialog...
[*] p. Jirman <jim.design(zv)iol(tec)cz> - 4.12.1999 11:47:05
Ja misto ShellExecute poustim WinExec
priklad:
WinExec(PChar('cesta k souboru'), 1);> Funkce ShellExecute z knihovny ShellAPI mas stejnou funkci jako Run
dialog.
>
> >
> > vi nekdo, jak programove otevrit dialog "Spustit" (menu Start/Spustit)
> > a predat parametr - nazev souboru/programu, ktery se ma spustit ?
> >
>
>
Demo Interbase
[*] Miloslav L�tal - BV <letal(zv)sol(tec)cz> - 4.12.1999 23:05:36
Zdravim.
Neumim otevrit databazi dema InterBase.
Pod Delphi 4 v adresari DEMOS\DB\CSDEMOS je demo pro InterBase.
Delphi mi pise nezname jmeno nebo heslo.
(SYSDBA / heslo MASTERKEY)
ale neni spravne ??? !!!
Poradte
Diky,
Martin Pavera
letal(zv)integrodat(tec)cz
On-line
[*] Va�ek N�vrat���zx"��뢖�z?� - 5.12.1999 01:23:25
Ahoj !
Mam pro Tebe reseni tohoto problemu. Nasledujici funkce testne, jestli ma v ten okamzik pocitac umoznen pristup na Internet - myslim, ze by to melo fungovat se vsemi druhy netoveho pripojeni, ale na modemu to funguje 100%.
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}
S pozdravem...
Vasek Navrat
programator diskmagu Engine
Demo Interbase
[*] Pavel M. <talema(zv)top(tec)cz> - 5.12.1999 08:32:57
masterkey - mala pismena.
Pavel M.
----- Original Message -----
> (SYSDBA / heslo MASTERKEY)
Demo Interbase
[*] Pavel Bocek <xbocekp(zv)cs.felk.cvut(tec)cz> - 5.12.1999 09:35:04
Zdravim,
zkuste heslo napsat malymi pismeny.
Pavel Bocek
----- Original Message -----
From: Miloslav L�tal - BV <letal(zv)sol(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Saturday, December 04, 1999 11:05 PM
Subject: Demo Interbase
> Zdravim.
> Neumim otevrit databazi dema InterBase.
> Pod Delphi 4 v adresari DEMOS\DB\CSDEMOS je demo pro InterBase.
> Delphi mi pise nezname jmeno nebo heslo.
> (SYSDBA / heslo MASTERKEY)
> ale neni spravne ??? !!!
> Poradte
> Diky,
> Martin Pavera
> letal(zv)integrodat(tec)cz
>
>
>
> Vymulovat AutoIncrement
[*] Pavel ZIDEK <kopr(zv)kopr(tec)cz> - 5.12.1999 16:06:11
> V jake DB ?
Delam v FF (FlashFiler)
No a nejde vymazat celou tabulku jinak nez pomoci Delete? Nechce se mi
zakladat novou (velmi rozsahlou tabulku) rucne v programu.
Uz jsem to vyresil tak, ze tabulku vymazu (programove) a pak provedu
"Restructure" v "FlaschFiler Exploreru".
Pavel
>
> Nebude jednodusi vytvorit novou, stejnou tabulku ?
> (V Accessu to jde napr. komprimaci MDB)
>
> Predpokladam, ze takovato tabulka NEMA ZADNOU detail
> tabulku...
>
> > ----------
> > v DB jsem vymazal celou tabulku pomoci Delete. Ale tim bych potreboval
> > i vynulovat AutoIncrement.
> > ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
> > KOPR software Pavel ZIDEK mailto:kopr(zv)kopr(tec)cz
> > http://www.kopr(tec)cz/w-delphi.htm
> > ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
> >
>Vymulovat AutoIncrement
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 5.12.1999 16:30:40
Puvodni zprava, kterou napsal Pavel ZIDEK dne 5 Dec 99,:
> Delam v FF (FlashFiler)
> No a nejde vymazat celou tabulku jinak nez pomoci Delete? Nechce se mi
> zakladat novou (velmi rozsahlou tabulku) rucne v programu.
> Uz jsem to vyresil tak, ze tabulku vymazu (programove) a pak provedu
> "Restructure" v "FlaschFiler Exploreru".
K FlashFiler Exploreru mas kompletni zdrojovy kod, takze si
muzes sam a velice snadno doplnit do sveho programu jeho
libovolnou funkci. Tak se do FFE podivej, co chces udelat
a prekopiruj si ten kousek kodu.
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917, PGP vitano
umisteni procedury
[*] Petr Ga�ourek <gadourek(zv)centrum(tec)cz> - 5.12.1999 17:47:00
Ahoj,
jaky je rozdil mezi umistenim procedury / funkce (nebo promenne) v sekci private a nebo az v implementation20
Je vhodnejsi vkladat procedury, ktere se primo nevazou k objektu (jako napr. nalezeni maxima z N cisel) do sekce implementation nebo do privat?
Diky za vysvetleni.
Petr Gadourek
EDBEditError - odchyceni
[*] Petr Ga�ourek <gadourek(zv)centrum(tec)cz> - 5.12.1999 20:25:12
Ahoj,
muzete mi poradit jak odchytit EDBEditError. Jde mi konkretne o to, ze mam Edit s maskou pro datum. Pokud zadam datum chybne, pak je po opusteni TMaskEditu zobrazeno chybove hlaseni (to bych chtel prepsat - nejak nevim kam zaradit raise) a zarove� chci polozku vymazat, aby se chybove hlaseni stale neopakovalo a mohl jsem nechat polozku prazdnou.
Pro upresneni pouzivam TKMaskEdit z KOPR komponent, ale to by nemel byt problem.
P�edem, d�ky za radu.
Petr Gadourek
Zjistovani propustnosti seriovych kanalu
[*] Petr Fejfar <callnet(zv)telecom(tec)cz> - 5.12.1999 22:33:27
Hi all,
potreboval bych na platformach W9x/WNT omezit DTE rychlost tak, aby woknum neutikaly znaky pri prijimani z modemu u starsich stroju, ktere maji a) mizerny vykon b) UART s buffer na 1 znak napr. 16450.
Neumel by mi nekdo poradit, kde precist v registry alespon rychlost CPU a typ UARTu popr. velikost jeho Rx bufferu?
Thanx, Petr.Fejfar(zv)callnet(tec)cz
D5 - ano ci ne ?
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 05.12.1999 22:41:55
Erik Salaj wrote:
> Vies mi vysvetlit potom tento "zazrak", ze som
> naprogramoval celkom slusny komunikacny ComPort
> komponent pomocou WinAPI, bez windowsackych
> zdrojakov (a bez schemy UARTu ;-) )? Prezradim este,
> ze MS som nepoziadal aby mi pomohli ;-). Myslis,
> ze by sa mi to jednoduchsie programovalo, keby som
> mal namiesto WinAPI dokumentacie zdrojovy kod
> Windowsu, pripadne aj jedno aj druhe?
Ano, taky jsem se snazil napsat komunikacni knihovnu a slo to i bez zdrojaku
Windows :-) , ale to je prece o necem trochu jinem. I kdyz neni kvalita M$
dokumentace nijak idealni, presto popis API vcelku (v tomto pripade ) staci.
Jenze u VCL jsem zatim nevidel jakoukoliv dokumentaci, takze zdrojaky jsou
vlastne jedine co mas a popis si takto musis zpetne vytvaret. Nekdy mam
pocit, ze snad ani u Borlandu sami zadnou dokumentaci nemaji .... :-))
> > Nechces zkusit SAP/R3 tam se pry uz neprogramuje, ale jen customizuje
> :-)))
Proto uz zacina, mirne receno, upadat ..... :-)
> > zbyva jen:
> > 1) naprogramovat si vlastni grid
> Ibaze to musi "zapadnut" do VCL, cize niecomu sa da vyhnut (niekedy)
> a niecomu nie.
Pokud zacnes na zelene louce (TCustomControl) tak muzes temer cokoliv, ale
zase napsat takhle cely grid neni az takova legrace.
> > 3) pouzivat nejakou ActiveX potvoru
> To je uz odlisny system, postaveny podla mojho nazoru na lepsich
> zakladoch oproti VCL, ale snad nie celkom dobre realizovany.
Takhle diskuze tu uz nedavno byla :-) Problem je ale trosku v rychlosti
a take v tom, ze jsi pak daleko vice omezeny, nez pri pouziti nativnich
Delphi komponent.
--
Petr Vones, amatersky programator
D5 - ano ci ne ?
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 05.12.1999 22:43:43
Zbysek Hlinka wrote:
> Ja nastesti umim i neco jineho, aspon doufam. :-) Tedy konkretne:
> v D5, DBGrid, pokud tam pridam sloupce pres vlastnost Columns a
> sloupec 0 oznacim Visible=false, tak se objevi spodni soupatko a
> na urovni potomka TCustomGrid to nelze opravit, protoze prislusne
> metody v TCustomGrid jsou zasite v private a neprekrytelne. A
> vzhledem k tomu, ze mam z�va�n� duvod nekdy zneviditelnit prvni
> sloupec, stve me to.
Zbezne jsem se na to dival, a je to klasicka chyba. Ono totiz nejen ze se
zbytecne zobrazi scrollbar, ale i spatne vykresluje cara rozdelujici dane
sloupce (mezi indikatorem a prvnim sloupcem).
> :-)) Kila u me nemaji zadnou vetsi vahu. Ja posuzuji prednostne jine
> vlastnosti.
Zkus treba ExpressQuantumGrid (ta firma je ale jinak trochu slabomyslna,
neposkytuje zadnou trial verzi):
http://www.devexpress.com/products/detinfogrid.html
> No prave. Napriklad mi velice chybeji zdrojaky DesignWindow a
> podobne. Bez zdrojaku, ktere mi umozni radne instalovat
> komponentu, se opravdu programuje spatne. A chybi i dokumentace.
No, davaji nam alespon DSGNWNDS.INT :-), navic do budoucna pry chteji jeste
vice omezit "design-zdrojaky" a budou dodavat jen *.INT. Coz by sice jeste
nebylo tak hrozne, kdyby vsak konecne dodali nejakou poradnou dokumentaci.
Treba takove OpenToolsAPI je naprosta katastrofa.
> Ano, rad bych, aby Borland dodaval _vsechny_ potrebne zdrojaky.
> Protoze na zadosti reaguji (Borland) velice vlazne.
Co jsem pochopil, tak trend bude asi jiny, budou dodavat vice *.INT souboru,
a melo byt i vice design unitu dostupnych v *.DCP. Treba takovy Collection
Editor by opravdu bodnul ....
--
Petr Vones, amatersky programator
Spolecny posun nekolika okny najednou
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 05.12.1999 22:45:48
Vladimir Sladky wrote:
>
> Dik - ale tady:
>
> >procedure TDataModule1.RegisterMovingForm(AForm: TCustomForm);
> >begin
> > MovingForms.Add(Pointer(AForm));
> >end;
>
> mi to porad hazi EAccessViolation.
Ahoj,
Patrne nemas datovy modul jako prvni v Project Forms, cely priklad najdes
tady:
ftp://ftp.mlp(tec)cz/pub/misc/Delphi/konference/D5/Other/Example_MoveForms.zip
--
Petr Vones, amatersky programator
problem z nazvom zlozky "CDROM"
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 05.12.1999 22:45:23
Roman Fiser wrote:
> > stretol som s takym malym problemom : preinstaloval som si Windows 98
>
> V tomto pripade doporucuji reinstalaci Windows. Osobne povazuji za
> stabilnejsi Win95 SR2.
Moje rec, v nouzi zkus Win98 SE (je to snad dustupne i jako update), ale i
presto na tom jsou Win95 OSR2 asi lepe. Navic bude hur, Microsoft pry uz
pripravuje dalsi ne-NT Windows pod navem Millenium ... :-(
--
Petr Vones, amatersky programator
EOleSysError
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 05.12.1999 22:45:39
> Roman Svoboda wrote:
> Mam tento problem, po instalaci aplikace na PC (W95) aplikace hlasi:
> EOleSysError at ... in module ...
> Trida neni zaregistrovana.
> (Duvodem by mohla byt v komponenta "HTML" z palety "Internet", protoze bez
> ni to funguje.)
> Na instalaci pouzivam InstallShield 2.02 for D4
> Byl bych rad, aby ona registrace probehla pri instalaci automaticky, je-li
> to mo�n�.
Ahoj,
Ma tu jen IS z D5, ale bude to podobne, u OCX souboru ve vlastnostech musis
zatrhnout "Sel-register file". Pak se jeste podivej, jake vsechny knihovny
ten OCX potrebuje, je to nekde v helpu. Uprime receno, bych to radeji moc
nepouzival a spolehl se spise na nainstalovany IE.
--
Petr Vones, amatersky programator
FormDestroy se nevola pri retrartu Win?
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 05.12.1999 22:46:47
Karel Kral wrote:
>
> Nevite nekdo, jak se to s volanim udalosti FormDestroy hlavniho
> formulare pri prikazu Win Vypnout|Restartovat? Podle vsecho, co jsem
> dosud ladil (ono se to ladi sakra spatne), tak to vypada, ze se nevola.
> Ale proc?
Ahoj,
Nezkousel jsem to, ale muze to byt tim, ze objekt formulare se rusi metodou
TCustomForm.Release, ktera vlozi zpravu pomoci PostMessage a teprve jejim
vyrizenim se vola TCustomForm.Free. Pri ukoncovani Windows patrne dojde k
ukonceni procesu drive, nez se staci tato zprava vyridit. Pokud chces tedy
provadet nejaky kod pri ukonceni aplikace, je lepsi pouzit udalost OnClose.
--
Petr Vones, amatersky programator
Ukonceni externi aplikace
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 05.12.1999 22:46:11
David Lebeda wrote:
>
> Prosim o nakopnuti v teto veci:
>
> Ze sveho programu potrebuji spustit externi aplikaci a po skonceni
> sveho programu ji zase ukoncit. Muj stavajici postup je asi takovyto:
Ahoj,
To je trosku slozitejsi, jedna z moznosti je napriklad takto (bylo by ale
dobre to odzkouset i v NT). Tridu TPvExecThread najdes v PvUtils tady:
http://www.volweb(tec)cz/pvones/download/PvComponents.zip
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
PvUtils, StdCtrls;
type
TForm1 = class(TForm)
StartBtn: TButton;
StopBtn: TButton;
Memo1: TMemo;
procedure StartBtnClick(Sender: TObject);
procedure StopBtnClick(Sender: TObject);
private
CalcApp: TPvExecThread;
procedure CalcAppTerminate(Sender: TObject);
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.StartBtnClick(Sender: TObject);
begin
CalcApp := TPvExecThread.Create('calc.exe', SW_SHOWNORMAL);
CalcApp.OnTerminate := CalcAppTerminate;
StartBtn.Enabled := False;
StopBtn.Enabled := True;
end;
procedure TForm1.CalcAppTerminate(Sender: TObject);
begin
Memo1.Lines.Add(Format('Terminated, exit code = %.8x',
[CalcApp.ExitCode]));
CalcApp := nil;
StartBtn.Enabled := True;
StopBtn.Enabled := False;
end;
procedure TForm1.StopBtnClick(Sender: TObject);
begin
if CalcApp <> nil then CalcApp.CloseApplication;
end;
end.
--
Petr Vones, amatersky programator
MDI a Thread
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 05.12.1999 22:46:27
Pavel Bansky wrote:
>
> No ukazka kodu by byla trochu problem (je takovej rozlehlej) ale jde
> o to v mdi kliknu na button a ten spusti thread s Winsock konexi. Jenze
> ta konexe potrebuje promenne z toho objektu Form1 a to jak pro cteni
> tak pro zapis. A na tom to skonci.
Ahoj,
Pak muzes ty data umistit primo do objektu threadu. Nicmene i v pripade,
ze je jsou soucasti formulare by v tom nemel byt problem. Proto jsem se
ptal na ten priklad. Neni to treba tak, ze ten thread existuje i v dobe
kdy neexistuje objekt toho formulare ?
--
Petr Vones, amatersky programator
ListView - odlisne radky
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 05.12.1999 22:46:54
> Petr Reichl wrote:
> muzete mi prosim poradit jak v ListView odlisit urcite radky napr. tucne?
> Viz. Outlook Express (neprectene zpravy).
Ahoj,
Zalezi na tom, jakou mas verzi Delphi. V D4 a D5 ma TListView udalosti
OnCustomDrawXXX
--
Petr Vones, amatersky programator
zip komponent
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 6.12.1999 06:22:06
Ahoj
na http://www,micrel-dev.com/delphi je k dispozici zipovac� komponent i se
zdroji pro 32 bit a jin�.
Pokud nekdo jeste potrebuje prelozen� napisy pro Delphi 2, pak se muze
ozvat, neco jsem prelozil (SysUtils, Consts), muzu zaslat.
Jaro B.