Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
RichEdit v "rezimu PlainText" a pozice tabulatoru
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 12.12.1997 14:27:58
Ahoj,
mam problem. Pouzivam RichEdit k editaci textu. Potrebuju aby pozice tabulatoru
byla kazdych 8 znaku. Pri zmeme fontu (nektereho z FixedPitch) vsak pozice
zustava na stejnem miste (v pixelech) a to i mimo sirku fontu. Zkousel jsem
pouzit
vlastnost Paragraph.Tab[n], ale nepodarilo se mi zadym zpusobem vypocitat takove
hodnoty z parametru fontu aby to sedelo.
Dekuji
Petr Vones, amatersky programator
Pozicia kurzoru v TMemo resp. v TRichEdit
[*] Jozef Strn�dik <strnadik(zv)mrp.sk> - 12.12.1997 14:36:35
Jiri Malek wrote:
> procedure TForm.PocitejKursor;
> var sr,ss:integer;
> //sr = radek kuzoru, ss = sloupec kurzoru
> begin
> sr:=0; ss:=Memo.SelStart+Memo.SelLength;
> while(ss>(length(Memo.Lines.Strings[sr])+1)) do
> begin
> ss:=ss-(length(Memo.Lines.Strings[sr])+2);
> inc(sr);
> end;
> inc(ss);inc(sr);
> //to aby nebyl prvni znak 0:0, ale 1:1, a pak treba:
> StatusBar.Panels.Items[0].Text:=Format('%d : %d', [sr,ss]);
> end;
Tvoj priklad funguje celkom dobre az na jeden pripad, ked vyselektujem text
smerom k jeho zaciatku. Vtedy by malo platit:
ss:=Memo.SelStart-Memo.SelLength;
ale ako tento stav rozlisit to neviem.
Jozo
Pozicia kurzoru v TMemo resp. v TRichEdit
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 12.12.1997 14:41:18
Jozef Strn�dik wrote:
>
> Ahojte vsetci
>
> Mam nasledovnu otazku: Ako zistim poziciu kurzoru (riadok, stlpec), ked
> pre editovanie textu chcem pouzit komponent TMemo alebo TRichEdit.
>
> Za kazdu radu vopred dakujem
>
> Jozo
V nejakem svem zdrojaku jsem nasel tohle, ta silenost (for ...) uvnitr
koriguje pozici pres tabulatory:
const
EditorTabSize=8;
function TEditorChild.CursorPos:TPoint;
var
Line,I,C,Col:Integer;
LineStr:String;
begin
with RichEdit do
begin
Line:=SendMessage(Handle,EM_LINEFROMCHAR,SelStart+SelLength,0);
C:=SelStart+SelLength-SendMessage(Handle,EM_LINEINDEX,Line,0)+1;
LineStr:=Lines[Line];
Col:=1;
for I:=1 to C-1 do if (I<=Length(LineStr)) and (LineStr[I]=#9) then
Col:=(Col div EditorTabSize)*EditorTabSize+(EditorTabSize+1) else Inc(Col);
Inc(Line);
end;
Result:=Point(Col,Line);
end;
Petr Vones, amatersky programator
TRichText
[*] Radek Docekal <proj(zv)zvt.csas(tec)cz> - 12.12.1997 14:49:26
Nazdar All,
pouzivate nekdo subj. ? Mam tento problem: Chci v subj. zobrazovat RTF
soubor, ale nechci ho mit na disku. Do property Lines jsem ho v designtime
dostal pres clipboard, ale musel jsem byt v Code editoru, ne v dialogovem
okne. Prislo mi to ponekud tezkopadne, tak jsem si vyrobil vlastni resource
(RCDATA), prekompiloval jsem ho do RES a slinkoval s programem. Jak ho vsak
mam dostat do RichEdit.Lines ? Primo pres LoadResource a nacpat to do
property Text se mi sice podarilo, ale pak mi zobrazoval {\rtf ... a ne
formatovany text. Zkousel jsem Lines.LoadFromStream a dat mu MemoryStream,
ale to dopadlo stejne. Ve zdrojacich subj. jsem nasel, ze se provadi jakasi
konverze pouze pri LoadFromFile. Jedine vychodisko se mi jevi vytvoreni nove
zderivovane komponenty, ale to se mi vuuuuuuuuuubec nechce. Ma nekdo lepsi
napad?
Diky.
S pozdravem
Radek Docekal
<proj(zv)zvt.csas(tec)cz>TRichText
[*] Pavel Kral <kral(zv)afx(tec)cz> - 12.12.1997 18:27:49
Radek Docekal wrote:
> Nazdar All,
>
> pouzivate nekdo subj. ? Mam tento problem: Chci v subj. zobrazovat RTF
>
> soubor, ale nechci ho mit na disku. Do property Lines jsem ho v
> designtime
> dostal pres clipboard, ale musel jsem byt v Code editoru, ne v
> dialogovem
> okne. Prislo mi to ponekud tezkopadne, tak jsem si vyrobil vlastni
> resource
> (RCDATA), prekompiloval jsem ho do RES a slinkoval s programem. Jak ho
> vsak
> mam dostat do RichEdit.Lines ? Primo pres LoadResource a nacpat to do
> property Text se mi sice podarilo, ale pak mi zobrazoval {\rtf ... a
> ne
> formatovany text.
ja bych si to takto nacetl do jine komponenty, ulozil za behu programu
dodocasneho souboru a potom teprve s pomoci LoadFromFile nacetl to
RichEditu
> Zkousel jsem Lines.LoadFromStream a dat mu MemoryStream,
> ale to dopadlo stejne. Ve zdrojacich subj. jsem nasel, ze se provadi
> jakasi
> konverze pouze pri LoadFromFile. Jedine vychodisko se mi jevi
> vytvoreni nove
> zderivovane komponenty, ale to se mi vuuuuuuuuuubec nechce. Ma nekdo
> lepsi
> napad?
> Diky.
>
> S pozdravem
> Radek Docekal
> <proj(zv)zvt.csas(tec)cz>
S pozdravem
PAVEL K R � L , JESENIK
E-mail: kral(zv)afx(tec)cz
www: http://www.afx(tec)cz/mr_pisar/mr_pisar.htm
TRichText
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 12.12.1997 22:19:47
Radek Docekal wrote:
>
> Nazdar All,
>
> pouzivate nekdo subj. ? Mam tento problem: Chci v subj. zobrazovat RTF
> soubor, ale nechci ho mit na disku. Do property Lines jsem ho v designtime
> dostal pres clipboard, ale musel jsem byt v Code editoru, ne v dialogovem
> okne. Prislo mi to ponekud tezkopadne, tak jsem si vyrobil vlastni resource
> (RCDATA), prekompiloval jsem ho do RES a slinkoval s programem. Jak ho vsak
> mam dostat do RichEdit.Lines ? Primo pres LoadResource a nacpat to do
> property Text se mi sice podarilo, ale pak mi zobrazoval {\rtf ... a ne
> formatovany text. Zkousel jsem Lines.LoadFromStream a dat mu MemoryStream,
> ale to dopadlo stejne. Ve zdrojacich subj. jsem nasel, ze se provadi jakasi
> konverze pouze pri LoadFromFile. Jedine vychodisko se mi jevi vytvoreni nove
> zderivovane komponenty, ale to se mi vuuuuuuuuuubec nechce. Ma nekdo lepsi
> napad?
> Diky.
>
> S pozdravem
> Radek Docekal
> <proj(zv)zvt.csas(tec)cz>
Zkousel jsem to, a fungovalo to dobre. Ty jsi asi nastavil vlastnost
RichEdit1.PlainText na True.
var
MemStream:TMemoryStream;
begin
MemStream:=TMemoryStream.Create;
try
RichEdit1.PlainText:=False; // !!!
with RichEdit1.Lines do
begin
Clear;
LoadFromFile('X:\Pokus.rtf'); // nahraju ze souboru
SaveToStream(MemStream); // ulozim "do neceho"
Clear; // vymazu obsah editoru
MemStream.Position:=0;
LoadFromStream(MemStream); // a znovu z "neceho" nahraju a je to stejne
end;
finally
MemStream.Free;
end;
end;
Petr Vones, amatersky programator
Pozicia kurzoru v TMemo resp. v TRichEdit
[*] Enter Kosice - Igor Forgac <enter(zv)enterkosice.sk> - 13.12.1997 10:36:48
V Delphi 2 a 3 v adr. Demos projekt RichEdit. Odpoved na Tvoju otazku je:
Hladaj proceduru TMainForm.UpdateCursorPos; --- Igor Forgac --- Enter Kosice s.r.o. --- http://www.enterkosice.sk
---
----------
> Odes�latel: Jozef Strn�dik <strnadik(zv)mrp.sk>
> Komu: Delphi Forum <delphi(zv)io.pinknet(tec)cz>
> P�edm�t: Pozicia kurzoru v TMemo resp. v TRichEdit
> Datum: 12. december 1997 8:59
>
> Ahojte vsetci
>
> Mam nasledovnu otazku: Ako zistim poziciu kurzoru (riadok, stlpec), ked
> pre editovanie textu chcem pouzit komponent TMemo alebo TRichEdit.
>
> Za kazdu radu vopred dakujem
>
> Jozo
Pozicia kurzoru v TMemo resp. v TRichEdit
[*] Jozef Strn�dik <strnadik(zv)mrp.sk> - 13.12.1997 11:04:20
Nazdar Igor,
skusil som to demo. Ani v tomto pripade zobrazovana pozicia nie je spravna,
ak je vyselektovany nejaky text. Na rozdiel od prikladu od Jirku Maleka je v
tomto pripade chybne urcena pozicia kurzoru ked selektujem text smerom ku
koncu textu.
Zdrojak som zatial neskumal, ale myslim, ze mi bude postacovat aj napriek tej
nepresnosti.
Dakujem ti za tip takisto aj J.Malekovi, P.Vonesovi, P.Slovakovi
Jozo
Enter Kosice - Igor Forgac wrote:
> V Delphi 2 a 3 v adr. Demos projekt RichEdit. Odpoved na Tvoju otazku je:
> Hladaj proceduru TMainForm.UpdateCursorPos;Integrace MSIE
[*] Petr Ham�k - 14.12.1997 12:51:34
Jako ActiveX.
Petr Ham�k
ComTech
-----P�vodn� zpr�va-----
Od: Vojtech Semecky <vojtech.semecky(zv)v-soft(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 14. prosince 1998 10:19
P�edm�t: Integrace MSIE
>Nenapada vas prosim nekoho,
>jak integrovat do vlastni aplikace MSIE ?
>
>Diky
>Vojta
>Link data
[*] Lustyk.Ladislav/4110/EDU(zv)edu1.ccmail.x400.cez(tec)cz - ec 1997 07:13:11 -0700
Pratele D1
prosim o radu - jak se da provest link nejakych dat mezi dvema
komponentami na jednom formulari. Konktretne potrebuji mit "zive
propojeni" mezi komponentou se zdrojovymi daty tridy TComponent
(vetsinou double) a druhou komponentou tridy TGraphicControl a to
formou pres property, viditelne v ObjectInspektoru.
Tedy neco podobneho, jako data-aware napr, mezi TTable a TDBEdit,
staci jednosmerne.
Diky za kazdou radu ci voditko.
L.Lustyk
Lustyk.Ladislav/4110/EDU(zv)edu1.ccmail.x400.cez(tec)cz
Link data
[*] Petr Slovak <petr(zv)trilog(tec)cz> - 15.12.1997 09:33:33
> prosim o radu - jak se da provest link nejakych dat mezi dvema
> komponentami na jednom formulari. Konktretne potrebuji mit "zive
> propojeni" mezi komponentou se zdrojovymi daty tridy TComponent
> (vetsinou double) a druhou komponentou tridy TGraphicControl a to
> formou pres property, viditelne v ObjectInspektoru.
> Tedy neco podobneho, jako data-aware napr, mezi TTable a TDBEdit,
> staci jednosmerne.
Jestli dobre rozumim tvemu dotazu, tak je to jednodussi, nez by se zdalo. Mas
ve formulari instance dvou komponent (TPrvni a TDruha). Chces, abys do nejake
property Second u objektu TPrvni mohl vybrat v ObjectInspektoru tu druhou.
Staci mit v definici u TPrvni v sekci published toto:
Property Second:TDruha Read ... Write ...;
Tim zajistis to, ze Delphi ti automaticky v object inspektoru nabidne seznam
vsech instanci vychazejicich z objektu TDruha a ty si muzes vybrat, kterou
priradit.
----------------------------------------------------
Petr Slovak
Trilog, s.r.o.
Http: http://www.trilog(tec)cz/
E-mail: petr(zv)trilog(tec)cz
Telefon: (+420) 2 / 205 131 06, linka 220, 271
Mobil: (+420) 603 / 501 642
Adresa: Vanickova 5/1, Praha 6, 160 00
----------------------------------------------------
Link data
[*] Zdenek Petruj <zpetruj(zv)zebra(tec)cz> - 15.12.1997 09:56:22
Vec je sice jednoducha ale je treba jeste osetrit to aby pri
odstranovani pripojene komponenty nenastala chyba odkazu na neexistujici
ukazatel (hlavne v design modu). Resi se to v procedure
Notification(AComponent: TComponent;Operation: TOperation). Pro
podrobnosti se podivej do helpu nebo do original zdrojaku od Borlandu.
Pri Operation=opRemove je treba abys nastavil ukazatel na tvou
pripojenou komponentu na nil.
> -----P�vodn� zpr�va-----
> Od: Petr Slovak [SMTP:petr(zv)trilog(tec)cz]
> Odesl�no: 15. prosince 1997 10:34
> Komu: delphi(zv)io.pinknet(tec)cz
> P�edm�t: Re: Link data
>
> > prosim o radu - jak se da provest link nejakych dat mezi dvema
> > komponentami na jednom formulari.
>
> Jestli dobre rozumim tvemu dotazu, tak je to jednodussi, nez by se
> zdalo. Mas
> ve formulari instance dvou komponent (TPrvni a TDruha). Chces, abys do
> nejake
> property Second u objektu TPrvni mohl vybrat v ObjectInspektoru tu
> druhou.
> Staci mit v definici u TPrvni v sekci published toto:
> Property Second:TDruha Read ... Write ...;
> Tim zajistis to, ze Delphi ti automaticky v object inspektoru nabidne
> seznam
> vsech instanci vychazejicich z objektu TDruha a ty si muzes vybrat,
> kterou
> priradit.
>
> dos
[*] Patrik Volhejn <Volhejn(zv)kol1.kolej.ujep(tec)cz> - 15.12.1997 10:41:37
Ahoj
Dal by se v delphi spustit, zavolat externi dosovsky programek tak,
ze by ho program v delphi spustil, pockal az probehne a potom pokracoval
dal ?
Jinak diky moc za databaze.
Patrik.
TRichText
[*] Radek Docekal <proj(zv)zvt.csas(tec)cz> - 15.12.1997 12:57:31
Property PlainText jsem mel spravne, ale chybel mi radek
MemStream.Position:= 0;
Diky za priklad, kdybys to popsal jen slovne, tak jsem ti ted psal, ze to
nefunguje :-)
Ted uz to jede i s RES.
S pozdravem
Radek Docekal
<proj(zv)zvt.csas(tec)cz>>Zkousel jsem to, a fungovalo to dobre. Ty jsi asi nastavil vlastnost
>RichEdit1.PlainText na True.
>
>var
> MemStream:TMemoryStream;
>begin
> MemStream:=TMemoryStream.Create;
> try
> RichEdit1.PlainText:=False; // !!!
> with RichEdit1.Lines do
> begin
> Clear;
> LoadFromFile('X:\Pokus.rtf'); // nahraju ze souboru
>
> SaveToStream(MemStream); // ulozim "do neceho"
>
> Clear; // vymazu obsah editoru
>
> MemStream.Position:=0;
> LoadFromStream(MemStream); // a znovu z "neceho" nahraju a je to
stejne
> end;
> finally
> MemStream.Free;
> end;
>end;
>
> Petr Vones, amatersky programator
>dos
[*] BINDER JIRI <binderj(zv)dec59.ruk.cuni(tec)cz> - 15.12.1997 15:31:42
> From: "Patrik Volhejn" <Volhejn(zv)kol1.kolej.ujep(tec)cz>
>
> Ahoj=20
> Dal by se v delphi spustit, zavolat externi dosovsky programek tak,=20
> ze by ho program v delphi spustil, pockal az probehne a potom pokracoval
> dal ?
Toto dobre demonstruje free komponenta TExecFile
(soubor Execfl32 napr. na DSP) , obsahuje zdrojovy kod
a priklad pouziti. Onsahuje i WIN16 variantu,
overenu mam jen verzi Win32
Jiri Binder
Link data
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 15.12.1997 17:12:35
Lustyk.Ladislav/4110/EDU(zv)edu1 wrote:
> Pratele D1
> prosim o radu - jak se da provest link nejakych dat mezi dvema
> komponentami na jednom formulari. Konktretne potrebuji mit
> "zive propojeni" mezi komponentou se zdrojovymi daty tridy
> TComponent (vetsinou double) a druhou komponentou tridy
> TGraphicControl a to formou pres property, viditelne v
> ObjectInspektoru. Tedy neco podobneho, jako data-aware napr,
> mezi TTable a TDBEdit, staci jednosmerne.
Asi ti nezbyde nic jineho, nez napsat potomka k jedne z techto
komponent, ktery se bude umet pripojit k te druhe, nebo napsat treti
komponentu, ktera je propoji.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56
Krystofova 1016, 149 00 Praha 4
CZ
Propojeni tabulek
[*] Slavek Rydval -- rk <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 15.12.1997 20:25:25
Preji pekneho dne!
Vytvoril jsem si dve databaze:
KINO(Nazev Kina:A:40, Adresa:A:20)
FILM(Nazev Filmu:A:40, Herec:A:20)
A ted si chci udelat databazu
PROGRAM(KINO:A:40, FILM:A:40, DATUM:DATE)
A chci, abych mel nazvy kin a nazvy filmu v databasi PROGRAM. Pomoci
Database Desktop se mi to vsak nedari. Nevite nekdo, jak na to?
Diky moc.
Slavek
+-------------------------------------+
| http://atrey.karlin.mff.cuni(tec)cz/~rk |
+-------------------------------------+Propojeni tabulek
[*] Tomas Holan <HOLAN(zv)ksvi.mff.cuni(tec)cz> - 15.12.1997 22:10:48
> Vytvoril jsem si dve databaze:
> KINO(Nazev Kina:A:40, Adresa:A:20)
> FILM(Nazev Filmu:A:40, Herec:A:20)
>
> A ted si chci udelat databazu
> PROGRAM(KINO:A:40, FILM:A:40, DATUM:DATE)
>
> A chci, abych mel nazvy kin a nazvy filmu v databasi PROGRAM. Pomoci
> Database Desktop se mi to vsak nedari. Nevite nekdo, jak na to?
* Proc tam chces mit nazvy? Ty prece nemusi jednoznacne urcovat film.
* Co se Ti nedari? Vyrobit tu tabulku nebo do ni nacpat data?
A kdyz data, tak odkud? To DATUM nikde neni...
Tom
Propojeni tabulek
[*] Ji�� Lebru�ka - 15.12.1997 22:20:20
Pokudby slo spojit tyto tabulky jako 1:n (jedno kino ma vice filmu) coz je
asi docela vhodne, tak se musi vytvorit indexove polozky (napr. id_kino,
id_film) a pak jsou dve moznosti:
1. nastaveni v database desktopu (tusim table lookup)
2. Object inspector (Master index,Master Field)
Je to jen zhruba, ale tak nejak mi to kdysi fungovalo u PDOX tabulek.
-----Original Message-----
From: Slavek Rydval -- rk <rk(zv)atrey.karlin.mff.cuni(tec)cz>
To: delphi(zv)io.pinknet(tec)cz <delphi(zv)io.pinknet(tec)cz>
Date: 15. prosince 1997 20:27
Subject: Propojeni tabulek
>Preji pekneho dne!
>
>Vytvoril jsem si dve databaze:
> KINO(Nazev Kina:A:40, Adresa:A:20)
> FILM(Nazev Filmu:A:40, Herec:A:20)
>
>A ted si chci udelat databazu
>PROGRAM(KINO:A:40, FILM:A:40, DATUM:DATE)
>
>A chci, abych mel nazvy kin a nazvy filmu v databasi PROGRAM. Pomoci
>Database Desktop se mi to vsak nedari. Nevite nekdo, jak na to?
>
>Diky moc.
>
>Slavek
> +-------------------------------------+
> | http://atrey.karlin.mff.cuni(tec)cz/~rk |
> +-------------------------------------+INI atd. (fwd)
[*] Kvetoslav Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 16.12.1997 18:00:32
---------- Forwarded message ----------
Date: Fri, 21 Nov 97 08:50:27 +0100 (CET)
From: Nosek Libor <nosek(zv)ujf.cas(tec)cz>
Reply-To: DELPHI Distribution List <delphi(zv)io.pinknet(tec)cz>
To: DELPHI CZ diskuze <DELPHI(zv)io.pinknet(tec)cz>
Subject: INI atd.
Dobry den panstvo.
Mam takovy dotaz. Kdyz si vytvarim a pracuji s INI soubory, tak zatim
vse delam tim zpusobem, ze treba pozici okna a jeho rozmery pisu
do INI writeinteger(........., form1.left) atd pro top, left, heght a width.
Chci-li si ulozit font a dalsi specifikace, pak pridavam dalsi prikazy
write...(). Routina pak je velika v obou pripadech zapisu i cteni.
Nevite nekdo je-li lepsi metoda, ktera by do INI ulozila specifikace
budto cele formy, nebo vybranych objektu z formy jako jeden celistvy
blok dat? jak pro zapis, tak i cteni pokud mozno co nejautomatizovanejsi.
Druhy dotaz. Existuje moznost, si ve forme zdruzit vybrany pocet
Label, EDIT, aj tak, aby pri treba zmene barvy pozadi v bezicim
programu nebylo nutne psat :
if colordialog ........ then
begin
label1.color := ........
label2.color := .......
atd atd
end;
ale treba
if colordialog......... then
skupina(label1.label2......).color := ............
Diky
Libor
********************************************************************************
Nosek Libor
addr: Dept. Nuclear Spectroscopy
Nuclear Physics Institute
250 68 Rez near Prague
Czech Republic
Tel: 00-420-2-66173163 - PC pers.
00-420-2-66173174 - PC center
00-420-2-66173160 - public
Mail: Nosek(zv)UJF.CAS.CZ
******************************************************************************
IB*Doc
[*] Jirka Burian <jburian(zv)borland(tec)cz> - 17.12.1997 15:49:47
Kdysi tady byla shanka po necem takovemto pro InterBase ...
Jirka Burian, Borland
----------
Od: Matthew Hopkins
Odeslano: 16. prosince 1997 10:01
Komu: jburian(zv)borland(tec)cz
Poedmit: IB*Doc
Hi,
I thought that you might be interested in adding a new InterBase
(freeware) utility we've just created called IB*Doc to your "downloads"
page. It can be found at
http://www.interbase.dthomas.co.uk/files/ibdoc.zip
You can use IB*Doc to analyze your IB database and provide the following
reports:
* Domain Report (list of all domains with their datatypes,
etc)
* Exception Report (list of all exceptions and in which
triggers and stored procs they are used)
* Generator Report (list of all generators in the database
with their current value)
* Stored Procedures
+ List Report (list of all stored procs with the owner
and the number of input and output params)
+ Detail Report (list of all stored proc with full source
code)
* Tables
+ List Report (list of tables, their owner and the number
of records in each)
+ Detail Report (list of all tables with full table
structure, check constraints, indices, triggers, user
access rights, and which stored procs use them)
* Triggers
+ List Report (list of triggers - their owner, firing
sequence, and data event [PRE_STORE, POST_STORE, etc]
+ Detail Report (list of triggers with full source)
* UDF's (list of all UDFs including parameters and module
names (e.g. DLL name for NT)
* Users (list of all users and all objects [e.g. tables] and
the SQL access granted for each)
* Views
+ List Report (list of all views with number of records)
+ Detail Report (list of all views with full SQL source)
It requires the 32-bit BDE.
Kind regards,
Matt
--
---------------------------------------------------
Matthew Hopkins
Director
Dunstan Thomas (UK) Ltd.
---------------------------------------------------
Internet Shopping: http://www.ShoppingExplorer.com/
Software Development: http://www.dthomas.co.uk/
InterBase: http://www.interbase.dthomas.co.uk/
Internet Resources: http://www.url.co.uk/
---------------------------------------------------
<none>
[*] MERLIN(zv)mail.spsuh.hiedu(tec)cz - 17.12.1997 17:46:52
Zdravim vsechny,
mam maly dotaz, a to jak se da zmensit velikost .exe projektu v D2
Dik za rady
----------------------------------------------------------------------------
Kdo to videl necht' se prihlasi na adrese e-mail: xbracek(zv)fi.muni(tec)cz anebo
http://www.fi.muni(tec)cz/~xbracek .
----------------------------------------------------------------------------
<none> Velikost .EXE v Delphi 2
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 17.12.1997 18:28:10
MERLIN(zv)mail.spsuh.hiedu(tec)cz wrote:
>
> Zdravim vsechny,
> mam maly dotaz, a to jak se da zmensit velikost .exe projektu v D2
>
> Dik za rady
> ----------------------------------------------------------------------------
> Kdo to videl necht' se prihlasi na adrese e-mail: xbracek(zv)fi.muni(tec)cz anebo
> http://www.fi.muni(tec)cz/~xbracek .
> ----------------------------------------------------------------------------
No, obavam se, ze moc moznosti nebude. Toto je obvykly problem komponentovych
prostredi, ale pokud vim tak snad i k C++ jsou treba nejake knihovny, ktere jsou
snad soucasti Windows (ted ale mozna kecam).
Jedine co me napada, je se pokusit nektere nekomponentove casti zdrojaku
prevest na DLL, ale je otazka jestli to ma vyznam. Druha moznost je prejit
na Delphi3 ktere tento problem resi pomoci Packages.
Bezna velikost EXE s jednim formularem je vsak kolem 180k coz pri dnesnich
meritkach neni uz zase tolik.
Petr Vones, amatersky programator.Registrace vlastniho typu souboru a spusteni aplik
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 17.12.1997 19:08:54
Ahoj vsichni,
Situace: Mam aplikaci rekneme App1.exe ktera poziva dokumenty s priponou .aaa .
Potreboval bych, aby pri klinuti na soubor .aaa se spustila moje App1.exe a
nejakym zpusobem ji byl predan nazev souboru (pres DDE) a pokud jiz App1 bezi,
tak aby se pouze predal nazev souboru.
Vim ze v registru se takto bezne registuji pripony a jednotlive akce k nim,
ale nevim jak to udelat na strane me aplikace.
Dekuji.
Petr Vones, amatersky programator.generator unikatnich cisel pro primary key
[*] kreutler(zv)bbs.infima(tec)cz - ec 1997 07:06:04
DE>Mam pocit ze v SP3 pro MSSQL je 2.65.0252 verze ODBC a ta mi s Delphi 3
DE>chodi v pohode.
DE>Mac
Dekuji za pocity predvanocni pohody, ale pls k veci:
Vyskytuje se v ni IYPO ta chyba, na kterou jsem poukazoval (pro
poradek: vysledek funkce (zv)(zv)IDENTITY zamaskovany na nizsich 24 bitu,
proste vysledek je modulo 16777216, evidentne binarni chyba, pritom
predavani vysledku je znakove), nebo ne?
TIA
Jarda <pivonka(zv)ibm.net> aka <jpivonka(zv)bbs.infima(tec)cz><none> Velikost .EXE v Delphi 2
[*] Radek Docekal <proj(zv)zvt.csas(tec)cz> - 18.12.1997 07:25:28
Nekecas. M$ VC++ ma svoje Microsoft Foundation Classes (MFC*.*) v systemovem
adresari Windows o celkove velikosti okolo 20M :-). To jen kdyz nekomu z
Delphistu bude nejaky "opravdovy programator" predhazovat, ze Delphi
generuje velky EXE :-)). Packages v D3 maji vyznam jen kdyz je v systemu
vice D3 programu, protoze packages jsou v podstate DLL, tj. analogie vyse
zminenych MFC*.*
Ale k subj.: trochu se da srazit velikost zapnutim optimalizace a vypnutim
jakehokoliv "Checking".
S pozdravem
Radek Docekal
<proj(zv)zvt.csas(tec)cz>
>> Zdravim vsechny,
>> mam maly dotaz, a to jak se da zmensit velikost .exe projektu v D2
>>
>
>No, obavam se, ze moc moznosti nebude. Toto je obvykly problem
komponentovych
>prostredi, ale pokud vim tak snad i k C++ jsou treba nejake knihovny, ktere
jsou
>snad soucasti Windows (ted ale mozna kecam).
> Petr Vones, amatersky programator.
>Registrace vlastniho typu souboru a spusteni aplik
[*] Radek Docekal <proj(zv)zvt.csas(tec)cz> - 18.12.1997 07:33:16
Mrkni se do HKEY_CLASSES_ROOT jak jsou udelany znamy pripony napr. TXT nebo
BMP a udelej to podle toho. Mam to vyzkousene a funguje to. Aplikaci pak
nestartujes pomoci DDE, ale ShellExecute, coz je IMHO jednodussi.
S pozdravem
Radek Docekal
<proj(zv)zvt.csas(tec)cz>
>Situace: Mam aplikaci rekneme App1.exe ktera poziva dokumenty s priponou
.aaa .
>Potreboval bych, aby pri klinuti na soubor .aaa se spustila moje App1.exe a
>nejakym zpusobem ji byl predan nazev souboru (pres DDE) a pokud jiz App1
bezi,
>tak aby se pouze predal nazev souboru.
>Vim ze v registru se takto bezne registuji pripony a jednotlive akce k nim,
>ale nevim jak to udelat na strane me aplikace.
>
>Dekuji.
>
> Petr Vones, amatersky programator.
<none>
[*] jan.pruha(zv)matsushita(tec)cz (Jan Pruha) - 18.12.1997 08:00:00 jst
Ahoj vsichni,
Mel bych takovy problem. Napsal jsem programek v D, ktery ma po
kompilaci asi 350kB. V programu je asi 10 modalnich formu, ktere jsou
autocreate na zacatku. Po prekopirovani na pocitac, kde to ma behat se
to napred shanelo po bivbx11.dll. Tu jsem mu prikopiroval a pak to
zacalo psat "Not enought memory .... Close some application ....
Podotykam, ze na tom pocitaci nic jineho nebezelo a je to P150 Intel s
16MB RAM. (Program jsem psal na P100 s 48 MB RAM) Predpokladam, ze
tomu jeste neco chybi, ale nevim co. Nesetkal se nekdo s necim
podobnym? Dekuji za odpoved.
Honza
+--------------------+--------------------------------------------------------+
| /\ | Ing. Jan Pruha |
| / \ | Industrial Engineering Department |
| /_ _\ +--------------------------------------------------------+
| / \ | Matsushita Television Central Europe s.r.o. |
| / /\ \ | U Panasoniku 1 |
| / / \ \ | Plzen - Bory |
| /\/ /____\ \/\ | 320 00 |
| / ________ \ +--------------------------------------------------------+
| /____\ /____\ | tel: 00420 19 7415308 fax: 00420 19 7415515 |
| PANASONIC | e-mail: jan.pruha(zv)matsushita(tec)cz |
+--------------------+--------------------------------------------------------+
| "Zaslouzi smrt." |
| "Zaslouzi! To asi ano. Spousta tech, co ziji, zasluzi smrt. A nekdo umira, |
| a zasluhuje zivot. Muzes mu ho dat? Potom nevynasej prilis horlive rozsudky |
| smrti. Protoze ani ti nejmoudrejsi nedohlednou do vsech koncu." |
| |
| Gandalf a Frodo o Glumovi |
+-----------------------------------------------------------------------------+Registrace vlastniho typu souboru a spusteni aplik
[*] Ing. Jindrich Danihelka <jidas(zv)mbox.vol(tec)cz> - 18.12.1997 08:02:11
Petr Vones wrote:
>
> Ahoj vsichni,
>
> Situace: Mam aplikaci rekneme App1.exe ktera poziva dokumenty s priponou .aaa .
> Potreboval bych, aby pri klinuti na soubor .aaa se spustila moje App1.exe a
> nejakym zpusobem ji byl predan nazev souboru (pres DDE) a pokud jiz App1 bezi,
> tak aby se pouze predal nazev souboru.
> Vim ze v registru se takto bezne registuji pripony a jednotlive akce k nim,
> ale nevim jak to udelat na strane me aplikace.
>
> Dekuji.
>
> Petr Vones, amatersky programator.
Na to staci asociovat priponu .aaa k exe souboru. To je vlastnost
WINDOWS - nastav� se v pr�zkumn�kovi - zobrazit-vlastnosti-typy soubor�.
Tam se prida novy typ souboru s pozadovanou priponou a program,
kery se ma po kliknuti na soubor s touto priponou spustit. System
program spusti a jmeno soubroru, na kterem se kliklo mu preda jako
parametr na prikazove radce.
Pokud te nechces nastavovat rucne, musi si to ten program sam zapsat
pri instalaci do registru.
JiDa
MSACCESS driver a WinNT
[*] Petr Slovak <petr(zv)trilog(tec)cz> - 18.12.1997 09:09:00
Mam problem, se kterym si vubec nevim rady. Mam IDAPI dodavane s Delphi 3.0
(tedy muzu pristupovat primo k Access MDB tabulkam), mam vytvoreny alias,
ukazujici na konkretni MDB. Pod Win95 vse krasne funguje. Pod WinNT mi program
po spusteni nahlasi neco v tom smyslu: "Cannot load IDAPI servises. Alias: xxx"
a program se ukonci bez toho, ze by neco udelal. Kdyz vyzkousim STANDARD driver
(tedy Paradox nebo dBase tabulky), vse je v poradku, ale s MDB narazim.
Nezkousejte ani rady typu: "Tak preinstaluj IDAPI". To jsem samozrejme zkousel
- bez vysledku. Predem diky za kazdou radu, napad.
----------------------------------------------------
Petr Slovak
Trilog, s.r.o.
Http: http://www.trilog(tec)cz/
E-mail: petr(zv)trilog(tec)cz
Telefon: (+420) 2 / 205 131 06, linka 220, 271
Mobil: (+420) 603 / 501 642
Adresa: Vanickova 5/1, Praha 6, 160 00
----------------------------------------------------
<none> Velikost .EXE v Delphi 2
[*] Dalibor Toman <dtoman(zv)lit(tec)czn(tec)cz> - 18.12.1997 09:15:33
Mam tyto zkusenosti - u programu s jednim nebo malo
jednoduchymi okny: vyplati se vyhodit unitu FORM, usetri se
tim minimalne 120kB. Okna ale musite udelat ruco pomoci API :)
-----Original Message-----
From: Radek Docekal <proj(zv)zvt.csas(tec)cz>
To: DELPHI Distribution List <delphi(zv)io.pinknet(tec)cz>
Date: 18. prosince 1997 7:55
Subject: Re: <none> Velikost .EXE v Delphi 2
>Nekecas. M$ VC++ ma svoje Microsoft Foundation Classes (MFC*.*) v
systemovem
>adresari Windows o celkove velikosti okolo 20M :-). To jen kdyz nekomu
z
>Delphistu bude nejaky "opravdovy programator" predhazovat, ze Delphi
>generuje velky EXE :-)). Packages v D3 maji vyznam jen kdyz je v
systemu
>vice D3 programu, protoze packages jsou v podstate DLL, tj. analogie
vyse
>zminenych MFC*.*
>Ale k subj.: trochu se da srazit velikost zapnutim optimalizace a
vypnutim
>jakehokoliv "Checking".
>
>S pozdravem
>Radek Docekal
><proj(zv)zvt.csas(tec)cz>
>
>>> Zdravim vsechny,
>>> mam maly dotaz, a to jak se da zmensit velikost .exe projektu v D2
>>>
>>
>>No, obavam se, ze moc moznosti nebude. Toto je obvykly problem
>komponentovych
>>prostredi, ale pokud vim tak snad i k C++ jsou treba nejake knihovny,
ktere
>jsou
>>snad soucasti Windows (ted ale mozna kecam).
>
>> Petr Vones, amatersky programator.
>>
>
Registrace vlastniho typu souboru a spusteni aplik
[*] Petr Slovak <petr(zv)trilog(tec)cz> - 18.12.1997 09:20:44
> Mrkni se do HKEY_CLASSES_ROOT jak jsou udelany znamy pripony napr. TXT nebo
> BMP a udelej to podle toho. Mam to vyzkousene a funguje to. Aplikaci pak
> nestartujes pomoci DDE, ale ShellExecute, coz je IMHO jednodussi.
K tomuto (ale zdaleka nejen tomuto tematu) doporucuji knizku "Programovani ve
Windows 95" od MicrosoftPressu. Tam se daji vycist opravdu hodne zajimave veci.
----------------------------------------------------
Petr Slovak
Trilog, s.r.o.
Http: http://www.trilog(tec)cz/
E-mail: petr(zv)trilog(tec)cz
Telefon: (+420) 2 / 205 131 06, linka 220, 271
Mobil: (+420) 603 / 501 642
Adresa: Vanickova 5/1, Praha 6, 160 00
----------------------------------------------------
Dos
[*] Patrik Volhejn <Volhejn(zv)kol1.kolej.ujep(tec)cz> - 18.12.1997 09:25:44
Ahoj
Potrebuji vyvolat Funkci ExecProgram ale delphi mi hlasi neznamy identifikator.
Nevim jak deklarovat.
Nebo nejaky jiny zpusob jak spustit z delphi dosovsky programek.
Za kazdou moc radu dik
Patrik
MSACCESS driver a WinNT
[*] Rene Stevanka <wizard(zv)army.sk> - 18.12.1997 09:41:30
Nemoze byt nieco s nastavenim prav (read/write) na oblast, ktoru vyuziva MS Acces
driver?
Rene Stevanka
System Administrator VpS GS ASR
----------
> Od: Petr Slovak <petr(zv)trilog(tec)cz>
> Pre: delphi(zv)io.pinknet(tec)cz
> Predmet: MSACCESS driver a WinNT
> D�tum: 18. december 1997 10:09
>
> Mam problem, se kterym si vubec nevim rady. Mam IDAPI dodavane s Delphi 3.0
> (tedy muzu pristupovat primo k Access MDB tabulkam), mam vytvoreny alias,
> ukazujici na konkretni MDB. Pod Win95 vse krasne funguje. Pod WinNT mi program
> po spusteni nahlasi neco v tom smyslu: "Cannot load IDAPI servises. Alias: xxx"
> a program se ukonci bez toho, ze by neco udelal. Kdyz vyzkousim STANDARD driver
> (tedy Paradox nebo dBase tabulky), vse je v poradku, ale s MDB narazim.
> Nezkousejte ani rady typu: "Tak preinstaluj IDAPI". To jsem samozrejme zkousel
> - bez vysledku. Predem diky za kazdou radu, napad.
>
>
>
>
> ----------------------------------------------------
> Petr Slovak
> Trilog, s.r.o.
> Http: http://www.trilog(tec)cz/
> E-mail: petr(zv)trilog(tec)cz
> Telefon: (+420) 2 / 205 131 06, linka 220, 271
> Mobil: (+420) 603 / 501 642
> Adresa: Vanickova 5/1, Praha 6, 160 00
> ----------------------------------------------------
Dos
[*] Rene Stevanka <wizard(zv)army.sk> - 18.12.1997 09:50:16
Ked potrebujem spustit nejaku DOS aplikaciu z delphi, tak zvycajne pouzivam
API funkciu ShellExecute, najdes ju v unite SHELLAPI
Rene Stevanka
System Administrator VpS GS ASR
----------
Od: Patrik Volhejn <Volhejn(zv)kol1.kolej.ujep(tec)cz>
Pre: DELPHI Distribution List <delphi(zv)io.pinknet(tec)cz>
Predmet: Dos
D�tum: 18. december 1997 9:25
Ahoj
Potrebuji vyvolat Funkci ExecProgram ale delphi mi hlasi neznamy identifikator.
Nevim jak deklarovat.
Nebo nejaky jiny zpusob jak spustit z delphi dosovsky programek.
Za kazdou moc radu dik
Patrik
Verify Password
[*] Rene Stevanka <wizard(zv)army.sk> - 18.12.1997 09:51:20
Ahoj.
Tak sa mi podarilo vyriesit problem s overenim hesla ktorym sa pouzivatel prihlasil
do Windows. Riesi to Funkcia:
function WNetVerifyPassword(Pswd:PChar;var B:Boolean): Longint; stdcall; external 'mpr.dll' name 'WNetVerifyPasswordA';
Ak vrati WN_SUCCESS, tak je B nastavene na True ak je v Pswd heslo
Windows, False ak nie.
Ak bude zaujem mozem poslat demonstracny program.
Rene Stevanka
System Administrator VpS GS ASR
generator unikatnich cisel pro primary key
[*] Martin Kube�ka <M.Kubecka(zv)sh.cvut(tec)cz> - 18.12.1997 09:54:51
>DE>Mam pocit ze v SP3 pro MSSQL je 2.65.0252 verze ODBC a ta mi s Delphi 3
>DE>chodi v pohode.
>
>DE>Mac
>
>Dekuji za pocity predvanocni pohody, ale pls k veci:
Stastne a vesele....
>Vyskytuje se v ni IYPO ta chyba, na kterou jsem poukazoval (pro
>poradek: vysledek funkce (zv)(zv)IDENTITY zamaskovany na nizsich 24 bitu,
>proste vysledek je modulo 16777216, evidentne binarni chyba, pritom
>predavani vysledku je znakove), nebo ne?
Bohuzel jsem nezkousel, momentalne fakt nestiham :-(
Mac
MSACCESS driver a WinNT
[*] Petr Slovak <petr(zv)trilog(tec)cz> - 18.12.1997 10:01:48
> Mam problem, se kterym si vubec nevim rady. Mam IDAPI dodavane s Delphi 3.0
> (tedy muzu pristupovat primo k Access MDB tabulkam), mam vytvoreny alias,
> ukazujici na konkretni MDB. Pod Win95 vse krasne funguje. Pod WinNT mi program
> po spusteni nahlasi neco v tom smyslu: "Cannot load IDAPI servises. Alias: xxx"
> a program se ukonci bez toho, ze by neco udelal. Kdyz vyzkousim STANDARD driver
> (tedy Paradox nebo dBase tabulky), vse je v poradku, ale s MDB narazim.
> Nezkousejte ani rady typu: "Tak preinstaluj IDAPI". To jsem samozrejme zkousel
> - bez vysledku. Predem diky za kazdou radu, napad.
Zkousel jsem hledat odpoved i na Borlandim serveru a kupodivu jsem nasel
stopu:
Q: "Cannot Load IDAPI Service Library" error: What does this error
mean and how can I resolve it?
A: If Access 95 or Office 95 was not used to load the DAO 3.0 engine on the
machine, the cause is a missing registry entry. To fix this, place the folloing
entry in the registry:
key name: HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Shared Tools\DAO string: Path
value: (path to your DAO3032.DLL)
Another cause of this error is if the registry is set to read only. The only
workaround for this cause is to either make the registry read / write, or make
that particular entry read / write.
Na pocitaci s WinNT jsem nemel nainstalovany Office95, ale Office97 a ten si
veci ohledne DAO zapisuje do registru jinak a z toho je Delphi 3 zmatena. Ted
nevim, jestli mam nadavat na Microsoft nebo na Borland. Ale v kazdem pripade me
prekvapilo, ze primy pristup k Accessovskym tabulkam nema IDAPI v sobe, ale
pouziva mikrosofti DAO, takze pozor vsichni, program pristupujici k Access
tabulkam nebude chodit na pocitaci, kde neni nainstalovany Office95 a je
potreba krome IDAPI a vlastniho programu instalovat i DAO.
----------------------------------------------------
Petr Slovak
Trilog, s.r.o.
Http: http://www.trilog(tec)cz/
E-mail: petr(zv)trilog(tec)cz
Telefon: (+420) 2 / 205 131 06, linka 220, 271
Mobil: (+420) 603 / 501 642
Adresa: Vanickova 5/1, Praha 6, 160 00
----------------------------------------------------
Prace se soubory
[*] Nykl, Pavel <nykl(zv)satoya(tec)cz> - 18.12.1997 11:01:13
Jsou na to API funkce. Najdi si CopyFile. (dalsi hledej z tyhle stranky). Co
se tyce zastupcu doporucuji nejakou komponentu z DSP, je jich tam nekolik.
-----------------------------------------------------------------
Pavel Nykl Saturn Toya s.r.o. - Teletext systems
mailto:nykl(zv)satoya(tec)cz P.O.Box 44,169 00 Praha 69,Czech republic
http://www.satoya(tec)cz/~nykl/ Phone,fax **420-2-57216290,352939
-----------------------------------------------------------------
-----Original Message-----
From: Simicek Pavel <simicek(zv)uvss.fme.vutbr(tec)cz>
To: delphi(zv)io.pinknet(tec)cz <delphi(zv)io.pinknet(tec)cz>
Date: 18. prosince 1997 11:02
Subject: Prace se soubory
>Ahoj vsichni!
>Nevite nekdo jestli existuji funkce pro jendoduchou praci se soubory
>jako zkopirovani souboru, smazani a zalozeni zastupce?
>Mam na mysli neco jednodussiho nez treba pri kopirovani otevrit
>soubor a pak ho kopirovat byte po byte. A nebo aspon teda jak se
>zalozi softwarove novy zastupce.
>Diky za kazdou radu
> Pavel
>
>-----------------------------------------------------------
> Ing. Pavel Simicek
> UVSSaR, FS, VUT Brno, Technicka 2, 616 69
> Tel. 05/41142461
> e-mail simicek(zv)uvss.fme.vutbr(tec)cz
>-----------------------------------------------------------
>Prace se soubory
[*] Simicek Pavel <simicek(zv)uvss.fme.vutbr(tec)cz> - 18.12.1997 11:05:18
Ahoj vsichni!
Nevite nekdo jestli existuji funkce pro jendoduchou praci se soubory
jako zkopirovani souboru, smazani a zalozeni zastupce?
Mam na mysli neco jednodussiho nez treba pri kopirovani otevrit
soubor a pak ho kopirovat byte po byte. A nebo aspon teda jak se
zalozi softwarove novy zastupce.
Diky za kazdou radu
Pavel
-----------------------------------------------------------
Ing. Pavel Simicek
UVSSaR, FS, VUT Brno, Technicka 2, 616 69
Tel. 05/41142461
e-mail simicek(zv)uvss.fme.vutbr(tec)cz
-----------------------------------------------------------
Prace se soubory
[*] Nykl, Pavel <nykl(zv)satoya(tec)cz> - 18.12.1997 11:50:24
http://sunsite.icm.edu.pl/delphi/ftp/d20free/shelink.exe
Autorem je Radek Voltr.
-----------------------------------------------------------------
Pavel Nykl Saturn Toya s.r.o. - Teletext systems
mailto:nykl(zv)satoya(tec)cz P.O.Box 44,169 00 Praha 69,Czech republic
http://www.satoya(tec)cz/~nykl/ Phone,fax **420-2-57216290,352939
-----------------------------------------------------------------
-----Original Message-----
From: Simicek Pavel <simicek(zv)uvss.fme.vutbr(tec)cz>
To: delphi(zv)io.pinknet(tec)cz <delphi(zv)io.pinknet(tec)cz>
Date: 18. prosince 1997 11:45
Subject: Re: Prace se soubory
>> Jsou na to API funkce. Najdi si CopyFile. (dalsi hledej z tyhle stranky).
Co
>> se tyce zastupcu doporucuji nejakou komponentu z DSP, je jich tam
nekolik.
>>
>>
>Diky za radu, ale nevedel bys jeste prosim te pod jakym heslem je
>mam hledat. Zkousel jsem shortcut ale nic jsem nenasel.
>
>Diky Pavel
>
>-----------------------------------------------------------
> Ing. Pavel Simicek
> UVSSaR, FS, VUT Brno, Technicka 2, 616 69
> Tel. 05/41142461
> e-mail simicek(zv)uvss.fme.vutbr(tec)cz
>-----------------------------------------------------------
>Prace se soubory
[*] Simicek Pavel <simicek(zv)uvss.fme.vutbr(tec)cz> - 18.12.1997 11:53:38
> Jsou na to API funkce. Najdi si CopyFile. (dalsi hledej z tyhle stranky). Co
> se tyce zastupcu doporucuji nejakou komponentu z DSP, je jich tam nekolik.
>
>
Diky za radu, ale nevedel bys jeste prosim te pod jakym heslem je
mam hledat. Zkousel jsem shortcut ale nic jsem nenasel.
Diky Pavel
-----------------------------------------------------------
Ing. Pavel Simicek
UVSSaR, FS, VUT Brno, Technicka 2, 616 69
Tel. 05/41142461
e-mail simicek(zv)uvss.fme.vutbr(tec)cz
-----------------------------------------------------------
PVCS
[*] Pavel �vidrnoch <svidrnoch.ataco(zv)novahut(tec)cz> - 18.12.1997 12:25:06
P��tel� Delf�ni
na jednom projektu v Delphi n�s za�ne pracovat v�ce, bude to tak �e na jednom sd�len�m PC bude projekt se v�emi zdroj�ky, ostatn� se se sv�mi PC p�ipoj�. Chceme na to pou��t PVCS, ale nem�me s t�m ��dn� zku�enosti. P�edem d�ky za n�vod pou�it�.
Jirka
ZIGA.ATACO(zv)NOVAHUT.CZ PVCS
[*] Jirka Burian <jburian(zv)borland(tec)cz> - 18.12.1997 13:05:31
Zkuste se kontaktovat na pana Sedlacka z AIT, ktery to skoli a testoval to s Delphi.
02/422484, 02/422420
tady je jeste neco prilozenyho:
PS: Hezke Vanoce a uspesny novy rok
J. Burian, Borland
----------
Od: Pavel ?vidrnoch
Odeslano: 18. prosince 1997 12:25
Komu: 'delphi(zv)pinknet(tec)cz'
Poedmit: PVCS
Poatele Delfini
na jednom projektu v Delphi nas zaene pracovat vice, bude to tak ?e na jednom sdilenem PC bude projekt se v?emi zdrojaky, ostatni se se svymi PC poipoji. Chceme na to pou?it PVCS, ale nemame s tim ?adne zku?enosti. Poedem diky za navod pou?iti.
Jirka
ZIGA.ATACO(zv)NOVAHUT.CZ
Verify Password
[*] V�t�zslav Gazda <softda(zv)mbox.vol(tec)cz> - 18.12.1997 14:18:53
Zkousel jsem to tak jak jsi napsal a ta funkce mi zhavaruje. V zadnem
helpu jsem tuto funkci nenasel. Mas nejakou dokumentaci ? Posli mi taky
ten tvuj zdrojak.
Diky moc Vita
softda(zv)mbox.vol(tec)cz
Prace se soubory
[*] Ing. Jindrich Danihelka <jidas(zv)mbox.vol(tec)cz> - 18.12.1997 14:19:05
Simicek Pavel wrote:
>
> Ahoj vsichni!
> Nevite nekdo jestli existuji funkce pro jendoduchou praci se soubory
> jako zkopirovani souboru, smazani a zalozeni zastupce?
> Mam na mysli neco jednodussiho nez treba pri kopirovani otevrit
> soubor a pak ho kopirovat byte po byte. A nebo aspon teda jak se
> zalozi softwarove novy zastupce.
> Diky za kazdou radu
> Pavel
>
> -----------------------------------------------------------
> Ing. Pavel Simicek
> UVSSaR, FS, VUT Brno, Technicka 2, 616 69
> Tel. 05/41142461
> e-mail simicek(zv)uvss.fme.vutbr(tec)cz
> -----------------------------------------------------------
V adresari Delphi\Demos\Doc\Filmanex je unit Fmxutils, ktery obsahuje
proceduru CopyFile a jine uzitecne veci.
JiDa
Sql
[*] Ji�� Lebru�ka - 19.12.1997 07:28:36
Pokousim se o jednoduchou praci s sql a narazil jsem na tento problem:
U komponenty Query definuji SQL asi takhle SELECT * FROM "zakaznici.dbf"
Where Custn_id < :var1 and pom < :var2
potrebuji abych pred vypisem reportu (QReport) mohl definovat parametry
tohoto SQL dotazu. Pokousel jsem se modifikovat Params, lec bezvisledne.
Diky za radu
Jirka.Sql
[*] Vodnansky David <Vodnansky(zv)allianz(tec)cz> - 19.12.1997 08:21:05
Musis v property Params nastavit spravny datovy typ a pote pred
otevrenim Query priradit parametry
Query1.ParamByName('var1').AsInteger:=.....;
atd;
To AsInteger samozrejme zavisi na prislusnem datovem typu, ale soudim,
ze "custno_id" typu float nebo string asi nebude.
-----------------------------------------------------
David Vodnansky - database analyst
Allianz pojistovna a.s.
tel. +420-2-24405215 fax.24405555
<mailto: vodnansky(zv)allianz(tec)cz>
-----------------------------------------------------
> -----P�vodn� zpr�va-----
> Od: Ji�� Lebru�ka [SMTP:lebruska(zv)ujep(tec)cz]
> Odesl�no: 19. prosince 1997 7:29
> Komu: Konference
> P�edm�t: Sql
>
> Pokousim se o jednoduchou praci s sql a narazil jsem na tento problem:
> U komponenty Query definuji SQL asi takhle SELECT * FROM
> "zakaznici.dbf"
> Where Custn_id < :var1 and pom < :var2
> potrebuji abych pred vypisem reportu (QReport) mohl definovat
> parametry
> tohoto SQL dotazu. Pokousel jsem se modifikovat Params, lec
> bezvisledne.
> Diky za radu
> Jirka.Sql
[*] Martin O�en� <slmsr(zv)isternet.sk> - 19.12.1997 08:31:00
Najprv musis zavolat metodu Tquery.Prepare.
Begin
Query.Prepare;
{sem pride definicia parametrov}
Query.Open;
End;
Martin O�en�
SLM SR
Slmsr(zv)isternet.sk
-----P�vodn� zpr�va-----
Od: Ji�� Lebru�ka [SMTP:lebruska(zv)ujep(tec)cz]
Odesl�no: 19. december 1997 7:29
Komu: Konference
P�edm�t: Sql
Pokousim se o jednoduchou praci s sql a narazil jsem na tento problem:
U komponenty Query definuji SQL asi takhle SELECT * FROM "zakaznici.dbf"
Where Custn id < :var1 and pom < :var2
potrebuji abych pred vypisem reportu (QReport) mohl definovat parametry
tohoto SQL dotazu. Pokousel jsem se modifikovat Params, lec bezvisledne.
Diky za radu
Jirka.
BDE a SQLLinks 4.51 nyni volne ke stazeni
[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 19.12.1997 08:33:11
Haj hou!
Primo od Borlandu. Posledni verze BDE a SQL Linku je nyni
ke stazeni (jako upgrade) na http://www.borland.com/devsupport/bde/index.html
Have fun!
Sender: Pavel "ERGO" Cisar (E-Mail: pcisar(zv)aktis(tec)cz)
Budte trpelivi. Evoluce s nami jeste neskoncila. (Solomon Short)Sql
[*] Urx Lubom�r <Lubos.Urx(zv)mius(tec)cz> - 19.12.1997 08:45:48
Nevim, jestli jsem spravne pochopil dotaz, ale zkus napriklad toto :
Query.ParamByName('var1').asString := ...
Query.ParamByName('var2').asInteger := ... ( apod.)
Query.Prepare;
Query.Open;
--------------------------------
Lubomir Urx
MIUS Teplice, v.o.s.
lubos.urx(zv)mius(tec)cz
> ----------
> Od: Ji�� Lebru�ka[SMTP:lebruska(zv)ujep(tec)cz]
> Odesl�no: 19. prosince 1997 7:28
> Komu: Konference
> P�edm�t: Sql
>
> Pokousim se o jednoduchou praci s sql a narazil jsem na tento problem:
> U komponenty Query definuji SQL asi takhle SELECT * FROM
> "zakaznici.dbf"
> Where Custn_id < :var1 and pom < :var2
> potrebuji abych pred vypisem reportu (QReport) mohl definovat
> parametry
> tohoto SQL dotazu. Pokousel jsem se modifikovat Params, lec
> bezvisledne.
> Diky za radu
> Jirka.
> Sql
[*] Pavel Kral <kral(zv)afx(tec)cz> - 19.12.1997 08:50:12
Ji�� Lebru�ka wrote:
> Pokousim se o jednoduchou praci s sql a narazil jsem na tento problem:
>
> U komponenty Query definuji SQL asi takhle SELECT * FROM
> "zakaznici.dbf"
> Where Custn_id < :var1 and pom < :var2
> potrebuji abych pred vypisem reportu (QReport) mohl definovat
> parametry
> tohoto SQL dotazu. Pokousel jsem se modifikovat Params, lec
> bezvisledne.
> Diky za radu
> Jirka.
--
Melo by to fungovat takto:
po zadani SQL napisete tyto radky
Query1.Params[0].asInteger := xxx // pokud je Custn_id cele, jinak
.asFloat, asDateTime...
Query1.Params[1].asInteger := xxx
Mnoho zdaru.
S pozdravem
PAVEL K R � L
E-mail: kral(zv)afx(tec)cz
www: http://www.afx(tec)cz/mr_pisar/mr_pisar.htm
PS spravne se pise "bezvysledne"
Sql
[*] Richard Valny <richard.valny(zv)oku-st(tec)cz> - 19.12.1997 09:26:38
-----P�vodn� zpr�va-----
Od: Ji�� Lebru�ka [SMTP:lebruska(zv)ujep(tec)cz]
Odesl�no: 19. prosince 1997 7:29
Komu: Konference
P�edm�t: Sql
>Pokousim se o jednoduchou praci s sql a narazil jsem na tento problem:
>U komponenty Query definuji SQL asi takhle SELECT * FROM "zakaznici.dbf"
>Where Custn_id < :var1 and pom < :var2
>potrebuji abych pred vypisem reportu (QReport) mohl definovat parametry
>tohoto SQL dotazu. Pokousel jsem se modifikovat Params, lec bezvisledne.
>Diky za radu
> Jirka.
SQL.active := false;
SQL.sql:= tvuj dotaz; je to v tvau TStrings
SQL.active :=true;
no a dal jako normalne
S pozdravem
Richard Valny richard.valny(zv)oku-st(tec)cz
Okresni urad Strakonice; Smetanova 533; 386 22 Strakonice
tel. +420-342-441 fax. +420-342-21208
Delphi Forum 98
[*] Burger Tom� <Tomas.Burger(zv)mius(tec)cz> - 19.12.1997 12:18:36
Mili delfini,
jak jsem slibil, mam pro vas darek pod stromecek: na adrese
http://delphi.mius(tec)cz/
je k dispozici web o Delphi, ktery by mel obsahovat dve zasadni veci -
archiv teto konference a databazi odkazu na Delphi zdroje. Zatim je to -
rekneme - beta verze a tudiz neco treba nevypada tak pekne, jak bych
chtel... Ale hlavni je, ze to funguje...
A mam pro vas hned dva "ukoly":
1. naplnte databazi odkazu...
2. prohlednete sve mailboxy, jestli nekdo nemate tuto konferenci
zarchivovanou pred listopadem 1997 (odkdy bezi automaticky...) v nejake
hezke podobe (ja mam *.pst soubory a s tema neni moc radostna prace...)
-
nejradeji plain text nebo tak neco... Ke kazde zprave archivuji jen tri
udaje - autora, datum odeslani a subject... a pak text (samo sebou)...
Tak si to uzijte... (a hezke vanoce...) Tomas
ps. pokud nebude vas prispevek ci podnet volat po diskuzi ostatnich,
posilejte ho radeji na muj email nez do konference. Dik...
---------------------------------------
Tomas Burger
MIUS v.o.s.
mailto:Tomas.Burger(zv)mius(tec)cz
http://www.teplice-city(tec)cz/
http://staff.mius(tec)cz/~tomasb/
icq:3908757
---------------------------------------
RichEdit
[*] Kupka Pavel - IN <xkupp05(zv)st.vse(tec)cz> - 23.12.1997 13:33:55 met-1dst
Preji Vsem Pekne Svatky,
potreboval bych pouzivat horni a dolni index v komponente RichEdit,
tato to umi, ale nevim, jak to provest v programu. Objekt TFont tyto
vlastnosti neobsahuje.
Asi by to melo jit pres API jako
SendMessage(RichEdit1.Handle,EM_SETCHARFORMAT,par1,par2);
Ale nevim, jak to presne provest,
diky za tipy a rady
Pavel Kupka
student VSE
Standartni vstup/vystup
[*] Tomas Rosa <Tomas.Rosa(zv)pinknet(tec)cz> - 26.12.1997 19:41:06
Ahojky,
mam jeden malinkaty problem: potrebuji komunikovat s programem (pro Win32
- aplikace typu konsole) pomoci standartniho vstupu a vystupu. Potrebuji
tedy nahradu > a < z dosu pro Win95. Jeste lepe by bylo pokud bych mohl
tyto vstupy a vystupy primo ovlivnovat z programu ze ktereho tento program
volam.
Taky bych prosil o radu jak spsutit program pod Win95 a cekat az skonci
-> pak bych pokracoval teprve v mem programu dale.
Diky za radu - P.S.: Delam v Delphi 3.0
S pozdravem Tomas Rosa
--------------------------------------------------------------------------
Tomas Rosa - Tomas.Rosa(zv)pinknet(tec)cz http://web.pinknet(tec)cz/~trosa/
Programatorsky koutek http://web.pinknet(tec)cz/koutek/
--------------------------------------------------------------------------
hladanie v RichEdit
[*] Pavel Koutny <koutny(zv)tkcmt.sk> - 26.12.1997 19:59:48
Prajev stastne sviaktky,
mal by som jeden taky problem. Mam vytvoreny objekt typu RichEdit. Potreboval by som v nom najst pozadovany retazec a kurzor nastavit na jeho zaciatok (alebo koniec, to je jedno).
Ak to niekto niekedy robil, nech mi prosim poradi.
Diki moc.
;)
Pavel 'Zviera' Koutny, koutny(zv)netlab.sk
Pohybovanie oknom
[*] Pavel Koutny <koutny(zv)tkcmt.sk> - 26.12.1997 20:02:40
Mam vytvorene okno, border je nastaveny na nulu, ikony tiez, takze okno je cisto prazdna plocha. Je tam umiestnena komponenta Panel (nie je podmienkou), ktora zabezpecuje, ze je mozne po kliknuti na nu a posun po obrazovke s nou pohybovat tak, ako to umoznuje caption bar. (vid WinAMP & spol...). Viem ze by sa to malo dat spravit nejako cez API, no akosi mi to nejde.
Dik
Pavel 'Zviera' Koutny
hladanie v RichEdit
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 26.12.1997 20:34:00
> Pavel Koutny wrote:
>
> Prajev stastne sviaktky,
>
> mal by som jeden taky problem. Mam vytvoreny objekt typu RichEdit. Potreboval
> by som v nom najst pozadovany retazec a kurzor nastavit na jeho zaciatok
> (alebo koniec, to je jedno).
>
Pouzij metodu TRichEdit.FindText, v helpu (Delphi3) mas i priklad.
Petr Vones, amatersky programator.MGL
[*] Vaclav Vancura <xycht(zv)blue.sh.cvut(tec)cz> - 27.12.1997 11:24:43
zdarBuh
preju pjekny svatky, i kdyz trochu pozde...
dela tady nekdo v MGL (http://www.scitechsoft.com) a vi, jak primo
pristupovat k VRAM - jak pouzit MGL_BeginDirectAccess - pokudmozno aby to
fungovalo i s Game Framework :)
dik.
Vaclav Vancura, Xycht Design
(xycht(zv)blue.sh.cvut(tec)cz, http://blue.sh.cvut(tec)cz/~xycht)
Seznam seriovych portu
[*] Martin Dupal <vision(zv)visionsw(tec)cz> - 27.12.1997 11:58:52
Cau delfini,
nevite nekdo API funkci, ktera mi vrati seznam momentalne
dostupnych seriovych (nebo paralelnich) portu. Tedy napr.
COM1,COM2,COM3 ?
Dik a hezke svatky
+----------------------------------+
| Ing. Martin Dupal |
| adresa: Geislerova 6 |
| Olomouc 2, 772 00 |
| Czech republic |
| tel.: 068/5313130 |
| http://www.visionsw(tec)cz |
| mailto:vision(zv)visionsw.vol(tec)cz |
+----------------------------------+Seznam seriovych portu
[*] Pavel Koutny <koutny(zv)tkcmt.sk> - 27.12.1997 15:40:42
Skus sa pozriet na Delphi Super Page, medzi novymi komponentami tam je
najnovsia verzia Async Professional (dokonca je oznacena ako FREE), nejake
komponenty z toho to urcite budu vediet robit, ved je to asi to naj pre
Delphi, co sa tyka komunikacie po portoch.
Pavel 'Zviera' Koutny, koutny(zv)tkcmt.sk
-----Original Message-----
From: Martin Dupal <vision(zv)visionsw(tec)cz>
To: delphi(zv)io.pinknet(tec)cz <delphi(zv)io.pinknet(tec)cz>
Date: 27. december 1997 13:02
Subject: Seznam seriovych portu
>Cau delfini,
>
>nevite nekdo API funkci, ktera mi vrati seznam momentalne
>dostupnych seriovych (nebo paralelnich) portu. Tedy napr.
>COM1,COM2,COM3 ?
>
> Dik a hezke svatky
>
>+----------------------------------+
>| Ing. Martin Dupal |
>| adresa: Geislerova 6 |
>| Olomouc 2, 772 00 |
>| Czech republic |
>| tel.: 068/5313130 |
>| http://www.visionsw(tec)cz |
>| mailto:vision(zv)visionsw.vol(tec)cz |
>+----------------------------------+
>Seznam seriovych portu
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 27.12.1997 19:24:46
Martin Dupal wrote:
>
> Cau delfini,
>
> nevite nekdo API funkci, ktera mi vrati seznam momentalne
> dostupnych seriovych (nebo paralelnich) portu. Tedy napr.
> COM1,COM2,COM3 ?
>
> Dik a hezke svatky
No, da se to udelat treba takhle: (pouzil jsem ListBox na zobrazeni volnych portu)
procedure TForm1.Button1Click(Sender: TObject);
var
PortStr:String;
DevHandle:THandle;
I:Integer;
begin
ListBox1.Items.Clear;
for I:=1 to 4 do
begin
PortStr:=Format('COM%d',[I]);
DevHandle:=CreateFile(PChar(PortStr),0,0,nil,OPEN_EXISTING,0,0);
try
if DevHandle<>INVALID_HANDLE_VALUE then ListBox1.Items.Add(PortStr);
finally
if DevHandle<>INVALID_HANDLE_VALUE then CloseHandle(DevHandle);
end;
end;
end; Petr Vones, amatersky programator
Pohybovanie oknom
[*] Pavel Kral <kral(zv)afx(tec)cz> - 27.12.1997 20:28:28
Zdravim, hezke svatky
ja to delam normalne pri onMouseMove, pri OnMouseDown si nastavim
priznak, ze dochazi k posunu
toto mi funguje:
procedure TForm1.PanelHlavniMouseDown(Sender: TObject;
Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
if BorderStyle=bsNone then
begin
LzeTahnoutOkno:=true;
PuvodniX:=X;
PuvodniY:=Y;
end;
end;
procedure TForm1.PanelHlavniMouseMove(Sender: TObject; Shift: TShiftState;
X, Y: Integer);
begin
if LzeTahnoutOkno then
begin
Top:=Top+Y-PuvodniY;
Left:=Left+X-PuvodniX;
end;
end;
procedure TForm1.PanelHlavniMouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
if LzeTahnoutOkno then
begin
Top:=Top+Y-PuvodniY;
Left:=Left+X-PuvodniX;
PuvodniY:=Y;
PuvodniX:=X;
end;
LzeTahnoutOkno:=false;
end;
kde LzeTahnoutOkno, PuvodniY, PuvodniX jsou promenne okna.
mnoho uspechu v novem roce preje
Pavel Kral,
Jesenik
----------
Odes�latel: Pavel Koutny <koutny(zv)tkcmt.sk>
Komu: delphi(zv)io.pinknet(tec)cz
P�edm�t: Pohybovanie oknom
Datum: 26. prosince 1997 20:02
Mam vytvorene okno, border je nastaveny na nulu, ikony tiez, takze okno je cisto prazdna plocha. Je tam umiestnena komponenta Panel (nie je podmienkou), ktora zabezpecuje, ze je mozne po kliknuti na nu a posun po obrazovke s nou pohybovat tak, ako to umoznuje caption bar. (vid WinAMP & spol...). Viem ze by sa to malo dat spravit nejako cez API, no akosi mi to nejde.
Dik
Pavel 'Zviera' Koutny
Prace s dokumenty (v siti)
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.12.1997 22:54:03
Ahoj,
Mam takovyto dotaz, mam MDI aplikaci ktera pracuje s nejakym mym vlastnim typem
souboru. Priklad MDI textoveho editoru v Delphi pracuje tak, ze soubor otevre,
nacte do komponenty a zavre jej. Tim vsak lze jeden soubor otevrit vicekrat.
Potreboval bych vsak u me aplikace podobne chovani jako napr. u dokumentu ve
Wordu, tj. pri dalsich otevrenich zobrazit zpravu:
"Soubor jiz pouziva uzivatel XY, chcete jej otevrit jen pro cteni?"
Delam to tak, ze po nacteni souboru jej ponechavam otevreny pomoci FileOpen(
<soubor>, fmOpenWrite or fmShareDenyWrite). Nevim vsak, jak pri dalsim otevreni
zjistit jmeno uzivatele ktery s nim pracuje. Mozna ze se to cele da udelat nekakym
lepsim zpusobem, ale zatim me nic jineho nenapadlo.
Dekuji za rady, a preji Stastny Novy Rok 1998.
Petr Vones, amatersky programator
Pohybovanie oknom
[*] Zdenek Petruj <zpetruj(zv)zebra(tec)cz> - 2.1.1998 10:28:40
Nejjednodussi je prekryt message wm_lButtonDown (kliknuti na formular)
tak aby reagovalo okno stejne jak na message wm_nclButtonDown (coz je
kliknuti do caption pruhu okna)
procedure TForm1.WMLButtonDown;
begin
with Message do
begin
Msg:=wm_nclButtonDown;
wParam:=htCaption;
DefWindowProc(Handle, Msg, wParam, lParam);
end;
end;
S pozdravem
Zdenek Petruj
____________________________
adress: Zebra systems, s.r.o.
Spartakovcu 3
708 00 Ostrava - Poruba
____________________________
tel./fax.: +420-(0)69-6912961
+420-(0)69-6912963
e-mail: zpetruj(zv)zebra(tec)cz
internet: http://www.zebra(tec)cz
> -----P�vodn� zpr�va-----
> Od: Pavel Koutny [SMTP:koutny(zv)tkcmt.sk]
> Odesl�no: 26. prosince 1997 20:03
> Komu: delphi(zv)io.pinknet(tec)cz
> P�edm�t: Pohybovanie oknom
>
> �Mam vytvorene okno, border je nastaveny na nulu, ikony tiez, takze
> okno je cisto prazdna plocha. Je tam umiestnena komponenta Panel (nie
> je podmienkou), ktora zabezpecuje, ze je mozne po kliknuti na nu a
> posun po obrazovke s nou pohybovat tak, ako to umoznuje caption bar.
> (vid WinAMP & spol...). Viem ze by sa to malo dat spravit nejako cez
> API, no akosi mi to nejde.
> �
> Dik
> �
> Pavel 'Zviera' Koutny
> �1Mb na TAIDE !!
[*] Dalibor Toman <dtoman(zv)lit(tec)czn(tec)cz> - 2.1.1998 11:22:43
Cau Mysaku,
dival jsem se dnes na grafy a Taide tam ma na stupnici 124KB coz by
odpovidalo
1Mbps. To by byla bomba.
-----Original Message-----
From: Petr Vones <pvones(zv)mbox.vol(tec)cz>
To: Konference Delphi <delphi(zv)io.pinknet(tec)cz>
Date: 31. prosince 1997 0:10
Subject: Prace s dokumenty (v siti)>Ahoj,
>
>Mam takovyto dotaz, mam MDI aplikaci ktera pracuje s nejakym mym
vlastnim typem
>souboru. Priklad MDI textoveho editoru v Delphi pracuje tak, ze soubor
otevre,
>nacte do komponenty a zavre jej. Tim vsak lze jeden soubor otevrit
vicekrat.
>
>Potreboval bych vsak u me aplikace podobne chovani jako napr. u
dokumentu ve
>Wordu, tj. pri dalsich otevrenich zobrazit zpravu:
>
>"Soubor jiz pouziva uzivatel XY, chcete jej otevrit jen pro cteni?"
>
>Delam to tak, ze po nacteni souboru jej ponechavam otevreny pomoci
FileOpen(
><soubor>, fmOpenWrite or fmShareDenyWrite). Nevim vsak, jak pri dalsim
otevreni
>zjistit jmeno uzivatele ktery s nim pracuje. Mozna ze se to cele da
udelat nekakym
>lepsim zpusobem, ale zatim me nic jineho nenapadlo.
>
>Dekuji za rady, a preji Stastny Novy Rok 1998.
>
> Petr Vones, amatersky programator
>
DDE a spousteni aplikace dle typu souboru.
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 02.1.1998 20:10:21
Ahoj,
mam problem s DDE. Potrebuji spustit aplikaci kliknutim na muj vlastni typ
souboru a predat toto jako parametr a prikaz. Pouzil jsem standartni zpusob
zapisu do registry (Topic - "System", Command - [Open("%1")] ).
V Delphi jsem na hlavni formular aplikace umistil TDdeServerConv a vlastnost
Name nastavil na "System"
Problem je, ze po restartu windows a prvnim pokusu o spusteni me aplikace
pomoci klinuti na soubor se nenavaze DDE spojeni. Pak uz to jde.
Nakonec jsem misto umisteni komponenty napsal jednoduchy unit:
Unit XY;
.
.
.
initialization
AppDde:=TDdeServerConv.Create(Application)
AppDde.Name:='System';
end;
Pokud tento unit umistim do uses hlavniho formulare tak to nefunguje, pokud
jej vsak umistim jako PRVNI ve zdrojaku celeho projektu tak to funguje.
Ma nekdo nejake vysvetleni ?
Dekuji Petr Vones, amatersky programator
DDE a spousteni aplikace dle typu souboru.
[*] Kvetoslav Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 3.1.1998 00:13:44
Ahoj,
neni to nahodou tim, ze za starych dobrych casu pascal nabiral unity
pozpatku, nez byly zapsany? Delphi se pravdepodobne v tomto "opici". No a
pak se nejakta ta procedurka "prepise". Reseni je jednak ve spravnem
umisteni unity v uses a nebo, pokud existuji dve procedury (funkce) XXX ve
dvou ruznych unitach (A a B), pak staci napsat:
A.XXX; nebo B.XXX;
Slavek
-----------------------------------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
-----------------------------------------------------------------------------
Barvy v TBitmap
[*] roman.palarcik(zv)spt(tec)cz - 5.1.98 06:06:19
Zdravim vsechny,
mam po case zase nejaky dotaz. Pracuji ve sve aplikaci s obrazkem
(TBitmap) a potreboval bych u nej nastavovat jas, ale nevim jak to
presne udelat. Nejdriv jsem chtel zmenit hodnoty v palete, ale nikde
jsem se nedocetl, jak se k ni dostat. Je tam sice property Palette:
HPalette (pokud jsem to nesplet), ale nevim jak se dostat k jednotlivym
polozkam. Timto zpusobem to ale asi stejne pujde jen pro 256 barevny
mod. Tak jsem chtel nastavit jednotlive pixely, ale k tem taky nevim
jak se jednoduse dostat. Je tam sice property Pixels[index], ale pres
tu to je strasne pomale, chtelo by to nejaky ukazatel na pole cele
bitmapy. V API funkcich jsem sice neco takoveho nasel, ale nevim jak to
pouzit. Nemate nekde zkusenost, jak to jednoduse udelat (nastavovat jas
u obrazku pomoci TScrollBar) ? Stacila by i nejaka komponenta nebo unit.
Roman Palarcik
roman.palarcik(zv)spt(tec)cz
Odchytavani hlasek
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 5.1.1998 08:20:28
Nevite nahodou nekdo, jak programove odchytit hlasky DOS programu,
ktere se vypisuji na konsoli? Kuprikladu spustim-li program
dcc32.exe, vypise parametry sveho spusteni. No a ty parametry bych
potreboval odchytit ve svem programu.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56
Krystofova 1016, 149 00 Praha 4
CZ
Pohybovanie oknom
[*] V�t�zslav Gazda <softda(zv)mbox.vol(tec)cz> - 05.1.1998 08:53:39
Toto se dela jednoduse obsluhou zpravy WM_NCHITTEST takto:
procedure TForm1.WMNCHitTest;
begin
inherited;
if Message.Result = HTCLIENT then Message.Result := HTCAPTION;
end;
Vita
WM_POWER
[*] Dan Ohnesorg, admin of POWER <dan(zv)feld.cvut(tec)cz> - 5.1.1998 09:10:20
Chtel bych poslat oknum ve widows zpravu o vypadku napajeni. Zrejme
na to existuje preddefinovany typ TWMPower v messages.pas, ale nemuzu
prijit na to, jak tenhle record nacpu do normalniho sendmessage. V
helpu jsem na toto tema nic nenasel, nezkousel jste to nekdo?
A jeste obecneji, nezna nekdo zpusob jak bez zasahu obsluhy ukoncit
widows nejak elegantne. Samozrejme nejlip tak, aby aplikace jako
word, ulozily data, pokud treba ten soubor ma nazev. Na unixu je to
hracka, ale ve windows chci asi moc, co.
zdravim
dan
_________________________________________
Dan Ohnesorg
spr�vce datab�ze seznamu vykon�
Ministerstvo zdravotnictv� �R
Odbor zdravotn�ho poji�t�n�
tel. +420 2 24972109
fax. +420 2 24915986
We are user friendly
_________________________________________
WHO is general failure, and WHY is he reding MY disk????DDE a spousteni aplikace dle typu souboru.
[*] V�t�zslav Gazda <softda(zv)mbox.vol(tec)cz> - 05.1.1998 09:21:16
Toto se nemusi delat pres DDE. Staci zapsat tvuj typ souboru a do
registru spolu s aplikaci kterou ma spustit. Potom pri kliknuti na tvuj
soubor se spusti aplikace s parametrem tveho souboru. Ve tvem programu
staci pri spusteni zpracovat tento parametr pomoci funkce ParamCount a
ParamStr.
Tvuj instalacni program by mel zaregistrovat vsechny tve typy souboru do
registru. Podivej se jak jsou zaregistrovany napriklad soubory *.txt v
techto vetvich.
HKEY_CLASSES_ROOT
.txt
txtfile
Vita
Kompilace komponenty
[*] GLOSIK Milos <glosik(zv)nt2.asset.sk> - 5.1.1998 09:51:11
Ahoj,
s RX-library mam nie prave najlepsie skusenosti.
1. Pri instalacii vyzadovala byt nainstalovana ako prva z pridanych
kniznic
2. Pri pouziti RX - komponent programy nahodne padaly, vzdy za inych
okolnosti. Po odstraneni RX bezi vsetko korektne, takze neviem.
Sprava sa to rovnako v D1,2 aj 3. Nejake opravy su na domovskej stranke
Rosno, ale kto ma tolko casu, aby to vsetko testoval?
S pozdravom Milos
> ----------
> From: Ing. Jindrich Danihelka[SMTP:jidas(zv)mbox.vol(tec)cz]
> Sent: 5. janu�r 1998 10:39
> To: delphi(zv)io.pinknet(tec)cz
> Subject: Kompilace komponenty
>
> Ahoj v?ichni
> mam dva problemy:
>
> 1.
> V D2 mam nainstalovany komponenty B-Tree Filer a Orpheus a nekolik
> vlastnich.
> Ted jsem si instaloval RX knihovnu, cast se nainstalovala spravne,
> kdyz
> chci nainstalovat celou, skonci kompilace zpravou "Stack overflow".
> Mam
> Pentium Intel 166, 64MB RAM, W95 OSR2, na disku mista vice nez 1G.
> Nevite nekdo, co se s tim da delat?
>
>
> 2.
> Mate nekdo zkusenosti s RX knihovnou? Komponenta TEditDate se spravne
> prelozi, na demo programu funguje, ale kdyz ji chci pridat na
> formular,
> oznami IDE chybu "Access violation - read address FFFFFF" a komponenta
> se neprida.
>
>
>
> --
> Ing. Jindrich Danihelka
> E-Mail jidas(zv)mbox.vol(tec)cz
> Tel. 038/57805
> 038/7512861
> Resource editor
[*] Zdenek Petruj <zpetruj(zv)zebra(tec)cz> - 5.1.1998 10:02:42
Nevite nekdo o nejakem odkazu na nejaky freeware resource editor, ktery
umoznuje editovat (ne jen prohlizet nebo vytvaret nove) *.res a *.rc
soubory pro W95.
S pozdravem
Zdenek Petruj
____________________________
adress: Zebra systems, s.r.o.
Spartakovcu 3
708 00 Ostrava - Poruba
____________________________
tel./fax.: +420-(0)69-6912961
+420-(0)69-6912963
e-mail: zpetruj(zv)zebra(tec)cz
internet: http://www.zebra(tec)cz
Odchytavani hlasek
[*] Tomas Holan <HOLAN(zv)ksvi.mff.cuni(tec)cz> - 5.1.1998 10:18:00
> Nevite nahodou nekdo, jak programove odchytit hlasky DOS programu,
> ktere se vypisuji na konsoli? Kuprikladu spustim-li program
> dcc32.exe, vypise parametry sveho spusteni. No a ty parametry bych
> potreboval odchytit ve svem programu.
Co takhle misto .EXE spoustet .BAT obsahujici jeden radek
dcc32 > vystup
?????
Tom
DDE a spousteni aplikace dle typu souboru.
[*] Nykl, Pavel <nykl(zv)satoya(tec)cz> - 5.1.1998 10:22:45
Tohle reseni ma jeden dulezity zadrhel. Kdyz chces, aby tvuj program
pracoval pouze v jedine kopii (tedy na zacatku programu zkoumas, jestli
program uz nebezi a pokud jo, tak predas parametr jiz bezici kopii) tak
pokud v pruzkumnikovi oznacis vice souboru jednoho typu najednou, kliknes
pravym tlacitkem a zvolis variantu 'Otevrit', tak se ti otevre vice kopii
programu, protoze system na kazdy oznaceny soubor spusti jednu kopii
programu a jednim parametrem. A dopadne to tak, ze ti pobezi treba tri kopie
a v kazde vice otevrenych souboru - pokud je to MDI.
-----------------------------------------------------------------
Pavel Nykl Saturn Toya s.r.o. - Teletext systems
mailto:nykl(zv)satoya(tec)cz P.O.Box 44,169 00 Praha 69,Czech republic
http://www.satoya(tec)cz/~nykl/ Phone,fax **420-2-57216290,352939
-----------------------------------------------------------------
-----Original Message-----
From: V�t�zslav Gazda <softda(zv)mbox.vol(tec)cz>
To: DELPHI Distribution List <delphi(zv)pinknet(tec)cz>
Date: 5. ledna 1998 9:33
Subject: Re: DDE a spousteni aplikace dle typu souboru.>Toto se nemusi delat pres DDE. Staci zapsat tvuj typ souboru a do
>registru spolu s aplikaci kterou ma spustit. Potom pri kliknuti na tvuj
>soubor se spusti aplikace s parametrem tveho souboru. Ve tvem programu
>staci pri spusteni zpracovat tento parametr pomoci funkce ParamCount a
>ParamStr.
>Tvuj instalacni program by mel zaregistrovat vsechny tve typy souboru do
>registru. Podivej se jak jsou zaregistrovany napriklad soubory *.txt v
>techto vetvich.
>
>HKEY_CLASSES_ROOT
> .txt
> txtfile
>
>Vita
>MDI Form a neviditelno
[*] Pavel Klimes <klimes(zv)c3(tec)cz> - 05.1.1998 10:31:20
Pekny den a dobry rok vsem !
Mam nasledujici problem:
Mam hlavni formular aplikace typu MDI Form. Na plose formulare
mam sadu tlacitek (TSpeedButtons). Tlacitka vsak nejsou videt,
at delam, co delam. Kdyz na ne najedu kurzorem meni se spravne
tvar kurzoru. Kdyz na ne kliknu, spusti se to, co se ma spustit.
Problem je vsak v jejich neviditelnosti.
Hlavni okno aplikace bylo puvodne typu fsNormal a problemy
nastaly az po prepisovani aplikace a zmene hl. formulare
na MDI Form.
Za kazdy napad budu velmi rad.
Zdravim. Pavel.
+---- Pavel Klimes ---- mailto:klimes(zv)c3(tec)cz ----+--- /""\ \ o | ---+
| C3, s.r.o. (Czech Card Centrum) | __) """ |
| Srobarova 32, Praha 10, Czech Republic | \/"""\ |
+---------------------- http://www.c3(tec)cz -------+--- \____/ / ---+Kompilace komponenty
[*] Ing. Jindrich Danihelka <jidas(zv)mbox.vol(tec)cz> - 05.1.1998 10:39:21
Ahoj v�ichni
mam dva problemy:
1.
V D2 mam nainstalovany komponenty B-Tree Filer a Orpheus a nekolik
vlastnich.
Ted jsem si instaloval RX knihovnu, cast se nainstalovala spravne, kdyz
chci nainstalovat celou, skonci kompilace zpravou "Stack overflow". Mam
Pentium Intel 166, 64MB RAM, W95 OSR2, na disku mista vice nez 1G.
Nevite nekdo, co se s tim da delat?
2.
Mate nekdo zkusenosti s RX knihovnou? Komponenta TEditDate se spravne
prelozi, na demo programu funguje, ale kdyz ji chci pridat na formular,
oznami IDE chybu "Access violation - read address FFFFFF" a komponenta
se neprida.
--
Ing. Jindrich Danihelka
E-Mail jidas(zv)mbox.vol(tec)cz
Tel. 038/57805
038/7512861
DDE a spousteni aplikace dle typu souboru.
[*] V�t�zslav Gazda <softda(zv)mbox.vol(tec)cz> - 05.1.1998 11:33:52
Jestlize pri startu aplikace testuji predchozi instanci, tek se nemuze
stat ze bude spusteno vice instanci teto aplikace ani kdyz otevru v
pruzkumnikovi vice souboru najednou. Mam takovou aplikaci jako MDI i SDI
a funguje to spravne.
Vita
>Tohle reseni ma jeden dulezity zadrhel. Kdyz chces, aby tvuj program
>pracoval pouze v jedine kopii (tedy na zacatku programu zkoumas, jestli
>program uz nebezi a pokud jo, tak predas parametr jiz bezici kopii) tak
>pokud v pruzkumnikovi oznacis vice souboru jednoho typu najednou,
kliknes
>pravym tlacitkem a zvolis variantu 'Otevrit', tak se ti otevre vice
kopii
>programu, protoze system na kazdy oznaceny soubor spusti jednu kopii
>programu a jednim parametrem. A dopadne to tak, ze ti pobezi treba tri
kopie
>a v kazde vice otevrenych souboru - pokud je to MDI.DDE a spousteni aplikace dle typu souboru.
[*] Nykl, Pavel <nykl(zv)satoya(tec)cz> - 5.1.1998 13:19:58
Kdyz testuji bezici instanci, tak muze dojit k teto situaci:
1. V pruzkumnikovi oznacim k otevreni vice souboru najednou a zvolim povel k
otevreni.
2. System se najednou pokusi otevrit tolik instanci, kolik je oznaceno
souboru.
3. Muze dojit k situaci, kdy dve instance projdou testem druhe kopie ve
chvili, kdy dalsi instance jeste nemaji vytvorene hlavni okno aplikace.
Tudiz test na dalsi kopii je negativni a obe kopie teprve potom zacnou
vytvaret sve hlavni okno a zacnou otevirat soubory podle parametru.
-----------------------------------------------------------------
Pavel Nykl Saturn Toya s.r.o. - Teletext systems
mailto:nykl(zv)satoya(tec)cz P.O.Box 44,169 00 Praha 69,Czech republic
http://www.satoya(tec)cz/~nykl/ Phone,fax **420-2-57216290,352939
-----------------------------------------------------------------
-----Original Message-----
From: V�t�zslav Gazda <softda(zv)mbox.vol(tec)cz>
To: DELPHI Distribution List <delphi(zv)pinknet(tec)cz>
Date: 5. ledna 1998 11:49
Subject: Re: DDE a spousteni aplikace dle typu souboru.>Jestlize pri startu aplikace testuji predchozi instanci, tek se nemuze
>stat ze bude spusteno vice instanci teto aplikace ani kdyz otevru v
>pruzkumnikovi vice souboru najednou. Mam takovou aplikaci jako MDI i SDI
>a funguje to spravne.
>
>Vita
>
>>Tohle reseni ma jeden dulezity zadrhel. Kdyz chces, aby tvuj program
>>pracoval pouze v jedine kopii (tedy na zacatku programu zkoumas, jestli
>
>>program uz nebezi a pokud jo, tak predas parametr jiz bezici kopii) tak
>
>>pokud v pruzkumnikovi oznacis vice souboru jednoho typu najednou,
>kliknes
>>pravym tlacitkem a zvolis variantu 'Otevrit', tak se ti otevre vice
>kopii
>>programu, protoze system na kazdy oznaceny soubor spusti jednu kopii
>>programu a jednim parametrem. A dopadne to tak, ze ti pobezi treba tri
>kopie
>>a v kazde vice otevrenych souboru - pokud je to MDI.
>MDI Form a neviditelno
[*] Skacel Miloslav <skacel(zv)kjsoft(tec)cz> - 5.1.1998 14:23:01
Ahoj,
zkus TSpeedButtons polozit na TPanel.
S pozdravem,
Miloslav Skacel
http://www.kjsoft(tec)cz
-----P�vodn� zpr�va-----
Od: Pavel Klimes [SMTP:klimes(zv)c3(tec)cz]
Odesl�no: 5. ledna 1998 10:31
Komu: DELPHI Distribution List
P�edm�t: MDI Form a neviditelno
Pekny den a dobry rok vsem !
Mam nasledujici problem:
Mam hlavni formular aplikace typu MDI Form. Na plose formulare
mam sadu tlacitek (TSpeedButtons). Tlacitka vsak nejsou videt,
at delam, co delam. Kdyz na ne najedu kurzorem meni se spravne
tvar kurzoru. Kdyz na ne kliknu, spusti se to, co se ma spustit.
Problem je vsak v jejich neviditelnosti.
Hlavni okno aplikace bylo puvodne typu fsNormal a problemy
nastaly az po prepisovani aplikace a zmene hl. formulare
na MDI Form.
Za kazdy napad budu velmi rad.
Zdravim. Pavel.
+---- Pavel Klimes ---- mailto:klimes(zv)c3(tec)cz ----+--- /""\ \ o | ---+
| C3, s.r.o. (Czech Card Centrum) | ) """ |
| Srobarova 32, Praha 10, Czech Republic | \/"""\ |
+---------------------- http://www.c3(tec)cz -------+--- \ / / ---+DDE a spousteni aplikace dle typu souboru.
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 05.1.1998 15:07:55
Vyreseno (snad, doufam :-) ) . Dekuji vsem za prispevky k tomuto problemu.
Pouziti DDE se mi totiz zda v konecnem dusledku jednodussi, nez predavani pomoci
parametru pri spusteni souboru. Neni zde treba testovat bezici instance aplikaci,
navic jsem jeste potreboval zajistit aby v pripade kdy aplikace jiz bezi, uzivatel
prepne treba do Pruzkumnika a chce otevrit dalsi soubory a v aplikaci je spusten
modalni dialog byly prikazy vykonany az po opusteni tohoto dialogu. Nehlede k tomu
ze predavani parametrem me prijde ponekud "zastarale" a aplikaci nelze "ovladat"
napriklad z jine.
Cely problem spocival ze aplikace se chovala podivne kdyz v ni byl pouzivan
QuickReport. Pokud jsem jmeno unitu QuickRep zaradil az ZA unit moji komponenty
tak vse funguje spravne. Nemam sice zadne presne vysvetleni proc to tak je, jedine
ceho jsem si vsiml ze chyba vznikala tehdy kdyz aplikace spoustela "Spooler proces",
patrne nejaky proces Windows potrebny k tisku, ktery inicializuje QuickReport.
Protoze se to inicializuje pravdepodobne ve initialization sekci QuickReport unitu
tak dochazelo k temto kolizim. Petr Vones, amatersky programator
Odchytavani hlasek
[*] Jiri Binder <binderj(zv)dec59.ruk.cuni(tec)cz> - 5.1.1998 19:43:01
> From: "Zbysek Hlinka" <zhlinka(zv)login(tec)cz>
> Nevite nahodou nekdo, jak programove odchytit hlasky DOS programu,
> ktere se vypisuji na konsoli? Kuprikladu spustim-li program
> dcc32.exe, vypise parametry sveho spusteni. No a ty parametry bych
> potreboval odchytit ve svem programu.
>
Podobny problem mam take, dotaz do konference byl bez odezvy,
a prakticky stejny dotaz (tu��m odchytavan� zprav "Ping") take
podle m� nebyl zodpov�zen.
Moje situace je tato: Z programu Win32 spustit DOS program,
nevytvorit konzoli a odchytit vystup, ktery bud zobrazim po svem
nebo zpracuji jinak. Reseni, ktere nyni pouzivam nepovazuji za
idealni, ale jevi se mi jako funkcne vyhovujici:
1. V procedure CreateProcess pro spusteni DOS prg nastavim v
creationflags DETACHED_PROCESS a v Startup info
ShowWindow jako normal (napamatuji si presne,
ale myslim ze sw_Hide, ktery jsem si myslel ze by zde mel byt nebylo
spravne reseni ) - tim se nezobrazi konzola (a predpokladam, ze ani
nevytvori)
2. Pomoci hStdInput, hStdOPutput provedu presmerovani do
souboru .. viz dale (aby byly tyto parametry vzaty v potaz je treba
to uvest v dwFlags, ale to je zrejme z helpu).
Jako handly souboru pro presmerovani uvedu handly predem vytvorenych
souboru, v mem pripade s vyhodou vytvorenych s priznaky
temporary a create on delete.
3. Vlastni odecitani
Po spusteni procesu v nekonecnem wait cyklu provadim
waitOnSingleObject(handle procesu, cekaci doba - 100,300 nebo 500
podle potreby odezvy)
po waiton prectu co noveho na vstupu a zpet na wait
cyklus break-nu kdyz wait nevrati ukonceni na Timeout
Reseni slouzi v tom smyslu, ze skryva "neestecicke" otevirani a
zavirani cerneho okna konzoly
- nevytvorenim konzoly je vse mozna efektivnejsi -
a konecne mohu prectenim vystupu zjistit co se prihodilo.
Co bych rad umel a neumim (pokud jde o teto subject pochopitelne):
1. presmerovat vstup z klavesnice na vstup konzoly
2. nemumim vyuzit zadani hStdError .. docela rad bych ziskal
pripadny kod chyby s nimz DOS uloha konci
3. Udelat to lepe, napr. bez presmerovani do souboru
Zdravi Jiri Binder
MDI Form a neviditelno
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 05.1.1998 19:53:19
Pavel Klimes wrote:
>
> Pekny den a dobry rok vsem !
>
> Mam nasledujici problem:
>
> Mam hlavni formular aplikace typu MDI Form. Na plose formulare
> mam sadu tlacitek (TSpeedButtons). Tlacitka vsak nejsou videt,
> at delam, co delam. Kdyz na ne najedu kurzorem meni se spravne
> tvar kurzoru. Kdyz na ne kliknu, spusti se to, co se ma spustit.
> Problem je vsak v jejich neviditelnosti.
>
> Hlavni okno aplikace bylo puvodne typu fsNormal a problemy
> nastaly az po prepisovani aplikace a zmene hl. formulare
> na MDI Form.
>
Ahoj,
musis umistit SpeedButtony na TPanel, TSpeedButton je prvek Delphi
ktery nepochazi z TWinControl, takze na hlavnim MDI okne pak neni videt.
Jinak pokud mas Delphi3, tak pouzivej TToolBar misto jednotlivych
SpeedButtonu (v tom pripade pak neni treba pouzivat zadny TPanel). Petr Vones, amatersky programator
Delphi (fwd)
[*] Liane BBS <bbs(zv)edulib(tec)cz> - 5.1.1998 21:40:47
*** Forwarded file follows ***
Posted By: kuzelka (kuzelka) on 'CZprogram'
Title: Delphi
Date: Mon Jan 5 12:39:49 1998
Co je v tomto postu:
1. Problem nastaveni exclusivity databazoveho zaznamu v DELPHI
2. Problem obecne sdilenosti souboru
*******************************************************************
ad 1. Problem nastaveni exclusivity databazoveho zaznamu v DELPHI
Programuji v Delphi jistou aplikaci, ktera pracuje s databazema.
Pokud chci pouzivat databazi jen ja (tj. nepovolit nikomu jinemu otevreni)
nastavim Exclusive na True. To je v ramci cele databaze, a to ja nechci
** co kdyz ale chci nastavit exclusivni mod pouze na najaky zaznam????**
Tj. potrebuji poradit s necim jako
PROGRAM:
{otevri databazi NECO.DBF}
{nastav se na zaznam cislo x }
{delej cyklus}
{dokud nekdo zaznam pouziva exclusivne}
{nastav si zaznam na exclisive}
{....delej s tim zaznamem neco}
{uvolni zaznam-tj.odoznac exclusivitu}
ENDPROGRAM
Doufam, ze je to alespon trochu pochopitejne. Jinak rad vysvetlim.
******************************************************************
2. Problem obecne sdilenosti souboru
Experimentalne (a pozdeji i z dokumentace) jsem zjistil, ze pri otevirani
souboru pro sdileni na siti nepostacuje otevrit soubor jako ReadWrite
(v pascalu Filemode:=2), je ale nutno tez nastavit 7-bit na 1 tj.AND 64
(v pascalu Filemode:=66). Tzn. pri otevreni souboru ReadWrite AND 64 je
mozne cist i zapisovat do souboru, ktery pouziva nekdo jiny( muzete pouzit
pro sdileni dat na siti pro vice uzivatelu ).
Toto mi je zatim jasne - problem zacina az ted. Potreboval bych nejakym
zpusobem kontrolovat urcitou cast souboru jen ja sam (tzn. opet nastaveni
exclusivity na urcitou cast souboru viz. 1. Problem).
Tj. Program vypada asi takto
begin
assign(f,'SOUBOR.DAT');
filemode:=66;
reset(f);
if Neni_exclusive( Odkud, kam ) then { tuto proceduru nevim jak udelat }
Nastav_exlusive( Odkud, Kam ); { tuto proceduru nevim jak udelat }
end;
********************************************************************
P.S. Je mi jasne ze ve svete Voken to maj uz nejak se sdilenim vyreseno.
Musel to vsak taky nekdo nejak naprogramovat
Odchytavani hlasek
[*] Michal Leinweber <M.Leinweber(zv)sh.cvut(tec)cz> - 5.1.1998 22:39:23
>Co bych rad umel a neumim (pokud jde o teto subject pochopitelne):
>1. presmerovat vstup z klavesnice na vstup konzoly
>3. Udelat to lepe, napr. bez presmerovani do souboru
A co takhle misto souboru pouzit PIPES ktere se chovaji jako soubor ale s
tim ze v jinem threadu sveho programu muzes cist vystup okamzite po tom co
ten presmerovanej program vypise a stejne tak na to ihned reagovat vstupnimy
daty
McLEI
Odchytavani hlasek
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 6.1.1998 09:00:04
Tomas Holan wrote:
> > Nevite nahodou nekdo, jak programove odchytit hlasky DOS programu,
> > ktere se vypisuji na konsoli? Kuprikladu spustim-li program
> > dcc32.exe, vypise parametry sveho spusteni. No a ty parametry bych
> > potreboval odchytit ve svem programu.
>
> Co takhle misto .EXE spoustet .BAT obsahujici jeden radek
>
> dcc32 > vystup
To, pravda, funguje, nicmene jestli nekdo vi o lepsim reseni, byl
bych rad. Ale jinak diky.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56
Krystofova 1016, 149 00 Praha 4
CZ
Resource editor
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 6.1.1998 09:00:03
Zdenek Petruj wrote:
> Nevite nekdo o nejakem odkazu na nejaky freeware resource editor,
> ktery umoznuje editovat (ne jen prohlizet nebo vytvaret nove) *.res
> a *.rc soubory pro W95.
Pokud to chces pouze na preklady textu, tak chystam novou verzi
Lokalizatoru (jen Delphi 3), ktera bude umet prelozit i exe a dpl
soubory - tedy vcetne resourcu v nich. Bohuzel vsak nebude zadarmo,
protoze take musim jist. :-)
BTW - hledam jeste jednoho pilneho testera nove verze z rad uzivatelu
dvojky.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56
Krystofova 1016, 149 00 Praha 4
CZ
DDE a spousteni aplikace dle typu souboru.
[*] V�t�zslav Gazda <softda(zv)mbox.vol(tec)cz> - 06.1.1998 09:15:06
>3. Muze dojit k situaci, kdy dve instance projdou testem druhe kopie ve
>chvili, kdy dalsi instance jeste nemaji vytvorene hlavni okno aplikace.
>Tudiz test na dalsi kopii je negativni a obe kopie teprve potom zacnou
>vytvaret sve hlavni okno a zacnou otevirat soubory podle parametru.
Toto je pravda pokud se predchozi instance testuje az po vytvoreni
hlavniho okna pomoci funkce FindWindow, avsak tento test lze provest i
uplne na zacatku pred Application.Initialize pomoci sdilenych objektu
jadra (napr: Files Mapping) kde je mensi pravdepodobnost vyskytu tohoto
problemu. I kdyz, opakuji jeste jednou, pouzivam taky zpusob pomoci
funkce FindWindow, zkousel jsem otevrit i vice souboru najednou a vzdy
uspesne pouze s jednou instanci aplikace. Ale i tak uznavam opravnenost
tvych obav a budu se muset take vyhnout tomuto zpusobu testovani
predchozi instance.
Vita
Kresleni v PaintBoxu
[*] roman.palarcik(zv)spt(tec)cz - 6.1.98 09:37:39
Nazdar vsichni,
trochu si nevim rady s kreslenim v PaintBoxu. Komponenta obsahuje
vpodstate jenom Canvas, pres ktery se kresli. Muj problem je v tom, ze
na tom provadim urcitou editaci obrazku a casto potrebuju prekreslit
(pomoci OnPaint) urcitou cast obrazku (jenom vyrez). Jenomze tato
udalost vzdycky prekresli celou ploch, coz je dost rusive, protoze to
blika. Je tam sice nejaka property, ktera udava vyrez ve kterem se bude
kreslit ale je to jenom ReadOnly. Zkousel jsem neco pres vytvareni
noveho Handle, ale nechodilo to moc dobre.
Roman Palarcik
roman.palarcik(zv)spt(tec)cz
IIS40, Delphi 4, Server Side COM objekty a ASP
[*] No Comment Group, s.r.o. / Sales Department <sales(zv)nocomment.sk> - 6.1.1998 22:46:58
Ahoj,
nema niekto nahodou skusenosti s vyvojom server side COM komponent pre IIS? Zaujimal by ma pristup k inym COM objektom (Response, Session ...) a praca s ADO .... Ak by niekto nasiel nejaky priklad resp. zdrojak nejakej komponenty, bol by som mu zaviaznany.
d.
rw
Posilane zdrojove kody
[*] roman.palarcik(zv)spt(tec)cz - 6.1.98 11:05:32
Mozna by to mohlo byt tim, ze pri posilani postou se znaky CR+LF
nahradily jenom CR a kompilator to nebere jako korektoni konec radku.
Ale mozna ze to tak neni. Pokud to tak je, dalo by se napsat jednoduchy
programek, ktery to spravi.
Pri spravnem zabaleni do prilohy by se to vsak nemelo stat.
Roman Palarcik
roman.palarcik(zv)spt(tec)cz
----------
Od: simicek(zv)uvss.fme.vutbr(tec)cz; simicek(zv)uvss.fme.vutbr(tec)cz
Komu: delphi(zv)io.pinknet(tec)cz
P�edm�t: Posilane zdrojove kody
Datum: 6. leden 1998 10:35
<<P�ilo�en� soubor�: POSILANE.BIN>>
Ahoj vsichni a vse nejlepsi do noveho roku!
Narazil jsem na problem se skompilovanim kodu ktery mi prisel z
konference postou. Jedna se o kompilacni chybu Line too long, a to i
treba na praznem radku. Myslim si ze to bude asi problem mailu.
Pouzivam klasicky Pegasus Mail for Windows. Nevite nekdo jak se
tohoto zbavit? Nefunguje ani odentrovani koncu radku, ani
prekopirovani celeho bloku do jineho souboru. Jedine co funguje je
prekopirovani jednotlivych radku (ale pouze s oznacenim po posledni
znak).
Diky za kazdou radu Pavel
-----------------------------------------------------------
Ing. Pavel Simicek
UVSSaR, FS, VUT Brno, Technicka 2, 616 69
Tel. 05/41142461
e-mail simicek(zv)uvss.fme.vutbr(tec)cz
-----------------------------------------------------------
Posilane zdrojove kody
[*] Simicek Pavel <simicek(zv)uvss.fme.vutbr(tec)cz> - 6.1.1998 11:35:41
Ahoj vsichni a vse nejlepsi do noveho roku!
Narazil jsem na problem se skompilovanim kodu ktery mi prisel z
konference postou. Jedna se o kompilacni chybu Line too long, a to i
treba na praznem radku. Myslim si ze to bude asi problem mailu.
Pouzivam klasicky Pegasus Mail for Windows. Nevite nekdo jak se
tohoto zbavit? Nefunguje ani odentrovani koncu radku, ani
prekopirovani celeho bloku do jineho souboru. Jedine co funguje je
prekopirovani jednotlivych radku (ale pouze s oznacenim po posledni
znak).
Diky za kazdou radu Pavel
-----------------------------------------------------------
Ing. Pavel Simicek
UVSSaR, FS, VUT Brno, Technicka 2, 616 69
Tel. 05/41142461
e-mail simicek(zv)uvss.fme.vutbr(tec)cz
-----------------------------------------------------------
Kresleni v PaintBoxu
[*] Nykl, Pavel <nykl(zv)satoya(tec)cz> - 6.1.1998 12:08:57
Zkus InvalidateRect
-----------------------------------------------------------------
Pavel Nykl Saturn Toya s.r.o. - Teletext systems
mailto:nykl(zv)satoya(tec)cz P.O.Box 44,169 00 Praha 69,Czech republic
http://www.satoya(tec)cz/~nykl/ Phone,fax **420-2-57216290,352939
-----------------------------------------------------------------
-----Original Message-----
From: roman.palarcik(zv)spt(tec)cz <roman.palarcik(zv)spt(tec)cz>
To: delphi(zv)io.pinknet(tec)cz <delphi(zv)io.pinknet(tec)cz>
Date: 6. ledna 1998 11:47
Subject: Kresleni v PaintBoxu
>Nazdar vsichni,
>
>trochu si nevim rady s kreslenim v PaintBoxu. Komponenta obsahuje
>vpodstate jenom Canvas, pres ktery se kresli. Muj problem je v tom, ze
>na tom provadim urcitou editaci obrazku a casto potrebuju prekreslit
>(pomoci OnPaint) urcitou cast obrazku (jenom vyrez). Jenomze tato
>udalost vzdycky prekresli celou ploch, coz je dost rusive, protoze to
>blika. Je tam sice nejaka property, ktera udava vyrez ve kterem se bude
>kreslit ale je to jenom ReadOnly. Zkousel jsem neco pres vytvareni
>noveho Handle, ale nechodilo to moc dobre.
>
>Roman Palarcik
>roman.palarcik(zv)spt(tec)cz
>Este raz MDI Form a neviditelno
[*] Richard Vdovjak <richo(zv)utcru.sk> - 6.1.1998 12:12:30
>> Problem je vsak v jejich neviditelnosti.
>>
>> Hlavni okno aplikace bylo puvodne typu fsNormal a problemy
>> nastaly az po prepisovani aplikace a zmene hl. formulare
>> na MDI Form.
>musis umistit SpeedButtony na TPanel, TSpeedButton je prvek Delphi
>ktery nepochazi z TWinControl, takze na hlavnim MDI okne pak neni videt.
>Jinak pokud mas Delphi3, tak pouzivej TToolBar misto jednotlivych
>SpeedButtonu (v tom pripade pak neni treba pouzivat zadny TPanel).
Ahoj,
mam k tejto teme este jednu otazku: Da sa nejako na povrch formu, kt.
je nastaveny ako rodicovsky, umiestnit label alebo nejaky obr. tak,
aby ostali viditelne (ako pozadie pre child okna v MDI dok.) ???
Vdaka za kazdu radu,
s pozdravom
Richard Vdovjak.
-----------------------------------------------------------------
mailto: richo(zv)utcru.sk or vdovjak(zv)usa.net
homepage: http://www.utcru.sk/~richo/
ICQ: 3283282
ach tie reporty
[*] Richard Vdovjak <richo(zv)utcru.sk> - 6.1.1998 12:38:00
Zdravim vsetkych
Podarilo sa niekomu presvedcit komp. QRCompositeReport, aby tlacil
viacero reportov a to este nalezato (landscape)20
blizsi popis:
mam vytlacit report o dost polozkach, kt. sa mi ledva zmesti na 2 xA4 landscape.
(Aby nedoslo k omylu, jeden(kazdy) riadok z toho reportu je taky siroky.)
Teraz to riesim tak, ze kazdu stranu mam ako osob. QickReport a tlacim ich
postupne (manualne bez QRCompositeReport-u), tu ale musim celu DB preliezt 2x,
co je v mojom pripade dost velka strata casu.
Myslel som, ze prave na to (aj na to) sluzi spominany komp. QRCompos..., k nemu
som vsak v helpe nenasiel ani slovo a ani upravou demo pr. som ho nedonutil
tlacit strany nalezato. Aj keby sa mi to podarilo, mam pochybnosti, ci by
to riesilo moj prvot. problem (vytlacit "dvoj-report" jednym priechodom DB).
Mozno sa uberam zlym smerom a existuje nejake simple riesenie, nestretli ste
sa niekto s podob. problemom, poradte prosim.
Za kazdu radu vopred dakujem
Richard Vdovjak.
-----------------------------------------------------------------
mailto: richo(zv)utcru.sk or vdovjak(zv)usa.net
homepage: http://www.utcru.sk/~richo/
ICQ: 3283282
Odchytavani hlasek
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 6.1.1998 15:14:04
Jiri Binder wrote:
> > Nevite nahodou nekdo, jak programove odchytit hlasky DOS programu,
> > ktere se vypisuji na konsoli? Kuprikladu spustim-li program
>
> Podobny problem mam take, dotaz do konference byl bez odezvy,
> a prakticky stejny dotaz (tu �m odchytavan� zprav "Ping") take podle
> m� nebyl zodpov�zen.
>
V jine odpovedi Michal Leinweber sice poradil, nicmene velice skoupe.
Takze jsem si pohral jedno dopoledne, a vypadla mi nasledujici
fungujici funkce:
function Shell(AFile,AParam,ADir:string;Memo:TMemo):boolean;
var
lpExitCode : integer;
StartupInfo: TStartupInfo;
ProcessInfo: TProcessInformation;
s:string;
i:integer;
begin
Result:=false;
Memo.Lines.Add('>> '+AFile+' '+AParam);
FillChar(StartupInfo, SizeOf(TStartupInfo), 0);
with StartupInfo do
begin
cb := SizeOf(TStartupInfo);
dwFlags := STARTF_USESHOWWINDOW or STARTF_FORCEONFEEDBACK
or STARTF_USESTDHANDLES;
wShowWindow := SW_HIDE;
CreatePipe(hStdInput,hStdOutput,nil,0);
end;
if CreateProcess(nil,PChar(AFile+' '+AParam),nil,nil,False,
NORMAL_PRIORITY_CLASS,nil,PChar(ADir),StartupInfo,ProcessInfo)
then
begin
WaitforSingleObject(ProcessInfo.hProcess,INFINITE);
if not GetExitCodeProcess(ProcessInfo.hProcess,lpExitCode)
then lpExitCode:=GetLastError;
Result:=lpExitCode=0;
CloseHandle(ProcessInfo.hProcess);
CloseHandle(ProcessInfo.hThread);
end;
with StartupInfo do
begin
SetLength(s,10240);
FileRead(hStdInput,s[1],10240);
for i:=Length(s) downto 1 do
if (s[i]=#13) and (s[i+1]<>#10) then System.Insert(#10,s,i+1);
Memo.Lines.Add(s);
Memo.Lines.Add('');
SetLength(s,0);
CloseHandle(hStdInput);
CloseHandle(hStdOutput);
end;
end;
Myslim, ze to je jasne - je to variace na funkci, ktera tu jiz
obehla, ja jsem pridal jen CreatePipe (a souvisejici veci) a
vypisovani zprav do komponenty Memo.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56
Krystofova 1016, 149 00 Praha 4
CZ
<none>
[*] Patrik Volhejn <Volhejn(zv)kol1.kolej.ujep(tec)cz> - 6.1.1998 19:25:45
Nazdarek
pot�ebuji napsat prohli�e� encyklopedie a pot�ebuji aby obt�kal obr�zky
nevi nekdo jak by se to dalo realizovat ?
za kazdou odpoved moc dik
Cau Patrik
<none>
[*] Pavel Koutny <koutny(zv)netlab.sk> - 6.1.1998 21:44:25
trochu to upresni
;)-[-<>-{
koutny(zv)netlab.sk
-----Original Message-----
From: Patrik Volhejn <Volhejn(zv)kol1.kolej.ujep(tec)cz>
To: DELPHI Distribution List <delphi(zv)io.pinknet(tec)cz>
Date: 6. janu�r 1998 19:32
Subject: <none>
Nazdarek
pot�ebuji napsat prohli�e� encyklopedie a pot�ebuji aby obt�kal obr�zky
nevi nekdo jak by se to dalo realizovat ?
za kazdou odpoved moc dik
Cau Patrik
<none>
[*] Ji�� Lebru�ka - 6.1.1998 22:04:37
1.) Polo�ka SUBJECT je od toho, aby se tam strucne napsalo, o co ti v dopise jde.
2.) Opravdu nevim jak si predstavujes, aby prohlizec obtekal obrazky.
Cau Jirka
-----Original Message-----
From: Patrik Volhejn <Volhejn(zv)kol1.kolej.ujep(tec)cz>
To: DELPHI Distribution List <delphi(zv)io.pinknet(tec)cz>
Date: 6. ledna 1998 19:28
Subject: <none>
Nazdarek
pot�ebuji napsat prohli�e� encyklopedie a pot�ebuji aby obt�kal obr�zky
nevi nekdo jak by se to dalo realizovat ?
za kazdou odpoved moc dik
Cau Patrik
Kresleni v PaintBoxu
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 06.1.1998 22:24:07
roman.palarcik(zv)spt(tec)cz wrote:
>
> Nazdar vsichni,
>
> trochu si nevim rady s kreslenim v PaintBoxu. Komponenta obsahuje
> vpodstate jenom Canvas, pres ktery se kresli. Muj problem je v tom, ze
> na tom provadim urcitou editaci obrazku a casto potrebuju prekreslit
> (pomoci OnPaint) urcitou cast obrazku (jenom vyrez). Jenomze tato
> udalost vzdycky prekresli celou ploch, coz je dost rusive, protoze to
> blika. Je tam sice nejaka property, ktera udava vyrez ve kterem se bude
> kreslit ale je to jenom ReadOnly. Zkousel jsem neco pres vytvareni
> noveho Handle, ale nechodilo to moc dobre.
>
> Roman Palarcik
> roman.palarcik(zv)spt(tec)cz
Ahoj,
zkus pouzit InvalidateRect, snad to pomuze, tady mas jednoduchy priklad:
procedure TForm1.Button1Click(Sender: TObject);
var
R: TRect;
begin
R := Rect(10, 10, 20, 20); // toto je obdelnik v tvem PaintBoxu ktery chces vykreslit
with PaintBox1 do
begin
OffsetRect(R, Left, Top);
InvalidateRect(Parent.Handle, (zv)R, False);
UpdateWindow(Parent.Handle); // <- toto jen pokud jej potrebujes okamzite prekleslit
end;
end;
Pokud pouzivas ale nejake slozitejsi graficke operace, tak pak stoji za uvahu
pouzit TImage a pametovou bitmapu, nebo prime vykreslovani pomoci zpravy
WM_PAINT, ktera obsahuje i informaci o oblasti ktera je pozadovana vykreslit a
tak muzes do jiste miry optimalizovat i svoji vykreslovaci proceduru.
S monopolnim pozdravem :-)
Petr Vones, amatersky programator
Posilane zdrojove kody
[*] Ing. Jindrich Danihelka <jidas(zv)mbox.vol(tec)cz> - 07.1.1998 08:30:12
Simicek Pavel wrote:
>
> Ahoj vsichni a vse nejlepsi do noveho roku!
> Narazil jsem na problem se skompilovanim kodu ktery mi prisel z
> konference postou. Jedna se o kompilacni chybu Line too long, a to i
> treba na praznem radku. Myslim si ze to bude asi problem mailu.
> Pouzivam klasicky Pegasus Mail for Windows. Nevite nekdo jak se
> tohoto zbavit? Nefunguje ani odentrovani koncu radku, ani
> prekopirovani celeho bloku do jineho souboru. Jedine co funguje je
> prekopirovani jednotlivych radku (ale pouze s oznacenim po posledni
> znak).
> Diky za kazdou radu Pavel
>
> -----------------------------------------------------------
> Ing. Pavel Simicek
> UVSSaR, FS, VUT Brno, Technicka 2, 616 69
> Tel. 05/41142461
> e-mail simicek(zv)uvss.fme.vutbr(tec)cz
> -----------------------------------------------------------
Me se podobne problemy vyskytovaly pri prenosu zdrojaku z UNIXU.
Vzdycky mi pomohlo otevrit a ulozit zdrojak editorem Borland Pascal a
bylo po problemech.
--
Ing. Jindrich Danihelka
E-Mail jidas(zv)mbox.vol(tec)cz
Tel. 038/57805
038/7512861
Obtekani obrazku...
[*] Burger Tom� <Tomas.Burger(zv)mius(tec)cz> - 7.1.1998 08:37:34
Zdravim...
> -----P�vodn� zpr�va-----
> Od: Patrik Volhejn [SMTP:Volhejn(zv)kol1.kolej.ujep(tec)cz]
> pot�ebuji aby obt�kal obr�zky
[T.B.]
IE4.0 umi obtekat obrazky... Tzn. nainstalovat spolu s tvoji
encyklopedii a pouzit jako OLE server v kontaineru a data pro
encyklopedii produkovat v HTML...
Trochu silene, ale u M$ budou radi... :))
Tomas
---------------------------------------
Tomas Burger
MIUS v.o.s.
mailto:Tomas.Burger(zv)mius(tec)cz
http://www.teplice-city(tec)cz/
http://staff.mius(tec)cz/~tomasb/
icq:3908757
---------------------------------------
Stisteni klavesy
[*] tomas.mazurek(zv)vitkovice(tec)cz - 7.1.1998 09:11:04
Dobry den,
mel bych jeden dotaz, mozna stupidni, ale momentalne nevim, jak na
to...
Potrebuji se dostat v editacnim okenku na konec textu, ktery je v nem
vlozen. Uzivatel pri zadavani podminek pro filtrovani tabulky zadava
kriteria do editacnich poli. Pro vetsi komfort ma na formulari listu
s tlacitky napr. >, <, >=, apod. Po jejich stisteni se do prislusneho
edit. pole prida prislusny znak. Problem je v tom, ze kurzor je na
zacatku textu a tak uzivatel musi stisknout End a pokracovat v
zadavani podminky.
Neni nic tak tragicky duleziteho, pokud budete mit chut mi odpovedet,
tak predem Dekuji.
Tomas M.Stisteni klavesy
[*] Nykl, Pavel <nykl(zv)satoya(tec)cz> - 7.1.1998 09:15:26
Nastav property SelStart na prislusnou hodnotu a kurzor se ti posune kam
budes chtit.
-----Original Message-----
From: tomas.mazurek(zv)vitkovice(tec)cz <tomas.mazurek(zv)vitkovice(tec)cz>
To: delphi(zv)io.pinknet(tec)cz <delphi(zv)io.pinknet(tec)cz>
Date: 7. ledna 1998 9:12
Subject: Stisteni klavesy
Dobry den,
mel bych jeden dotaz, mozna stupidni, ale momentalne nevim, jak na
to...
Potrebuji se dostat v editacnim okenku na konec textu, ktery je v nem
vlozen. Uzivatel pri zadavani podminek pro filtrovani tabulky zadava
kriteria do editacnich poli. Pro vetsi komfort ma na formulari listu
s tlacitky napr. >, <, >=, apod. Po jejich stisteni se do prislusneho
edit. pole prida prislusny znak. Problem je v tom, ze kurzor je na
zacatku textu a tak uzivatel musi stisknout End a pokracovat v
zadavani podminky.
Neni nic tak tragicky duleziteho, pokud budete mit chut mi odpovedet,
tak predem Dekuji.
Tomas M.
Pouzivani HTML mailu v teto konferenci
[*] Tomas Krecmer <tokr(zv)tmapy(tec)cz> - 7.1.1998 10:33:58
Zdravim vas vsechny a mel bych jednu skromnou prosbu na ty, kteri
pouzivaji v mailu HTML (Microsoft Outlook, Netscape Communicator,..).
Jestli na tom nestoji vas zivot :) chtel bych vas pozadat abyste tuto
moznost ve svem mailu vypnuli a zaradili se tak do rad nas ostatnich,
kteri vystaci s prostym textem.
Dekuji
Tomas
----------------------------------------------------------------------
_____ T-Mapy spol. s r.o. Phone: +420 49 5513335
|_ _| Ing.Tomas Krecmer Fax: +420 49 5513371
| | Nezvalova 850 Email: tokr(zv)tmapy(tec)cz
|_| 500 02 Hradec Kralove
Czech Republic
----------------------------------------------------------------------
T.Burger - IE4, Delphi, OLE...
[*] Pavel Koutny <koutny(zv)netlab.sk> - 7.1.1998 11:21:04
Napad je to pekny, uz som ho videl v nejakom program aj realizovany, no
skusal som to spravit, lenze mi to nechce behat. Takze ak s tym ma niekto
skusenosti, nech poradi, pomoze to iste aj inym ludom.
;)))))
Pavel Koutny, koutny(zv)netlab.sk
-----Original Message-----
From: Burger Tom� <Tomas.Burger(zv)mius(tec)cz>
To: DELPHI Distribution List <delphi(zv)io.pinknet(tec)cz>
Date: 7. janu�r 1998 8:42
Subject: RE: Obtekani obrazku...>Zdravim...
>
>> -----P�vodn� zpr�va-----
>> Od: Patrik Volhejn [SMTP:Volhejn(zv)kol1.kolej.ujep(tec)cz]
>> pot�ebuji aby obt�kal obr�zky
>[T.B.]
>IE4.0 umi obtekat obrazky... Tzn. nainstalovat spolu s tvoji
>encyklopedii a pouzit jako OLE server v kontaineru a data pro
>encyklopedii produkovat v HTML...
>Trochu silene, ale u M$ budou radi... :))
>
>Tomas
>
>---------------------------------------
>Tomas Burger
>MIUS v.o.s.
>
>mailto:Tomas.Burger(zv)mius(tec)cz
>http://www.teplice-city(tec)cz/
>http://staff.mius(tec)cz/~tomasb/
>icq:3908757
>---------------------------------------
>
>Port
[*] V�t�zslav Gazda <softda(zv)mbox.vol(tec)cz> - 07.1.1998 12:53:37
1. Mam dva pocitace propojene kabelem pres LPT1. Nevi nekdo jak zapsat
ne tento port 1 byte a na druhem pocitaci ho zase precist ?. Na
internetu jsem nasel nejake funkce (unita Port95). Pouzil jsem je tak ze
na jednom pocitaci jsem zavolal funkci pro zapis a potom na druhem
pocitaci funkci pro cteni. Na stejnem pocitaci kde jsem hodnotu zapsal
jsem ji i spravne precetl, ale na propojenem pocitaci uz ne.
2. Jak zjistim z meho programu adresy portu ?
Diky za radu
Vita
T.Burger - IE4, Delphi, OLE...
[*] Tibor T�th - 7.1.1998 13:18:07
takze ako s tymi novorocnymi predsavzatiami ??? ziadne .. prestanem fajcit
??? ziadne... nebudem sa flakat ???
-----Original Message-----
From: Pavel Koutny <koutny(zv)netlab.sk>
To: DELPHI Distribution List <delphi(zv)io.pinknet(tec)cz>
Date: 7. janu�r 1998 13:16
Subject: T.Burger - IE4, Delphi, OLE...>Napad je to pekny, uz som ho videl v nejakom program aj realizovany, no
>skusal som to spravit, lenze mi to nechce behat. Takze ak s tym ma niekto
>skusenosti, nech poradi, pomoze to iste aj inym ludom.
>
>;)))))
>
>Pavel Koutny, koutny(zv)netlab.sk
>
>-----Original Message-----
>From: Burger Tom� <Tomas.Burger(zv)mius(tec)cz>
>To: DELPHI Distribution List <delphi(zv)io.pinknet(tec)cz>
>Date: 7. janu�r 1998 8:42
>Subject: RE: Obtekani obrazku...
>
>>Zdravim...
>>
>>> -----P�vodn� zpr�va-----
>>> Od: Patrik Volhejn [SMTP:Volhejn(zv)kol1.kolej.ujep(tec)cz]
>>> pot�ebuji aby obt�kal obr�zky
>>[T.B.]
>>IE4.0 umi obtekat obrazky... Tzn. nainstalovat spolu s tvoji
>>encyklopedii a pouzit jako OLE server v kontaineru a data pro
>>encyklopedii produkovat v HTML...
>>Trochu silene, ale u M$ budou radi... :))
>>
>>Tomas
>>
>>---------------------------------------
>>Tomas Burger
>>MIUS v.o.s.
>>
>>mailto:Tomas.Burger(zv)mius(tec)cz
>>http://www.teplice-city(tec)cz/
>>http://staff.mius(tec)cz/~tomasb/
>>icq:3908757
>>---------------------------------------
>>
>>
>
><none>
[*] tanger <tanger(zv)mbox.vol(tec)cz> - 7.1.1998 13:27:03
Zdravim vsechny,
mam nasledujici problem s Delphi 2.0. Pouzival jsem D2 v rozliseni 1024x768 bez problemu.
Vymenil jsem videokartu na ATI 3D Rage II a pokud nastavim 1024x768, tak se v D2 zmrsi ikony komponent (cernobile smouhy v
obdelniccich), po zmene na 800x600 neni problem. Nepomohla ani opetovna reinstalace D2. Pokud se s tim nekdo jiz
setkal, budu vdecny za radu. Omlouvam se, ze to neni az tak uplne k veci.
S pozdravem Petr Kandera
<tanger(zv)mbox.vol(tec)cz>Sledov�n� zmen souboru
[*] Roman Kanovsky <rkan(zv)ms.anet(tec)cz> - 7.1.1998 14:30:27
Potrebuju vyresit nasledujici problem:
Na serveru WIndows NT mi bezi aplikace, ktera provadi konverzi techto souboru do databaze.
Vzhledem k tomu, ze se tyto soubory casto meni a nelze z urcitych organizacnich duvodu
(ktere mi stejne nejsou jasne) povolit uzivatelum ukladat data do centralni databaze, to v soucasne
dobe provadim tak, ze program periodicky (jednou za 5 min) kontroluje jestli se soubor zmenil
(nebo jestli nejaky pribyl). Pak program provede aktualizaci. Jenze ted se objevil problem s potrebnou
rychlosti aktualizace a rzchlosti zkutecnou.
Vim, ze Windows NT posilaji (nebo muzou?) pri zmene souboru posilat nejakou zpravu. Proto se ptam jak
zjistit, ze se dany soubor zmenil jinak, nez jeho kontrolou a porovnanim ?. Potrebuju sledovat prakticky 1 adresar, ve kterem
je cca 200 souboru (pocet se meni).
Dik
\ /
/ \
|((zv) (zv))|
--------------------ooO-( )-Ooo---------------------
.oooO Roman KANOVSKY
( ) Oooo. rkan(zv)ms.anet(tec)cz
\ ( ( ) HTTP://ms.anet(tec)cz/~rkan/
\ ) ) / PHONE: +420 603/477863
( / TIP PRO VAS: HTTP://www.missonline(tec)cz
MOTO: Kdo pracuje, nema cas bohatnout !
Port
[*] Dalibor Toman <dtoman(zv)lit(tec)czn(tec)cz> - 7.1.1998 15:17:28
1) musite mit spravny typ kabelu (dle nastaveneho rezimu portu =
4bitovy, 8 bitovy, ECP , EPP, atd...,) nejlepsi je nekde splasit kabel
od LapLinku, resp Nortonu, resp. M602,...
2) musite mit pristup k hardwaru portu. Programujete-li pod dosem, pak
no problem
Jste/li pod Win95, pak mozna pomuze ta Vase knihovna (pokud je to ta
co znam,
pak neobsahuje nic svetoborneho - pouze nejake funkce, ktere stejne
obsahuji jen
instrukce vrupu a vystupu, takze by mela jit nahradit obycejnymi
istrikcemi IN a OUT
assembleru.
Jste-li pod WinNT pak je tu problem. K hardwaru portu se nedostanete
bez
systemoveho driveru, ktery komunikaci udela za Vas. A tady neni asi
jina cesta nez
si ho napsat sam.
3)jeste je nutne zvolit si nejaky prenosovy protokol (obycejny a
jednoduchy je nejaky
handshake, tj napr 4 bity jsou data a nejaky zbyly jsou potvrzeni
prijeti
Pokud programujete po DOSem, mozna bych pro Vas mel par zdrojaku v
assembleru. Jiste vsichni znate sqelej program CONNECT! (propojeni
dvou PC do plnohodnotne site - sdileni disku a tiskaren navzajem a
tak),
jehoz jsem autorem (demo na http://www.fortech(tec)cz/connect2.htm ). Tam
jsem
se vyradil na paralelnich a seriovejch portech dost - veril by nekdo,
ze jde
pomoci seriovych portu prenaset data rychlosti 44kB/s (kiloBYTU za
sekundu - samozrejme bez komprimace)?
S pozdravem
Ing. D.Toman <dtoman(zv)fortech(tec)cz>
ICQ: 6584436
>1. Mam dva pocitace propojene kabelem pres LPT1. Nevi nekdo jak zapsat
>ne tento port 1 byte a na druhem pocitaci ho zase precist ?. Na
>internetu jsem nasel nejake funkce (unita Port95). Pouzil jsem je tak
ze
>na jednom pocitaci jsem zavolal funkci pro zapis a potom na druhem
>pocitaci funkci pro cteni. Na stejnem pocitaci kde jsem hodnotu zapsal
>jsem ji i spravne precetl, ale na propojenem pocitaci uz ne.
>
>2. Jak zjistim z meho programu adresy portu ?
>
>Diky za radu
>Vita
>
Jak oznacit bunku v TStringGrid
[*] Tomas Hoplicek <hoplicet(zv)risc.upol(tec)cz> - 7.1.1998 19:39:36
Vsechny zdravim.
Mam maly problem, potrebuji v TStringGridu oznacit nejakou bunku.
Pres SELECTION se mi to nepodarilo.
Dekuji predem za pripadnou odpoved.
Tomas Hoplicek
tomas.hoplicek(zv)upol(tec)cz
begin 600 WINMAIL.DAT
M>)\^(AH2`0:0" `$```````!``$``0>0!(zv)`(````X(zv)0```````#F``$((zv) <`
M& ```$E032Y-:6-R;W-O9G0(zv)36%I;"Y.;W1E`#$(`0V ! `"`````(zv)`"``$$
MD 8`N $```$````0`````P``, (````+``\.``````(!_P\!````2P``````
M``"!*Q^DOJ,0&9UN`-T!#U0"`````$1%3%!(22!$:7-T<FEB=71I;VX(zv)3&ES
M= !33510`&1E;'!H:4!I;RYP:6YK;F5T+F-Z```>``(P`0````4```!33510
M`````!X``S !````%0```&1E;'!H:4!I;RYP:6YK;F5T+F-Z``````,`%0P!
M`````P#^#P8````>``$P`0```!L````G1$5,4$A)($1I<W1R:6)U=&EO;B!,
M:7-T)P```(zv)$+, $````:````4TU44#I$14Q02$E 24\N4$E.2TY%5"Y#6(zv)``
M``,``#D`````"P! .(zv)$````>`/9?`0```!D```!$14Q02$D(zv)1&ES=')I8G5T
M:6]N($QI<W0``````(zv)'W7P$```!+`````````($K'Z2^HQ 9G6X`W0$/5 (`
M````1$5,4$A)($1I<W1R:6)U=&EO;B!,:7-T`%--5% `9&5L<&AI0&EO+G!I
M;FMN970N8WH```,`_5\!`````P#_7P`````"`?8/`0````0````````"F5L!
M!( !`" ```!*86L(zv);WIN86-I="!B=6YK=2!V(%13=')I;F='<FED`'H+`06
M`P`.````S(zv)<!``<`$P`G`"0``P`^`0$(zv)(zv) ,`#(zv)```,X'`0`'`!,`) `"``,`
M&0$!"8 !`"$```!%-T$T04)$0CDX,4)"1#$Q03!%1D%%,#)$040R,#4U00"
M!P$#D 8`K 0``"$````+``(``0````L`(P```````P`F```````+`"D`````
M``,`+(zv)```````P`V``````! `#D`,$-WFIL;O0$>`' ``0```" ```!*86L(zv)
M;WIN86-I="!B=6YK=2!V(%13=')I;F='<FED``(!<0`!````%(zv)````&]&YN:
M/1E5U6*'C!'1DB,``````````!X`'(zv)P!````!0```%--5% `````'(zv)`?# $`
M```1````:&]P;&EC971 =7!O;"YC>(zv)`````#``80L:H(zv). ,`!Q"B````'(zv)`(
M$ $```!E````5E-%0TA.65I$4D%624U-04U-04Q94%)/0DQ%32Q03U1214)5
M2DE65%-44DE.1T=224153UI.04-)5$Y%2D%+3U5"54Y+55!215-314Q%0U1)
M3TY314U)5$].15!/1$%224Q/1 `````"`0D0`0```(\!``"+`0``N (``$Q:
M1G5$COJ)`P`*`')C<&<Q,C47`4,!- M(zv);(zv)X0,#(YG0'W( *D`^,"`&-H"L!
M<V5T,C,X```J=0+A80> ( <3`H '$R#\0T4"(zv)P!0`U00WQ'C!VWW`H ';1+V
M,(zv)1&$_\1XPA5;P>R`H 9R1+S?0J ",(zv)(zv)-CL);PXP-0* "H%U8YL`4 L#8Q-B
M"\0(zv)5A$P`1B ;GD(zv)>F1R8;IV!W N"J(*A J 31'P:B `P&P?P' #8 )(zv)921M
M+"&(zv);W0)<&)UT&II('850%,B8 N !&='!1!D=2!O>(zv)D1X&-I!4!N96IABFL(
M8" BD&YK=2!5!E )< 9!14Q%0U1P24].(!$P(5 BP'2V;R1!(D!D"L #$&\(zv)
M6_Q$924`(K$AL F ((zv)`?T,9A(:$%(&%D;B2A!' ](D!V"8 (zv)6QY&`M$Q(,\L
M/RU.(&4/!#,S#(0O:)\M]0\&%4 #<00(zv)2&\+4#\-X"B0(&4O7B;(zv),6$N:",Q
MMB[&($!U(D!L+OQC>C"G%[(K*Q[#('D;D0(`.' ``P`0$ `````#`!$0````
M``,`(zv)!#_____0 `',,#,`!N;&[T!0 `(,,#,`!N;&[T!"P``(zv) (zv)(zv)!(zv)``````
MP ```````$8``````X4````````#``* "" &``````# ````````1(zv)`````0
MA0````````,`!8 (( 8``````, ```````!&`````%*%``"W#0``'(zv)`E(zv) (zv)(zv)
M!(zv)``````P ```````$8`````5(4```$````$````."XP``,`)H (( 8`````
M`, ```````!&``````&%````````"P`O(zv) (zv)(zv)!(zv)``````P ```````$8`````
M#H4````````#`#" "" &``````# ````````1(zv)`````1A0````````,`,H (
M( 8``````, ```````!&`````!B%````````'(zv)!!(zv) (zv)(zv)!(zv)``````P ``````
M`$8`````-H4```$````!`````````!X`0H (( 8``````, ```````!&````
M`#>%```!`````0`````````>`$. "" &``````# ````````1(zv)`````XA0``
F`0````$`````````'(zv)`]``$````!``````````,`#33]-P``W>0`
`
end
Jak oznacit bunku v TStringGrid
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 07.1.1998 20:20:43
Tomas Hoplicek wrote:
>
> Vsechny zdravim.
>
> Mam maly problem, potrebuji v TStringGridu oznacit nejakou bunku.
> Pres SELECTION se mi to nepodarilo.
>
Zkousel jsem TStringGrid.Selection a funguje to, tohle oznaci 4 bunky:
StringGrid1.Selection := TGridRect(Rect(2, 2, 3, 3)); Petr Vones, amatersky programator
Sledov�n� zmen souboru
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 07.1.1998 20:39:43
> Roman Kanovsky wrote:
>
> Potrebuju vyresit nasledujici problem:
> Na serveru WIndows NT mi bezi aplikace, ktera provadi konverzi techto souboru
> do databaze.
> Vzhledem k tomu, ze se tyto soubory casto meni a nelze z urcitych
> organizacnich duvodu
> (ktere mi stejne nejsou jasne) povolit uzivatelum ukladat data do centralni
> databaze, to v soucasne
> dobe provadim tak, ze program periodicky (jednou za 5 min) kontroluje jestli
> se soubor zmenil
> (nebo jestli nejaky pribyl). Pak program provede aktualizaci. Jenze ted se
> objevil problem s potrebnou
> rychlosti aktualizace a rzchlosti zkutecnou.
>
> Vim, ze Windows NT posilaji (nebo muzou?) pri zmene souboru posilat nejakou
> zpravu. Proto se ptam jak
> zjistit, ze se dany soubor zmenil jinak, nez jeho kontrolou a porovnanim ?.
> Potrebuju sledovat prakticky 1 adresar, ve kterem
> je cca 200 souboru (pocet se meni).
> \___/
> / \
> |((zv) (zv))|
> --------------------ooO-(_)-Ooo---------------------
> .oooO Roman KANOVSKY
> ( ) Oooo. rkan(zv)ms.anet(tec)cz
> \ ( ( ) HTTP://ms.anet(tec)cz/~rkan/
> \_) ) / PHONE: +420 603/477863
> (_/ TIP PRO VAS: HTTP://www.missonline(tec)cz
> MOTO: Kdo pracuje, nema cas bohatnout !
Mozna by jsi mohl pouzit funkce FindFirstChangeNotification.
Na Delphi Super Page (http://sunsite.mff.cuni(tec)cz/delphi/) je na to primo
komponenta v souboru dcnotify.zip.
Petr Vones, amatersky programator
Resource editor
[*] Vaclav Vancura <xycht(zv)blue.sh.cvut(tec)cz> - 7.1.1998 22:04:52
dej hledat lcc-win32.zip :) - je to freewarovej c kompiler a ma i kompletni
resource editor - konecne se nasel interligentni programator :)
Vaclav Vancura, Xycht Design
xycht(zv)blue.sh.cvut(tec)cz
http://blue.sh.cvut(tec)cz/~xycht
>Nevite nekdo o nejakem odkazu na nejaky freeware resource editor, ktery
>umoznuje editovat (ne jen prohlizet nebo vytvaret nove) *.res a *.rc
>soubory pro W95.
>
> S pozdravem
> Zdenek Petruj
>____________________________
>adress: Zebra systems, s.r.o.
> Spartakovcu 3
> 708 00 Ostrava - Poruba
>____________________________
>tel./fax.: +420-(0)69-6912961
> +420-(0)69-6912963
>e-mail: zpetruj(zv)zebra(tec)cz
>internet: http://www.zebra(tec)cz
>
>Komponenty k Internetu
[*] Cash Reform Group s.r.o. <info(zv)cashreform(tec)cz> - 08.1.1998 09:28:36
Ahojky lidi.
Mam takovy dotaz:
Jak je to s licenci ke komponentam na zalozce Internet v Delphi 2.0 (C/S).
Nedavno me zacali pri jejich pouzivani psat neco o tom, ze platnost
beta verze jiz vyprsela.
Diky za radu.
Karel Hudan
packal7 a pII
[*] No Comment Group, s.r.o. / Sales Department <sales(zv)nocomment.sk> - 8.1.1998 23:42:54
musis si niekde zohnat opravenu unitu CRT...
> Jakykoliv programek napsany v Borland Pascalu 7 a
>spusteny na Pentiu II / W98 mi hodi V�DY chybu : "Error 200: Division by
>zero."
Port
[*] V�t�zslav Gazda <softda(zv)mbox.vol(tec)cz> - 08.1.1998 13:49:40
Na zaklade odpovedi od D. Tomana upresnim:
Typ kabelu mam LapLink a programuji pod Windows 95. Funkce o kterych
jsem se zminoval obsahuji instrukce assembleru IN/OUT. Co se tyka toho
komunikacniho protokolu, nemuzu zadny vytvorit dokud se mi nedari
prenest ani 1 byte. Kde teda delam chybu ? Mohl by jste mi poslat ten
nejaky priklad v assembleru ?
Diky moc.
Vita
softda(zv)mbox.vol(tec)cz
TQuery a RequestLive
[*] Vodnansky David <Vodnansky(zv)allianz(tec)cz> - 8.1.1998 14:52:21
Ahoj,
narazil jsem na zajimavy problem - a to nikoliv poprve. Mam TQuery
(Delphi3)
pripojenou na databazi Oracle7 s jednoduchym SQL prikazem rekneme :
select * from uzivatel.tabulka
Pokud tato Query neni "ziva", tj. RequestLive ma hodnotu false, je vse v
poradku.
SQL monitor ukazuje, ze databaze dostala presne tenhle prikaz. Jakmile
ovsem
zmenim RequestLive na true, posle se, kdo vi proc,databazi tento prikaz
ve tvaru:
select * from "uzivatel"."tabulka"
Oracle nasledne vrati chybu, ze tabulka neexistuje. Pokud ovsem zmenim
syntaxi SQL
na :
select * from "UZIVATEL"."TABULKA"
uz funguje vsechno v poradku. Stejny problem jsem pred par lety resil v
Delphi 1, jenom
jsem pozapomnel na tehdy zjistene reseni.
Ma nekdo predstavu, proc to takhle mizerne funguje ? Predevsim proc tam
Delphi cpe
ty uvozovky ? Pan Burian se nam pred casem odhlasil, takze oficialni
reakce asi
nebude, ale pokud nekdo vite jak na to ....
-----------------------------------------------------
David Vodnansky - database analyst
Allianz pojistovna a.s.
tel. +420-2-24405215 fax.24405555
<mailto: vodnansky(zv)allianz(tec)cz>
-----------------------------------------------------
TQuery a RequestLive
[*] Cash Reform Group s.r.o. <info(zv)cashreform(tec)cz> - 08.1.1998 19:30:08
Nazdarek,
zkus odendat ty uvozovky a stejne by to melo fungovat.
Jde o to, ze pokud zadas, ze chces pracovat s tabulkou a nejen ji
prohlizet je potreba uvest skutecne nazvy tabulky, popripade jejich
sloupcu. No a Oracle vsechny nazvy prevadi na velka pismena.
Proto skutecne VSE pis velkymi pismeny.
Takze funkcni prikaz zni:
select * from UZIVATEL.TABULKA
Karel Hudan
At 14:52 8.1.1998 +0100, you wrote:
>Ahoj,
>
>narazil jsem na zajimavy problem - a to nikoliv poprve. Mam TQuery
>(Delphi3)
>pripojenou na databazi Oracle7 s jednoduchym SQL prikazem rekneme :
>
>select * from uzivatel.tabulka
>
>Pokud tato Query neni "ziva", tj. RequestLive ma hodnotu false, je vse v
>poradku.
>SQL monitor ukazuje, ze databaze dostala presne tenhle prikaz. Jakmile
>ovsem
>zmenim RequestLive na true, posle se, kdo vi proc,databazi tento prikaz
>ve tvaru:
>
>select * from "uzivatel"."tabulka"
>
>Oracle nasledne vrati chybu, ze tabulka neexistuje. Pokud ovsem zmenim
>syntaxi SQL
>na :
>
>select * from "UZIVATEL"."TABULKA"
>
>uz funguje vsechno v poradku. Stejny problem jsem pred par lety resil v
>Delphi 1, jenom
>jsem pozapomnel na tehdy zjistene reseni.
>
>Ma nekdo predstavu, proc to takhle mizerne funguje ? Predevsim proc tam
>Delphi cpe
>ty uvozovky ? Pan Burian se nam pred casem odhlasil, takze oficialni
>reakce asi
>nebude, ale pokud nekdo vite jak na to ....
>
>
>-----------------------------------------------------
>David Vodnansky - database analyst
>Allianz pojistovna a.s.
>tel. +420-2-24405215 fax.24405555
><mailto: vodnansky(zv)allianz(tec)cz>
>-----------------------------------------------------
>
>
>Komponenty k Internetu
[*] chaloupka(zv)mboxzn(tec)cz (Chaloupka Pavel) - 8.1.1998 21:07:41
To stejne jsem resil. Na www.borland.com byl loni patch. Na
http://www.borland.com/devsupport/delphi/downloads/index.html.
Jestli je to tam i dnes to nevim, ale jestli to tam nenajdes muzu ti to
poslat.
-----Original Message-----
From: Cash Reform Group s.r.o. <info(zv)cashreform(tec)cz>
To: delphi(zv)io.pinknet(tec)cz <delphi(zv)io.pinknet(tec)cz>
Date: 8. ledna 1998 9:34
Subject: Komponenty k Internetu
>Ahojky lidi.
>
>
>Mam takovy dotaz:
>Jak je to s licenci ke komponentam na zalozce Internet v Delphi 2.0 (C/S).
>Nedavno me zacali pri jejich pouzivani psat neco o tom, ze platnost
>beta verze jiz vyprsela.
>
>
>Diky za radu.
>
>Karel Hudan
Port
[*] chaloupka(zv)mboxzn(tec)cz (Chaloupka Pavel) - 8.1.1998 21:14:29
Ja pouzivam na cteni z serioveho portu komponentu Async32 od VARIAN SOFTWARE
SERVICES NL. Mam pocit, ze jsem to stahoval z DSP. Komponenta je jak pro
seriove porty, tak udajne i pro paralerni. Co takhle zmenit komponentu... ?
-----Original Message-----
From: V�t�zslav Gazda <softda(zv)mbox.vol(tec)cz>
To: DELPHI Distribution List <delphi(zv)pinknet(tec)cz>
Date: 8. ledna 1998 16:08
Subject: Port
>Na zaklade odpovedi od D. Tomana upresnim:
>
>Typ kabelu mam LapLink a programuji pod Windows 95. Funkce o kterych
>jsem se zminoval obsahuji instrukce assembleru IN/OUT. Co se tyka toho
>komunikacniho protokolu, nemuzu zadny vytvorit dokud se mi nedari
>prenest ani 1 byte. Kde teda delam chybu ? Mohl by jste mi poslat ten
>nejaky priklad v assembleru ?
>
>Diky moc.
>Vita
>softda(zv)mbox.vol(tec)cz
>Port
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 08.1.1998 21:21:39
V�t�zslav Gazda wrote:
>
> Na zaklade odpovedi od D. Tomana upresnim:
>
> Typ kabelu mam LapLink a programuji pod Windows 95. Funkce o kterych
> jsem se zminoval obsahuji instrukce assembleru IN/OUT. Co se tyka toho
> komunikacniho protokolu, nemuzu zadny vytvorit dokud se mi nedari
> prenest ani 1 byte. Kde teda delam chybu ? Mohl by jste mi poslat ten
> nejaky priklad v assembleru ?
>
> Diky moc.
> Vita
> softda(zv)mbox.vol(tec)cz
Obavam se, ze primy pristup k portum pod Win32 neni to prave. Ve Windows 95
si to sice muzes dovolit, ale to neni prilis spolehlive. Jedna moznost by
byla napsat/sehnat VxD driver pro pristup k portum (pro Delphi existuje
tusim TVicPort), nebo se pokusit vyuzit paralelni komunikace ve Windows.
Nejsem si tim sice na 100% jisty a nemohu to ani odzkouset, ale mam dojem
ze by mohlo fungovat kdyz otevres LPT1 pomoci CreateFile a budes do nej
zapisovat. Existuje i "LPT1 - Paralelni kabel" jako TAPI zarizeni, to
by mozna slo taky nejak vyuzit (pouziva jej "Prime propojeni kabelem").
Posledni co me jeste napada, ale nevim jestli to neni blbost, je nejak
zapisovat a cist pres DeviceIoControl, snad se k tomuto vyjadri nekdo kdo
tomu rozumi, protoze tato moznost by me docela zajimala. Petr Vones, amatersky programator
Este raz MDI Form a neviditelno
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 08.1.1998 21:26:59
Richard Vdovjak wrote:
> Ahoj,
> mam k tejto teme este jednu otazku: Da sa nejako na povrch formu, kt.
> je nastaveny ako rodicovsky, umiestnit label alebo nejaky obr. tak,
> aby ostali viditelne (ako pozadie pre child okna v MDI dok.) ???
>
Tohle uz je ponekud slozitejsi, lze pouzit zpravu WM_ERASEBGKND z hlavniho
formulare.
Nejaky priklad (MDI Parent Background) je na teto adrese.
http://www.gnomehome.demon.nl/uddf/pages/mdifrm.htm
Petr Vones, amatersky programator
Port
[*] Dalibor Toman <dtoman(zv)lit(tec)czn(tec)cz> - 9.1.1998 08:03:26
>Na zaklade odpovedi od D. Tomana upresnim:
>Typ kabelu mam LapLink a programuji pod Windows 95. Funkce o kterych
>jsem se zminoval obsahuji instrukce assembleru IN/OUT. Co se tyka toho
>komunikacniho protokolu, nemuzu zadny vytvorit dokud se mi nedari
>prenest ani 1 byte. Kde teda delam chybu ? Mohl by jste mi poslat ten
>nejaky priklad v assembleru ?
>Diky moc.
>Vita
>softda(zv)mbox.vol(tec)cz
Nejprve musite vedet jakym zpusobem se pouziva paralelni port k prenosu
dat.
Predpokladam, ze mate obycejny port a pouzijete 4 bitovy prenos dat
(ostatni rezimy
vyzaduji nejake nastaveni portu a opatrnejsi zachazeni)
port ma tri registry (base adresa +0, base+1, a base+2)
Cili base adresa (napr 378h) slouzi k odesilani dat a base+1 (379h) k
prijimani dat
na 379 je tusim celkem 5 bitu schopnych prijmu dat - tedy 4 datove a
jeden ridici
Kabel musi tedy propojit 5 bitu z base na jednom PC s 5 bity base+1 na
druhem PC. Kabel by mel
byt zrcadlove stejny.
filozofie prenosu s handshake je takovato:
mejme 4 bity jako datove, paty bit jesignal data platna (DAV)
Predpokladam, ze nebudete vyuzivat preruseni k inicializaci prenosu dat,
tj prijimac furt ceka na data (jako slave u Nortona).
nastavim datove bity na base port. Pak nastavim DAV na definovanou
uroven. Na druhem PC program ceka az bude na portu base+1 nastaven (cte
furt dokola base+1) bit DAV (zalezi na kabelu kam to pripojite).
nastane-li to, vi, ze mezi daty nactenymi z base+1 jsou platne datove
bity. Prvnimu pc da pote vedet nastavenim DAV na base portu na
definovanou uroven, ze data precetl. Prvni PC musi po odeslani ctverice
testovat prichozi DAV, aby vedel, kdy uz muze posilat dalsi data.
Pri cteni base +1 je treba vedet, ze nektere bity jsou nacitany
invertovane :)
dale je treba pocitat s tim, ze ne vsechny signaly se ustaluji soucasne
(zvlaste meni/li se kazdy na jinou uroven), napr hodiny se mohou ustalit
pri porechodu z 1 na 0 drive nez data z 0 na 1 - je nutne po cteni DAV
bitu nacist base+1 jeste jednou - operace IN a OUT jsou VELMI pomale,
takze jeden IN navic zpravidla staci na ustaleni (a taky na zpomaleni
prenosu).
Doporucuju propojit PC a rucne v nejakem debuggeru, ktery umi IN a OUT
(debug z DOSu nebo vynikajici AFDPRO) si cvicne posilat data aby jsi
videl jak to prijde na druhou stranu
Tady je ukazka makra pouziteho v CONNECTu pro prijem jednoho bytu dat ve
4bitovem rezimu
Makro nacte byte s tim, ze provadi i konverzi do puvodni podoby (nektere
bity na base+1 jsou invertovany)
CtrInPort je base+1
llClockSignal = 80h
Makro je optimalizovano na rychlost prenosu dat nikoliv na delku kodu :)
;=======================================================================
=====
; Makro na prijem jednoho bytu
; vstupni podminky: DS = CS
; DX = CtrlInPort
; vystup : BL = prijaty byte
; pri chybe se skace rovnou z makra na navesti TimeOutRecvP4
;=======================================================================
=====
RecvByteP4 MACRO
LOCAL ClockUp,ClockDown,WaitOnClockUp,WaitOnClockDown
;vstup : DX = CtrlInPort
REPT 5
IN AL,DX
TEST AL,llClockSignal
JZ ClockUp ; test na hodiny v urovni 1
ENDM
MOV SI,flmMaxPeriod
WaitOnClockUp:
IN AL,DX
TEST AL,llClockSignal
JZ ClockUp ; test na hodiny v urovni 1
DEC SI
JNZ WaitOnClockUp
JMP TimeOutRecvP4
ClockUp:
; znovu nacteni dat nutne - pokud se totiz clk signal ustali
; drive nez ostatni bity, byl by casty vyskyt poruch - prijem
; takrka znemoznen
IN AL,DX
MOV BL,AL
MOV AL,01
DEC DX
OUT DX,AL
INC DX
AND BL,78h
SHL BL,1
;------------------- druhy
nibble ---------------------------------------
REPT 5
IN AL,DX
TEST AL,llClockSignal
JNZ ClockDown ; test na hodiny v urovni 0
ENDM
MOV SI,flmMaxPeriod
WaitOnClockDown:
IN AL,DX
TEST AL,llClockSignal
JNZ ClockDown ; test na hodiny v urovni 0
DEC SI
JNZ WaitOnClockDown
JMP TimeOutRecvP4
ClockDown:
; znovu nacteni dat nutne - pokud se totiz clk signal ustali
; drive nez ostatni bity, byl by casty vyskyt poruch - prijem
; takrka znemoznen
IN AL,DX
MOV BH,AL
XOR AL,AL
DEC DX
OUT DX,AL
INC DX
AND BH,78h
SHR BH,3
OR BL,BH
ENDM
Odeslani bytu dat
MaxCurrPeriod je maximalni povolene zdrzeni pri cekani na prijimajici
stranu (timeout) v poctech vykonanych cekacich smycek
;=======================================================================
=====
; Makro na vyslani jednoho bytu dat
; vstupni podminky: DX = BasePort
; BL = vysilany byte
;
; DI = MaxCurrPeriod
;=======================================================================
=====
SendByteWait MACRO
LOCAL WaitLoop1,WaitLoop2,RecvReadyForHigh,RecvReadyForLow
;vstup DX = BasePort (DataOut)
; BL = Data k vyslani
MOV BL,AL ; 1 2 2
SHR AL,4
OR AL,10h
OUT DX,AL ; posli data na bazovy port
MOV BP,DI
INC DX
WaitLoop1:
IN AL,DX
TEST AL,08
JNZ RecvReadyForHigh
DEC BP
JNZ WaitLoop1
DEC DX
JMP ReceiverBad
RecvReadyForHigh:
DEC DX
;------------------- druhy
nibble -------------------------------------------
MOV AL,BL
AND AL,0Fh
OUT DX,AL ; posli data na bazovy port
; (vystup dat a ctrl)
MOV BP,DI
INC DX
WaitLoop2:
IN AL,DX
TEST AL,08
JZ RecvReadyForLow
DEC BP
JNZ WaitLoop2
DEC DX
JMP ReceiverBad
RecvReadyForLow:
DEC DX
ENDM
; kabel zapojen jako u laplinka:
; 378 | 379
;-----------
; 2 <-> 15 DO.0 <-> DI.0
; 3 <-> 13 DO.1 <-> DI.1
; 4 <-> 12 DO.2 <-> DI.2
; 5 <-> 10 DO.3 <-> DI.3 [INTRO <-> INTRI]
; 6 <-> 11 CLKO <-> CLKI POZOR 379 TENTO BIT INVERTUJE
; 25 <-> 25 = GND <=> GND
; datove bity = pin:2,3,4,5 = 378.0-378.3
; CLK bit = pin 6 = 378.4
S pozdravem
Ing. D.Toman <dtoman(zv)fortech(tec)cz>
ICQ: 6584436
Komponenty k Internetu
[*] Ales Zeleny <zelenya(zv)mlp(tec)cz> - 9.1.1998 08:11:25
DDV,
na www borlandu je na to patch...
> Ahojky lidi.
>
>
> Mam takovy dotaz:
> Jak je to s licenci ke komponentam na zalozce Internet v Delphi 2.0 (C/S).
> Nedavno me zacali pri jejich pouzivani psat neco o tom, ze platnost
> beta verze jiz vyprsela.
>
>
> Diky za radu.
>
> Karel Hudan
> +------------------------+ +---------------------------+
|Ales Zeleny OK1UUE| |Ales Zeleny OK1UUE|
|Mestska knihovna v Praze| |Municipal Library of Prague|
|Marianske nam. 1 | |Marianske nam. 1 |
|115 72 | |115 72 |
| | | |
|Tel.: (420)(2)22113 452 | |Tel.: (420)(2) 22113 452 |
|E-mail:zelenya(zv)mlp(tec)cz | |E-mail:zelenya(zv)mlp(tec)cz |
|MIME: ISO-8859-2 OK! | |MIME: ISO-8859-2 OK! |
+------------------------+ +---------------------------+
Multitasking, to je kdyz se aplikace mohou hroutit paralelne.
Multitasking means that applications can crash simultaneously.TQuery a RequestLive
[*] Vodnansky David <Vodnansky(zv)allianz(tec)cz> - 9.1.1998 08:22:24
Ahoj,
jo, mas pravdu, funguje to i bez uvozovek, ale vsude to prepisovat
podruhe uz nebudu. Mezitim se mi
vynoril ve stejnem dotazu dalsi problem :
chci filtrovat Query podle stringove polozky nezavisle na malych/velkych
pismenech. Doted jsem proto uspesne pouzival konstrukci:
WHERE UPPER(sloupec) LIKE :parametr
a v Delphi jsem si hodnotu parametru samozrejme prevedl na uppercase
taky. Jenomze ted u tehle Query nejde nastavit RequestLive - pouze pokud
odstranim funkci UPPER.
Jde to nejak obejit, nebo neco delam spatne ?
-----------------------------------------------------
David Vodnansky - database analyst
Allianz pojistovna a.s.
tel. +420-2-24405215 fax.24405555
<mailto: vodnansky(zv)allianz(tec)cz>
-----------------------------------------------------
> -----P�vodn� zpr�va-----
> Od: Cash Reform Group s.r.o. [SMTP:info(zv)cashreform(tec)cz]
> Odesl�no: 8. ledna 1998 19:30
> Komu: DELPHI Distribution List
> P�edm�t: Re: TQuery a RequestLive
>
> Nazdarek,
>
> zkus odendat ty uvozovky a stejne by to melo fungovat.
> Jde o to, ze pokud zadas, ze chces pracovat s tabulkou a nejen ji
> prohlizet je potreba uvest skutecne nazvy tabulky, popripade jejich
> sloupcu. No a Oracle vsechny nazvy prevadi na velka pismena.
> Proto skutecne VSE pis velkymi pismeny.
>
> Takze funkcni prikaz zni:
> select * from UZIVATEL.TABULKA
>
>
> Proxy firewall, Delphi 3 , HTML,HTTP,FTP controls
[*] VOLTRR1(zv)epr1.ccmail.x400.cez(tec)cz - n 1998 09:52:45 -0700
Hi All!
Nevite nikdo jak se daj nastavi Intranet ActiveX prvky aby pouzivali proxy
firewall.
Nasel jsem nejaky objekt proxy ,ale nevi co s nim.
Radek Voltr
Voltrr1(zv)epr1.ccmail.x400.cez(tec)cz
Pdx, cascade delete v BeforeDelete
[*] Skacel Miloslav <kastner(zv)infos(tec)cz> - 9.1.1998 10:08:14
Ahoj,
mam problem s mazanim zaznamu v 'detail' TTable tabulce (Paradox)
na druhe urovni (Master-Detail-Detail).
Priklad
----------
Vendors-<Products-<Parts
taVendors: TTable
taProducts: TTable
taParts: TTable
// Nize uvedeny priklad pracuje podle ocekavani za podminky ze se nepouzije:
// taProducts.DisableControls
// taParts.DisableControls
//
// V opacnem pripade se spravne smazou pouze 'detail' zaznamy z taProducts
// ale taParts ignoruje Master-Detail spojeni definovane v taParts.MasterSource,MasterFields
// takze v taParts zustanou sirotci
procedure Tdm.taVendorsBeforeDelete(DataSet: TDataSet);
begin
with taProducts do begin
First;
while not EOF do
Delete;
end;
end;
procedure TdmVazane.taProductsBeforeDelete(DataSet: TDataSet);
begin
with taParts do begin
First;
while not EOF do
Delete;
end;
end;
----------
Dekuji za podnety,
S pozdravem
Miloslav Skacel
http://www.kjsoft(tec)cz
Port
[*] V�t�zslav Gazda <softda(zv)mbox.vol(tec)cz> - 09.1.1998 11:28:10
Diky moc D. Tomanovi za jeho prispevek s prikladem. Zatim jsem nemel cas
to vyzkouset, ale uz mam v tomto problemu celkem jasno.
Vita
Typ klavesnice pri spusteni
[*] roman.palarcik(zv)spt(tec)cz - 9.1.98 12:09:39
Nazdar,
uz delsi dobu nevim jak vyresit jeden problem, i kdyz s Delphi zrovna
nesouvisi. Nevite nekdo jestli se da nastavit (bud v zastupci nebo to
udelat nejak jinak) jaka se pouzije klavesnice pri spusteni programu ?
Jde mi napr. o to aby pris spusteni WinZipu se nastavila anglicka
klavesnice, ale pri spusteni jinych programu byla ceska. Urcite
pouzivate taky programy, u kterych pri spusteni hned prepnete na jinou
klavesnici a zdrzuje vas to. Velmi uzitecne to je taky pri spousteni
DOSovych programu. Nenapada vas neco ?
Roman Palarcik
roman.palarcik(zv)spt(tec)cz
ActiveXForm-database
[*] Ing. Josef Kryml <Kryml(zv)uhul(tec)cz> - 9.1.1998 12:46:52
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.
Vazena Delphi konference,
jakym zpusobem zabezpecim komunikaci ActiveX formulare nap�. s
DBgridem zaregistrovaneho a implementovaneho na WWW stranky s SQL
databazi na vzdalenem serveru.
Dekuji za odpoved.
Josef Kryml.
------------------------------------------
Kryml Josef
E-Mail: kryml(zv)uhul(tec)cz
------------------------------------------
------------------------------------------
Kryml Josef
E-Mail: kryml(zv)uhul(tec)cz
------------------------------------------
Rich Edit a oboustranne zarovnavani
[*] Kupka Pavel - IN <xkupp05(zv)st.vse(tec)cz> - 9.1.1998 16:56:32 met-1dst
Nemate nekdo nejaky napad, jak elegantne resit chybejici oboustranne
zarovnavani u paragrafu u komponenty RichEdit (je tam jen doleva,
doprava a doprostred).
Za jakykoliv napad bude vdecny
Pavel Kupka
student Vse
Este raz MDI Form a neviditelno
[*] Richard Vdovjak <vdovjak(zv)usa(tec)net> - 9.1.1998 18:42:34
>> Ahoj,
>> mam k tejto teme este jednu otazku: Da sa nejako na povrch formu, kt.
>> je nastaveny ako rodicovsky, umiestnit label alebo nejaky obr. tak,
>> aby ostali viditelne (ako pozadie pre child okna v MDI dok.) ???
>Tohle uz je ponekud slozitejsi, lze pouzit zpravu WM_ERASEBGKND z hlavniho
>formulare.
>
>Nejaky priklad (MDI Parent Background) je na teto adrese.
>http://www.gnomehome.demon.nl/uddf/pages/mdifrm.htm
> Petr Vones, amatersky programator
Vyskusal som, funguje je to a je to celkom efektne.
Dakujem,
Richard Vdovjak.
---------------------------------------------
mailto: vdovjak(zv)usa.net or richo(zv)frru.utcru.sk
homepage: http://www.utcru.sk/~richo/
ICQ UIN: 3283282
Tel/Fax: +421 844 221 192
Pdx, cascade delete v BeforeDelete
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 09.1.1998 18:58:28
Skacel Miloslav wrote:
>
> Ahoj,
>
> mam problem s mazanim zaznamu v 'detail' TTable tabulce (Paradox)
> na druhe urovni (Master-Detail-Detail).
>
> Priklad
> ----------
> Vendors-<Products-<Parts
>
> taVendors: TTable
> taProducts: TTable
> taParts: TTable
>
> // Nize uvedeny priklad pracuje podle ocekavani za podminky ze se nepouzije:
> // taProducts.DisableControls
> // taParts.DisableControls
> //
> // V opacnem pripade se spravne smazou pouze 'detail' zaznamy z taProducts
> // ale taParts ignoruje Master-Detail spojeni definovane v taParts.MasterSource,MasterFields
> // takze v taParts zustanou sirotci
>
> procedure Tdm.taVendorsBeforeDelete(DataSet: TDataSet);
> begin
> with taProducts do begin
> First;
> while not EOF do
> Delete;
> end;
> end;
>
> procedure TdmVazane.taProductsBeforeDelete(DataSet: TDataSet);
> begin
> with taParts do begin
> First;
> while not EOF do
> Delete;
> end;
> end;
> ----------
>
> Dekuji za podnety,
Ohledne tohoto problemu se pise zde :
http://www.borland.com/devsupport/delphi/ti_list/TI2837.html
Petr Vones, amatersky programator
Print preview
[*] Jiri Binder <binderj(zv)dec59.ruk.cuni(tec)cz> - 9.1.1998 19:35:46
Rad bych jednu svou aplikaci obdaril moznosti
preview.
Nez se do toho pustim hledal jsem co je
k nalezeni po siti, nalezl jsem pouze komponentu
ppriview na DSP.
Nevite nekdo nahodou o dalsich zdrojich inspirace?
Tez jsem patral po inspiraci pro prohlizec PCL souboru
pro HP tiskarny, zatim marne.
Za kazdy hint dekuji
Jiri Binder
Jak centralne odchytnout vsechny chyby?
[*] Honza <honzal(zv)login(tec)cz> - 11.1.1998 15:20:08
Zdar,
Potrebuju neco ... komponentu? - kter� bude bd�t nad v�ema vyskytnutejma
chybama v aplikaci a pokud u zakaznika k nejaky dojde (popripade zbuchne
uplne), tak me to do nejakyho souboru presne vypise co se kde delo.
Tus�m, ze to bude pres Application.OnException, ale nem�m predstavu jak
na to :-(
V archivu nic nen�, a nebo se neumim spravne zeptat.
Diky vsem chytrejsim za jakoukoliv radu :-)
.....................Honza
Jeste zbytkova tlacitka
[*] Zdenek Petruj <zpetruj(zv)zebra(tec)cz> - 11.1.1998 10:39:46
Nedavno jsem tady prisel s problemem ze mi po ukonceni aplikace zustava
vzdy v pruhu aplikaci prazdne zbytkove tlacitko z uz zavrene aplikace.
Nemohl jsem prijit na to cim to je a tak jsem si dal praci a zgruntu
jsem zacal ve zdrojaku zavorkovat abych prisel na to cim se to deje.
Jestli to nekoho bude zajimat tak tady je vysledek - vim co to zpusobuje
ale nevim proc.
Mam hlavni formular s BorderStyle:=bsNone a v OnCreate nastavuji
Left:=0; Top:=0; a protoze aplikace pojede v modu 800x600 tak jsem
nastavoval Width:=800; Height:=600. V tomto pripade mi po zavreni
zustava zbytkove tlacitko. Jestlize ale dam Height:=599 tak je vse OK.
Souvisi to asi s tim ze musi byt splneno Height< velikost obrazovky.
Pokud vi nekdo proc tak napiste.
S pozdravem
Zdenek Petruj
____________________________
adress: Zebra systems, s.r.o.
Spartakovcu 3
708 00 Ostrava - Poruba
Czech republic
____________________________
tel./fax.: +420-(0)69-6912961
+420-(0)69-6912963
e-mail: zpetruj(zv)zebra(tec)cz
internet: http://www.zebra(tec)cz
TToolBar pro Delphi 2
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 11.1.1998 17:58:24
Ahoj,
Nevite kde by se dalo sehnat subj. pokud mozno takovy, aby se pak aplikace
dala bez problemu prelozit i v D3? Vzdyt ToolBar je primo ovladaci prvek
Windows, nechapu proc jej Borland nedal jiz do Delphi 2.
Dekuji.
Petr Vones, amatersky programator
Lokalizace v Delphi 3
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 11.1.1998 18:50:43
Ahoj All
Hledam jeste jednoho dobrovolnika z rad uzivatelu verze Localizator
2, ktery by byl ochoten testovat novou verzi (DPR, EXE, DLL a DPL).
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56
Krystofova 1016, 149 00 Praha 4
CZ
TToolBar pro Delphi 2
[*] Richard Vdovjak <richo(zv)utcru.sk> - 11.1.1998 22:27:19
>Nevite kde by se dalo sehnat subj. pokud mozno takovy, aby se pak aplikace
>dala bez problemu prelozit i v D3? Vzdyt ToolBar je primo ovladaci prvek
>Windows, nechapu proc jej Borland nedal jiz do Delphi 2.
Ja pouzivam:
Toolbar97 version 1.51
by Jordan Russell
email: jordanr7(zv)aol.com
home page: http://members.aol.com/jordanr7
(su k tomu zdrojaky, je to free) sice som to neskusal pod D2, len v D3,
ale podla poznamok, by to malo vyt prelozitelne aj pod D2 (dufam).
s pozdravom
Richard Vdovjak.
-----------------------------------------------------------------
mailto: richo(zv)utcru.sk or vdovjak(zv)usa.net
homepage: http://www.utcru.sk/~richo/
ICQ: 3283282 Audio CD na wav?
[*] roman.palarcik(zv)spt(tec)cz - 12.1.98 05:44:51
A jakou mas CD-ROM a jaky program pouzivas ? S takovou rychlosti jsem
se jeste nesetkal.
Roman Palarcik
roman.palarcik(zv)spt(tec)cz
----------
Od: pytkin(zv)aurius.sk; pytkin(zv)aurius.sk
Komu: midi-audio(zv)io.pinknet(tec)cz
P�edm�t: Re: Audio CD na wav?
Datum: 9. leden 1998 16:20
roman.palarcik(zv)spt(tec)cz wrote:
>
> Existuje na to nekolik programu. Nektere jsou napr. na:
> home.zcu(tec)cz/~pknez/html/mp3.htm
> Lisi se predevsim rychlosti (vetsinou 2-5x pomalejsi nez je delka
> prehravani) a tim, ze nektere jsou shareware a umi treba jen prvni 4
> skladby. Problem je taky s tim, ze ne vsechny CD mechaniky pracuji s
> urcitym programem.
To v prvom rade zavisi od CDROM .. Moja CDROM grabuje 12-20x rychlejsie
ako je dlzka skladby.
Pytkin
problem s BDE a DBF
[*] Tomas Krecmer <tokr(zv)tmapy(tec)cz> - 12.1.1998 07:34:18
Zdravim vsechny,
Mam jeden databazovy dotaz.
SQL SELECT prikaz, ktery propojuje dve tabulky, trva nemistne dlouho,
i kdyz jsou prislusne sloupce indexovany. Pokud tabulky prevedu z
formatu DBF do formatu Paradox, vcetne klicu rychlost vykonavani je
nasobne rychlejsi. Experimentoval jsem s tim dlouhy a cenny cas a
vysledek nula. Pokud mi muzete v teto veci napomoci byl bych vam
moc zavazany.
Mejte se
Tomas Krecmer
----------------------------------------------------------------------
_____ T-Mapy spol. s r.o. Phone: +420 49 5513335
|_ _| Ing.Tomas Krecmer Fax: +420 49 5513371
| | Nezvalova 850 Email: tokr(zv)tmapy(tec)cz
|_| 500 02 Hradec Kralove
Czech Republic
----------------------------------------------------------------------
Typ klavesnice pri spusteni
[*] Pavel Zichovsky <jesnem(zv)ova.pvtnet(tec)cz> - 12.1.1998 07:36:08
> Nazdar,
>
> uz delsi dobu nevim jak vyresit jeden problem, i kdyz s Delphi zrovna
> nesouvisi. Nevite nekdo jestli se da nastavit (bud v zastupci nebo to
> udelat nejak jinak) jaka se pouzije klavesnice pri spusteni programu ?
> Jde mi napr. o to aby pris spusteni WinZipu se nastavila anglicka
> klavesnice, ale pri spusteni jinych programu byla ceska. Urcite
Bojim se, ze to nastavuji automaticky Win podle toho, co je v
ovladacich panelech nastaveno jako "vychozi jazyk" Mozna to jde
zmenit nejakou API funkci, ale v zastupci na 99.99% ne.
> pouzivate taky programy, u kterych pri spusteni hned prepnete na jinou
> klavesnici a zdrzuje vas to. Velmi uzitecne to je taky pri spousteni
> DOSovych programu. Nenapada vas neco ?
V DOS porgramech se nastavi ta klavesnice, ktera je definovana v
config.sys a autoexec.bat (podle Country). Ja mam country vyhozeny,
takze mam automaticky anglickou klavesnici. Kdyz chci jinou, tak si
spustim pro to okno DOSovy ovladac klavesnice
S pozdravem
Pavel Zichovsky <jesnem(zv)ova.pvtnet(tec)cz>
----------------------------
PGP podporovano a vitano
TToolBar pro Delphi 2
[*] Burger Tom� <Tomas.Burger(zv)mius(tec)cz> - 12.1.1998 07:59:35
Pouzivam tutez verzi v D2 bez sebemensich problemu....
Tomas
> -----P�vodn� zpr�va-----
> Od: Richard Vdovjak [SMTP:richo(zv)utcru.sk]
> Ja pouzivam:
> Toolbar97 version 1.51
> by Jordan Russell
> email: jordanr7(zv)aol.com
> home page: http://members.aol.com/jordanr7
>
> (su k tomu zdrojaky, je to free) sice som to neskusal pod D2, len v
> D3,
> ale podla poznamok, by to malo vyt prelozitelne aj pod D2 (dufam).
>
> Print preview
[*] Radek Docekal <proj(zv)zvt.csas(tec)cz> - 12.1.1998 09:05:48
Pokud pouzivas QuickReport (D2 a D3), pak je preview soucasti examplu.
S pozdravem
Radek Docekal
<proj(zv)zvt.csas(tec)cz>
-----Original Message-----
From: Jiri Binder <binderj(zv)dec59.ruk.cuni(tec)cz>
To: delphi(zv)io.pinknet(tec)cz <delphi(zv)io.pinknet(tec)cz>
Date: 9. ledna 1998 18:31
Subject: Print preview
Rad bych jednu svou aplikaci obdaril moznosti
preview.
Okno pro kompiler massages
[*] roman.palarcik(zv)spt(tec)cz - 12.1.98 09:38:26
Kdyz kliknes pravym tlacitkem do toho spodniho okenka, tak je tam na to
volba (asi 3 zespodu - nemam ted spustene Delphi). Staci ji odskrtnout.
Roman Palarcik
roman.palarcik(zv)spt(tec)cz
----------
Od: simicek(zv)uvss.fme.vutbr(tec)cz; simicek(zv)uvss.fme.vutbr(tec)cz
Komu: delphi(zv)io.pinknet(tec)cz
P�edm�t: Okno pro kompiler massages
Datum: 12. leden 1998 9:59
<<P�ilo�en� soubor�: OKNOPROK.BIN>>
Ahoj vsichni!
Mel bych dotaz tykajici se prostredi D3. Jak se da zavrit ona spodni
cast editacniho okna slouzici pro kompiler messages a vysledky
vyhledavani. Delam totiz bohuzel jenom na 14'' monitoru v rozliseni
800 x 600 a tak jsem vdecny za kazdy pixel. Vim se se mi to uz jednou
nejak povedlo ale ted ne a ne najit jak. A nebyla to ona moznost kdy se
okno zavre samo po uspesne kompilaci.
Diky za kazdou radu.
Ahoj Pavel
-----------------------------------------------------------
Ing. Pavel Simicek
UVSSaR, FS, VUT Brno, Technicka 2, 616 69
Tel. 05/41142461
e-mail simicek(zv)uvss.fme.vutbr(tec)cz
-----------------------------------------------------------