Archív konference Delphi

Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.

Multi SQL stat.

[*] Martin Sasek <sasek(zv)ujep(tec)cz> - 1.9.1998 14:40:34

Jakym zpusobem lze z aplikace poslat na server (InterBase) vice SQL dotazu
najednou (INSERT) ?

Dekuji

Martin Sasek
sasek(zv)ujep(tec)cz

TTable - FindNext

[*] Martin Bab�k <M.Babik(zv)mus(tec)cz> - 1.9.1998 14:57:39

Toto je zpr�va ve form�tu MIME obsahuj�c�n�kolik ��st�.

Zdravim vsechny privrzence DELPHI!
Nevi nekdo z vas jak najit pomoc� komponenty TTable v urcitem poli dalsi polozku se stejnou hodnotou? Diky, a zaroven dekuji vsem prispevovatelum za jejich nemalou pomoc.

M&B


String Grid

[*] Marek Soukup <marek(zv)comberg(tec)com> - 01.9.1998 14:59:35

Ahoj delfini,
potreboval bych ve StringGridu odlisit urcite radky jinou barvou
podkladu. Vse v Delphi 1. Jde to ?
Marek Soukup

Beh na pozadi

[*] Milan Vorisek <vorisek(zv)igtt(tec)cz> - 1.9.1998 15:00:06

> >> Mam v D1 aplikaci, ve ktere spustim casove narocnou rutinu,
> >> obsahujici Application.ProcessMessages. Prubeh zpracovani teto
> >>rutiny zobrazuji v ListBoxu. Kdyz vsak chci posunout radky textu v okne
> >>ListBoxu, zastavi se beh rutiny po dobu stisku tlacitka mysi nad
> posuvnikem.
> >>Lze s tim neco delat?

Neslo by pouzit Timer? Udalost OnTimer funguje i v tomto
pripade.

M.Vorisek


Off-topics: konference WinNT

[*] Milan Vorisek <vorisek(zv)igtt(tec)cz> - 1.9.1998 15:04:53

---------
> Odes�latel: Ales Bukovsky <elidisp(zv)mbox.vol(tec)cz>
> Predem se omlouvam za off-topics, ale predpokladam, ze je tu vysoka
> pravdepodobnost toho, ye mi nekdo poradi...
>
> Nevi nekdo adresu na konferenci o Windows NT (moderovanou cesky nebo
> anglicky)? Predem diky...


Na http://www.zdtips.com jsou listservery na ruzna temata.
Mimo jine Windows NT i Delphi.
M.V.

BMP >> PCX

[*] Ing. Jaroslav K�e�ek - 1.9.1998 15:11:38

Pokud mas BMP natazenou do TBitmap, tak k barve jednotlivych pixelu se
dostanes pres TBitmap.Canvas.Pixels[x,y] Vysledek je typu TColor. Existuje
funkce ColorToRGB, ktera Ti vrati longint hodnotu a pomoci funkci GetGValue,
GetBValue a GetRValue ziskas jednotlive slozky R, G, B.

Jinak format PCX mas asi popsany v Tvem ydroji. Pro jistotu pisu, co vim:

Pouziva se u nej RLE komprese, priznak opakovani je detekovan nastavenim
prvnich dvou bitu na 1. Je mozne taky ukladat i nekomprimovana data.
Hlavicka souboru ma prostor pouze pro 16-barevnou paletu. Pokud potrebujes
vetsi, dej ji na konec souboru (musi tam byt nejaky priznak pritomnosti
palety. Nevim z hlavy jaky.) Obrazova data se ukladaji v komprimovane podobe
po jednotlivych rovinach R, G, B.

Pokud by jsi mel nejake problemy s formatem, ex. skvela knizka:
"Encyklopedie grafickych formatu II" (J.D.Murray). Tam je uplne vsechno, co
bys' mohl potrebovat. Ja ji nemam, ale sezene se v knihovnach. Jinak stoji
895Kc a vydal ji Computer press.

PS.: Usmev!!! Jsou i podstatne horsi formaty. ;-)

Pevne nervy preje Jarda


~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Ing. Jaroslav Krecek
computer graphic & software development
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
e-mail: grafex(zv)iol(tec)cz or krecek(zv)iol(tec)cz
for short quick message use
jaroslav.krecek(zv)sms.paegas(tec)cz
phone: +420.603.226103
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~


-----P�vodn� zpr�va-----
Od: David_Zabensky.UNION(zv)union(tec)cz <David_Zabensky.UNION(zv)union(tec)cz>
Komu: DELPHI Distribution List <delphi(zv)pinknet(tec)cz>
Datum: 1. z��� 1998 10:56
P�edm�t: BMP >> PCX


>Dotaz na nejakeho grafickeho guru v Delphi (ci C++)
>
>pred casem jsem psal prosbicku o poskytnuti nejake male rutiny pro konverzi
>z BMP do PCX. Nasel jsem si na inetu komponentu, jenz to umi. Bohuzel vsak
>uklada data do souboru - a ja bych to potreboval ulozit do streamu.
>Vzhledem k tomu, ze grafika neni zrovna me hoby, dela mi problem ulozit 4
>PCX roviny - R, G, B a intenzitu. Podarilo se mi ulozit paletu BMP ale
>nevim jak dale. Mam k dispozici zdrojak v Turbo Pascalu, ale tam se ty 4
>hodnoty ctou primo z karty. Predpokladam ze v prostredi Win 3.11 to
>zajistuje samo Windows. Nevim vsak jak to vytahnout (vim ze fce GetRValue,
>GetGValue, GetBValue vraci RGB bodu (resp. pixelu)) intenzitu. Najde si
>nejaka dobra duse a pomuze?
> Stacilo by mi ukladat data v 2 barevnem modu.
>
>Dekuji David;
>
>

Vytvoreni a volani funkce

[*] Prantl Zden�k <Zdenek.Prantl(zv)pvt(tec)cz> - 1.9.1998 16:42:40

> -----Original Message-----
> From: Lukes V�clav [SMTP:Vaclav.Lukes(zv)pvt(tec)cz]
> Sent: Tuesday, September 01, 1998 2:05 PM
> Subject: Vytvoreni a volani funkce
>
> Rad bych si vytvoril nejakou funkci, treba pokus, kterou nebudu volat s
> zadnym parametrem a ona mi vrati dve nejake hodnoty.

A nechtel bys toho po te funkci trochu moc ? 8-)
Nelze (aspon o tom nevim) to udelat tak, aby funkce bez parametru vracela
vice jak jednu hodnotu.
Jedine reseni, ktere mne napada je, ze by fce plnila nejake globalni
promenne a jako result by ti vratila, zda mas tyto globalni promenne
testovat (zda je naplnila v poradku). Samozrejme, ze mezi volanim dane fce a
otestovanim prislusnych promennych si ty promenne nesmis nicim jinym
prepsat.

ZdeP
prantl(zv).ptc.pvt(tec)cz

Vytvoreni a volani funkce

[*] kchmel(zv)post(tec)cz - 1.9.1998 16:50:54

No, ja bych to resil asi takhle:

procedure pokus (var a: string; var b: word)
begin
...
a := ....
b := ...
end;

a volal bych to

Pokus (X,Y)


Karel

>
> Ahoj,
>
> mam dotaz na zakladni veci Delphi - vytvoreni a volani funkce.
> Rad bych si vytvoril nejakou funkci, treba pokus, kterou nebudu volat s
> zadnym parametrem a ona mi vrati dve nejake hodnoty.
>
> Jsem z toho nak mimon.
>
> Vasek
>
>
>
> E-mail: lukes(zv)msm.pvt(tec)cz
> Tel.: 0603-511247
>
>

Vytvoreni a volani funkce

[*] Ing. Lubo� Langer <langer(zv)gymzn(tec)cz> - 1.9.1998 17:04:31

> From: Lukes V�clav <Vaclav.Lukes(zv)pvt(tec)cz>
> To: "'delphi(zv)pinknet(tec)cz'" <delphi(zv)pinknet(tec)cz>
> Subject: Vytvoreni a volani funkce
> Date: Tue, 1 Sep 1998 14:04:58 +0200
> Reply-to: DELPHI Distribution List <delphi(zv)pinknet(tec)cz>

No to je sp� na u�ebnici Pascalu ne� na konferneci Delphi.

> Ahoj,
>
> mam dotaz na zakladni veci Delphi - vytvoreni a volani funkce.
> Rad bych si vytvoril nejakou funkci, treba pokus, kterou nebudu volat s
> zadnym parametrem a ona mi vrati dve nejake hodnoty.
>
> Jsem z toho nak mimon.
>
> Vasek
>
>
>
> E-mail: lukes(zv)msm.pvt(tec)cz
> Tel.: 0603-511247
>
>
Ing. Lubo� Langer
langer(zv)gymzn(tec)cz


Vytvoreni a volani funkce

[*] Michal Brabec <mbrabec(zv)ciglersw(tec)cz> - 1.9.1998 17:06:45

Cau,
mas dve moznosti:
bud si nadefinovat typ record ve kterym budou obe dve hodnoty a tento typ
budes vracet funkci:
type
TMujTyp= record
X : typ;
Y : typ;
end;

function Pokus : TMujTyp;

a volat to budes napr.
with Pokus do begin {prace s x};{praces y}end;

Druha moznost je ta, ze nebudes to delat jako fci, ale jako proceduru, ktera
bude mit dva varovy parametry (do tech procedura muze ukladat vysledek -
kompilator vlastne udela to, ze se fyzicky odkaze na promenny, ktery mu
predas):

procedure Pokus(var x: typ; y: typ);

a volat to budes napr.
Pokus(Promenna 1, Promenna 2);

Michal, mailto:mbrabec(zv)ciglersw(tec)cz

> -----Original Message-----
> From: Lukes V�clav [mailto:Vaclav.Lukes(zv)pvt(tec)cz]
> Sent: Tuesday, September 01, 1998 2:05 PM
> To: 'delphi(zv)pinknet(tec)cz'
> Subject: Vytvoreni a volani funkce
>
>
> Ahoj,
>
> mam dotaz na zakladni veci Delphi - vytvoreni a volani funkce.
> Rad bych si vytvoril nejakou funkci, treba pokus, kterou nebudu volat s
> zadnym parametrem a ona mi vrati dve nejake hodnoty.
>
> Jsem z toho nak mimon.
>
> Vasek
>
>
> E-mail: lukes(zv)msm.pvt(tec)cz
> Tel.: 0603-511247
>
>

Vytvoreni a volani funkce

[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 1.9.1998 17:30:51

Haj hou!>mam dotaz na zakladni veci Delphi - vytvoreni a volani funkce.
>Rad bych si vytvoril nejakou funkci, treba pokus, kterou nebudu volat s
>zadnym parametrem a ona mi vrati dve nejake hodnoty.


8-)

Funkce vraci vzdy jen JEDNU JEDINOU HODNOTU !!! Pokud si prejes vracet vice
hodnot, musis bud dodatecne hodnoty vracet v parametrech predanych odkazem
(VAR parametry), nebo vracet hodnotu jako strukturu hodnot, napr. jako
RECORD, nebo POINTER na strukturu, pripadne jako OBJEKT.

>Jsem z toho nak mimon.


Se nedivim :-)

HTH

Kopirovani

[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 1.9.1998 17:33:15

Haj hou!

Pokud mas D3 nebo D4, pak muzes s uspechem pouzit Component Template
(oznacis komponenty a v menu Component/Create component template vytvoris
pseudokomponent na palete. Ten pak vlozis do noveho projektu).

>mam nasledujici problemek. Potreboval bych nekolik objektu prekopirovat
>do noveho projektu (neni problem Ctrl-C a Ctrl-V). Ale existuje nejaka
>moznost, aby se prekopirovaly i s eventama?


HTH

MySQL

[*] Boris Pe�ka <baris(zv)email(tec)cz> - 1.9.1998 17:35:49

Toto je zpr�va ve form�tu MIME obsahuj�c�n�kolik ��st�.

Zdrav�m !

Cht�l bych se zeptat, jak� m�te zku�enosti s MySQL, kolik to stoj�,
jak je to v�konn� v porovn�n� t�eba se Sybase SQL Anywhere a tak podobn�. d�ky v�em za odpov��

Boris


BMP >> PCX

[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 01.9.1998 17:46:34

A pro ty kdo snad jeste nemaji zabookmarkovano je tady:

http://www.wotsit.org/

velmi pekna stranka o vsech moznych i nemoznych formatech. ;)

Mac

Ing. Jaroslav K�e�ek wrote:
> Pokud by jsi mel nejake problemy s formatem, ex. skvela knizka:

Vytvoreni a volani funkce

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 1.9.1998 19:18:03

> mam dotaz na zakladni veci Delphi - vytvoreni a volani funkce.
> Rad bych si vytvoril nejakou funkci, treba pokus, kterou nebudu volat s
> zadnym parametrem a ona mi vrati dve nejake hodnoty.

Tak to tezko, viz. ucebnice Pascal - toto totiz neni zakladni
vec Delphi, ale Pascalu. Mas v podstate ctyri moznosti, jak
to udelat:

1. Result funkce bude record nebo objekt, ktery bude obsahovat
dve nebo vice polozek.

2. Result funkce bude ukazatel na record nebo objekt, kde jsou
data ulozena.

3. Funkce zapise hodnoty do globalnich promennych, recodru,
objektu...

4. Funkce nebude funkce, ale procedura s parametry volanymi
odkazy, tedy procedure Pokus(var A, B: Integer), kdyz se ti
vysledek ulozi do parametru A a B.

S pozdravem
Petr Zahradnik, pocitacovy expert

Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================

String Grid

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 01.9.1998 19:23:28

Marek Soukup wrote:
>
> Ahoj delfini,
> potreboval bych ve StringGridu odlisit urcite radky jinou barvou
> podkladu. Vse v Delphi 1. Jde to ?
> Marek Soukup

Ahoj,

Jde to pomoci udalosti OnDrawCell, takhle treba obarvis kazdy treti radek
cervene. Priklad je sice v D4, ale melo by to fungovat i v D1:

procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
begin
with TStringGrid(Sender) do
begin
if not (gdSelected in State) and (ARow mod 3 = 0) then
begin
Canvas.Brush.Color := clRed;
Canvas.FillRect(Rect);
Canvas.TextRect(Rect, Rect.Left + 2, Rect.Top + 2, Cells[ACol, ARow]);
end;
end;
end;
--
Petr Vones, amatersky programator


TTable - FindNext

[*] Ji�� Heinisch - 1.9.1998 19:40:15

To myslis ve stejnem record nebo jinem
napis

HeiJu

heinisch(zv)post(tec)cz

-----P�vodn� zpr�va-----
Od: Martin Bab�k <M.Babik(zv)mus(tec)cz>
Komu: Konference <delphi(zv)pinknet(tec)cz>
Datum: 1. z��� 1998 15:57
P�edm�t: TTable - FindNext


>
> Zdravim vsechny privrzence DELPHI!
>Nevi nekdo z vas jak najit pomoc� komponenty TTable v urcitem poli dalsi
polozku se stejnou hodnotou? Diky, a zaroven dekuji vsem prispevovatelum za
jejich nemalou pomoc.
>
> M&B
>

MySQL

[*] Rudolf Balada <rudolf.balada(zv)parlament(tec)cz> - 1.9.1998 20:16:33

MySQL pouzivam, ale (bohuzel pro tebe) ne s Delphi. ODBC ovladac je nejaky
divny (podle mne ODBC obecne) a SQL link k nemu dozajista nebude.
Rychlejsi nez Sybase je zcela urcite, vsak se koukni na http://www.tcx.se/
tam nekde jsou ty testy zverejnene. Maji tam popsanou i licencni politiku,
ktera je dost vyhodna - zdarma krome Win NT, kde se plati. Je to zdarma pro
vlastni pouziti (ne NT platformy), ale pokud to chces sirit jako soucast
nejakeho reseni, tak musis platit (na vsech platformach).
Ja MySQL pouzivam jen na Linuxu s PHP3 pro zverejnovani databazi na webu
(kam se hrabe MS IIS s MS SQL).
Pouziti v Delphi bude dost obtizne uz proto, ze neumi relace mezi tabulkama
atd., zato je to zdarma vcetne src (UNIX).
Jestli ale opravdu chces pouzivat Sybase SQL Anywhere, tak radeji vyvijej ve
vyvojovych prostredcich Powersoftu ... prece jen lepe komunikuji se Sybase
SQL Anywhere. (sorry za reklamu, ale Delphi me zrovna moc nepresvedcila o
dostatecne schopnosti komunikace se Sybase SQL Anywhere)

Rudolf Balada
kancler(zv)parlament(tec)cz

PS: S MySQL necekas, MySQL ceka na tebe ...
-----Original Message-----
From: Boris Pe�ka [mailto:baris(zv)email(tec)cz]
Sent: Tuesday, September 01, 1998 5:36 PM
To: Delphi
Subject: MySQL


Zdrav�m !

Cht�l bych se zeptat, jak� m�te zku�enosti s MySQL, kolik to stoj�,
jak je to v�konn� v porovn�n� t�eba se Sybase SQL Anywhere a tak
podobn�. d�ky v�em za odpov��


Boris


BDE Callback & Interbase

[*] Ales Zeleny <zelenya(zv)mlp(tec)cz> - 1.9.1998 20:31:07

DDV,

pouziva tu nekdo BDE callback fce na InterBase? Jedna se mi o cbGenProgress a
pokud mozno o fci, ktera by umoznovala canel (legalni uvolneni handelu DSQL...).

Pripoustim, ze s tim progress-em to neni uplne jednoduche (tedy pro SQL
server), ale v manualu jsem nenasel jedinou zminku, ze na ISQL servey se to
nema pouzivat.

Priklady VELMI vitany.

a.+------------------------+ +---------------------------+
|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.

MySQL

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 1.9.1998 22:03:57

> Jestli ale opravdu chces pouzivat Sybase SQL Anywhere, tak radeji vyvijej ve
> vyvojovych prostredcich Powersoftu ... prece jen lepe komunikuji se Sybase
> SQL Anywhere. (sorry za reklamu, ale Delphi me zrovna moc nepresvedcila o
> dostatecne schopnosti komunikace se Sybase SQL Anywhere)

Komunikace vyvojovych nastroju Powersoftu s Sybase SQL Anywhere sice mozna
bude lepsi, jenze na druhou stranu se v tom neda vyvijet tak rychle
a kvalitne, jako se da v Delphi. Pro SQL Anywhere pro Delphi je Titan,
jenze je zatim verze jen pro D1-3 a ja mam D4. Kdyz jsem mel jeste
nainstalovany D3, moc jsem toho nestihl otestovat, takze cekam, az
vyleze verze pro D4. Beta by snad mela byt co nevidet, ostrou verzi
slibuji na rijen...

S pozdravem
Petr Zahradnik, pocitacovy expert

Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================

Poradte budoucimu zacatecnikovi

[*] �ke��k Jaroslav�������6�����̿ - 1.9.1998 22:50:22

Pozor, Inprise nachystal jednu velikou zradu, uz se tu o tom mluvilo,
ze z programu napsaneho pod Delphi Professional nelze pristupovat na
databaze pomoci SQL Links. Snad jedine Interbase, ale tim si nejsem
tak jist. Strucne receno - Standard muze jen na lokalni tabulky,
nedokaze ani SQL Links ani ODBC; Professional muze na lokalni tabulky
a na ODBC, nikoliv na SQL Links; ty muze pouzivat jen Client/Server.
SQL Links pro Delphi nelze dokoupit! Na to si dejte vazne bacha,
protoze se o tom nic moc nemluvi, nicmene je to tak.
-----
Tedy nechtel bych zpusobit nejakej zmatek. Nevim jak je to u ostatnich
databazi, ale s D4 Professional jsem se na Interbasi dostal pomoci
SQL linku z D3 C/S. Protoze k D3 bylo mozno dokoupit samostatne,
myslel jsem, ze to pujde i pro D4. Ty linky pro D3 snad zustavaji v prodeji
a jak se zda jsou pouzitelne i pro D4. Zrejme tam neni zadna zmena
ani parymetry v BDE tomu nenasvedcuji. Nevsiml jsem si zadne zmeny.
-----
Pozor, pokud si nekdo koupi Delphi Professional, nemuze opravdu
pristupovat na InterBase pres SQL Links.
----
Nevim jak presne je to s koupi a s licenci. Jeste jsem se nezajimal, ale
technicky
to mozne je. Mam to vyzkousene.
----
Americani se maji, to se jim to nakupuje, kdyz tam to stoji
tisice dolaru, zatimco tady statisice korun.
-----
Nojo maj se. Oni zase nezazili ten bajecnej skorokomunismus.
Takze nebyl duvod, proc by dolar mel byt v nevyhodnem
kurzu vuci korune. Kazdej ma proste neco.
Americani maji tvrdej dolar a my zase postkomunistickou
ekonomiku s labilni korunou. Nikdo nemuze mit vsechno!
Nechci tu vest politickou polemiku. Ja jen na k tomu
povzdechu, ze "se maj". Nojo maj se. Oni nam za to prilis nemohou.
Kdyz se vsak divam dal na vychod .... brrr., tak si rikam,
ze se taky mame. Jednou se z toho snad vylizem.
Jaro
-----


Carovy kod EAN 13

[*] Zdenek Drvota <zds(zv)pce.fairnet(tec)cz> - 1.9.1998 22:53:46

Nejake TTF s carovymi kody mam (asi 30), ale nevim jestli
je mezi nimi EAN, ja to nepoznam. Ani uz nevim, kde jsem
k nim prisel, snad s nejakou tiskarnou.
Je v nich uvedeno Bear Rock Technologies Corp.
a maji silene nazvy, jako treba C39HrP24DhTt.> From: "Ivo HERLES" <herles(zv)chv.pvt(tec)cz>
> To: "DELPHI Distribution List" <delphi(zv)pinknet(tec)cz>
> Subject: Re: Carovy kod EAN 13
> Date: Tue, 1 Sep 1998 11:50:53 +0200
> Reply-to: DELPHI Distribution List <delphi(zv)pinknet(tec)cz>

> Vim, ze existuji True Type fonty a ze je lze pouzit pro tisk v QReportu
> (videl jsem). Bohuzel je nemam. Je treba se porozhlednout nekde po Inetu.
>
> S pozdravem,
>
> Ivo HERLES
> PVT, a. s., o. z. Chomutov
> e-Mail: ivo.herles(zv)pvt(tec)cz
> tel.: 0396/619216
>
> -----P�vodn� zpr�va-----
> Od: +uhel Petr <cuhel(zv)diamo(tec)cz>
> Komu: 'DELPHI Distribution List' <delphi(zv)pinknet(tec)cz>
> Datum: 1. z߰� 1998 09:24
> P�edm�t: Carovy kod EAN 13
>
>
> >Prijemny den vsem,
> >
> > nemate nahodou odkaz na specifikaci caroveho kodu jak ma
> >vypadat nebo eventuelne komponentu do QReport ktera by je umela
> >tisknout.
> >
> > Dik
>
>
>
*-----------------------------------------------*
ZDS, spol. s r. o.
Ing. Zdenek Drvota, director
Devotyho 775 tel/fax:+420-40-33837
530 02 Pardubice 41691
Czech Republic
e-mail: zds(zv)pce.fairnet(tec)cz (Win1250/ISO-8859-2)
http://www.angelfire.com/biz/zds
*-----------------------------------------------*

MySQL

[*] �ke��k Jaroslav�������6�����̿ - 2.9.1998 00:04:48

Jestli ale opravdu chces pouzivat Sybase SQL Anywhere, tak radeji
vyvijej ve vyvojovych prostredcich Powersoftu ... prece jen lepe komunikuji
se Sybase SQL Anywhere. (sorry za reklamu, ale Delphi me zrovna moc
nepresvedcila o dostatecne schopnosti komunikace se Sybase SQL Anywhere)

Nevim jak zrovna se Sybase SQL Anywhere (s tou pracuje myslim uspesne
Zahradnik)
S Interbase to urcite neni spatne. Delal jsem v PowerBuilder a presel
jsem k Delphi.
Urcite nelituji!
Jaro.

kdo naprogramuje :: : Re: HTML, Delphi, IE4, OLE A

[*] Alaire <alaire(zv)usa(tec)net> - 2.9.1998 00:41:12

Kdo udela za uplatu implementaci FrontPage do vlastni aplikace? Navrhnete
cenu... S Wordem a Officem to neni problem, ale FP tam nemuzu dostat ;-( Asi
proto, ze nemam dokumentaci...

podrobnosti soukromou postou.

al.

-----P�vodn� zpr�va-----
Od: Alaire <alaire(zv)usa.net>
Komu: DELPHI Distribution List <delphi(zv)pinknet(tec)cz>
Datum: 17. srpna 1998 22:51
P�edm�t: HTML, Delphi, IE4, OLE Automation IE4 HTMLed ...> Ahoj,
>
>zkousim neco udelat s HTML soucasti programu v delphi a jako realne vidim 3
>moznosti:
>
>a) dostat FrontPage do wokna me aplikace (Nejde a nejde! Umi to nekdo?
>Proste to neni Word/Excel/Proj98)
> [pokud se toho nekdo chce za uplatu ujmout, cekam na nabidky
>schopnejsich nez ja]
>
>b) dostat tam alespon Explorera a implementovat v nem HTMLed (viz novinka
na
>insidedhtml.com, docela bomba, mozna lepsi nez FP98 Editor! Jen jeste
prijit
>na to jak to efektne sejvnout do souboru nebo treba do SQL serveru)
>
>Dostat IE4 do wokna Delphi aplikace je ale take asi nad neci (me:) sily
>(ackoliv to jiste de, ale asi pres API, nebot HomeSite3 (www.alaire.com)
IE4
>ma uplne transparentne v sobe se vsemi vlastnostmi IE nastaveni) a je tez
>programovana v D3..
>
>Pokud byste meli tip, jak pres API dostat IE4 do wokna aplikace (jen screen
>bez buttonku), tak diky za nej sem.
>
>Al.
>
>

Kopirovani

[*] Milan Schembera <schemberam(zv)avx(tec)cz> - 2.9.1998 06:52:25

> -----Puvodni zprava-----
> Od: Pavel Cisar [SMTP:pcisar(zv)aktis(tec)cz]
> Odeslano: 1. zaoi 1998 17:33
> Komu: DELPHI Distribution List
> Poedmit: Re: Kopirovani
>
> Haj hou!
>
> Pokud mas D3 nebo D4, pak muzes s uspechem pouzit Component Template
> (oznacis komponenty a v menu Component/Create component template vytvoris
> pseudokomponent na palete. Ten pak vlozis do noveho projektu).
>
Template funguje perfektne, ale neuklada si to a tim padem ani
neprekopiruje udalosti. Nad timhle uz jsem nejakou dobu badal a prisel jsem
na to, ze nezbyva nic jinyho, nez mravenci prace s prepisovanim. Maximalne
se da pouzit Code Insight.

S pozdravem

Milan
MIS Dept.
AVX Czech Republic
<mailto:schemberam(zv)avx(tec)cz>

> >mam nasledujici problemek. Potreboval bych nekolik objektu prekopirovat
> >do noveho projektu (neni problem Ctrl-C a Ctrl-V). Ale existuje nejaka
> >moznost, aby se prekopirovaly i s eventama?
>

TTable - FindNext

[*] Martin Bab�k <M.Babik(zv)mus(tec)cz> - 2.9.1998 06:56:33

Pot�eboval bych to v dal��m recordu ve stejn�m sloupci datab�zov� tabulky.
D�k.

M&B
>To myslis ve stejnem record nebo jinem
>napis

HeiJu

heinisch(zv)post(tec)cz

>
> Zdravim vsechny privrzence DELPHI!
>Nevi nekdo z vas jak najit pomoc� komponenty TTable v urcitem poli dalsi
polozku se stejnou hodnotou? Diky, a zaroven dekuji vsem prispevovatelum za
jejich nemalou pomoc.
>
> M&B

Poradte budoucimu zacatecnikovi

[*] Linhart Petr <Petr(zv)manwe.mius(tec)cz> - 2.9.1998 07:33:36

A nemohl by jste nekdo vyzkouset s D4 Prof SQL link treba na MSSQL? Link na
Interbase sel i na D3 Prof.

Petr Linhart, System developer (mailto://Petr.Linhart(zv)mius(tec)cz)
Mius a.s. (http://www.mius(tec)cz)
Dlouha 2940
415 01 TEPLICE
Czech Republic

> -----P�vodn� zpr�va-----
> Od: jaro(zv)zbk(tec)czn(tec)cz [SMTP:jaro(zv)zbk(tec)czn(tec)cz]
> Odesl�no: 1. z��� 1998 22:50
> Komu: DELPHI Distribution List
> P�edm�t: Re: Poradte budoucimu zacatecnikovi
>
> Pozor, Inprise nachystal jednu velikou zradu, uz se tu o tom mluvilo,
> ze z programu napsaneho pod Delphi Professional nelze pristupovat na
> databaze pomoci SQL Links. Snad jedine Interbase, ale tim si nejsem
> tak jist. Strucne receno - Standard muze jen na lokalni tabulky,
> nedokaze ani SQL Links ani ODBC; Professional muze na lokalni tabulky
> a na ODBC, nikoliv na SQL Links; ty muze pouzivat jen Client/Server.
> SQL Links pro Delphi nelze dokoupit! Na to si dejte vazne bacha,
> protoze se o tom nic moc nemluvi, nicmene je to tak.
> -----
> Tedy nechtel bych zpusobit nejakej zmatek. Nevim jak je to u ostatnich
> databazi, ale s D4 Professional jsem se na Interbasi dostal pomoci
> SQL linku z D3 C/S. Protoze k D3 bylo mozno dokoupit samostatne,
> myslel jsem, ze to pujde i pro D4. Ty linky pro D3 snad zustavaji v
> prodeji
> a jak se zda jsou pouzitelne i pro D4. Zrejme tam neni zadna zmena
> ani parymetry v BDE tomu nenasvedcuji. Nevsiml jsem si zadne zmeny.
> -----
> Pozor, pokud si nekdo koupi Delphi Professional, nemuze opravdu
> pristupovat na InterBase pres SQL Links.
> ----
> Nevim jak presne je to s koupi a s licenci. Jeste jsem se nezajimal, ale
> technicky
> to mozne je. Mam to vyzkousene.
> ----
>

Classes

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 2.9.1998 07:39:31

Ahoj all,

nevite nahodou nekdo, jak zjistit seznam trid (podle jejich nazvu),
ktere jsou k dispozici? V Delphi, ale i v programu.


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


BMP >> PCX

[*] David_Zabensky.UNION(zv)union(tec)cz - 2.9.1998 07:57:46

Vsem vam moc dekuji...
David;

Classes

[*] David_Zabensky.UNION(zv)union(tec)cz - 2.9.1998 08:11:09


Snad by ti mohl pomoci Object Browser...
David;

Carovy kod EAN 13

[*] Burger Tom� <tomasb(zv)manwe.mius(tec)cz> - 2.9.1998 08:13:44

Resil jsem to tak, ze jsem od QuickReportu presel na HyperReport, ktery je
umi uz v zakladnim baleni...
Je to shareware asi za $100, ale umi dost veci...
Odkaz je na Delphi Foru (http://www.delphi(tec)cz/).

Tomas


On Tuesday, September 01, 1998 9:18 AM, �uhel Petr [SMTP:cuhel(zv)diamo(tec)cz]
wrote:
> Prijemny den vsem,
>
> nemate nahodou odkaz na specifikaci caroveho kodu jak ma
> vypadat nebo eventuelne komponentu do QReport ktera by je umela
> tisknout.
>
> Dik


Vytvoreni a volani funkce

[*] Dobromil Mal� <Dobromil.Maly(zv)rak.pr.ds.mfcr(tec)cz> - 2.9.1998 08:16:54


Ahoj, slo by to treba takto
type TNavrat = record
Cislo : integer;
Retez : string;
Logic : bool;
end;

function Pokus : TNavrat;
begin
bla bla bla
end;

no a dale je to jasny

Dobra.

----------
Od: Lukes V�clav[SMTP:Vaclav.Lukes(zv)pvt(tec)cz]
Odesl�no: 1. z��� 1998 14:04
Komu: 'delphi(zv)pinknet(tec)cz'
P�edm�t: Vytvoreni a volani funkce


Ahoj,

mam dotaz na zakladni veci Delphi - vytvoreni a volani funkce.
Rad bych si vytvoril nejakou funkci, treba pokus, kterou nebudu volat s
zadnym parametrem a ona mi vrati dve nejake hodnoty.

Jsem z toho nak mimon.

Vasek



E-mail: lukes(zv)msm.pvt(tec)cz
Tel.: 0603-511247


BDE Callback & Interbase

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 2.9.1998 08:25:56

Hi,

sice primo s timhle neporadim, ale mohu doporucit k prozkoumani balicek
IBObject. Je to ke stazeni na http://www.interbase.com a je to i se
zdrojakem. Je tam cosi jako IBAlert, traba to bude ono.


Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz

> -----P�vodn� zpr�va-----
> Od: Ales Zeleny [SMTP:zelenya(zv)mlp(tec)cz]
> Odesl�no: 01. z��� 1998 20:31
> Komu: delphi(zv)pinknet(tec)cz
> P�edm�t: BDE Callback & Interbase
>
> DDV,
>
> pouziva tu nekdo BDE callback fce na InterBase? Jedna se mi o
> cbGenProgress a
> pokud mozno o fci, ktera by umoznovala canel (legalni uvolneni handelu
> DSQL...).
>
> Pripoustim, ze s tim progress-em to neni uplne jednoduche (tedy pro
> SQL
> server), ale v manualu jsem nenasel jedinou zminku, ze na ISQL servey
> se to
> nema pouzivat.
>
> Priklady VELMI vitany.
>
> a.
>
>
> +------------------------+ +---------------------------+
> |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.

Carovy kod EAN 13

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 2.9.1998 08:28:36

> Nejake TTF s carovymi kody mam (asi 30), ale nevim jestli
> je mezi nimi EAN, ja to nepoznam. Ani uz nevim, kde jsem
> k nim prisel, snad s nejakou tiskarnou.
> Je v nich uvedeno Bear Rock Technologies Corp.
> a maji silene nazvy, jako treba C39HrP24DhTt.

Z toho nazvu usuzuji, ze se jedna o typ Code 39.
Ale prosimte, neposilej to do konference, jako to delaji
jini. Napriklad ja nic takoveho nechci, za prve proto,
ze to nepotrebuji, za druhe proto, ze to neni legalni,
protoze ani fonty si nikdo nemuze sirit, jak se mu
zachce.

S pozdravem
Petr Zahradnik, pocitacovy expert

Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================

editacia databazy

[*] Martin Talian <talian(zv)geoplanpp.sk> - 2.9.1998 09:15:37

Zdravim vsetkych,

Mam taky zaciatocnicky dotaz. Mam databazovu aplikaciu. Ak do nej zadavam
data, do komponent TDBEdit, data sa hned zapisu do databazy, resp. zapisu sa
po prechode na iny zaznam cez navigator. Ale ja by som chcel pomocou kodu
najskor skontrolovat spravnost vlozenych dat a az potom povolit, pripadne
zrusit zapis a prechod na iny zaznam. Aky by to islo urobit ?
A druhy dotaz, ako je to s uzamikanim zaznamov v tabulke FoxPro a Acces z
programu Delphi ? Uzamika sa to automaticky cez BDE alebo to musim nejako
aktivovat, prip. da sa nejak z programu toto ovplivnit ?
Je to pre Delphi 2 s BDE 4.51, nativne ovladace pre Fox aj pre Acces.

Vdaka za vsetky odpovede.

Martin

martin(zv)geoplanpp.sk


MS SQL konektivita bez SQL Link, BDE a ODBC

[*] Miroslav BALAZ <mibainfo(zv)internet.sk> - 2.9.1998 09:23:15

Predmet:
Nativne spojenie s MSSQL bez SQL Link a ODBC
(aj pre Standard verziu Delphi)


Vazeni deplphini,

kto ma zaujem o konektivitu na MS SQL z Delphi :

na baze SQL syntaxe

- citanie zaznamov /prevod na
comma separated file (CSV), alebo na adekvatne typy
premennych - okrem typu blob - zatial/
- mazanie zaznamov
- vkladanie a modifikaciu zaznamov /insert, update/
(v podstate vsetky SQL prikazy)
- spustanie SQL dotazov zapisanych v TMemo


s moznostou dalsieho rozsirovania funkcnosti.

Riesenie vychadza z jednoduchej ukazky
"mssql.zip" (autor Ed Lyk) - asi DSP. Obsahuje header file
pre "ntwdblib.dll" (povodny subor z DSP je rozsireny
o deklaraciu niekolkych dalsich funkcii).

Vzhladom na to, ze mam zaujem o spolupracu
pri dalsom rozsirovani, prosim aby sa hlasili pripadni
zaujemcovia len z pomedzi tych, ktori maju k dispozicii
vyssie uvedeny dll subor a MS SQL server.

Mozem konstatovat, ze badanie okolo fungovania
jednotlivych funkcii a struktur bolo nemale a tiez, ze
zostava este niekolko (dost) nevyjasnenych otazok
pre dalsie rozsirovanie moznosti.

Zaujemcom mozem poslat prelozeny header (jeho cast,
lepsie - vyber z dvoch hlavickovych suborov pre C)
a vzorovy priklad (vratane testovania typu dat a pouzitia
SQL prikazov) tesim sa na spolupracu
Miro


String Grid

[*] Marek Soukup <marek(zv)comberg(tec)com> - 02.9.1998 09:30:27

Ahoj,
tak uz to mam diky moc. Nasel jsem na DSP vse co jsem potreboval a jeste
neco navic :-)

ShutDown & Problem so zapisom do tabulky

[*] Jan Fiala <fiala(zv)iname(tec)com> - 2.9.1998 09:34:37

Co takhle si pri kompilaci nastavit promennou treba na True a po konci kompilace ji nastavit zpet na False. A v obsluze ShutDown si ji otestovat - neco jako vlajky

S pozdravem "klid zbran�m a program�tor�m"
se t�� na dal�� spolupr�ci
ing. Jan Fiala jan.fiala(zv)iname.com

Predstavte si program ktory odchytava vsetko to co pride na COM port a raz
za cas to flushne do tabulky (kazdy 100 zaznam povedzme). Mam odchytenu
spravu windows pre shut down, v kotrej by som chcel odpojit zasuvku COM a
flushnut vsetko to co este nie je v tabulke.

Poradte budoucimu zacatecnikovi

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 2.9.1998 09:40:07

> A nemohl by jste nekdo vyzkouset s D4 Prof SQL link treba na MSSQL? Link na
> Interbase sel i na D3 Prof.

To nemusi nikdo zkouset, to proste nejde. Uz jsem o tom psal, uz o tom psal
i Borland, je to i nekde v TI na jejich Webu:

1. Delphi Standard nepracuje s ODBC a SQL Links (zablokovane kompilatorem
v EXE souboru).

2. Delphi Professional nepracuje s SQL Links (zablokovane kompilatorem
v EXE souboru).

3. Jedina vyjimka je u Delphi Professional s SQL Linkem InterBase, protoze
ten je stejny pro lokalni InterBase i sitovou InterBase. No a protoze
v Professional je lokalni InterBase, ktera musi chodit, chodi pak i sitova
InterBase - jako jediny SQL Link.

4. Jenze nemas pravo sirit zadny SQL Link, pokud mas Professional, leda
bys mel predchozi C/S verzi a nebo tu licenci SQL Links, ktera sice neni
urcena pro Delphi, ale to by mohlo byt jedno.

Problem muze nastat, kdyz to eventuelne nekdy Borland uplne zatrhne...
I kdyz na druhou stranu to muze byt cilene - protoze jde jedine
InterBase, ten je take od Borlandu a tedy jim zvysuje trzbu...

S pozdravem
Petr Zahradnik, pocitacovy expert

Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================

Literatura

[*] Martin Bab�k <M.Babik(zv)mus(tec)cz> - 2.9.1998 09:49:02

Toto je zpr�va ve form�tu MIME obsahuj�c�n�kolik ��st�.

Mohl byste mi nekdo doporucit opravdu dobrou literaturu pro DELPHI (ver. 4, a napojeni na databaze), zacinam :-), pokud mozno v cestine, nebo anglictine. Diky.
M&B


TTable - FindNext

[*] Marek Repisk� <mrepisky zl(zv)zsnp.sk> - 2.9.1998 10:05:18

> Zdravim vsechny privrzence DELPHI!
> Nevi nekdo z vas jak najit pomoc� komponenty TTable v urcitem poli dalsi
> polozku se stejnou hodnotou? Diky, a zaroven dekuji vsem prispevovatelum za
> jejich nemalou pomoc.
>
> M&B

Nazdar,

neviem ci to ide priamo fciami Delphi alebo BDE, ale da sa
to jednoducho napisat. Asi takto:

function NextValue(TT:TTable;Column:Integer):boolean;
var
RefVal:string;
begin
RefVal:=TT.Fields[Column].AsString;
repeat
TT.Next;
until TT.Eof or (TT.Fields[Column].AsString=RefVal);
Result:=not TT.Eof;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
if not NextValue(Table1,RadioGroup1.ItemIndex) then ShowMessage('Nenasiel');
end;


Marek Repisky
mrepisky_zl(zv)zsnp.sk


ShutDown & Problem so zapisom do tabulky

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 2.9.1998 10:18:26

Hi,

o tohle tu asi neslo, podle me chce autor dotrazu pozastavit ukonceni
win do doby ukonceni kompilace a zapisu, a pak umoznit ukonceni win -
vse v jednom. Je to tak?


Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz

> -----P�vodn� zpr�va-----
> Od: Jan Fiala [SMTP:fiala(zv)iname.com]
> Odesl�no: 02. z��� 1998 9:35
> Komu: DELPHI Distribution List
> P�edm�t: Re: ShutDown & Problem so zapisom do tabulky
>
> Co takhle si pri kompilaci nastavit promennou treba na True a po konci
> kompilace ji nastavit zpet na False. A v obsluze ShutDown si ji
> otestovat - neco jako vlajky
>

Textovy editor pro Delphi

[*] �ke��k Jaroslav�������6�����̿ - 2.9.1998 10:20:05

Vzhledem k tomu, ze se mi ani po delsim patrani nepodarilo
najit knihovny na schopny editor, pokusim se vyuzit MSWord
pomoci technologie OLE.
Hledam nekoho kdo timto zpusobem pracuje a ma s tim
zkusenosti a byl by ochoten poskytnout pripadne i placenou konzultaci.

Zajima me, zda je mozne takovym zpusobem do textu (napr. hlavicka
a pata stranky) predavat nejake dalsi informace z databaze (cislo smlouv a
pod.)
Dale me zajimaji vsechna mozna omezeni a komplikace vyplyvajici
z tohoto zpusobu prace.
Cilem je zajistit tvorbu a upravy textovyh dokumentu a jejich ukladani a
evidenci v databazi s moznosti nasledneho prohlizeni a tisku.

Za kazdou informaci a pomoc dekuji
Jaro.

jaro(zv)sinea(tec)cz

Off topic - konverze mailu

[*] Jiri Szopa <jiri.szopa(zv)telecom(tec)cz> - 2.9.1998 10:27:59

Pouzivam MS Internet Mail and News dodavany s W95.
Vadi mi, ze nema moznost hledani podle obsahu.
Nedari se mi exportovat zpravy do Exchange (je to jediny format
na ktery umi exportovat).
1. Nema nekdo zkusenost z exportem ?
2. Ktery postovni klient umi importovat z MS Internet Mail and News ?
(Exchange ani Outlock Expres to neumi !!! - a to jsou od MS)
-------------------------------------------
Ing. Jiri Szopa
tel.: +420 659 713393
fax.: +420 659 713392
email: jiri.szopa(zv)telecom(tec)cz


Kopirovani

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 2.9.1998 10:56:18

> Template funguje perfektne, ale neuklada si to a tim padem ani
> neprekopiruje udalosti. Nad timhle uz jsem nejakou dobu badal

Jak to ze ne? Me to funguje skvele.
.........................................................
. Libor Krayzel .
. Czech Television, Studio Ostrava .
. Dvorakova 18, 702 00 Ostrava .
. telephone: 069-6201375 .
. URL: http://freeweb.coco(tec)cz/sovtop .
. E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz .
. Fidonet: mailto:libor_krayzel(zv)p15.f42.n421.z2.fido(tec)cz .
. E-mail2: mailto:sovtop(zv)email(tec)cz .
.........................................................

editacia databazy

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 2.9.1998 11:23:24

Hi,

je celkem jedno, na jakou databazi to potrebujes. Podivej se na udalosti
BeforeInsert a spol u komponenty TTable, pripadne u TField se taky da
neco najit. Pokud nemuzes najit TField, tak to bude proto, ze Builder (a
Delphi :-) je tvori automaticky. Pokud s nima chces pracovat, tak si
musis dat na komponente TTable pravy tlacitko mysi a zvolit Fields
editor, kde si das zase pravy tl. a pridas fieldy o ktere mas zajem...

K tomu zamykani-> projdi si API BDE, tam to vsechno je.


Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz

> -----P�vodn� zpr�va-----
> Od: Martin Talian [SMTP:talian(zv)geoplanpp.sk]
> Odesl�no: 02. z��� 1998 9:16
> Komu: delphi(zv)pinknet(tec)cz
> P�edm�t: editacia databazy
>
> Zdravim vsetkych,
>
> Mam taky zaciatocnicky dotaz. Mam databazovu aplikaciu. Ak do nej
> zadavam
> data, do komponent TDBEdit, data sa hned zapisu do databazy, resp.
> zapisu sa
> po prechode na iny zaznam cez navigator. Ale ja by som chcel pomocou
> kodu
> najskor skontrolovat spravnost vlozenych dat a az potom povolit,
> pripadne
> zrusit zapis a prechod na iny zaznam. Aky by to islo urobit ?
> A druhy dotaz, ako je to s uzamikanim zaznamov v tabulke FoxPro a
> Acces z
> programu Delphi ? Uzamika sa to automaticky cez BDE alebo to musim
> nejako
> aktivovat, prip. da sa nejak z programu toto ovplivnit ?
> Je to pre Delphi 2 s BDE 4.51, nativne ovladace pre Fox aj pre Acces.
>
> Vdaka za vsetky odpovede.
>
> Martin
>
> martin(zv)geoplanpp.sk


editacia databazy

[*] Milan Schembera <schemberam(zv)avx(tec)cz> - 2.9.1998 11:45:59

> Mam taky zaciatocnicky dotaz. Mam databazovu aplikaciu. Ak do nej zadavam
> data, do komponent TDBEdit, data sa hned zapisu do databazy, resp. zapisu
sa
> po prechode na iny zaznam cez navigator. Ale ja by som chcel pomocou kodu
> najskor skontrolovat spravnost vlozenych dat a az potom povolit, pripadne
> zrusit zapis a prechod na iny zaznam. Aky by to islo urobit ?

Nevim, jakou verzi Delphi pouzivas, ale trida TField ma udalost OnValidate,
kterou si muzes predefinovat. V ni se da osetrit, zda hodnota vyhovuje nebo
nevyhovuje a kdyz ne, tak vygenerovat Exception.


S pozdravem

Milan
<mailto:schemberam(zv)avx(tec)cz>

TTable - FindNext

[*] Milan Schembera <schemberam(zv)avx(tec)cz> - 2.9.1998 11:51:39

> > Zdravim vsechny privrzence DELPHI!
> > Nevi nekdo z vas jak najit pomoci komponenty TTable v urcitem poli dalsi
> > polozku se stejnou hodnotou? Diky, a zaroven dekuji vsem prispevovatelum za
> > jejich nemalou pomoc.
> >
> > M&B
>
> Nazdar,
>
> neviem ci to ide priamo fciami Delphi alebo BDE, ale da sa
> to jednoducho napisat. Asi takto:
>
> function NextValue(TT:TTable;Column:Integer):boolean;
> var
> RefVal:string;
> begin
> RefVal:=TT.Fields[Column].AsString;
> repeat
> TT.Next;
> until TT.Eof or (TT.Fields[Column].AsString=RefVal);
> Result:=not TT.Eof;
> end;
>
> procedure TForm1.Button1Click(Sender: TObject);
> begin
> if not NextValue(Table1,RadioGroup1.ItemIndex) then ShowMessage('Nenasiel');
> end;
>

Tohle se sice da pouzit, ale predstav si, ze budes mit tabulku se 4.000.000 zaznamy (a jeste k tomu treba SQL databazi).
Vyhodnejsi se mi zda pouzit SQL dotaz. Pripadne GotoNearest, ale mam dojem, ze by pole muselo byt indexovano.

S pozdravem

Milan
<mailto:schemberam(zv)avx(tec)cz>

editacia databazy

[*] Jan Fiala <fiala(zv)iname(tec)com> - 2.9.1998 11:57:48

Pokud u tabulky povolis CashedUpdate, tak se data nezapisuji okamzite na disk, ale zustavaji v pameti. Dale nasleduje priklad z helpu Delphi, kterym ty data zapises.

procedure TForm1.ApplyButtonClick(Sender: TObject);

begin
with CustomerQuery do
begin
Database1.StartTransaction;
try
ApplyUpdates; {try to write the updates to the database};
Database1.Commit; {on success, commit the changes};
except
Database1.Rollback; {on failure, undo the changes};
raise; {raise the exception to prevent a call to CommitUpdates!}
end;
CommitUpdates; {on success, clear the cache}
end;

end;

S pozdravem "klid zbran�m a program�tor�m"
se t�� na dal�� spolupr�ci
ing. Jan Fiala jan.fiala(zv)iname.com

Zdravim vsetkych,

Mam taky zaciatocnicky dotaz. Mam databazovu aplikaciu. Ak do nej zadavam
data, do komponent TDBEdit, data sa hned zapisu do databazy, resp. zapisu sa
po prechode na iny zaznam cez navigator. Ale ja by som chcel pomocou kodu
najskor skontrolovat spravnost vlozenych dat a az potom povolit, pripadne
zrusit zapis a prechod na iny zaznam. Aky by to islo urobit ?
A druhy dotaz, ako je to s uzamikanim zaznamov v tabulke FoxPro a Acces z
programu Delphi ? Uzamika sa to automaticky cez BDE alebo to musim nejako
aktivovat, prip. da sa nejak z programu toto ovplivnit ?
Je to pre Delphi 2 s BDE 4.51, nativne ovladace pre Fox aj pre Acces.

Vdaka za vsetky odpovede.

Martin

martin(zv)geoplanpp.sk


editacia databazy

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 2.9.1998 12:00:54

> Mam taky zaciatocnicky dotaz. Mam databazovu aplikaciu. Ak do nej zadavam
> data, do komponent TDBEdit, data sa hned zapisu do databazy, resp. zapisu sa
> po prechode na iny zaznam cez navigator. Ale ja by som chcel pomocou kodu
> najskor skontrolovat spravnost vlozenych dat a az potom povolit, pripadne
> zrusit zapis a prechod na iny zaznam. Aky by to islo urobit ?
> A druhy dotaz, ako je to s uzamikanim zaznamov v tabulke FoxPro a Acces z
> programu Delphi ? Uzamika sa to automaticky cez BDE alebo to musim nejako
> aktivovat, prip. da sa nejak z programu toto ovplivnit ?
> Je to pre Delphi 2 s BDE 4.51, nativne ovladace pre Fox aj pre Acces.

Navesis si treba udalost na BeforePost te tabulky.

S pozdravem
Petr Zahradnik, pocitacovy expert

Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================

Restrukturalizace tabulek Pdox a dBase

[*] Milan Schembera <schemberam(zv)avx(tec)cz> - 2.9.1998 12:03:30

Nemate nekdo zkusenosti se zmenou struktury lokalnich tabulek ??? Ja nemam
problem, pouzivam na to SQL prikaz ALTER TABLE, ale problem se vyskytne az
kdyz chci zmenit napr. velikost pole CHARACTER, ktery je v primarnim klici
(Pdox). Zkousel jsem DbiDoRestructure, ale to je neco mezi nebem a zemi.
Taky bych mohl vytvorit novou tabulku a pomoci TBatchMove do ni ty data
nahrcet, ale to se mi nezda dosti inteligentni (zvlast pri velkym poctu
dat). Predpokladam, ze to nejak musi jit, jelikoz DBD to umi.

S pozdravem

Milan
MIS Dept.
AVX Czech Republic
<mailto:schemberam(zv)avx(tec)cz>

Poradte budoucimu zacatecnikovi

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 2.9.1998 12:10:01

=?iso-8859-1?B?imtl+O1rIEphcm wrote:

> Pozor, Inprise nachystal jednu velikou zradu, uz se tu o tom mluvilo, ze z
> programu napsaneho pod Delphi Professional nelze pristupovat na databaze
> pomoci SQL Links. Snad jedine Interbase, ale tim si nejsem tak jist.

> ----- Tedy nechtel bych zpusobit nejakej zmatek. Nevim
> jak je to u ostatnich databazi, ale s D4 Professional jsem se na Interbasi
> dostal pomoci SQL linku z D3 C/S.

Patrne to bude tim, ze Professional ma SQL link na Interbase -
prave a jen. Zkus si to znovu nainstalovat a zaskrtni si uzivatelskou
instalaci.


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


Socket

[*] Daniel SICHTA <Sichta(zv)asset.sk> - 2.9.1998 12:50:45

Mam takyto problem v D3

Po urobeni connectu(ServerSocket a ClientSocket) poslem funkciou SendBuf
urcity pocet Bytov.
Na strane servra na event OnClientRead sa mi spusti ReceiveBuf, ale ten
nacita vzdy menej Bytov ako som mu poslal.
Vzy je to rovnake cislo(pocet bytov). Ak mu dam ako prvu vec na
OnClienRead oneskorovaciu slucku
( for i := 1 to 1000000 ) tak je vsetko v poriadku. Neda sa to urobit
nejako krajsie alebo pohodlnejsie ?

Vopred dakujem

Ing. Daniel �ichta, ASSET s.r.o.
Rosinsk� 8, 011 05, �ilina SLOVAKIA
0421-89-54215
sichta(zv)za.asset.sk


vysledek count

[*] Richard Valny <richard.valny(zv)oku-st(tec)cz> - 2.9.1998 12:53:27

Ahoj panove a damy
Jak nejlepe a nerozumneji odchytit vysledek SQL dotazu (v TQuery), kter� m�
vr�tit pocet vet?

Priklad:
SELECT COUNT(*) FROM MOJETABLE WHERE MOJE_PODMINKA

a rad bych, aby se uzivateli na klepnuti do TButon objevil Message box kolikze
vlastne zaznamu hodla vybrat
===========mozno pouzit PGP==============
Richard Valny richard.valny(zv)oku-st(tec)cz
Okresni urad Strakonice tel. 0342-441 l. 216
Smetanova 533 fax. 0342-21208
386 22 STRAKONICE FiDoNet 2:423/35
===========mozno pouzit PGP=================

BDE Callback & Interbase

[*] Ales Zeleny <zelenya(zv)mlp(tec)cz> - 2.9.1998 12:54:28

DDV,

> sice primo s timhle neporadim, ale mohu doporucit k prozkoumani balicek
> IBObject. Je to ke stazeni na http://www.interbase.com a je to i se
> zdrojakem. Je tam cosi jako IBAlert, traba to bude ono.

Diky, IBO pouzivam, tohle bylo specialne kvuli BDE. Jinak na IBO hledat lepe na:
http://www.ibobjects.com


+------------------------+ +---------------------------+
|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.

Kopirovani

[*] Milan Schembera <schemberam(zv)avx(tec)cz> - 2.9.1998 13:12:05

> > Template funguje perfektne, ale neuklada si to a tim padem ani
> > neprekopiruje udalosti. Nad timhle uz jsem nejakou dobu badal
>
> Jak to ze ne? Me to funguje skvele.

To jsem z toho jelen, neprisel jsem na to, jak to udelat. Vzdycky sem musel
ty udalosti znovu napsat. Jak to mam udelat ??? Skemry skemry ... ;-)

S pozdravem

Milan
MIS Dept.
AVX Czech Republic
<mailto:schemberam(zv)avx(tec)cz>

editacia databazy

[*] Dobromil Mal� <Dobromil.Maly(zv)rak.pr.ds.mfcr(tec)cz> - 2.9.1998 13:12:31


Ahoj,
pouzij event BeforePost, kde si to nejprve zkontroluj a pokud to nebude OK, tak Abort
co se uzamykani tabulky tyce, lze nastavit vlastnost exclusive
Dobra

----------
Od: Martin Talian[SMTP:talian(zv)geoplanpp.sk]
Odesl�no: 2. z��� 1998 9:15
Komu: delphi(zv)pinknet(tec)cz
P�edm�t: editacia databazy

Zdravim vsetkych,

Mam taky zaciatocnicky dotaz. Mam databazovu aplikaciu. Ak do nej zadavam
data, do komponent TDBEdit, data sa hned zapisu do databazy, resp. zapisu sa
po prechode na iny zaznam cez navigator. Ale ja by som chcel pomocou kodu
najskor skontrolovat spravnost vlozenych dat a az potom povolit, pripadne
zrusit zapis a prechod na iny zaznam. Aky by to islo urobit ?
A druhy dotaz, ako je to s uzamikanim zaznamov v tabulke FoxPro a Acces z
programu Delphi ? Uzamika sa to automaticky cez BDE alebo to musim nejako
aktivovat, prip. da sa nejak z programu toto ovplivnit ?
Je to pre Delphi 2 s BDE 4.51, nativne ovladace pre Fox aj pre Acces.

Vdaka za vsetky odpovede.

Martin

martin(zv)geoplanpp.sk


editacia databazy

[*] Marek Repisk� <mrepisky zl(zv)zsnp.sk> - 2.9.1998 13:13:13

> Mam taky zaciatocnicky dotaz. Mam databazovu aplikaciu. Ak do nej zadavam
> data, do komponent TDBEdit, data sa hned zapisu do databazy, resp. zapisu sa
> po prechode na iny zaznam cez navigator. Ale ja by som chcel pomocou kodu
> najskor skontrolovat spravnost vlozenych dat a az potom povolit, pripadne
> zrusit zapis a prechod na iny zaznam. Aky by to islo urobit ?

Nazdar,

robievam to bud v udalosti OnExit pre TDBEdit(ale ma to muchy).
napr.:

procedure TForm1.DBEdit1Exit(Sender: TObject);
begin
if (length(DBEdit1.Text)>0) and (DBEdit1.Text='A') then
begin
ShowMessage('Nekorektne udaje');
DBEdit1.SetFocus;
end;
end;

Alebo v udalosti BeforePost pre TTable(doporucujem).
napr.:

procedure TForm1.Table1BeforePost(DataSet: TDataSet);
begin
if (Table1.Fields[0].AsString='A') and
(MessageDlg('Ulozit?',mtConfirmation,[mbYes,mbNo],0)<>mrYes) then
begin
Table1.Cancel;
Abort;
end;
end;

Marek Repisky
mrepisky_zl(zv)zsnp.sk


zmena ikony u komponenty

[*] Franta <macala(zv)praktik(tec)cz> - 2.9.1998 13:34:32


ahoj,

mam drobny technicky problem. Vytvoril jsem si svoji komponentu
TPanelX = class(TPanel).
V liste komponent bych ale potreboval, aby ikona teto komponenty byla jina nez od TPanel, ale nevim jak to udelat.

Diky za kazdou radu
Franta
macala(zv)praktik(tec)cz

Registry

[*] Milos Madlik <Milos.Madlik(zv)gkolin(tec)cz> - 2.9.1998 13:58:20

jsem novym clenem teto konference, vsechny vas zdravim a prichazim s
nasledujicim dotazem.

Potrebuji nasledujicim zpusobem pracovat se sytemovym registrem:

Ulozit HKEY_CURRENT_USER\Neco\ do souboru ble.ble
^- to je v poradku, pouziji TRegistry.SaveKey

No, a ted nastane situace, kdy Klic Neco v CURRENT_USER neni, potrebuji ho
tam vytvorit a nacist do nej to co je ulozene v ble.ble
^-
Zkousel jsem nasledujici

R : TRegistry;

R := TRegistry.Create;
R.CreateKey ('Neco');
R.RestoreKey ('\Neco', 'ble.ble') <- no a tohle vraci false, at
delam co delam

co funguje je

R.RootKey := HKEY_USERS;
R.LoadKey ('\Neco', 'ble.ble');

ale tam zas nevim jak cely klic \Neco prenest do HKEY_CURRENT_USER

nevite nekdo jak na to?
Dekuji za odpovedi
Milos Madlik


NT groups

[*] Ales Zeleny <zelenya(zv)mlp(tec)cz> - 2.9.1998 14:13:37

DDV, nemate nekdo import hlavicky/zapuzdrene fce pro:

NetGroupEnum()
NetGroupGetUsers()
+------------------------+ +---------------------------+
|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.

editacia databazy

[*] Jiri Sladek <chmelar(zv)oasanet(tec)cz> - 2.9.1998 14:16:18

Ale ja by som chcel pomocou kodu
>najskor skontrolovat spravnost vlozenych dat a az potom povolit, pripadne
>zrusit zapis a prechod na iny zaznam.

Kontroly se daji provest v udalosti Table.BeforePost, treba takhle:

if Table1Mnozstvi.AsFloat <=0 then
raise Exception.create('Mnozstvi musi byt kladne cislo');

{ vyvolam vyjimku -> neprovede se akce Post}

Jirka Sladek

ShutDown & Problem so zapisom do tabulky

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 2.9.1998 14:49:42

No tak v tom pripade by bylo dobre mit na tu kompilaci a ulozeni
udelanej thread a na zpravy reagovat v hlavnim threadu. Potom by bylo
mozne pozdrzet odpoved na zpravu WM_QUERYENDSESSION do doby, nez data
ulozis. Nikde neni psano, ze musis _ihned_ reagovat. Zkus to takhle.
Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz

> -----P�vodn� zpr�va-----
> Od: Richard Willmann [SMTP:sales(zv)nocomment.sk]
> Odesl�no: 29. srpna 1998 12:10
> Komu: DELPHI Distribution List
> P�edm�t: Re: ShutDown & Problem so zapisom do tabulky
>
> presne tak ako hovoris ...
>
> Richard Willmann
>
> -----P�vodn� zpr�va-----
> Od: Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ>
> Komu: 'DELPHI Distribution List' <delphi(zv)pinknet(tec)cz>
> Datum: 2. september 1998 11:58
> P�edm�t: RE: ShutDown & Problem so zapisom do tabulky
>
>
> Hi,
>
> o tohle tu asi neslo, podle me chce autor dotrazu pozastavit ukonceni
> win do doby ukonceni kompilace a zapisu, a pak umoznit ukonceni win -
> vse v jednom. Je to tak?
>
>
> Martin Fron�k
> ZZN Slan� a.s.
> Pra�sk� 1579, 274 49, Slan�
> tel. +420-314-522986
> e-mail: fronek(zv)zznslany(tec)cz
>
> > -----P�vodn� zpr�va-----
> > Od: Jan Fiala [SMTP:fiala(zv)iname.com]
> > Odesl�no: 02. z��� 1998 9:35
> > Komu: DELPHI Distribution List
> > P�edm�t: Re: ShutDown & Problem so zapisom do tabulky
> >
> > Co takhle si pri kompilaci nastavit promennou treba na True a po
> konci
> > kompilace ji nastavit zpet na False. A v obsluze ShutDown si ji
> > otestovat - neco jako vlajky
> >

Restrukturalizace tabulek Pdox a dBase

[*] Jan Fiala <fiala(zv)iname(tec)com> - 2.9.1998 14:56:40

Zkus se kouknout http://www.inprise.com/devsupport/bde/bdeapiex/ . Na DbiDoRestrukture je tam nekolik nazornych prikladu, krome popisu ostatnich BDE Api funkci.

S pozdravem "klid zbran�m a program�torum"
se te�� na dal�� spolupr�ci
ing. Jan Fiala jan.fiala(zv)iname.com

Nemate nekdo zkusenosti se zmenou struktury lokalnich tabulek ??? Ja nemam
problem, pouzivam na to SQL prikaz ALTER TABLE, ale problem se vyskytne az
kdyz chci zmenit napr. velikost pole CHARACTER, ktery je v primarnim klici
(Pdox). Zkousel jsem DbiDoRestructure, ale to je neco mezi nebem a zemi.
Taky bych mohl vytvorit novou tabulku a pomoci TBatchMove do ni ty data
nahrcet, ale to se mi nezda dosti inteligentni (zvlast pri velkym poctu
dat). Predpokladam, ze to nejak musi jit, jelikoz DBD to umi.

S pozdravem

Milan
MIS Dept.
AVX Czech Republic
<mailto:schemberam(zv)avx(tec)cz>

Informix a BDE

[*] Milan CERMAK <Milan.Cermak(zv)vtupv(tec)cz> - 2.9.1998 16:12:34

Hi
Mate nekdo zkusenosti s pristupem na Informix pres BDE.
Stava se mi, ze pokud mam otevreno vice TQuery najednou
pri volani TQuery.Close to spadne na access violation.
Uvnitr toho Close to pada pri volani GetRowsAffected.
Kdyz pouziju misto TQuery TTable vse je v poradku, ale
ne vsechno co potrebuji se da pomoci TTable realizovat.

Pouzivam BDE 3.0 a Informix Connect 7.20TE1. Zkousel
jsem jak pristup pres native link tak ODBC a bylo to stejne.
Na serveru Informix Online 7.20 nebo 7.01.

Uvitam kladne i zaporne zkusenosti s uvedenou konfiguraci.

Milan Cermak

minimalizace taskbaru ???????

[*] Jiri Sladek <chmelar(zv)oasanet(tec)cz> - 2.9.1998 16:33:54

Uz jsem se ptal na podobne tema, ale nedostal jsem tu spravnou informaci, co
jsem potreboval.

Ve svem programu pouzivam velke formulare, pres celou plochu obrazovky
800x600.

Uzivatelum, kteri maji Win95, tedy dole prekazi lista.
Potrebuji pri startu programu snizit taskbar na minimum, neco jako
Taskbar.height := 0.
A pri ukonceni programu vratit puvodni vysku.

Nemam na mysli reseni typu:

- mysi zapnout vlastnost 'schovavat'

- mysi vypnout vlastnost 'vzdy navrchu'

- FormStyle.StayOnTop nebo neco podobneho, to dela bordel, musel bych
vytahat nahoru uplne vsechny formulare a podformulare. A hlaseni a okna
ostatnich programu by byly v p... ozadi, jak jiz psal jeden kolega.

- programove dat Hide taskbaru, protoze tak sice taskbar neni videt, ale
misto zabira stejne, pracovni plocha se nezvetsi ! Zkousel jsem toto:
hTaskBar := FindWindow('Shell_TrayWnd', nil);
ShowWindow(hTaskBar, SW_HIDE);
Formulare se nechtely zvetsit pres misto, zabrane tim skrytym taskbarem,
ani kdyz jsem dal natvrdo Form.height :=600.

Delam v Delphi1, ale tenhle minimalizacni programek muzu mit napsany treba v
D3 a budu ho poustet jen kdyz to pojede pod Win9x.

Diky, Jirka Sladek

chmelar(zv)oasanet(tec)cz

Jak� SQL server ?

[*] Boris Pe�ka <baris(zv)email(tec)cz> - 2.9.1998 16:38:36

Toto je zpr�va ve form�tu MIME obsahuj�c�n�kolik ��st�.

Zdrav�m !

Jsem za��naj�c� program�tor a cht�l bych se zeptat, pro jak� SQL server se m�m rozhodnout.

Moje po�adavky jsou :

- levn� server i klient (nem� smysl n�komu instalovat SQL server za 15.000 K� +
klient za 4.000 - 5.000 K�, kdy� vlastn� program je mnohem levn�j��)
- pokud mo�no m�t k tomu n�co jako Database Desktop na vytv��en� tabulek, index�, atd.

Pou��vat bych to cht�l v s�ov�ch programech na 1-3 po��ta��ch. Sice by bylo v tomto p��pad� bylo
ide�ln� pou��vat Paradox nebo dBase, ale podle m�ho n�zoru je SQL server bezpe�n�j�� a
l�pe se d�laj� "p�ehledy dat". Mockr�t d�ky za odpov�di ! Boris


Registry

[*] Martin Koran <komar(zv)komar(tec)cz> - 2.9.1998 16:54:37

Ahoj,
pokud potrebujes HKEY_CURRENT_USER, muzes pouzit TRegIniFile.
To pracuje jenom s timhle podklicem. Napr.

Ini := TRegIniFile.Create('Neco')

otevre podklic Neco v HKEY_CURRENT_USER (pokud neexistuje, tak ho vytvori).
Dal uz s tim muzes pracovat jako s INI souborem.====================================
Martin Koran
KOMAR
Hilbertova 68
440 01 LOUNY
Czech Republic

tel.: +420 (395) 65 40 19
fax: +420 (395) 65 53 85
mail: komar(zv)komar(tec)cz

-----Original Message-----
From: Milos Madlik <Milos.Madlik(zv)gkolin(tec)cz>
To: Konference Delphi <delphi(zv)pinknet(tec)cz>
Date: Wednesday, September 02, 1998 3:46 PM
Subject: Registry


>jsem novym clenem teto konference, vsechny vas zdravim a prichazim s
>nasledujicim dotazem.
>
>Potrebuji nasledujicim zpusobem pracovat se sytemovym registrem:
>
>Ulozit HKEY_CURRENT_USER\Neco\ do souboru ble.ble
>^- to je v poradku, pouziji TRegistry.SaveKey
>
>No, a ted nastane situace, kdy Klic Neco v CURRENT_USER neni, potrebuji ho
>tam vytvorit a nacist do nej to co je ulozene v ble.ble

vysledek count

[*] Richard Valny <richard.valny(zv)oku-st(tec)cz> - 2.9.1998 17:22:15

Ahoj panove a damy
Jak nejlepe a nerozumneji odchytit vysledek SQL dotazu (v TQuery), kter� m�
vr�tit pocet vet?

Priklad:
SELECT COUNT(*) FROM MOJETABLE WHERE MOJE_PODMINKA

a rad bych, aby se uzivateli na klepnuti do TButon objevil napriklad Message
box kolikze vlastne zaznamu hodla vybrat
===========mozno pouzit PGP==============
Richard Valny richard.valny(zv)oku-st(tec)cz
Okresni urad Strakonice tel. 0342-441 l. 216
Smetanova 533 fax. 0342-21208
386 22 STRAKONICE FiDoNet 2:423/35
===========mozno pouzit PGP=================

Textovy editor pro Delphi

[*] Alaire <alaire(zv)usa(tec)net> - 2.9.1998 18:30:05

hmm, to je presne to, co ja potrebuju udelat s editorem FP98.. Az na to, ze
Word neni problem pomoci OLE dostat do jakekoliv aplikace narozdil od FP...
Podle me k Wordu staci jen dokumentace tech objektu, ktere pouziva /MSDN../
-----P�vodn� zpr�va-----
Od: �ke��k Jaroslav <jaro(zv)zbk(tec)czn(tec)cz>
Komu: DELPHI Distribution List <delphi(zv)pinknet(tec)cz>
Datum: 2. z��� 1998 17:20
P�edm�t: Textovy editor pro Delphi


>Vzhledem k tomu, ze se mi ani po delsim patrani nepodarilo
>najit knihovny na schopny editor, pokusim se vyuzit MSWord
>pomoci technologie OLE.
>Hledam nekoho kdo timto zpusobem pracuje a ma s tim
>zkusenosti a byl by ochoten poskytnout pripadne i placenou konzultaci.
>
>Zajima me, zda je mozne takovym zpusobem do textu (napr. hlavicka
>a pata stranky) predavat nejake dalsi informace z databaze (cislo smlouv a
>pod.)
>Dale me zajimaji vsechna mozna omezeni a komplikace vyplyvajici
>z tohoto zpusobu prace.
>Cilem je zajistit tvorbu a upravy textovyh dokumentu a jejich ukladani a
>evidenci v databazi s moznosti nasledneho prohlizeni a tisku.
>
>Za kazdou informaci a pomoc dekuji
>Jaro.
>
>jaro(zv)sinea(tec)cz
>
>
>

Carovy kod EAN 13

[*] Pavel Koutn� <koutny(zv)tkcmt.sk> - 2.9.1998 18:32:38


Ja by som ich potreboval tiez a to strasne, nemali by to byt ani velke subory, pretoze staci mat nadef. par znakov, pre ostatnych, EAN je kod u nas asi najpouzivanejsi v sucastnosti, 13 cisel atd...

Mam mnozstvo fontov (par stoviek) vsetko som to presiel no neuspel som, takze ak je to mozne, tak by som prosil tiez.

Dik, Pavel


-----P�vodn� zpr�va-----
Od: Petr Zahradnik [SMTP:clexpert(zv)clexpert(tec)cz]
Odesl�no: 2. september 1998 9:29
Komu: delphi(zv)pinknet(tec)cz
P�edm�t: Re: Carovy kod EAN 13

> Nejake TTF s carovymi kody mam (asi 30), ale nevim jestli
> je mezi nimi EAN, ja to nepoznam. Ani uz nevim, kde jsem
> k nim prisel, snad s nejakou tiskarnou.
> Je v nich uvedeno Bear Rock Technologies Corp.
> a maji silene nazvy, jako treba C39HrP24DhTt.

Z toho nazvu usuzuji, ze se jedna o typ Code 39.
Ale prosimte, neposilej to do konference, jako to delaji
jini. Napriklad ja nic takoveho nechci, za prve proto,
ze to nepotrebuji, za druhe proto, ze to neni legalni,
protoze ani fonty si nikdo nemuze sirit, jak se mu
zachce.

S pozdravem
Petr Zahradnik, pocitacovy expert

Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================

komponenta pro sifrovani & RSA

[*] Dobromil Mal� <Dobromil.Maly(zv)rak.pr.ds.mfcr(tec)cz> - 2.9.1998 18:59:50

Ahoj,
prosim o pomoc zejmena tvurce komponent ...
chtel bych asi takovouto komponentu (K) :
ma dve/tri string hodnoty (K.Decoded a K.Encoded /K.key) a
dve metody (K.Decode a K.Encode)

a potreboval bych, kdyz zavolam metodu K.Encode aby se do K.Encoded
dosadil rozsifrovany retezec K.Decoded a naopak.

Prosim Vas timto o pomoc. Jenomze sifrovaci algoritmus mam svuj vlastni,
proto bych potreboval zdrojak (DSP, Torry jsem prolezl), kde bude napr.
jen TK.Encoded:=TK.Decoded a naopak.

Vim, ze je to hracka, ale jednou jsem se pokusil napsat komponentu (vc. "ikonky")
a skloncilo to fiaskem :-))) Poradite nekdo, jak to udelat ?

Vrele diky.

PS: Vite nekdo neco blizsiho (velmi blizkeho) o RSA ?

Dobra.

TTable - FindNext

[*] Dobromil Mal� <Dobromil.Maly(zv)rak.pr.ds.mfcr(tec)cz> - 2.9.1998 19:07:12


Ahoj,
mrkni na metodu TTable.Locate ( nekecam ??? ).
Najde zaznam a nastavi se na nej a (nejsem si vubec,
ale vubec jisty, placam to z hlavy) neexistuje metoda
TTable.FindFirst / TTable.FindNext na filtrovane zaznamy ?

Dobra.

----------
Od: Martin Bab�k[SMTP:M.Babik(zv)mus(tec)cz]
Odesl�no: 1. z��� 1998 14:57
Komu: Konference
P�edm�t: TTable - FindNext

<<Soubor: ATT00003.html>>
Zdravim vsechny privrzence DELPHI!
Nevi nekdo z vas jak najit pomoc� komponenty TTable v urcitem poli dalsi polozku se stejnou hodnotou? Diky, a zaroven dekuji vsem prispevovatelum za jejich nemalou pomoc.

M&B

vysledek count

[*] Dobromil Mal� <Dobromil.Maly(zv)rak.pr.ds.mfcr(tec)cz> - 2.9.1998 19:17:21


Ahoj,
no, myslim, ze by jsi mohl ten Query1.SQL napsat treba takto
select count(*) as Pocet from ....
a potom uz se na Pocet muzes odkazovat napr. takto :
Query1.FieldbyName('Pocet').AsInteger nebo si pomoci
Field editoru udelat primo TField Query1Pocet a potom

Query1.ExecSQL;
if MessageDlg(' Vazne chcete videt vsech '+Query1Pocet.AsString+' zaznamu ? ',
mtConfirmation, [mbYes, mbNo], 0) =idYes then
ja nevim treba DBGrid1.Visible:=true;

Dobra.
----------
Od: Richard Valny[SMTP:richard.valny(zv)oku-st(tec)cz]
Odesl�no: 2. z��� 1998 12:53
Komu: 'DELPHI Distribution List'
P�edm�t: vysledek count

Ahoj panove a damy
Jak nejlepe a nerozumneji odchytit vysledek SQL dotazu (v TQuery), kter� m�
vr�tit pocet vet?

Priklad:
SELECT COUNT(*) FROM MOJETABLE WHERE MOJE PODMINKA

a rad bych, aby se uzivateli na klepnuti do TButon objevil Message box kolikze
vlastne zaznamu hodla vybrat
===========mozno pouzit PGP==============
Richard Valny richard.valny(zv)oku-st(tec)cz
Okresni urad Strakonice tel. 0342-441 l. 216
Smetanova 533 fax. 0342-21208
386 22 STRAKONICE FiDoNet 2:423/35
===========mozno pouzit PGP=================

vysledek count

[*] mstevlik(zv)gamo.sk - 2.9.1998 19:18:33

[P��loha v souboru: pic21581.pcx]
Nazdarek, nejako takto

MyQuery.SQL.Add('SELECT COUNT(*) AS Pocet FROM MOJETABLE WHERE
MOJE_PODMINKA');
MyQuery.Open;
ShowMessage('Pocet: '+MyQuery.FieldByName('Pocet').AsString);
MyQuery.Close;
Maj sa
Majkl



(Embedded
image moved Richard Valny <richard.valny(zv)oku-st(tec)cz>
to file: 02.09.98 12:53
pic21581.pcx)

Please respond to DELPHI Distribution List <delphi(zv)pinknet(tec)cz>

To: "'DELPHI Distribution List'" <delphi(zv)pinknet(tec)cz>
cc: (bcc: isysconf)
Subject: vysledek count


Ahoj panove a damy
Jak nejlepe a nerozumneji odchytit vysledek SQL dotazu (v TQuery), kter� m�
vr�tit pocet vet?

Priklad:
SELECT COUNT(*) FROM MOJETABLE WHERE MOJE PODMINKA

a rad bych, aby se uzivateli na klepnuti do TButon objevil Message box
kolikze
vlastne zaznamu hodla vybrat
===========mozno pouzit PGP==============
Richard Valny richard.valny(zv)oku-st(tec)cz
Okresni urad Strakonice tel. 0342-441 l. 216
Smetanova 533 fax. 0342-21208
386 22 STRAKONICE FiDoNet 2:423/35
===========mozno pouzit PGP=================

ShutDown & Problem so zapisom do tabulky

[*] Zdenek Drvota <zds(zv)pce.fairnet(tec)cz> - 2.9.1998 19:24:07

> Hi,
>
> o tohle tu asi neslo, podle me chce autor dotrazu pozastavit ukonceni
> win do doby ukonceni kompilace a zapisu, a pak umoznit ukonceni win -
> vse v jednom. Je to tak?
To by snad slo celkem jednoduse pozastavit v procedure OnCloseQuery,
nebo ne? Dokud nepovolim konec WIN zde, tak proste neskonci,
aspon si myslim :-)

>
>
> Martin Fron�k
> ZZN Slan� a.s.
> Pra�sk� 1579, 274 49, Slan�
> tel. +420-314-522986
> e-mail: fronek(zv)zznslany(tec)cz
>
> > -----P�vodn� zpr�va-----
> > Od: Jan Fiala [SMTP:fiala(zv)iname.com]
> > Odesl�no: 02. z��� 1998 9:35
> > Komu: DELPHI Distribution List
> > P�edm�t: Re: ShutDown & Problem so zapisom do tabulky
> >
> > Co takhle si pri kompilaci nastavit promennou treba na True a po konci
> > kompilace ji nastavit zpet na False. A v obsluze ShutDown si ji
> > otestovat - neco jako vlajky
> >
>
*-----------------------------------------------*
ZDS, spol. s r. o.
Ing. Zdenek Drvota, director
Devotyho 775 tel/fax:+420-40-33837
530 02 Pardubice 41691
Czech Republic
e-mail: zds(zv)pce.fairnet(tec)cz (Win1250/ISO-8859-2)
http://www.angelfire.com/biz/zds
*-----------------------------------------------*

Classes

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 2.9.1998 19:42:31

David_Zabensky.UNION(zv)union(tec)cz wrote:

> Snad by ti mohl pomoci Object Browser...
> David;

Asi ne, protoze bych to chtel zjistit svym programem - aniz bych
musel prochazet vsechny unity.


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


zmena ikony u komponenty

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 02.9.1998 20:21:12

Franta wrote:
>
> ahoj,
>
> mam drobny technicky problem. Vytvoril jsem si svoji komponentu
> TPanelX = class(TPanel).
> V liste komponent bych ale potreboval, aby ikona teto komponenty byla jina nez od TPanel, ale nevim jak to udelat.

Ahoj,

Spust si Image Editor a v nem vytvor novy .dcr soubor. V nem potom vytvor
bitmapu o velikosti 24x24 bodu. Tu pojmenuj velkymi pismeny podle nazvu tve
komponenty (TPANELX) a pak ten .dcr soubor uloz do stejneho adresare
kde mas unit tve komponenty a pod stejnym nazvem jako je ten unit. Pak
uz staci jen prekompilovat Package nebo paletu komponent (dle verze Delphi)

--
Petr Vones, amatersky programator

vysledek count

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 02.9.1998 20:30:23

Richard Valny wrote:
>
> Ahoj panove a damy
> Jak nejlepe a nerozumneji odchytit vysledek SQL dotazu (v TQuery), kter� m�
> vr�tit pocet vet?
>
> Priklad:
> SELECT COUNT(*) FROM MOJETABLE WHERE MOJE_PODMINKA
>
> a rad bych, aby se uzivateli na klepnuti do TButon objevil Message box kolikze
> vlastne zaznamu hodla vybrat

Ahoj,

jde to treba takhle:

ShowMessageFmt('Pocet %d', [Query1.Fields[0].AsInteger]);


--
Petr Vones, amatersky programator

vysledek count

[*] Lubo Fule <fule(zv)sct.sk> - 2.9.1998 20:32:13

Query.Active:=true;
ShowMessage(Query.Fields[0].AsString);
> -----Original Message-----
> From: Richard Valny [mailto:richard.valny(zv)oku-st(tec)cz]
> Sent: Wednesday, September 02, 1998 12:53 PM
> To: 'DELPHI Distribution List'
> Subject: vysledek count
>
>
> Ahoj panove a damy
> Jak nejlepe a nerozumneji odchytit vysledek SQL dotazu (v
> TQuery), kter� m�
> vr�tit pocet vet?
>
> Priklad:
> SELECT COUNT(*) FROM MOJETABLE WHERE MOJE_PODMINKA
>
> a rad bych, aby se uzivateli na klepnuti do TButon objevil
> Message box kolikze
> vlastne zaznamu hodla vybrat
>
>
> ===========mozno pouzit PGP==============
> Richard Valny richard.valny(zv)oku-st(tec)cz
> Okresni urad Strakonice tel. 0342-441 l. 216
> Smetanova 533 fax. 0342-21208
> 386 22 STRAKONICE FiDoNet 2:423/35
> ===========mozno pouzit PGP=================
>

zmena ikony u komponenty

[*] Stanislav Cerny <s.cerny(zv)mod(tec)cz> - 2.9.1998 20:36:04

Ahoj
v Image editoru vytvoris soubor DCR a do neho umistis bitmapu.
Pozor, soubor musi mit stejne jmeno jako zdroj a umisteni ve stejnem
adresari.

Standa C.

-----P�vodn� zpr�va-----
Od: Franta <macala(zv)praktik(tec)cz>
Komu: 'DELPHI Distribution List' <delphi(zv)pinknet(tec)cz>
Datum: 2. z��� 1998 19:26
P�edm�t: zmena ikony u komponenty


>ahoj,
>
>mam drobny technicky problem. Vytvoril jsem si svoji komponentu
> TPanelX = class(TPanel).
>V liste komponent bych ale potreboval, aby ikona teto komponenty byla jina
nez od TPanel, ale nevim jak to udelat.
>
> Diky za kazdou radu
> Franta
> macala(zv)praktik(tec)cz
>
>

MS SQL konektivita bez SQL Link, BDE a ODBC

[*] Lubo Fule <fule(zv)sct.sk> - 2.9.1998 20:54:35

Asi ta trochu schladim. "ntwdblib.dll" teda DB-Library je dost zastarala
kniznica pre pristup na MS SQL server. ODBC je viditelne rychlejsie, dokonca
aj pri pomerne jednoduchych dotazoch a to uz nehovorim o tych zlozitejsich.
Microsoft uz totiz dost davno prestal dalej rozvijat DB-Library a vo verzii
7.0 (zatial iba Beta) uz DB-library vyslovene neodporucaju pouzivat, pretoze
je tam len pre spatnu kompatibilitu a nie je uz pre tuto verziu
prisposobena. Microsoft jednoznacne odporuca pristupovat na MS SQL cez ODBC
alebo cez OLEDB, ktore vo verzii 7.0 je uz zaimplementovane priamo na servri
a nepristupuje cez ODBC ako je to vo verzii 6.5.

S pozdravom
Lubo Fule

> -----Original Message-----
> From: Miroslav BALAZ [mailto:mibainfo(zv)internet.sk]
> Sent: Wednesday, September 02, 1998 9:23 AM
> To: DELPHI Distribution List
> Subject: MS SQL konektivita bez SQL Link, BDE a ODBC
>
>
> Predmet:
> Nativne spojenie s MSSQL bez SQL Link a ODBC
> (aj pre Standard verziu Delphi)
>
> Vazeni deplphini,
>
> kto ma zaujem o konektivitu na MS SQL z Delphi :
>
> na baze SQL syntaxe
>
> - citanie zaznamov /prevod na
> comma separated file (CSV), alebo na adekvatne typy
> premennych - okrem typu blob - zatial/
> - mazanie zaznamov
> - vkladanie a modifikaciu zaznamov /insert, update/
> (v podstate vsetky SQL prikazy)
> - spustanie SQL dotazov zapisanych v TMemo
>
>
> s moznostou dalsieho rozsirovania funkcnosti.
>
> Riesenie vychadza z jednoduchej ukazky
> "mssql.zip" (autor Ed Lyk) - asi DSP. Obsahuje header file
> pre "ntwdblib.dll" (povodny subor z DSP je rozsireny
> o deklaraciu niekolkych dalsich funkcii).
>
> Vzhladom na to, ze mam zaujem o spolupracu
> pri dalsom rozsirovani, prosim aby sa hlasili pripadni
> zaujemcovia len z pomedzi tych, ktori maju k dispozicii
> vyssie uvedeny dll subor a MS SQL server.
>
> Mozem konstatovat, ze badanie okolo fungovania
> jednotlivych funkcii a struktur bolo nemale a tiez, ze
> zostava este niekolko (dost) nevyjasnenych otazok
> pre dalsie rozsirovanie moznosti.
>
> Zaujemcom mozem poslat prelozeny header (jeho cast,
> lepsie - vyber z dvoch hlavickovych suborov pre C)
> a vzorovy priklad (vratane testovania typu dat a pouzitia
> SQL prikazov)
>
> tesim sa na spolupracu
> Miro
>

minimalizace taskbaru ???????

[*] heinisch(zv)post(tec)cz - 2.9.1998 20:54:15

Ahoj

tento problem jsem resil trosku jinak, nezabyval jsem se problemem hide
taskbaru , ale definoval jsem si funkci na
maximalizaci /upravu/ okna dle pracovni plochy Windows.

procedure TForm1.FormCreate(Sender: TObject);
begin

if SirkaObrazovka=800 then
Form1.BoundsRect := ZjistiWorkPlocha else
Form1.Position := poscreenCenter;

end;


Volana funkce:

function ZjistiWorkPlocha:TRect;
var
T:TRect;
begin
SystemParametersInfo(SPI_GETWORKAREA,0,(zv)T,0);
Result:=T;
end;


P O Z O R

Form1.Position = poDesigned !!!


-----P�vodn� zpr�va-----
Od: Jiri Sladek <chmelar(zv)oasanet(tec)cz>
Komu: delphi <delphi(zv)pinknet(tec)cz>
Datum: 2. z��� 1998 17:33
P�edm�t: minimalizace taskbaru ???????>Uz jsem se ptal na podobne tema, ale nedostal jsem tu spravnou informaci,
co
>jsem potreboval.
>
>Ve svem programu pouzivam velke formulare, pres celou plochu obrazovky
>800x600.
>
>Uzivatelum, kteri maji Win95, tedy dole prekazi lista.
>Potrebuji pri startu programu snizit taskbar na minimum, neco jako
>Taskbar.height := 0.
>A pri ukonceni programu vratit puvodni vysku.
>
>Nemam na mysli reseni typu:
>
>- mysi zapnout vlastnost 'schovavat'
>
>- mysi vypnout vlastnost 'vzdy navrchu'
>
>- FormStyle.StayOnTop nebo neco podobneho, to dela bordel, musel bych
>vytahat nahoru uplne vsechny formulare a podformulare. A hlaseni a okna
>ostatnich programu by byly v p... ozadi, jak jiz psal jeden kolega.
>
>- programove dat Hide taskbaru, protoze tak sice taskbar neni videt, ale
>misto zabira stejne, pracovni plocha se nezvetsi ! Zkousel jsem toto:
> hTaskBar := FindWindow('Shell_TrayWnd', nil);
> ShowWindow(hTaskBar, SW_HIDE);
> Formulare se nechtely zvetsit pres misto, zabrane tim skrytym taskbarem,
>ani kdyz jsem dal natvrdo Form.height :=600.
>
>Delam v Delphi1, ale tenhle minimalizacni programek muzu mit napsany treba
v
>D3 a budu ho poustet jen kdyz to pojede pod Win9x.
>
>Diky, Jirka Sladek
>
>chmelar(zv)oasanet(tec)cz
>

TTable - FindNext

[*] heinisch(zv)post(tec)cz - 2.9.1998 21:01:27

nevim na co to potrebujes ale pro normalni pouziti vidim jako nejlepsi
udalost

TTable.OnFilterRecord

sam to pouzivam k jakekoliv filtraci dat.


HeiJu

heinisch(zv)post(tec)cz

-----P�vodn� zpr�va-----
Od: Martin Bab�k <M.Babik(zv)mus(tec)cz>
Komu: DELPHI Distribution List <delphi(zv)pinknet(tec)cz>
Datum: 2. z��� 1998 2:00
P�edm�t: Re: TTable - FindNext


>Pot�eboval bych to v dal��m recordu ve stejn�m sloupci datab�zov� tabulky.
>D�k.
>
> M&B
>
>
>>To myslis ve stejnem record nebo jinem
>>napis
>
>HeiJu
>
>heinisch(zv)post(tec)cz
>
>>
>> Zdravim vsechny privrzence DELPHI!
>>Nevi nekdo z vas jak najit pomoc� komponenty TTable v urcitem poli dalsi
>polozku se stejnou hodnotou? Diky, a zaroven dekuji vsem prispevovatelum za
>jejich nemalou pomoc.
>>
>> M&B
>

Classes

[*] heinisch(zv)post(tec)cz - 2.9.1998 21:05:27

To jsem nekde videl, snazim si vzpomenout kde

musim se podivat na nejaky mista kdyz zjistim hned odpovim


HeiJu

heinisch(zv)post(tec)cz

-----P�vodn� zpr�va-----
Od: Zbysek Hlinka <zhlinka(zv)login(tec)cz>
Komu: delphi(zv)pinknet(tec)cz <delphi(zv)pinknet(tec)cz>
Datum: 2. z��� 1998 2:00
P�edm�t: Classes


>Ahoj all,
>
>nevite nahodou nekdo, jak zjistit seznam trid (podle jejich nazvu),
>ktere jsou k dispozici? V Delphi, ale i v programu.
>
>
>S pozdravem
>
>Zbysek Hlinka
>E-mail: zhlinka(zv)login(tec)cz
>Tel.: 02/795 29 56; GSM: 0603 551 282
>Krystofova 1016, 149 00 Praha 4
>CZ
>

NT groups

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 2.9.1998 21:09:02

> DDV, nemate nekdo import hlavicky/zapuzdrene fce pro:
>
> NetGroupEnum()
> NetGroupGetUsers()

Viz. Win32 HELP nebo MSDN:

NET_API_STATUS NetGroupEnum(
LPWSTR servername,
DWORD level,
LPBYTE *bufptr,
DWORD prefmaxlen,
LPDWORD entriesread,
LPDWORD totalentries,
LPDWORD resume_handle
);

NET_API_STATUS NetGroupGetUsers(
LPWSTR servername,
LPWSTR groupname,
DWORD level,
LPBYTE *bufptr,
DWORD prefmaxlen,
LPDWORD entriesread,
LPDWORD totalentries,
LPDWORD resumeHandle
);

S pozdravem
Petr Zahradnik, pocitacovy expert

Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================

Utilita pro internet

[*] heinisch(zv)post(tec)cz - 2.9.1998 21:17:49

ahoj vsichni

Zprava o stavu Unie


Problemy

1. Nelze zjistit "zvednuti sluchatka" pro zapocet impulsu - podle odborniku
pry softwarove nelze / ja jako neodbornik trochu pochybuji/

2. obcas nefunguje prihlasovaci heslo ci uzivatel
/protoze tuto chybu zjistim az po nabehnuti 2 impulsu od Telecomu ,
obcas me prejde
testovaci nalada


P.S Doporucovany soft POKLADNA je dobre zpracovany ale podle trochu jine
filosofie,
je urcen spise pro statistiku podle protokolu.

Ja mam na m�sli komplexni ovladani v real-time /snad/


P.S. 2
kdo ma zajem o tuto problematiku at mi napise

HeiJu

heinisch(zv)post(tec)cz

Poradte budoucimu zacatecnikovi

[*] �ke��k Jaroslav�������6�����̿ - 2.9.1998 22:05:20

..... Strucne receno, mas-li D3 C/S,
pak si koupis D4 Pro a chces pouzivat InterBase, pujde to, ale pokud
mas stejnou kombinaci a chtel bys pouzivat MS SQL Server, mas proste
smulu...
------------------
Jo to je presne muj pripad. S Interbazi jsem naprosto spokojen a staci mi.
SQL links mam z D3 /CS. Bohuzel to asi nebude pripad vsech a hlavne to
nepomuze Honzovi, od nehoz byl ten puvodni dotaz.
Jedinej rozumnej zaver asi tedy je, ze pokud chce programovat C/S
v D4, musi koupit drahou CS verzi. Muze ji vsak poridit lacineji, pokud
ji nebude kupovat u naseho Borlandu, ale v US. Jinak se musi
spolehnout na ODBC.

K cene D4 CS jeste poznamku. Soucasti C/S verze (alespon u D3 to tak bylo),
je 4 users Interbase, coz je asi tak 30.000,- Pokud tedy nekdo uvazuje
o pouziti tohoto serveru, pak se mu ta cena za D4 CS nemusi jevit az tak
hroziva. Zalezi o jak velkou a majetnou firmu se jedna.
------------------
Me v tom odstavci neslo ani tak o kurs koruny vuci dolaru, ale spise
o cenovou politiku a rozdily cen mezi USA a CR po prepoctu tech $.
-----------------------
Vim ..... ja jen, aby rec nestala.
Jaro
-----------------------

Jak� SQL server ?

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 2.9.1998 22:10:53

> - levn� server i klient (nem� smysl n�komu instalovat SQL server za 15.000 K� +
> klient za 4.000 - 5.000 K�, kdy� vlastn� program je mnohem levn�j��)
> - pokud mo�no m�t k tomu n�co jako Database Desktop na vytv��en� tabulek, index�, atd.
>
> Pou��vat bych to cht�l v s�ov�ch programech na 1-3 po��ta��ch. Sice by bylo v tomto p��pad�
> bylo
> ide�ln� pou��vat Paradox nebo dBase, ale podle m�ho n�zoru je SQL server bezpe�n�j�� a
> l�pe se d�laj� "p�ehledy dat".

Prosim priste pis bez diakritiky, nekomu to muze delat neplechu.
No to vis, SQL server neni uplne nejlevnejsi, kdo by take daval
programy zadarmo, ze? Je divne, ze tvoje aplikace je levnejsi
nez pises. Ono neni jednoduche vybrat SQL server, uz vubec ne
podle ceny. Jak pises, to jako Database Desktop, to je ve vsech
SQL serverech jako samozrejmost. Jinak nez vyberes SQL server,
ktery bude nejlepe vyhovovat tobe, ale take tvym zakaznikum,
je potreba hodne moc premyslet. Musis vzit v uvahu, jake Delphi
hodlas pro vyvoj pouzivat (Professional nebo Client/Server).
Jake napojeni hodlas pouzivat (SQL Link, ODBC nebo nahradu BDE
od tretich vyrobcu). Na jakych platformach to chces pouzivat
(Windows 95, Windows NT, ale muzes mit take pozadavek na
stare Windows 3.1 nebo dokonce Novel NetWare). Na jake objemy
dat to chces pouzivat. Budes-li chtit replikaci, kterou nutne
potrebujes napr. chce-li se jeden klient odpojit, pracovat na
notebooku a pak se zase pripojit a replikovat data, nebo kdyz
proste budou oddelene servery, ale jednou za cas si maji data
sjednotit. Take musis zapremyslet nad tim, jestli tvuj okruh
zakazniku jiz nahodou nejaky SQL server nema. Predstav si, ze
maji treba Microsoft BackOffice Small Business Server, kde je
Microsft SQL, a ty jim tam budes cpat jeste InterBase. To vis,
ze se jim to moc libit nebude, pokud jedou na MS SQL a ted si
maji kupovat jeste jiny. A to nejsou vsechny pozadavky, ktere
si musis radne promyslet. Uvedom si, ze jak jednou zacnes
vyvijet pod nejakym SQL serverem, je tezke ho pozdeji zmenit.
Kazdy SQL server se necim lisi, mas-li opravdu naplno vyuzivat
vsechny moznosti daneho SQL serveru, musis pouzivat prave ty
odlisnosti od standardu. Naucis se to poradne pouzivat, prectes
kvanta anglicke literatury a tvuj program pak bude
specializovany pro ten typ SQL serveru. Neni jednoduche to
predelat, ani se narychlo naucit pracovat s jinym SQL serverem
- to ti zase bude trvat dlouho, nez se na nej specializujes.
Nerikam, ze to neni mozne, vsechno je mozne, ale pak budes
litovat, ze ses tim zbytecne zabyval... Takze uprimne receno
nejprve musis uvazit vsechny moznosti a zapremyslet trochu
dopredu, pak musis sehnat informace o jednotlivych SQL serverech,
no a pak se teprve muzes rozhodovat. Nelze se rozhodnout pro
SQL server na zaklade trech parametru - nizka cena, tri pocitace
a bezpecnost dat. To je malo informaci... Mimochodem, prohledej
archiv konference a najdes tam mnoho informaci o SQL serverech,
o jejich rozdilech. I ja jsem sem psal nekolik doporuceni
pro ruzne pozadavky, rozdily cen apod.

S pozdravem
Petr Zahradnik, pocitacovy expert

Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================

editacia databazy

[*] �ke��k Jaroslav�������6�����̿ - 2.9.1998 22:18:01

>>Mam taky zaciatocnicky dotaz. Mam databazovu aplikaciu. Ak do nej zadavam
>data, do komponent TDBEdit, data sa hned zapisu do databazy, resp. zapisu
sa
>po prechode na iny zaznam cez navigator. Ale ja by som chcel pomocou kodu
>najskor skontrolovat spravnost vlozenych dat a az potom povolit, pripadne
>zrusit zapis a prechod na iny zaznam. Aky by to islo urobit ?
------
P�i p�echodu na novy zaznam se provede automaticky Post na aktualnim
zaznamu.
1. Muzes provadet kontrolu na urovni jednotlivych polozek zaznamu napr. na
OnValidate nebo OnExit u TDBEdit
2. Nebo tez na urovni celeho zaznamu.
Tyto kontroly ja pak nejlepe presunout do udalosti BeforePost. Udalost totiz
nastena
at uz se o Post pokusis jakymkoliv zpusobem (i prechodem na dalsi radek)
Prikaz Break pak operaci nedokonci v pripade nesouhlasu s ulozenim.
Cancel pripadne neulozi data.
3. Dalsi moznosti je vyuzit CacheUpdates a ukladat vsechny zmeny na vice
zaznamech najednou az v pripade uplne spokojenosti. To se hodi
zejmena v pripade dialog. okna s master-detail tabulkou.
Jaro
-------

minimalizace taskbaru ???????

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 02.9.1998 22:33:59

Jiri Sladek wrote:
>
> Uz jsem se ptal na podobne tema, ale nedostal jsem tu spravnou informaci, co
> jsem potreboval.
>
> Ve svem programu pouzivam velke formulare, pres celou plochu obrazovky
> 800x600.
>
> Uzivatelum, kteri maji Win95, tedy dole prekazi lista.
> Potrebuji pri startu programu snizit taskbar na minimum, neco jako
> Taskbar.height := 0.
> A pri ukonceni programu vratit puvodni vysku.

Ahoj,

pokud chces mit hlavni okno aplikace pres celou obrazovku tak se to da udelat
bez skryti taskbaru takhle:

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;

type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
private
procedure SetFullScreenSize;
procedure WMDisplayChange(var Msg: TWMDisplayChange); message WM_DISPLAYCHANGE;
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.SetFullScreenSize;
var
CX, CY: Integer;
begin
CX := GetSystemMetrics(SM_CXSCREEN);
CY := GetSystemMetrics(SM_CYSCREEN);
if IsIconic(Application.Handle) then
SetWindowPos(Handle, HWND_TOP, 0, 0, CX, CY, SWP_NOACTIVATE) else
SetWindowPos(Handle, HWND_TOP, 0, 0, CX, CY, SWP_SHOWWINDOW);
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
SetFullScreenSize;
end;

procedure TForm1.WMDisplayChange(var Msg: TWMDisplayChange);
begin
SetFullScreenSize;
end;

end.


--
Petr Vones, amatersky programator


TTable - FindNext

[*] �ke��k Jaroslav�������6�����̿ - 2.9.1998 23:04:47

Existuje jedno zajimave reseni, ktere vypada na prvni pohled slozite a
na druhy pohled je velice rychle a prakticke.
1. Zaloz si objekt TQuery a napis dotaz
SELECT KlicovaPolozka FROM StejnaTabulkaJakoProTTAble
WHERE zadana podminka
2. Po TQuery.Open zjistis zda nejaka veta vyhovuje podmince a kdyz, tak
kolik. Muzes tedy nastavit Enable True/False prislusnych tlacitek jako
napr.dalsi vyskyt, posledni vyskyt a pod. Muzes na TQuery dokonce napojit
druhy navigator pro pohyb v nalezenych zaznamech sem a tam. Na zmenu
zaznamu muzes reagovat nalezenim klicove hodnoty v TTable treba
pomoci Findkey(). To je velmi rychla funkce pro primarni klic. Jeho
hodnotu prectes v TQuery.
Tim budou oba datasety sprazeny. Pohyb o jediny radek v TQuery
zpusobi skok na nejblizsi odpovidajici zaznam v TTable velice rychle
a muzes takto prochazet obema smery. Pritom budes vzdy vedet kdy jsi
na poslednim nebo prvnim vyskytu (TQuery.Eof) zaznamu
splnujiciho tvoji podminku. Hledani podle klice je vzdy rychlejsi nez
lokate na jinou podminku. Dotaz s podminkou je take velmi rychly
a pokud nejdrive provedes jeste SELECT Count(*) FROM Tabulka
WHERE stejna podminka, muzes nekde zobrazit kolik vlastne takovych
odpovidajicich zaznamu v TTable existuje.
3. Az jednou budes prechazet na metody C/S, pak zjistis, ze vlastne
ten TTable k nicemu nepotrebujes a zustanes jenom u toho TQuery.
Namisto hledani, budes vybirat.
Jaro.

>> > Zdravim vsechny privrzence DELPHI!
>> > Nevi nekdo z vas jak najit pomoci komponenty TTable v urcitem poli
dalsi
>> > polozku se stejnou hodnotou? Diky, a zaroven dekuji vsem
prispevovatelum za
>> > jejich nemalou pomoc.
>> >
>> > M&B
>>
>> Nazdar,
>>
>> neviem ci to ide priamo fciami Delphi alebo BDE, ale da sa
>> to jednoducho napisat. Asi takto:
>>
>> function NextValue(TT:TTable;Column:Integer):boolean;
>> var
>> RefVal:string;
>> begin
>> RefVal:=TT.Fields[Column].AsString;
>> repeat
>> TT.Next;
>> until TT.Eof or (TT.Fields[Column].AsString=RefVal);
>> Result:=not TT.Eof;
>> end;
>>
>> procedure TForm1.Button1Click(Sender: TObject);
>> begin
>> if not NextValue(Table1,RadioGroup1.ItemIndex) then
ShowMessage('Nenasiel');
>> end;
>>
>
>Tohle se sice da pouzit, ale predstav si, ze budes mit tabulku se 4.000.000
zaznamy (a jeste k tomu treba SQL databazi).
>Vyhodnejsi se mi zda pouzit SQL dotaz. Pripadne GotoNearest, ale mam dojem,
ze by pole muselo byt indexovano.
>
>S pozdravem
>
>Milan
><mailto:schemberam(zv)avx(tec)cz>
>

Restrukturalizace tabulek Pdox a dBase

[*] Milan Schembera <schemberam(zv)avx(tec)cz> - 3.9.1998 06:18:27

>
> Zkus se kouknout http://www.inprise.com/devsupport/bde/bdeapiex/ . Na
DbiDoRestrukture je tam nekolik nazornych prikladu, krome popisu ostatnich
BDE Api funkci.
>
Diky moc, je to dost dobry, kdo delate neco s databazema, vrele doporucuju
!!!

S pozdravem

Milan
MIS Dept.
AVX Czech Republic
Lanskroun
<mailto:schemberam(zv)avx(tec)cz>

Beh na pozadi

[*] Ing. Ji�� Kub��ek - 3.9.1998 06:22:05

>> >> Mam v D1 aplikaci, ve ktere spustim casove narocnou rutinu,
>> >> obsahujici Application.ProcessMessages. Prubeh zpracovani teto
>> >>rutiny zobrazuji v ListBoxu. Kdyz vsak chci posunout radky textu v
okne
>> >>ListBoxu, zastavi se beh rutiny po dobu stisku tlacitka mysi nad
>> posuvnikem.
>> >>Lze s tim neco delat?
>>Musim zustat v D1. Abych tedy zajistil neruseny chod casove
>>narocne rutiny, chci zablokovat vsechny Controls na formulari po dobu
>>jejiho behu.
>>Zmenil jsem Screen.Cursor na presypaci hodiny a zkusil zakazat
>>(Enabled:=false) formular. V tom pripade se mi vsak vraci default Cursor.
>>Resenim bylo nechat formular povoleny, ale zakazat vsechny Controls. Neni
>>nejaka elegantnejsi cesta?

>{Milan Vorisek]
>Neslo by pouzit Timer? Udalost OnTimer funguje i v tomto
>pripade.
>
Nenapada mne ale jak bych mohl OnTimer k tomu vyuzit, ta cas.narocna
rutina je urcita komunikace pres port.

>[Pavel Zichovsky]
>Ted me napadlo (jen tak z rychliku) co kdybys pri vypoctu modalne zobrazil
>nejaky dalsi form, kde bybyla hlaska "Pocitam" ci neco tomu podobneho, a
>po skonceni ho zavrel. Pripadne jeste na tom zobrazenem formu nejak
>zakazat stisk ESC (aby ho nemohl zavrit uzivatel)
Dobry napad, mozna vyuziji.
Diky vsem
Jirka


Literatura

[*] Jan Fiala <fiala(zv)iname(tec)com> - 3.9.1998 06:29:00

Pro rychle sezname ni s Delphi a praci s databazemi je vhodne napr. "DELPHI v kostce" - J.i�� Sedlacek-Ji�� Slaba (Technick� literatura BEN). Jinak 5.10.1998 ma vyj�t v Microsoft Pressu "Mistrovstv� v Delphi 3" co� je velice dobr� kniha (aspo� p�edchoz� verze)

S pozdravem "klid zbran�m a program�tor�m"
se t�� na dal�� spolupr�ci
ing. Jan Fiala jan.fiala(zv)iname.com

Mohl byste mi nekdo doporucit opravdu dobrou literaturu pro DELPHI (ver. 4, a napojeni na databaze), zacinam :-), pokud mozno v cestine, nebo anglictine. Diky.
M&B


ShutDown & Problem so zapisom do tabulky

[*] Jan Fiala <fiala(zv)iname(tec)com> - 3.9.1998 06:39:26

Zkus se kouknout http://www.inprise.com/devsupport/bde/bdeapiex/

S pozdravem "klid zbran�m a program�tor�m"
se t�� na dal�� spolupr�ci
ing. Jan Fiala jan.fiala(zv)iname.com

BTW: Prednedavnom tu niekto hovoril o tom ze sa da cez priame volanie funkcii BDE vynutit zapis dat z cache na disk. Kde taka dokumentacia rastie?

Richard

Jak� SQL server ?

[*] Daniel Prynych <Daniel.Prynych(zv)hornet(tec)cz> - 3.9.1998 06:52:47

Toto je zpr�va ve form�tu MIME obsahuj�c�n�kolik ��st�.

Poridte si Linux RH 5.x a Interbase 4.0 pro linux a nezaplatite ani
korunu a resesni je stabilnejsi nez pro NT.
Idealni (bezpecnejsi) je mit databazovy server jako samostatnou jednotku.
Samozrejmne budou vam tvrdit ze musite mit NT a IB pro NT alo proc ?
Protoze na Linuxu prodejce nic netrhne.
Database Desktop pak pustite na lokalni stanici.
Dan
-----P�vodn� zpr�va-----
Od: Boris Pe�ka <baris(zv)email(tec)cz>
Komu: delphi(zv)pinknet(tec)cz <delphi(zv)pinknet(tec)cz>
Datum: 2. z��� 1998 20:42
P�edm�t: Jak� SQL server ?


Zdrav�m !

Jsem za��naj�c� program�tor a cht�l bych se zeptat, pro jak� SQL server se m�m rozhodnout.

Moje po�adavky jsou :

- levn� server i klient (nem� smysl n�komu instalovat SQL server za 15.000 K� +
klient za 4.000 - 5.000 K�, kdy� vlastn� program je mnohem levn�j��)
- pokud mo�no m�t k tomu n�co jako Database Desktop na vytv��en� tabulek, index�, atd.

Pou��vat bych to cht�l v s�ov�ch programech na 1-3 po��ta��ch. Sice by bylo v tomto p��pad� bylo
ide�ln� pou��vat Paradox nebo dBase, ale podle m�ho n�zoru je SQL server bezpe�n�j�� a
l�pe se d�laj� "p�ehledy dat".


Mockr�t d�ky za odpov�di !


Boris


Pristup na databazu cez ODBC

[*] Radoslav Balvan <balvanra(zv)datalock.sk> - 03.9.1998 07:39:28

mrzi ma to - subory *.mdb patria ku akej databaze?
ak ku Accessu, tak k nim som nativne ovladace nevidel....
nativne ovladace su ku : Oracle, Sybase, Interbase, tusim Informix,
DBase/Paradox,
myslim, ze to je vsetko...

Richard Willmann wrote:

> Dakujem,
>
> BTW: V ktorej verzii BDE su nativne ovladace pre *.mdb? BOli s nimi nejake
> problemy?
>
> Richard willmann
>
> -----P�vodn� zpr�va-----
> Od: Radoslav Balvan <balvanra(zv)datalock.sk>
> Komu: DELPHI Distribution List <delphi(zv)pinknet(tec)cz>
> Datum: 28. august 1998 13:11
> P�edm�t: Re: Pristup na databazu cez ODBC
>
> >musis mat nainstalovany odbc ovladac
> >v tvojom pripade zrejme Microsoft Access Driver...
> >(instaluje sa myslim spolu s Accessom - presvedcis sa v Control
> >Panels|ODBC - drivers)
> >
> >no a potom uz normalne tak ako na iny zdroj -
> > bud si v BDE vytvoris alias spojeny s ODBC DataSourcom
> >
> > alebo pouzijes TDatabase
> >
> >
> >
> >Richard Willmann wrote:
> >
> >> Ako sa pripojim na ODBC databazu z delphi (Access)?
> >>
> >
> >--
> >Maj sa,
> >R.
> >

--
Maj sa,
R.

zmena ikony u komponenty

[*] Dobromil Mal� <Dobromil.Maly(zv)rak.pr.ds.mfcr(tec)cz> - 3.9.1998 07:41:07


No, melo by to jit tak, ze si v image editoru udelas bitmapu (20x20), das ji (te bitmape) stejne jmeno, jako je jmeno tridy, tedy TPanelX a cely soubor ulozis pod stejnym jmenem, jako ja zdrojovy kod knihovny(napr. ma komp.pas), ale s priponou dcr, tedy napr. ma komp.dcr.

Ale me to NEFUNGUJE !!! Porad to hlasi File my komp.dcr not found a tak podobne

Dobra.

----------
Od: Franta[SMTP:macala(zv)praktik(tec)cz]
Odesl�no: 2. z��� 1998 13:34
Komu: 'DELPHI Distribution List'
P�edm�t: zmena ikony u komponenty

ahoj,

mam drobny technicky problem. Vytvoril jsem si svoji komponentu
TPanelX = class(TPanel).
V liste komponent bych ale potreboval, aby ikona teto komponenty byla jina nez od TPanel, ale nevim jak to udelat.

Diky za kazdou radu
Franta
macala(zv)praktik(tec)cz

Off topic - konverze mailu

[*] Svatopluk V�t <vit(zv)ardo(tec)cz> - 3.9.1998 07:44:51

Import MS Mail umi Outlook 97.

-----P�vodn� zpr�va-----
Od: Jiri Szopa [SMTP:jiri.szopa(zv)telecom(tec)cz]
Odesl�no: 2. z��� 1998 10:28
Komu: delphi(zv)io.pinknet(tec)cz
P�edm�t: Off topic - konverze mailu

Pouzivam MS Internet Mail and News dodavany s W95.
Vadi mi, ze nema moznost hledani podle obsahu.
Nedari se mi exportovat zpravy do Exchange (je to jediny format
na ktery umi exportovat).
1. Nema nekdo zkusenost z exportem ?
2. Ktery postovni klient umi importovat z MS Internet Mail and News ?
(Exchange ani Outlock Expres to neumi !!! - a to jsou od MS)
-------------------------------------------
Ing. Jiri Szopa
tel.: +420 659 713393
fax.: +420 659 713392
email: jiri.szopa(zv)telecom(tec)cz

Tvorba napovidy

[*] Milan Schembera <schemberam(zv)avx(tec)cz> - 3.9.1998 07:51:28

Koukni do Delphi adresare do HELP\TOOLS na HCW.EXE. Vysla k tomu knizka "Tvorba napovedy ve Windows 95" s takovou topici se rukou.
Jednotliva temata si svazes pres HelpContext (coz je cislo tematu), ale nesmis zapomenout priradit HLP soubor do Application.HelpFile.

Jinak se da jeste pouzit ForeHelp, ale to uz se musi kupovat.

S pozdravem

Milan
MIS Dept.
AVX Czech Republic
Lanskroun
<mailto:schemberam(zv)avx(tec)cz>

>
> Muzete mi nekdo v kratkosti popsat tvorbu napovedy (souboru neco.hlp a
> spol.) a pripojeni jednotlivych temat k Delphi programu ? Predem diky.
> Marian.Morzol(zv)ostrava.aksignal(tec)cz


Zjisteni kdo je pripojen k siti

[*] Kosta <kosta(zv)iol(tec)cz> - 3.9.1998 07:58:25

Mam problemeky:

1. Potrebuji v D3 zjistit vsechny pripojene a prihlasene pocitace do LANu,

2. Potrebuji se pripadne dostat do zdileneho adresare vzdaleneho pocitace i
kdyz neni pripojen v W95

Je to muj prvni pokus v LANu, tak diky za schovivavost a kazde nakopnuti

Kosta


kosta(zv)iol(tec)cz 0602/203175


Literatura

[*] Linhart Petr <Petr(zv)manwe.mius(tec)cz> - 3.9.1998 08:00:54

Ctu dobre? Microsoft Press vydava knihu o Delphi? To se mi ani nechce verit
:)))


Petr Linhart, System developer (mailto://Petr.Linhart(zv)mius(tec)cz)
Mius a.s. (http://www.mius(tec)cz)
Dlouha 2940
415 01 TEPLICE
Czech Republic

> -----P�vodn� zpr�va-----
> Od: Jan Fiala [SMTP:fiala(zv)iname.com]
> Odesl�no: 3. z��� 1998 6:29
> Komu: DELPHI Distribution List
> P�edm�t: Re: Literatura
>
> Pro rychle sezname ni s Delphi a praci s databazemi je vhodne napr.
> "DELPHI v kostce" - J.i�� Sedlacek-Ji�� Slaba (Technick� literatura BEN).
> Jinak 5.10.1998 ma vyj�t v Microsoft Pressu "Mistrovstv� v Delphi 3" co�
> je velice dobr� kniha (aspo� p�edchoz� verze)
>
> S pozdravem� "klid zbran�m a program�tor�m"
> se t�� na dal�� spolupr�ci
> ing. Jan Fiala���� jan.fiala(zv)iname.com <mailto:jan.fiala(zv)iname.com>
>
>
> Mohl byste mi nekdo doporucit opravdu dobrou literaturu pro DELPHI
> (ver. 4, a napojeni na databaze), zacinam :-), pokud mozno v cestine, nebo
> anglictine. Diky.
> ��������������������������������������������������� M&B
>

Tvorba n�pov�dy

[*] Mor�ol Marian <Marian.Morzol(zv)ostrava.aksignal(tec)cz> - 3.9.1998 08:03:24

Muzete mi nekdo v kratkosti popsat tvorbu napovedy (souboru neco.hlp a
spol.) a pripojeni jednotlivych temat k Delphi programu ? Predem diky.
Marian.Morzol(zv)ostrava.aksignal(tec)cz


zmena ikony u komponenty

[*] David_Zabensky.UNION(zv)union(tec)cz - 3.9.1998 08:08:21

Vzhledem k tomu, ze MS Windows jsou z pekla mazane, je dulezite kombinovat
s velikosti pismen jmena. To je alespon ma skusenost - vyplati se vse psat
vel�kyma pismenama. (tj. PANELX v dcr).

David;

Literatura

[*] David_Zabensky.UNION(zv)union(tec)cz - 3.9.1998 08:11:41

Vyborna je knizka M. Cantu z ComputerPressu (Sybex) - Mastering Delphi...
David;

Pristup na databazu cez ODBC

[*] Miroslav BALAZ <mibainfo(zv)internet.sk> - 3.9.1998 08:22:35

Podla mojich vedomosti od BDE verzie 4 a vyssie je podporovany ACCESS
do verzie 7 vratane (t.j. OFFICE95 /mozno nejde ACCESS 2.0/). Od BDE 4.51
je podporovana aj zatial posledna verzia ACCESS (v. 8, t.j. z balika
OFFICE97)
Podporovane v tomto vyzname znamena sice nativnu podporu, ale je treba
mat
nejake subory z instalacie ACCESS. Ktore su to menovite subory, je urcite
popisane niekde v helpe.
Ano *.mdb su subory - databazy ACCESS. s pozdravom
Miro


-----P_vodn_ spr_va-----
Od: Radoslav Balvan <balvanra(zv)datalock.sk>
Pre: DELPHI Distribution List <delphi(zv)pinknet(tec)cz>
D_tum: 3. september 1998 07:51
Predmet: Re: Pristup na databazu cez ODBC


>mrzi ma to - subory *.mdb patria ku akej databaze?
>ak ku Accessu, tak k nim som nativne ovladace nevidel....
>nativne ovladace su ku : Oracle, Sybase, Interbase, tusim Informix,
>DBase/Paradox,
> myslim, ze to je vsetko...
>
>Richard Willmann wrote:
>
>> Dakujem,
>>
>> BTW: V ktorej verzii BDE su nativne ovladace pre *.mdb? BOli s nimi
nejake
>> problemy?
>>
>> Richard willmann
>>
>> -----P_vodn_ zpr_va-----
>> Od: Radoslav Balvan <balvanra(zv)datalock.sk>
>> Komu: DELPHI Distribution List <delphi(zv)pinknet(tec)cz>
>> Datum: 28. august 1998 13:11
>> P_edm_t: Re: Pristup na databazu cez ODBC
>>
>> >musis mat nainstalovany odbc ovladac
>> >v tvojom pripade zrejme Microsoft Access Driver...
>> >(instaluje sa myslim spolu s Accessom - presvedcis sa v Control
>> >Panels|ODBC - drivers)
>> >
>> >no a potom uz normalne tak ako na iny zdroj -
>> > bud si v BDE vytvoris alias spojeny s ODBC DataSourcom
>> >
>> > alebo pouzijes TDatabase
>> >
>> >
>> >
>> >Richard Willmann wrote:
>> >
>> >> Ako sa pripojim na ODBC databazu z delphi (Access)?
>> >>
>> >
>> >--
>> >Maj sa,
>> >R.
>> >
>
>--
>Maj sa,
>R.
>
>

zmena ikony u komponenty

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 3.9.1998 08:26:20

Franta wrote:

> mam drobny technicky problem. Vytvoril jsem si svoji komponentu
> TPanelX = class(TPanel).
> V liste komponent bych ale potreboval, aby ikona teto komponenty byla jina
> nez od TPanel, ale nevim jak to udelat.

Musis mu vyrobit soubor .dcr. Prohledni si v prikladech, jak se to
dela. Otevira se Image Editorem.


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


vysledek count

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 3.9.1998 08:26:20

Richard Valny wrote:

> Jak nejlepe a nerozumneji odchytit vysledek SQL dotazu (v TQuery), kter
> m� vr�tit pocet vet?
>
> Priklad:
> SELECT COUNT(*) FROM MOJETABLE WHERE MOJE_PODMINKA
>
function GetQID(Q:TQuery;sql:string):integer;
begin
Q.SQL.Clear;
Q.SQL.Add(sql);
Q.Open;
if Q.EOF then Result:=0 else Result:=Q.Fields[0].AsInteger;
Q.Close;
Q.SQL.Clear;
end;


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


Informix a BDE

[*] Ivo HERLES <herles(zv)chv.pvt(tec)cz> - 3.9.1998 08:39:03

Pristupujeme tez k Informixu pomoci BDE a SQL Link. Potize tohoto typu jsme
zatim nezaregistrovali (prikolika TQuery ti to spadne).

Pouzivame INFORMIX-CLI 2.5.TD2 ve spojeni se serverem Informix OnLine 7.23.
Protoze jsme zpocatku toto provozovali i na OnLine 7.11 a 7.14
nepredpokladam, ze chyba bude na strane serveru. Chybu bych hledal na strane
klienta t. j. IConect.

S pozdravem,

Ivo HERLES
PVT, a. s., o. z. Chomutov
e-Mail: ivo.herles(zv)pvt(tec)cz
tel.: 0396/619216

-----P�vodn� zpr�va-----
Od: Milan CERMAK <Milan.Cermak(zv)vtupv(tec)cz>
Komu: delphi(zv)pinknet(tec)cz <delphi(zv)pinknet(tec)cz>
Datum: 2. z��� 1998 20:09
P�edm�t: Informix a BDE


>Hi
>Mate nekdo zkusenosti s pristupem na Informix pres BDE.
>Stava se mi, ze pokud mam otevreno vice TQuery najednou
>pri volani TQuery.Close to spadne na access violation.
>Uvnitr toho Close to pada pri volani GetRowsAffected.
>Kdyz pouziju misto TQuery TTable vse je v poradku, ale
>ne vsechno co potrebuji se da pomoci TTable realizovat.
>
>Pouzivam BDE 3.0 a Informix Connect 7.20TE1. Zkousel
>jsem jak pristup pres native link tak ODBC a bylo to stejne.
>Na serveru Informix Online 7.20 nebo 7.01.
>
>Uvitam kladne i zaporne zkusenosti s uvedenou konfiguraci.
>
> Milan Cermak
>

NT groups

[*] Miroslav BALAZ <mibainfo(zv)internet.sk> - 3.9.1998 08:48:44

Na tejto adrese
http://www.jgsoftware.com/JGNTControls.htm
je pouzitie NetGroupEnum() a aj nieco navyse.
/napr. konstanty NetServerEnum Types/
Nie je tam NetGroupGetUsers.

s pozdravom
Miro

-----P_vodn_ spr_va-----
Od: Ales Zeleny <zelenya(zv)mlp(tec)cz>
Pre: delphi(zv)pinknet(tec)cz <delphi(zv)pinknet(tec)cz>
D_tum: 2. september 1998 19:56
Predmet: NT groups


DDV, nemate nekdo import hlavicky/zapuzdrene fce pro:

NetGroupEnum()
NetGroupGetUsers()
+------------------------+ +---------------------------+
|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.

Kopirovani

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 3.9.1998 08:48:24

> > > Template funguje perfektne, ale neuklada si to a tim padem ani
> > > neprekopiruje udalosti. Nad timhle uz jsem nejakou dobu badal
> >
> > Jak to ze ne? Me to funguje skvele.
>
> To jsem z toho jelen, neprisel jsem na to, jak to udelat.
> Vzdycky sem musel
> ty udalosti znovu napsat. Jak to mam udelat ??? Skemry skemry ... ;-)


Dejme tomu, ze mam formularik, v nem nekolik objektu s eventama. Oznacim
si ty objekty, ktere chci pouzit (pomoci Shift), z menu Component vyberu
prikaz CreateComponent Template, necham tak jak je, potvrdim a vytvori
se mi nova zalozka s nazvem Templates, kde najdu co potrebuju. Pak to
jen vlozim do noveho formulare a je vymalovano;-)
.........................................................
. Libor Krayzel .
. Czech Television, Studio Ostrava .
. Dvorakova 18, 702 00 Ostrava .
. Telephone: 069-6201375 .
. URL: http://freeweb.coco(tec)cz/sovtop .
. E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz .
. Fidonet: mailto:libor_krayzel(zv)p15.f42.n421.z2.fido(tec)cz .
. E-mail2: mailto:sovtop(zv)email(tec)cz .
.........................................................

NT groups - NetGroupGetUsers()

[*] Miroslav BALAZ <mibainfo(zv)internet.sk> - 3.9.1998 09:03:10

Odpoved na pouzitie a definiciu NetGroupGetUsers() prikladam
ako som nasiel:


The definition for NetGroupGetUsers is...

function NetGroupGetUsers (serverName, groupName : PWideChar; level :
Integer; var buffer : Pointer; prefMaxLen : Integer; var entriesRead,
totalEntries, resumeHandle : Integer) : NetAPIStatus; stdcall;


A snippet from my TNetGroup component, which shows how to use it...

procedure TNetGlobalGroup.GetMembers (list : TStrings);
var
wServer, wGroupName : WideString;
rv, i, entriesRead, totalEntries : Integer;
buffer : pointer;
p : PGROUP_USERS_INFO_0;
begin
list.Clear;
GetWideName (wServer, wGroupName);
rv := NetGroupGetUsers (PWideChar (wServer), PWideChar (wGroupName),
0, buffer, MAX_PREFERRED_LENGTH,
entriesRead, totalEntries, NIL_HANDLE);

if rv = NERR_Success then
try
p := PGROUP_USERS_INFO_0 (buffer);
for i := 0 to entriesRead - 1 do
begin
list.AddObject (p^.grpui0_name, TObject (SidTypeUser));
Inc (p)
end
finally
NetApiBufferFree (buffer);
end
else
raise ENTException.Create (rv);
end;

-------
Colin
web: http://www.wilsonc.demon.co.uk/delphi.htm

Dufam, ze to pomoze
s pozdravom
Miro
-----P_vodn_ spr_va-----
Od: Petr Zahradnik <clexpert(zv)clexpert(tec)cz>
Pre: delphi(zv)pinknet(tec)cz <delphi(zv)pinknet(tec)cz>
D_tum: 3. september 1998 00:43
Predmet: Re: NT groups


> DDV, nemate nekdo import hlavicky/zapuzdrene fce pro:
>
> NetGroupEnum()
> NetGroupGetUsers()

Panel zastupcu

[*] Roman Ka�ovsk� - 3.9.1998 09:16:06

Poradte mi nekdo, jak lze udelat v delphi neco podobneho jako je panel
zastupcu MS OFFICE nebo jak se to jmenuje


Dik Roman K.

Ancestor class name

[*] Jirka Fejfar <fejfarj(zv)login(tec)cz> - 3.9.1998 09:21:36

Ahoj vsichni,

nevite nahodou nekdo, jak zjistit jmeno typu (nobo samotnej typ) predka
urciteho objektu ....

na tohle proste nedokazu prijit, nebo jsem uplne slepej ....

zatim diky i za nejake zkusenosti se %subj% .....
__________________

Jiri Fejfar
e-mail: fejfarj(zv)login(tec)cz
__________________

Literatura

[*] Jan Fiala <fiala(zv)iname(tec)com> - 3.9.1998 09:28:48

Omlouvam se, Mistrovstvi v Delphi vydava Computer Press.
Chybicka se vloudi :-)

S pozdravem "klid zbran�m a program�tor�m"
se t�� na dal�� spolupr�ci
ing. Jan Fiala jan.fiala(zv)iname.com

Tvorba n�pov�dy

[*] Dobromil Mal� <Dobromil.Maly(zv)rak.pr.ds.mfcr(tec)cz> - 3.9.1998 09:35:55


Taky s tim zapolim, ne a ne to fungovat. Takze odpovidejte prosim do konfery, diky
Dobra.

----------
Od: Mor�ol Marian[SMTP:Marian.Morzol(zv)ostrava.aksignal(tec)cz]
Odesl�no: 3. z��� 1998 8:03
Komu: 'delphi(zv)pinknet(tec)cz'
P�edm�t: Tvorba n�pov�dy

Muzete mi nekdo v kratkosti popsat tvorbu napovedy (souboru neco.hlp a
spol.) a pripojeni jednotlivych temat k Delphi programu ? Predem diky.
Marian.Morzol(zv)ostrava.aksignal(tec)cz

Zjisteni kdo je pripojen k siti

[*] Dobromil Mal� <Dobromil.Maly(zv)rak.pr.ds.mfcr(tec)cz> - 3.9.1998 09:35:00


Ahoj,>Mam problemeky:
>
>1. Potrebuji v D3 zjistit vsechny pripojene a prihlasene pocitace do LANu,
Neco takoveho provadi PopChat (vsechny pocitace, kde bezi Wokna(WfW,3.1,95),
je to nekde na DSP nebo Torry a je tam uvedeno, ze je to v D3 (?)
a ze na pozadani dostanes i zdrojak.

>2. Potrebuji se pripadne dostat do zdileneho adresare vzdaleneho pocitace i
>kdyz neni pripojen v W95
Myslim, ze pokud nebezi Windows (ani WfW ani W95),
tak lze zdroje jen pouzivat a ne nabizet.

Dobra.

zmena ikony u komponenty

[*] Dobromil Mal� <Dobromil.Maly(zv)rak.pr.ds.mfcr(tec)cz> - 3.9.1998 09:40:47


Image Editor to prevede stejne na velka, viz. binarni vypis file.drc
D.

----------
Od: David Zabensky.UNION(zv)union(tec)cz[SMTP:David Zabensky.UNION(zv)union(tec)cz]
Odesl�no: 3. z��� 1998 9:08
Komu: DELPHI Distribution List
P�edm�t: RE: zmena ikony u komponenty

Vzhledem k tomu, ze MS Windows jsou z pekla mazane, je dulezite kombinovat
s velikosti pismen jmena. To je alespon ma skusenost - vyplati se vse psat
vel�kyma pismenama. (tj. PANELX v dcr).

David;

alt F4

[*] Lubos Jerabek <lubos(zv)qed(tec)cz> - 3.9.1998 10:12:50

Nevite nahodou nekdo jak potlacit u alikace alt+F4.
Lubos


Sockets

[*] Daniel SICHTA <Sichta(zv)asset.sk> - 3.9.1998 10:16:37

Hladam nejaky manual (dokumentaciu nie help v D3) ku komponentom
TServerSocket, TClientSocket a vsetko co k tomu patri. Najde sa niekde ?
Vopred dakujem !!!!!

Ing. Daniel �ichta, ASSET s.r.o.
Rosinsk� 8, 011 05, �ilina SLOVAKIA
0421-89-54215
sichta(zv)za.asset.sk


zmena ikony u komponenty

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 3.9.1998 10:17:02

> No, melo by to jit tak, ze si v image editoru udelas bitmapu (20x20), =
> das ji (te bitmape) stejne jmeno, jako je jmeno tridy, tedy TPanelX a =
> cely soubor ulozis pod stejnym jmenem, jako ja zdrojovy kod =
> knihovny(napr. ma_komp.pas), ale s priponou dcr, tedy napr. ma_komp.dcr.
>
> Ale me to NEFUNGUJE !!! Porad to hlasi File my_komp.dcr not found a tak =
> podobne

A pridal jsi to do balicku takto?

{$R 'my_komp.dcr'}

S pozdravem
Petr Zahradnik, pocitacovy expert

Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================

Pristup na databazu cez ODBC

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 3.9.1998 10:17:02

> mrzi ma to - subory *.mdb patria ku akej databaze?
> ak ku Accessu, tak k nim som nativne ovladace nevidel....

Ja ano. Jsou v BDE 4.51 v D3 i v BDE 5.0 v D4.

S pozdravem
Petr Zahradnik, pocitacovy expert

Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================

Poradte budoucimu zacatecnikovi

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 3.9.1998 10:17:02

> ..... Strucne receno, mas-li D3 C/S,
> pak si koupis D4 Pro a chces pouzivat InterBase, pujde to, ale pokud
> mas stejnou kombinaci a chtel bys pouzivat MS SQL Server, mas proste
> smulu...
> ------------------
> Jo to je presne muj pripad. S Interbazi jsem naprosto spokojen a staci mi.
> SQL links mam z D3 /CS. Bohuzel to asi nebude pripad vsech a hlavne to

Pak mas dvere otevrene.

> nepomuze Honzovi, od nehoz byl ten puvodni dotaz.
> Jedinej rozumnej zaver asi tedy je, ze pokud chce programovat C/S
> v D4, musi koupit drahou CS verzi. Muze ji vsak poridit lacineji, pokud
> ji nebude kupovat u naseho Borlandu, ale v US. Jinak se musi
> spolehnout na ODBC.

Ano, presne tak.

S pozdravem
Petr Zahradnik, pocitacovy expert

Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================

Literatura

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 3.9.1998 10:17:02

> Ctu dobre? Microsoft Press vydava knihu o Delphi? To se mi ani nechce verit
> :)))

Proc ne? Vzdyt MS sponzoruje i ruzne konference Borlandu, treba
zrovna tu posledni...

S pozdravem
Petr Zahradnik, pocitacovy expert

Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================

Komponenta na ARJ

[*] Hojda Pavel <hojda(zv)mmp.plzen-city(tec)cz> - 3.9.1998 10:17:09

Cau,
nemate nekdo komponentu na rozbalovani arj archivu.

Pavel


ShutDown & Problem so zapisom do tabulky

[*] Lubor Kolar <lubork(zv)tnet(tec)cz> - 03.9.1998 10:20:22

Dne Sat, 29 Aug 1998 10:45:23 +0200 Richard Willmann napsal:

> Toto je zprava ve formatu MIME obsahujmcm nlkolik hastm.
>
> ----------------------------------------------------------------
> Ahoj,
>
> tak som to aj chcel ale pokial pri obsluhe shutdown cakam v cykle na false tak je to priliz CPU consuming.
> Je potrebne pouzit Timer ?
Tak tam dej do ty smycky Sleep(time in 1/1000 sec);
Lubor bIRDIE Kolar
====================
GSM Phone: +420-603-410019


RichEdit

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 3.9.1998 10:29:32

Zdravim vsechny,

prosim o naklepnuti. Mam TRichEditu jeden znak. V evente
OnSelectionChange chci testovat, zda prave napsany znak vyhovuje urcite
podmince. Ovsem nejsem schopen zjistit prave ten napsany znak.
Prosim o radu.

.........................................................
. Libor Krayzel .
. Czech Television, Studio Ostrava .
. Dvorakova 18, 702 00 Ostrava .
. Telephone: 069-6201375 .
. URL: http://freeweb.coco(tec)cz/sovtop .
. E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz .
. Fidonet: mailto:libor_krayzel(zv)p15.f42.n421.z2.fido(tec)cz .
. E-mail2: mailto:sovtop(zv)email(tec)cz .
.........................................................

Registry

[*] Simicek Pavel <simicek(zv)uvss.fme.vutbr(tec)cz> - 3.9.1998 10:35:42

> jsem novym clenem teto konference, vsechny vas zdravim a prichazim s
> nasledujicim dotazem.
>
> Potrebuji nasledujicim zpusobem pracovat se sytemovym registrem:
>
> Ulozit HKEY_CURRENT_USER\Neco\ do souboru ble.ble
> ^- to je v poradku, pouziji TRegistry.SaveKey
>
> No, a ted nastane situace, kdy Klic Neco v CURRENT_USER neni, potrebuji ho
> tam vytvorit a nacist do nej to co je ulozene v ble.ble
> ^-
> Zkousel jsem nasledujici
>
> R : TRegistry;
>
> R := TRegistry.Create;
> R.CreateKey ('Neco');
> R.RestoreKey ('\Neco', 'ble.ble') <- no a tohle vraci false, at
> delam co delam
>
> co funguje je
>
> R.RootKey := HKEY_USERS;
> R.LoadKey ('\Neco', 'ble.ble');
>
> ale tam zas nevim jak cely klic \Neco prenest do HKEY_CURRENT_USER
>
> nevite nekdo jak na to?
> Dekuji za odpovedi
> Milos Madlik
>
>


Co je zac ten soubor Bla.Bla? Podivej se do helpu k RestoreKey a tam je v
NOTE sekci uvedeno jak musi byt vytvoren.
Treba to bude ono.
Pavel

-----------------------------------------------------------
Ing. Pavel Simicek
UVSSaR, FS, VUT Brno, Technicka 2, 616 69
Tel. 05/41142461
e-mail simicek(zv)uvss.fme.vutbr(tec)cz
-----------------------------------------------------------


Literatura

[*] Milan Sorm <xsorm(zv)informatics.muni(tec)cz> - 3.9.1998 10:43:02

V poslednim dopise David_Zabensky.UNION(zv)union(tec)cz pise:
> Vyborna je knizka M. Cantu z ComputerPressu (Sybex) - Mastering Delphi...
> David;
>
>

to Mistrovstvi v Delphi neni od MSPressu ale od CPressu, ne ...

milan

-------------------------------------------------------------
Milan Sorm (aka John Popelnik) telefon: +420 5 41512348
FI MU, Botanicka 68a, Brno sorm(zv)informatics.muni(tec)cz
http://www.fi.muni(tec)cz/~sorm/ tel. domu: (05) 46211083

fingerprint: E4 78 1D A7 C5 2C F5 3F 83 A7 97 29 73 F7 17 63


alt F4

[*] Lubos Jerabek <lubos(zv)qed(tec)cz> - 3.9.1998 10:44:27

Nevite nekdo jak se zbavit u aplikace alt+F4

Lubos Jerabek


TUpdateSQL a Blob

[*] ing.Da�a Ale� - 3.9.1998 10:44:40

Ahoj

Po prechodu z TTable, na TQuery a TUpdateSQL mam problem s pridavanim a
opravou sloupce typu textovy Blob v Interbase. Dojde k poruse sdileni pameti
v nejake knihovne M*.DLL a totalnimu zatuhnuti programu. Pokud z TUpdateSQL
vyhodim polozku typu Blob, funguje to O.K.
Dik za radu

Ales Dana


Informix a BDE

[*] Daniel Prynych <Daniel.Prynych(zv)hornet(tec)cz> - 3.9.1998 10:45:30

Umne se projevily podobne problemy kdyz jsem presel z NetBEUI na TCP/IP
Delalo to jen kdyz bylo otevreno vetsi mozstvi Query.
Pouzival jem Interbase 4.0.
Po te co jsem upgradoval BDE tak byl klid.
Zajimave ze problemy byly na Win95 (ruzne verze) a WinNT client ale ne
na WinNT server z nej slo spojeni na databazovy server bez problemu.
Dan


>>Stava se mi, ze pokud mam otevreno vice TQuery najednou
>>pri volani TQuery.Close to spadne na access violation.
>>Uvnitr toho Close to pada pri volani GetRowsAffected.
>>Kdyz pouziju misto TQuery TTable vse je v poradku, ale
>>ne vsechno co potrebuji se da pomoci TTable realizovat.
>>
>>Pouzivam BDE 3.0 a Informix Connect 7.20TE1. Zkousel
>>jsem jak pristup pres native link tak ODBC a bylo to stejne.
>>Na serveru Informix Online 7.20 nebo 7.01.

field Blabla not found

[*] Jiri Sladek <chmelar(zv)oasanet(tec)cz> - 3.9.1998 10:52:48

Zdravim vsechny, mam trochu obecny dotaz.

Program mi obcas vyplivne hlasku

Field BlaBla not found

Chybu se mi ale nedari zopakovat ani na ostre aplikaci, ani pod Delphi.

Neslo by nekde neco upravit, aby se hlasila take adresa, kde k te chybe
doslo ?

Nejedna se mi jen o tuhle konkretni chybu, ale obecne.

Neda se treba neco navesit na osetreni vyjimek, nebo upravit VCL?

Pouzivam Delphi 1 pod Win3.11 nebo Win95.

Diky, Jirka


DOS memory

[*] Jaroslav Weiss <svitap(zv)svitap(tec)cz> - 3.9.1998 11:17:00

Delam pod Delphi 2 spousteci menu na DOSovske programy. Nektere potrebuji
hodne pameti, jinak havaruji. Da se nejak zjistit velikost DOSovske dolni
pameti (<640kB) aniz bych musel spoustet DOSovsky mem.exe??
Diky predem za pomoc. JWeiss , svitap(zv)svitap(tec)cz

Export

[*] Martin Sasek <sasek(zv)ujep(tec)cz> - 3.9.1998 11:26:51

Preji hezky den.

Mam nasledujici problem. Exportuji data z formatu DBF do InterBase. Jsou to
dve tabulky (uctenka,pozice). Mam zkusebni vzorek (asi 30Mb) ale ostra data
budou mit kolem 1Gb. Mam hotovou aplikaci v D3 ve ktere je exportovaci modul
a tady je ten maly problem. Rychlost exportu je asi 10 vet za sek. coz je
hrozne pomale. Pri tak velkem objemu dat by cely export trval asi 3 dny.
Na DBF soubory pristupuji pres ODBC (kvuli stavajicim indexum .IDX ktere BDE
nepodporuje). Vyrobim SELECT, ten pak postupne projizdim vetu po vete,
sestavim patricny prikaz INSERT a ten pak posilam na server. Muzete mi
poradit kde by slo neco urychlit ?

Dekuji

Martin Sasek
sasek(zv)ujep(tec)cz

Tvorba n�pov�dy

[*] Marek Soukup <marek(zv)comberg(tec)com> - 03.9.1998 11:29:26

Ahoj,
myslim, ze nejrozumnejsi je si stahnout nejakou trial verzi programu
na tvorbu helpu (napr. Help Scribble) a precist si help nebo pustit
tutorial. Napsat to na par radek proste nejde (teda pokus chces aby ty
helpy k necemu vypadaly).
Marek

Mor�ol Marian wrote:

> Muzete mi nekdo v kratkosti popsat tvorbu napovedy (souboru neco.hlp a
> spol.) a pripojeni jednotlivych temat k Delphi programu ? Predem diky.
> Marian.Morzol(zv)ostrava.aksignal(tec)cz


Tvorba n�pov�dy

[*] Vilem Svoboda <vilem_s(zv)mrp(tec)cz> - 3.9.1998 11:30:29

> Muzete mi nekdo v kratkosti popsat tvorbu napovedy (souboru neco.hlp a
> spol.) a pripojeni jednotlivych temat k Delphi programu ? Predem diky.
> Marian.Morzol(zv)ostrava.aksignal(tec)cz

Omlouvam, ze opovidam do konference. Dotazy tohoto typu se zde objevuji
celkem pravidelne. Tvorba helpu je jednou z mych pracovnich naplni a pokud
by byl vetsi zajem a nebyly by namitky kategrie off topic, mohl bych
pripravit kratky kurs tvorby helpu, abych nemusel odepisovat kazdemu
zajemci zvlast.

Postup tvorby helpu je popsan jak v helpu k Delphi ci jinym integrovanym
vyvojovym nastrojum, tak v helpu k samotnemu vyvojovemu nastroji (Help
Workshopu). Pokud si nesezenes specialni nastroj (bylo zde jiz uvadeno
nekolik prikladu) budes potrebovat nejlepe Word a jiz zmineny Help
Workshop. Jestlize mas Word 97, je treba pouzit nejnovejsi verzi Workshopu
stazenou napr z adresy:
http://support.microsoft.com/support/kb/articles/Q164/0/12.asp
soubor Hcwsetup. Ta ma opravenu interpretaci novinek v RTF standardu.
Ostatni trapne chyby tam zustaly :-)

Ve wordu se pisi jednotliva temata jako stranky dokumentu a vybavuji se
tituly a identifikatory v podobe poznamek pod carou uvozenych specialnimi
znaky. Zde jsou nedulezitejsi:
# text (identifikator tematu)
$ text (titul tematu)
K text (klicove slovo pro rejstrik)

Zdrojovych souboru muze byt vice. Ukladaji se ve formatu RTF. Obrazky se
vyplati do stranek importovat specialnimi prikazy, zvlaste je-li tehoz
obrazku uzito na vice mistech. Pak se vysledny kompilat prilis nenafukuje.

Dale se pripravi projektovy soubor helpu (vytvori se nejlepe v Help
Workshopu), ktery obsahuje vsechny potrebne definice oken, fontu,
zucastnenych souboru a take mapovani napojeni temat na volani helpu z
programu. Z programu se help vola nastavenim property u komponenty (pak
reaguje na F1) nebo volanim metody ...HelpContext(cislo). Zminene mapovani
v projektovem souboru k helpu definuje, ktery identifikator tematu odpovida
danemu kontextovemu cislu pri volani z programu.

Uzitecnou soucasti helpu je obsah (Contents), ktery se rovnez pripravi
pomoci Help Workshopu. Pokud chces vybavit help obrazky s citlivymi misty
je nutny jeste tzv. HotSpot editor, kterym se to dela. Moznosti a triku je
mnoho a vyplati se studovat jiz hotove zajimave helpy. K tomu ucelu je
velmi prakticky help decompiler, co jiz hotovy help umi rozlozit na
prvocinitele. V pripade zajmu mohu zaslat.

Komusi (mstevlik(zv)gamo.sk) jsem tu uz delal maly kurs tvorby helpu na
pokracovani. Bohuzel jsem si vsechny dily smazal. Treba je jeste ma. Jinak
viz. ma nabidka shora. Ale to bych rad aby se vyjadril moderator, aby to
ostatni neobtezovalo.

Vilda


zmena ikony u komponenty

[*] Marian Jonas <jonas(zv)jia(tec)czn(tec)cz> - 3.9.1998 11:34:07

>No, melo by to jit tak, ze si v image editoru udelas bitmapu (20x20), das
ji (te bitmape) stejne jmeno, jako je >jmeno tridy, tedy TPanelX a cely
soubor ulozis pod stejnym jmenem, jako ja zdrojovy kod knihovny(napr.
>ma_komp.pas), ale s priponou dcr, tedy napr. ma_komp.dcr.

>Ale me to NEFUNGUJE !!! Porad to hlasi File my_komp.dcr not found a tak
podobne

A mas v te unite ma_komp.pas direktivu {$R *.DCR} ?

Marian Jonas
jonas(zv)jia(tec)czn(tec)cz


Literatura

[*] Marian Jonas <jonas(zv)jia(tec)czn(tec)cz> - 3.9.1998 11:38:59

>Ctu dobre? Microsoft Press vydava knihu o Delphi? To se mi ani nechce verit
>:)))


Ani verit nemusis tu knihu vydava Computer Press :-)

Marian Jonas
jonas(zv)jia(tec)czn(tec)cz

RGB v bitmape

[*] Jan Voto�ek <jvotocek(zv)seznam(tec)cz> - 03.9.1998 13:31:01

Rad bych znal odpoved na problem: potrebuji identifikovat na bitmape
rozmezi podobnych barev barve zadane. V jakych datovych typech muzu
barvy uchovavat a jak je mam porovnat? Mam Delphi 4.0. Dekuji za
jakekoliv informace ohledne barev v bitmape

Jan Votocek


Literatura

[*] TUNGLI Jan <tungli(zv)pvt.sk> - 3.9.1998 12:45:47

Podla mne knihy od M.Cantu na tema Delphi su otrasne - su dobre iba pre zaciatocniky a to iba na to aby vedeli ako sa nesmie rozmyslat a hlavne vysvetlovat.

TUNGLI Jan
tungli(zv)pvt.sk

----------
> Od: David_Zabensky.UNION(zv)union(tec)cz
> Pre: DELPHI Distribution List <delphi(zv)pinknet(tec)cz>
> Predmet: Re: Literatura
> D�tum: 3. september 1998 9:11
>
> Vyborna je knizka M. Cantu z ComputerPressu (Sybex) - Mastering Delphi...
> David;
>
>

komponenta pro sifrovani & RSA

[*] Ing. Jaroslav K�e�ek - 3.9.1998 12:50:10

Zkusil jsem to napsat co nejjednoduseji. Neni to nic tezkeho, ale musis to
spravne dostat do Delphi. V D2 je postup nasledujici:
V menu Component/Install stisknout Add a pak Browse najit takovyhle zdrojak
komponenty. A pak dat OK.

Za pozornost Ti urcite stoji procedura Register.

Mej se
Jarda

PS.: Zmen si kodovaci a dekodovaci rutiny. ;-)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Ing. Jaroslav Krecek
computer graphic & software development
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
e-mail: grafex(zv)iol(tec)cz or krecek(zv)iol(tec)cz
for short quick message use
jaroslav.krecek(zv)sms.paegas(tec)cz
phone: +420.603.226103
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~


unit UCoding;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;

type
TCodeStr = class(TComponent)
private
{ Private declarations }
FEncoded : string;
FDecoded : string;
protected
{ Protected declarations }
public
{ Public declarations }
procedure Decode (Key : string);
procedure Encode (Key : string);
published
{ Published declarations }
property Encoded : string read FEncoded write FEncoded;
property Decoded : string read FDecoded write FDecoded;
end;

procedure Register;

implementation

procedure TCodeStr.Decode (Key:string);
begin
{Tvoje dekodovaci rutina}
Decoded := copy(Encoded, length(Key)+1, 255);
{Tvoje dekodovaci rutina}
end;

procedure TCodeStr.Encode (Key:string);
begin
{Tvoje kodovaci rutina}
Encoded := Key + Decoded;
{Tvoje kodovaci rutina}
end;

procedure Register;
begin
RegisterComponents('Samples', [TCodeStr]);
end;

end.

-----P�vodn� zpr�va-----
Od: Dobromil Mal� <Dobromil.Maly(zv)rak.pr.ds.mfcr(tec)cz>
Komu: 'DELPHI Distribution List' <delphi(zv)pinknet(tec)cz>
Datum: 2. z��� 1998 21:59
P�edm�t: komponenta pro sifrovani & RSA


>Ahoj,
>prosim o pomoc zejmena tvurce komponent ...
>chtel bych asi takovouto komponentu (K) :
> ma dve/tri string hodnoty (K.Decoded a K.Encoded /K.key) a
> dve metody (K.Decode a K.Encode)
>
>a potreboval bych, kdyz zavolam metodu K.Encode aby se do K.Encoded
>dosadil rozsifrovany retezec K.Decoded a naopak.
>
>Prosim Vas timto o pomoc. Jenomze sifrovaci algoritmus mam svuj vlastni,
>proto bych potreboval zdrojak (DSP, Torry jsem prolezl), kde bude napr.
>jen TK.Encoded:=TK.Decoded a naopak.
>
>Vim, ze je to hracka, ale jednou jsem se pokusil napsat komponentu (vc.
"ikonky")
>a skloncilo to fiaskem :-))) Poradite nekdo, jak to udelat ?
>
>Vrele diky.
>
>PS: Vite nekdo neco blizsiho (velmi blizkeho) o RSA ?
>
>Dobra.
>

komponenta pro sifrovani & RSA

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 3.9.1998 13:03:27

Dobromil Mal wrote:

> prosim o pomoc zejmena tvurce komponent ...
> chtel bych asi takovouto komponentu (K) :
> ma dve/tri string hodnoty (K.Decoded a K.Encoded /K.key) a
> dve metody (K.Decode a K.Encode)
>
> a potreboval bych, kdyz zavolam metodu K.Encode aby se do K.Encoded
> dosadil rozsifrovany retezec K.Decoded a naopak.
>
Treba nejak takto:

type
K=class
private
fDecoded:string;
fEncoded:string;
procedure SetEncoded(Value:string);
procedure SetDecoded(Value:string);
public
Encoded: string read fEncoded write SetEncoded;
Decoded: string read fDecoded write SetDecoded;
function Decode:string;
function Encode:string;
end;

procedure K.SetEncoded(Value:string);
begin
if fEncoded<>Value then
begin
fEncoded:=Value;
Encode;
end;
end;

procedure K.SetDecoded(Value:string);
begin
if fDecoded<>Value then
begin
fDecoded:=Value;
Decode;
end;
end;

function K.Decode:string;
begin
Result:=desifrovani fDecoded;
fEncoded:=Result;
end;

function K.Encode:string;
begin
Result:=sifrovani fEncoded;
fDecoded:=Result;
end;

Je to ono?


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


Classes

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 3.9.1998 13:03:27

heinisch(zv)post(tec)cz wrote:

> To jsem nekde videl, snazim si vzpomenout kde
>
> musim se podivat na nejaky mista kdyz zjistim hned odpovim

Byl bych ti zauzlovan. Chtel bych seznam trid zjistovat ze sveho
programu.


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


Poradte budoucimu zacatecnikovi

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 3.9.1998 13:03:27

=?iso-8859-1?B?imtl+O1rIEphcm wrote:

> K cene D4 CS jeste poznamku. Soucasti C/S verze (alespon u D3 to tak
> bylo), je 4 users Interbase, coz je asi tak 30.000,- Pokud tedy nekdo
> uvazuje o pouziti tohoto serveru, pak se mu ta cena za D4 CS nemusi jevit
> az tak hroziva. Zalezi o jak velkou a majetnou firmu se jedna.

Je vysoka, a to z jednoducheho duvodu: ta licence je vyvojarska, a
ne uzivatelska. Obdobne je to s MIDAS. Takze kdyz firma koupi
Delphi pro sebe a pak bude chtit pouzivat MIDAS i databazi, musi
si to dokoupit jeste jednou. Rozdil mezi Profi a C/S je cca 90 000
(80 000 upgr.).

6.2 The 32-bit five-user InterBase Server
-----------------------------------------
Delphi Client/server contains the 32-bit five-user Inter-
Base Server for Windows 95. (This server also runs under
Windows NT.) Purchase of Delphi Client/server, however,
does not include deployment or redistribution rights for
any InterBase Server files. Customers who wish to deploy
InterBase Server applications must separately purchase
individual copies of the InterBase Server; contact
InterBase Software Corporation for details. See the
collateral sheet (printed information) or the file
IBKEY.TXT for additional information.


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


Informix a BDE

[*] Milan CERMAK <Milan.Cermak(zv)vtupv(tec)cz> - 3.9.1998 13:03:28

Bohuzel se mi nepodarilo vysledovat nejake pravidlo prikolika
TQuery to spadne. Nekdy mam otevreno 6 TQuery a vydrzi to
nekdy staci 3 a pada to. Nejdriv jsem si myslel, ze mam nejakou
hloupu chybu v programu n- nejake preteceni nebo neco, ale dela
to v ruznych programech a vzdy pri tom Close.

Taky si myslim, ze chyba je na klientu, protoze kdyz spustim
naprosto stejne SQL dotazy trebas z ESQL/C tak je vse v poradku.
Chyba bude asi v BDE nebo v Connect.

Jakou verzi BDE pouzivate vy?

-----P�vodn� zpr�va-----
Od: Ivo HERLES <herles(zv)chv.pvt(tec)cz>
Komu: DELPHI Distribution List <delphi(zv)pinknet(tec)cz>
Datum: 3. z��� 1998 9:21
P�edm�t: Re: Informix a BDE


>Pristupujeme tez k Informixu pomoci BDE a SQL Link. Potize tohoto typu jsme
>zatim nezaregistrovali (prikolika TQuery ti to spadne).
>
>Pouzivame INFORMIX-CLI 2.5.TD2 ve spojeni se serverem Informix OnLine 7.23.
>Protoze jsme zpocatku toto provozovali i na OnLine 7.11 a 7.14
>nepredpokladam, ze chyba bude na strane serveru. Chybu bych hledal na
strane
>klienta t. j. IConect.
>
>S pozdravem,
>
>Ivo HERLES
>PVT, a. s., o. z. Chomutov
>e-Mail: ivo.herles(zv)pvt(tec)cz
>tel.: 0396/619216
>
>-----P�vodn� zpr�va-----
>Od: Milan CERMAK <Milan.Cermak(zv)vtupv(tec)cz>
>Komu: delphi(zv)pinknet(tec)cz <delphi(zv)pinknet(tec)cz>
>Datum: 2. z��� 1998 20:09
>P�edm�t: Informix a BDE
>
>
>>Hi
>>Mate nekdo zkusenosti s pristupem na Informix pres BDE.
>>Stava se mi, ze pokud mam otevreno vice TQuery najednou
>>pri volani TQuery.Close to spadne na access violation.
>>Uvnitr toho Close to pada pri volani GetRowsAffected.
>>Kdyz pouziju misto TQuery TTable vse je v poradku, ale
>>ne vsechno co potrebuji se da pomoci TTable realizovat.
>>
>>Pouzivam BDE 3.0 a Informix Connect 7.20TE1. Zkousel
>>jsem jak pristup pres native link tak ODBC a bylo to stejne.
>>Na serveru Informix Online 7.20 nebo 7.01.
>>
>>Uvitam kladne i zaporne zkusenosti s uvedenou konfiguraci.
>>
>> Milan Cermak
>>
>
>

Ancestor class name

[*] Ing. Jaroslav K�e�ek - 3.9.1998 13:03:09

Kazdy objekt je typu TObject. V helpu je dost takovych informaci.
Takze abych dlouho nekecal:

ShowMessahe(TvujObjekt.ClassParent.ClassName);

Mej se
Jarda


~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Ing. Jaroslav Krecek
computer graphic & software development
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
e-mail: grafex(zv)iol(tec)cz or krecek(zv)iol(tec)cz
for short quick message use
jaroslav.krecek(zv)sms.paegas(tec)cz
phone: +420.603.226103
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~


-----P�vodn� zpr�va-----
Od: Jirka Fejfar <fejfarj(zv)login(tec)cz>
Komu: DELPHI Distribution List <delphi(zv)pinknet(tec)cz>
Datum: 3. z��� 1998 12:43
P�edm�t: Ancestor class name


>Ahoj vsichni,
>
>nevite nahodou nekdo, jak zjistit jmeno typu (nobo samotnej typ) predka
>urciteho objektu ....
>
>na tohle proste nedokazu prijit, nebo jsem uplne slepej ....
>
>zatim diky i za nejake zkusenosti se %subj% .....
>__________________
>
> Jiri Fejfar
> e-mail: fejfarj(zv)login(tec)cz
>__________________
>
>

Ancestor class name

[*] Milan Schembera <schemberam(zv)avx(tec)cz> - 3.9.1998 13:13:02

> Ahoj vsichni,
>
> nevite nahodou nekdo, jak zjistit jmeno typu (nobo samotnej typ) predka
> urciteho objektu ....
>
> na tohle proste nedokazu prijit, nebo jsem uplne slepej ....
>
> zatim diky i za nejake zkusenosti se %subj% .....

Zkus property (Tvuj objekt).ClassParent ;-)

S pozdravem

Milan
MIS Dept.
AVX Czech Republic
Lanskroun
<mailto:schemberam(zv)avx(tec)cz>

Ancestor class name

[*] Dobromil Mal� <Dobromil.Maly(zv)rak.pr.ds.mfcr(tec)cz> - 3.9.1998 13:18:29


Je to vlastnost Patent, tedy napr. Button1.Parent je typu TWinControl, takze jmeno predka je Button1.Parent.Name

----------
Od: Jirka Fejfar[SMTP:fejfarj(zv)login(tec)cz]
Odesl�no: 3. z��� 1998 9:21
Komu: DELPHI Distribution List
P�edm�t: Ancestor class name

Ahoj vsichni,

nevite nahodou nekdo, jak zjistit jmeno typu (nobo samotnej typ) predka
urciteho objektu ....

na tohle proste nedokazu prijit, nebo jsem uplne slepej ....

zatim diky i za nejake zkusenosti se %subj% .....


Jiri Fejfar
e-mail: fejfarj(zv)login(tec)cz


© Delphi.cz, program netcode.cz, 2008-9.