Archív konference Delphi

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

Velikost obrazku

[*] Vojtech Semecky <v-soft(zv)mbox.lantanet(tec)cz> - 28.9.1998 00:43:26

> Zdravim,
> potrebuji zjistit rozmery obrazku (*.GIF, nebo *.JPG). Jak na to?

JPEG nevim. GIF ma rozmery obrazku na 6-9 bytu :

var DX,DY : integer;
f : file;

begin
AssignFile(f,'nejaky_ten_soubor.gif');
reset(f,1);
seek(f,6);
Blockread(f,DX,2);
Blockread(f,DY,2);
CloseFile(f);
end;
---------------------------------------------------
V-Soft = http://www.v-soft(tec)cz/
Html editor TARANTULE = http://www.tarantule(tec)cz/
Download Island (shareware) = http://www.v-soft(tec)cz/di/

Microsoft FAX

[*] Mor�ol Marian <Marian.Morzol(zv)ostrava.aksignal(tec)cz> - 28.9.1998 07:54:53

Posli i mne. Diky.
Marian.Morzol(zv)ostrava.aksignal(tec)cz

> -----P�vodn� zpr�va-----
> Od: Martin Fron�k [SMTP:FRONEK(zv)ZZNSLANY.CZ]
> Odesl�no: 20. z��� 1998 16:33
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: RE: Microsoft FAX
>
> Hi,
>
> s timhle nemam ani tu nejmensi skusenost, ale doporucil bych
> komponentu
> TEmail2 (muzu poslat - napis), autor tam tvrdi, ze s ni jde i faxovat,
> je tam k tomu i priklad. Hodne stesti......
>
>
> 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: Mgr. Jan Sluka [SMTP:snipe(zv)mail.cybernet(tec)cz]
> > Odesl�no: 20. z��� 1998 11:41
> > Komu: delphi-l(zv)fwd(tec)cz
> > P�edm�t: Microsoft FAX
> >
> > Vazeni,
> >
> > obracim se na Vas s nasledujicim problemem.
> >
> > V programu mam komponentu TMemo a chci jeji
> > obsah poslat za pomoci Microsoft Fax.
> > Zajimalo by mne nasledujici:
> >
> > 1. Microsoft Fax se ve Windows 95 tvari jako
> > tiskarna. Lze tedy psat na jeho canvas tak,
> > jako u skutecne tiskarny?
> >
> > 2. Jak urcit na ktere telefonni cislo se ma
> > fax poslat? Nejlepsi by bylo, aby se nezobrazovalo
> > zadne systemove okno.
> >
> > Dekuji Vam vsem za spustu odpovedi a napadu.
> >
> > S pozdravem
> >
> > Mgr. Jan Sluka
> > Tkalcovska 856/B, 68801 Uh. Brod
> > tel: 0633/63 92 50
> > mobil: 0602/854 725


Ikona v Komponente

[*] Daniel SICHTA <Sichta(zv)asset.sk> - 28.9.1998 08:03:02

Ja blbec !!!! Uz som prisiel na tu primitivnu chybu !!!!!

Thanks anyway !!!!!
sichta(zv)za.asset.sk <mailto:sichta(zv)za.asset.sk> -----Original Message-----
From: Zbysek Hlinka [SMTP:zhlinka(zv)login(tec)cz]
Sent: 26. september 1998 08:01
To: delphi-l(zv)fwd(tec)cz
Subject: RE: Ikona v Komponente

Ale jo, funguje to. Zkus si prohlednout napr.
\Demos\DB\TEXTDATA\..., tam je to nazorne. Pokud mas D3 a
vyssi, tak se dcr presune do balicku, ale nic nezkazis, kdyz
napises do programu
{$R MujUnit.dcr} Daniel SICHTA wrote:

> Vsetko som urobil presne tak ale nefunguje to !!!!
> Ing.Daniel �ichta, ASSET s.r.o.
> Rosinsk� 8, 011 05 �ilina, SLOVAKIA
> 0421-89-542-15
> sichta(zv)za.asset.sk <mailto:sichta(zv)za.asset.sk>
>
>
> -----Original Message-----
> From: Zbysek Hlinka [SMTP:zhlinka(zv)login(tec)cz]
> Sent: 25. september 1998 08:04
> To: delphi-l(zv)fwd(tec)cz
> Subject: Re: Ikona v Komponente
>
> Daniel SICHTA wrote:
>
> > Nedari sa mi zmenit ikonu v komponente. Mam ju urobenu v
res
> subore a ten
> > je zadeklarovany v unite. Delphi mi tam v�ak st�le pcha tu
> svoju
> > defaultovu !!!. Vobec neberie do uvahy ci mam res alebo dcr
> zadeklarovanu
> > alebo nie. St�le tam dava tu svoju
>
> To se nedava do res, ale do dcr. Komponenta se jmenuje napr.
> TMojeChujovina, takze vyvtor pomoci Image Editoru novy DCR, v

> nem zaloz novou polozku s nazvem TMOJECHUJOVINA a tam vloz
> obrazek. Potom ten DCR prilinkuj k jednotce = {$R ...}
> 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


Jak omezit pohyb mysi v najakem ctverci?

[*] Martin UHER <tlanik(zv)zvt.csas(tec)cz> - 28.9.1998 08:13:21

Zdravim,

Potreboval bych omezit pohyb mysi v nejake oblasti, napriklad aby se mys
mohla pohybovat pouze nad komponentou TPaintBox.
Mate s tim n�kdo nejakou zku�enost?

Dekuji


Martin UHER


Vyhledavani

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 28.9.1998 08:28:45

Zdravim,

netusite, co se deje s vyhledavacem na www.delphi(tec)cz? Od rana zkousim a
na kazdy dotaz dostanu standartni odpoved:
"Nenalezen ani jeden v�skyt."

.........................................................
. Libor Krayzel .
. Czech Television, Studio Ostrava .
. Dvorakova 18, 702 00 Ostrava .
. Telephone: 069-6201375 .
. URL: http://members.tripod.com/~sovtop .
. E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz .
. Fidonet: mailto:libor_krayzel(zv)p5.f59.n421.z2.fido(tec)cz .
. E-mail2: mailto:sovtop(zv)email(tec)cz .
.........................................................

Seriove porty v NT

[*] Ing. Miroslav Ond��ek - 28.9.1998 08:43:13

Sice to s programovanim v Delphi souvisi jen okrajove, ale zkusim:

Mam aplikaci napsanou v Delphi 1 (bohuzel musim mit 16-bit kvuli
zakaznikum), ktera ovlada pres RS 232 (Async Pro 2.5) telefonni ustrednu
(firmware v cipu je take ode mne). Draty DTR atd. se nepouzivaji, protokol
se synchronizuje jinak.
Pokud vim, beha to vsude na Win3.11, ani s Win 95 neni nikde zadny problem,
pokud si dobre pamatuji, tak jsem mel i jednu pozitivni odezvu z NT. Nicmene
ted mam zakaznika, ktery ma NT Workstation 4.0 a i kdyz se masina prebootuje
jako W95, tak na zadnem ze 4 portu (2 na motherboardu, 2 na externi karte)
komunikace nechodi. Jeste jsem tam nebyl s osciloskopem, abych zjistil, v
jakem smeru to nechodi.
A co bych potreboval:
Je nekde free (nebudu kupovat neco kvuli jednomu pouziti) aplikace, ktera
monitoruje porty, zjistuje jejich funkci, pripadne jejich obsazeni jinym
procesem, servisem nebo neco takoveho ? Nebo jina rada ? Nemam NT, moc o
nich nevim. Neposilejte mi, prosim, rady ohledne prepsani SW do 32 bit, neni
to technicky (casove) v mych silach.

Moc dekuji za jakekoliv podnety.

S pozdravem
Ing. Miroslav Ond��ek
Bonnel Technologie, s.r.o.

!!! M��ete n�s nav�t�vit na INVEXU od 5.10.1998 !!!
!!! Hala Z 1, st�nek 170

E-mail:
bonnel(zv)telecom(tec)cz
bonnel-ondrisek(zv)telecom(tec)cz - v�voj software

internet: http://www.bonnel-tech.com
PGP podporov�no - ve�ejn� kl�� na na�� homepage

Jak omezit pohyb mysi v najakem ctverci?

[*] V�t�zslav Gazda������u��n�?��? - 28.9.1998 08:54:20

Pouzij API funkci ClipCursor

Vita


Off-Top ... Monitor

[*] Martin Tichacek <martin_t(zv)mrp(tec)cz> - 28.9.1998 09:45:25

HEJ! nech te tech provokaci, ne vsichni maji 80kkc na 17" LCDcko :-)
14"VGAcko je uzasna vec. (pred pul rokem bych na nej nedal dopustit..... uz ho
ma bracha ... dopustil jsem)

Mti.
-----P�vodn� zpr�va-----

>Jezisi, na tom se fakt da delat?
>
>Pavel
>
>-----Original Message-----
>
>
> nedelej chute okoli, nebo ta 14" co mam
>na stole pude taky z wokna :-)
>
>
>

Off-Top ... Monitor

[*] Martin Tichacek <martin_t(zv)mrp(tec)cz> - 28.9.1998 09:47:41

hej ! nechte tech provokaci. Va se doma placam na 15"AOCu a jsem celkem v klidu.
a ten 14"ma bracha.
Mti.

-----P�vodn� zpr�va-----

>Jezisi, na tom se fakt da delat?
URCITE ! //mam to vyzkousene :-)

>Pavel
>
>-----Original Message-----
>
>
> nedelej chute okoli, nebo ta 14" co mam
>na stole pude taky z wokna :-)

obsluha seriovej linky

[*] Slavom�r Oren��k - 28.9.1998 10:21:57

Nevie niekto nahodou, kde by som mohol pozhanat free komponentu na obsluhu
seriovej linky ?
Dakujem.

Slavo.

Form position

[*] TUNGLI Jan <tungli(zv)pvt.sk> - 28.9.1998 10:46:42

Potrebujem aby formulary spravali nasledovne>
Po nainstalovani programu aby formulary sa objavovali uprostred obrazovky ale
ked uzivatel pohne s formularom aby formular zapametal svoju poziciu.
Pouzivam k tomu z RX FormStorage komponentu ktora zapameta polohu formulara - problem je iba v tom ako zistim ze formular este nema zapisanu poziciu - tz. ze ide o cerstvo nainstalovany produkt. Samozrejme mozem nieco zapisovat do registrov ale to sa mi nechce. Predsa FormStorage by mal to vediet ci ma nieco zapisane alebo nie.

TUNGLI Jan
tungli(zv)pvt.sk


Legalni Delphi pred softwarem, nebo po?

[*] David Mensik <mensikd(zv)risc.upol(tec)cz> - 28.9.1998 10:52:18

Hi all,
mam jen jeden dotaz - je mozne si koupit legalne Delphi az potom, co uz
prodam par kusu sveho software. Je mi jasne, ze to legalne nejde, ale zajima
mne, jestli existuje nejaka klicka, ktera by to umoznovala.
Prece jen 100.000 (priblizne - Client/Server) je castka vysoka...

Diky Ozon


Duplicate field

[*] Marek Soukup <marek(zv)comberg(tec)com> - 28.9.1998 11:16:52

Ahojte,
mam zase problem. Tntokrat tato query:

select
Lek1.Lek as L1,
Lek2.Lek as L2,
Lek3.Lek as L3
from
':Pronatal_Data:Cykly.db' as Cyk left join':Pronatal_Tab:Leky.db' as
Lek1 on Cyk.Lek1 = Lek1.CisLeku,
':Pronatal_Data:Cykly.db' as Cyk left join':Pronatal_Tab:Leky.db' as
Lek2 on Cyk.Lek2 = Lek2.CisLeku,
':Pronatal_Data:Cykly.db' as Cyk left join':Pronatal_Tab:Leky.db' as
Lek3 on Cyk.Lek3 = Lek3.CisLeku
where
Cyk.CisPac = 7 and
Cyk.CisCyklu = 2

hlasi chybu na duplikatni jmeno fieldu Lek v tabulce Leky.db. Kdo vi
proc tak at mi pomuze, protoze jinak se z toho dementniho BDE asi
zblaznim. At zije Access a diky.

Marek Soukup

Legalni Delphi pred softwarem, nebo po?

[*] Svatopluk V�t <vit(zv)ardo(tec)cz> - 28.9.1998 11:30:25

Zdravim!

Upozornuji, ze nejsem pravnik a problematice autorskeho a softwaroveho ci
jineho zakona nerozumim. Napada mne vsak jedna vec.

Je zrejme, ze nize popsany zpusob legalni neni. Da se to vyresit jakousi
zalohou dopredu. Kdyz vim, ze muj soft bude drahy (coz urcite soft na
zakazku a na miru bude) muzu zadat zalohu na vyvoj. Kdyz stavim dum taky
neco platim dopredu. Mozna je to tak, mozna ne. To je podle mne asi jediny
mozny LEGALNI zpusob.

Svatopluk Vit
East Trading Company s.r.o. Karvina (www.ardo(tec)cz)

spravce pocitacove site - network administrator
zacinajici delphista - beginner in Delphi

E-mail : vit(zv)ardo(tec)cz ; svatopluk.vit(zv)post(tec)cz
tel : +420 69 63 06 085
ICQ : 11455617

...sem si dovolil....svesticky z moji zahradky...
-----P�vodn� zpr�va-----
Od: David Mensik [SMTP:mensikd(zv)risc.upol(tec)cz]
Odesl�no: 28. z��� 1998 10:52
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Legalni Delphi pred softwarem, nebo po?

Hi all,
mam jen jeden dotaz - je mozne si koupit legalne Delphi az potom, co uz
prodam par kusu sveho software. Je mi jasne, ze to legalne nejde, ale
zajima
mne, jestli existuje nejaka klicka, ktera by to umoznovala.
Prece jen 100.000 (priblizne - Client/Server) je castka vysoka...

Diky Ozon

Export , import do dbtable

[*] Jan Nov�k���r����n�?��? - 28.9.1998 12:12:25

Ahoj vespolek.
Mam zacatecnicky dotaz.
Tabulku databaze napr. Table1 bych chtel naplnit ze souboru xxx.txt
a take data z Table1 imprtovat do souboru xxx.txt. Jak se to da udelat ?
Componenta BatchMove to dela mezi tabulkami. Jak se to dela ze souborem.
Klasicky import,export dat do tabulky databaze. Diky za radu.

(no subject)

[*] Zden�k Glaser <glaser(zv)ipl(tec)cz> - 28.9.1998 12:16:12

Mam Delphi 3, QickReport 2.0k

a potrebuji dodatecny tisk sestav ulozenych jako *.qrp - hlavne moznost

volby tiskovych stran 'od - do',

V programu mam :
QRPrinter.Load(FileQrp); // FileQrp: String - z OpenDialog
QRPreview1.QRPrinter := QRPrinter;
QRPreview1.QRPrinter.PrinterIndex := PrinterCombo.ItemIndex;
QRPreview1.QRPrinter.Print;
- to by jeste slo;
Postradam ale moznost, kterou ma TQuickRep :
Rep.QRep1.PrinterSettings.FirstPage := SpinFrom.Value;
Rep.QRep1.PrinterSettings.LastPage := SpinTo.Value;
Rep.QRep1.PrinterSettings.Copies := SpinCop.Value;

PrinterSetup nepomaha.

Dekuji za steblo pro tonouciho ve vodach QR.

Zdenek GLASER mailto:glaser(zv)ipl(tec)cz

Form position

[*] Marek Repisk� <mrepisky zl(zv)zsnp.sk> - 28.9.1998 12:23:25

> Potrebujem aby formulary spravali nasledovne>
> Po nainstalovani programu aby formulary sa objavovali uprostred obrazovky
ale
> ked uzivatel pohne s formularom aby formular zapametal svoju poziciu.
> Pouzivam k tomu z RX FormStorage komponentu ktora zapameta polohu
formulara - problem je iba v tom ako zistim ze formular este nema zapisanu
poziciu - tz. ze ide o cerstvo nainstalovany produkt. Samozrejme mozem
nieco zapisovat do registrov ale to sa mi nechce. Predsa FormStorage by mal
to vediet ci ma nieco zapisane alebo nie.

Nazdar,

nepoznam FormStorage. Pre taketo veci pouzivam INI subor. Fcia ReadInteger,
ktora cita z INI suboru, ma jeden parameter Default, kam mozes dat vlastnu
fciu
pre urcenie polohy formu. Ked spustis Tvoj program na pocitaci prvy krat,
INI
subor neexistuje a preto sa pouzije Default parameter. Pri ukonceni
programu
ulozis nastavenie do INI suboru a to sa pouzije pri novom starte.

Marek Repisky
mrepisky_zl(zv)zsnp.sk


Delphi 4.0

[*] Josef Dodek <dodek(zv)cbmi.cvut(tec)cz> - 28.9.1998 12:36:48

zdravim,
pred nejakou dobou (asi 14 dni) jsem nekde videl odkaz na stazeni si 30ti
denni verze delphi 4.0. a uz nevim kde. Nevite o tom nekdo neco.

diky
pepa dodek


Remote Check

[*] Martin Bab�k <M.Babik(zv)mus(tec)cz> - 28.9.1998 13:01:14

Zdravim Delphisty!
Mam nasledujici problem. Na jednom PC se napojim na databazi, ktera je
umistena na serveru, na PC menim data a potrebuji je prubezne ukladat na
serveru (k teto databazi je pripojeno vice PC's). Jak pred ulozenim
zmenenych dat (nebo pred natahovanim novych ci pred refresh ) zjistim, ze
nedoslo k preruseni databazoveho spojeni? Potrebuji to zjistit relativne
rychle 1-5 sekund (abych mohl pripadne dal pokracovat na lokalnich
tabulkach). Pri pokusu o pristup na data a porusenem spojeni PC na
neprijatelne dlouhou dobu vytuhne. S databazemi teprv zacinam, a tak prosim
zkusenejsi o radu, nekdo s temi databazemi preci pracovat musi. Kde by se
jinak brali :-). Predem dekuji za rady i nakopnuti.
M&B


OpenPictureDialog

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 28.9.1998 13:40:55

Zdravim,

lze ziskat rozmery obrazku, ktere se zobarzuji v pravem hornim rohu u
tlacitka Preview z objektu OpenPictureDialog? Hledam, hledam, lec marne.

.........................................................
. Libor Krayzel .
. Czech Television, Studio Ostrava .
. Dvorakova 18, 702 00 Ostrava .
. Telephone: 069-6201375 .
. URL: http://members.tripod.com/~sovtop .
. E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz .
. Fidonet: mailto:libor_krayzel(zv)p5.f59.n421.z2.fido(tec)cz .
. E-mail2: mailto:sovtop(zv)email(tec)cz .
.........................................................

Pom�?te mi e?te niekto s tou asynch

[*] Branislav Danko <danko(zv)ns.basl.sk> - 28.9.1998 13:48:47


Vdaka za ochotu Martin, o tyzden sa urcite ozvem, resp. posli mi mail kedy mozme zacat. Mimochodom v konferencii pod nazvom temy "Asynchronna komunikacia vo Win32" som problem rozpisal troska obsirnejsie (pozri si to). No rad upresnim, ak budu nejasnosti.

Zdravi ta Brano

-----P�vodn� zpr�va-----
Od: Martin Nedopil [SMTP:nedopil(zv)eskon(tec)cz]
Odesl�no: piatok, september 25, 1998 15:12
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Re: Pom�?te mi e?te niekto s tou asynchr�nnou komunik�ciou


>Ako precitat odpoved, ked sa mi nikdy neinicializuje onRxChar, onRxFlag ani
onReceive ... Viem ze musim v niektorom okamihu nastavit >CommPort.DTR(true)
ale neviem kedy, ak to dam hned za WriteComm tak to nejde. Na co vlastne
sluzia FlowControl ?


Nevim, co presne potrebujes, ale matne tusim, ze komunikujes na RS485. Taky
jsme s tim meli velke problemy,
volal jsem zarizeni pomoci zmeny DTR a RTS pak zarizeni cekalo 300ms a ja mu
nebyl schopen behem te doby odpovedet
a poslat dalsi data. Novy Async Pro ma nejakou podporu pro RS485, ale to uz
je pase.
Pokud by te to zajimalo tak za tyden soukromne.

Martin

Form position

[*] TUNGLI Jan <tungli(zv)pvt.sk> - 28.9.1998 13:53:51

Ano to pojde cez ini file ale to prave nechcem cez ini subory riesit.

TUNGLI Jan
tungli(zv)pvt.sk

----------
> Od: Marek Repisk� <mrepisky_zl(zv)zsnp.sk>
> Pre: delphi-l(zv)fwd(tec)cz
> Predmet: Re: Form position
> D�tum: 28. september 1998 12:23
>
> > Potrebujem aby formulary spravali nasledovne>
> > Po nainstalovani programu aby formulary sa objavovali uprostred obrazovky
> ale
> > ked uzivatel pohne s formularom aby formular zapametal svoju poziciu.
> > Pouzivam k tomu z RX FormStorage komponentu ktora zapameta polohu
> formulara - problem je iba v tom ako zistim ze formular este nema zapisanu
> poziciu - tz. ze ide o cerstvo nainstalovany produkt. Samozrejme mozem
> nieco zapisovat do registrov ale to sa mi nechce. Predsa FormStorage by mal
> to vediet ci ma nieco zapisane alebo nie.
>
> Nazdar,
>
> nepoznam FormStorage. Pre taketo veci pouzivam INI subor. Fcia ReadInteger,
> ktora cita z INI suboru, ma jeden parameter Default, kam mozes dat vlastnu
> fciu
> pre urcenie polohy formu. Ked spustis Tvoj program na pocitaci prvy krat,
> INI
> subor neexistuje a preto sa pouzije Default parameter. Pri ukonceni
> programu
> ulozis nastavenie do INI suboru a to sa pouzije pri novom starte.
>
> Marek Repisky
> mrepisky_zl(zv)zsnp.sk
>

Legalni Delphi pred softwarem, nebo po?

[*] Richard Willmann <sales(zv)nocomment.sk> - 28.9.1998 14:11:52

:-))) Zaujimalo by ma, na com by si chcel potom vyvijat software pokial by
si Delphi nemal kupene?!?!? Urcite to NIJAK nejde.

Jedina moznost je ukradnut C/S a zakupit C/S ihned po predaji prveho kusu
software. Uvedom si ale, ze takymto spravanim by si hrubo porusil autorsky
zakon a vystavil by si sa moznemu trestnemu stihaniu a takmer istej
financnej penalizacii. Softwarova policia chodi zvacsa na bonz, takze tvojim
prispevkom si zvysil sancu kontroly...

Verzia Profesional svojimi prostredkami postacuje na vyvoj 80% vsetkeho
softwaru co sok kedy robil. Zaujimave by mohlo byt kupit DPro a po predani
niekolkych kuskov upgradovat na C/S (ak to je nevyhnutne). Tych 25 resp 15
pre upgrade tisic nie je az tak vela.

BTW: Ja som zacal s Standard a teraz som na Profesionaly vo verzii 3.0.
Zatial zvladam vsetko a C/S mi netreba. Uprimne opvedane vela ludi ma
podobne problemy ako ty...

rw

-----Original Message-----
From: David Mensik <mensikd(zv)risc.upol(tec)cz>
To: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Date: Monday, September 28, 1998 12:44 PM
Subject: Legalni Delphi pred softwarem, nebo po?>Hi all,
>mam jen jeden dotaz - je mozne si koupit legalne Delphi az potom, co uz
>prodam par kusu sveho software. Je mi jasne, ze to legalne nejde, ale
zajima
>mne, jestli existuje nejaka klicka, ktera by to umoznovala.
>Prece jen 100.000 (priblizne - Client/Server) je castka vysoka...
>
>Diky Ozon


Off-Top ... Monitor

[*] Mgr. Petr Kellner <kellner(zv)praktik(tec)cz> - 28.9.1998 14:29:32




----------
Od: Zbysek Hlinka[SMTP:zhlinka(zv)login(tec)cz]
Odesl�no: 27. z��� 1998 18:53
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Re: Off-Top ... Monitor

Dva monitory na 1600x1200? No to je teda bomba!
V tom se to musi programovat!

??? Delphi nejak podporuje 2 monitory ? pri ladeni, to asi vyzaduje W98, napiste
o tom neco vic. (byla by to bomba)


Mgr. Petr Kellner
Praktik SW, spol. s r.o. Dom� : Na Z�kop� 27
V. Outraty 7, Prost�jov, 796 00 Olomouc, 773 00
Tel : 0508/365583 Tel : 068/5314129
Fax : 0508/365512 Tel : 0603/457623
e-mail: kellner(zv)praktik(tec)cz pekol(zv)praktik(tec)cz
Web: www.praktik(tec)cz
e-mail pro velmi kr�tk� zpr�vy: kellner.mobil(zv)sms.paegas(tec)cz

dva monitory

[*] Petr Ma��k - 28.9.1998 15:53:01

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

Ahoj vsem,
nechal jsem se namlsat provozem dvou monitoru, nejse ale zbehly ve Windows
98, mozna to bude zajimat i ostatni. Co je vse treba pro provoz dvou
monitor� a zda to jde i s DELPHI 3, verze standard.
Diky, Petr Ma��k rtepema(zv)mbox.vol(tec)cz

Legalni Delphi pred softwarem, nebo po?

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 28.9.1998 17:10:47

Svatopluk V�t wrote:

> Je zrejme, ze nize popsany zpusob legalni neni. Da se to vyresit jakousi
> zalohou dopredu. Kdyz vim, ze muj soft bude drahy (coz urcite soft na
> zakazku a na miru bude) muzu zadat zalohu na vyvoj. Kdyz stavim dum taky
> neco platim dopredu. Mozna je to tak, mozna ne. To je podle mne asi jediny
> mozny LEGALNI zpusob.

Je tu jeste jeden legalni zpusob - ziskat souhlas od autora, tedy od
firmy Inprise. :-))

> Svatopluk Vit
> East Trading Company s.r.o. Karvina (www.ardo(tec)cz)
>
> -----P vodn� zpr�va-----
> Od: David Mensik [SMTP:mensikd(zv)risc.upol(tec)cz]
> Odesl�no: 28. z� � 1998 10:52
> Komu: delphi-l(zv)fwd(tec)cz
> P edm t: Legalni Delphi pred softwarem, nebo po?
>
> Hi all,
> mam jen jeden dotaz - je mozne si koupit legalne Delphi az potom, co uz
> prodam par kusu sveho software. Je mi jasne, ze to legalne nejde, ale
> zajima mne, jestli existuje nejaka klicka, ktera by to umoznovala. Prece
> jen 100.000 (priblizne - Client/Server) je castka vysoka...
>
> Diky Ozon
>


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


Seriove porty v NT

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 28.9.1998 17:10:48

=?windows-1250?B?SW5nLiBNaXJv wrote:

> Mam aplikaci napsanou v Delphi 1 (bohuzel musim mit 16-bit kvuli
> zakaznikum), ktera ovlada pres RS 232 (Async Pro 2.5) telefonni ustrednu
> (firmware v cipu je take ode mne). Draty DTR atd. se nepouzivaji, protokol
> se synchronizuje jinak. Pokud vim, beha to vsude na Win3.11, ani s Win 95
> neni nikde zadny problem, pokud si dobre pamatuji, tak jsem mel i jednu
> pozitivni odezvu z NT. Nicmene ted mam zakaznika, ktery ma NT Workstation
> 4.0 a i kdyz se masina prebootuje jako W95, tak na zadnem ze 4 portu (2 na
> motherboardu, 2 na externi karte) komunikace nechodi. Jeste jsem tam nebyl
> s osciloskopem, abych zjistil, v jakem smeru to nechodi. A co bych
> potreboval: Je nekde free (nebudu kupovat neco kvuli jednomu pouziti)
> aplikace, ktera monitoruje porty, zjistuje jejich funkci, pripadne jejich
> obsazeni jinym procesem, servisem nebo neco takoveho ? Nebo jina rada ?
> Nemam NT, moc o nich nevim. Neposilejte mi, prosim, rady ohledne prepsani
> SW do 32 bit, neni to technicky (casove) v mych silach.
>
Podle mych zkusenosti s obdobnymi vecmi si myslim, jestli jsem
to dobre pochopil, ze ma zakaznik spatne nainstalovana okna.
Podivej se do System na porty, a pokud se to tam bude tvarit OK,
at si zakaznik preinstaluje Wokna (asi nebude treba vse smazat,
jen by mohla stacit instalace s opravou chyb). Pokud to nebude
OK, zkus to nahodit, nepovede-li se, preinstalovat. Binec muze byt
i v nastavene rychlosti, parite atp.


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


Seriove porty v NT

[*] Dobromil Mal� <Dobromil.Maly(zv)rak.pr.ds.mfcr(tec)cz> - 28.9.1998 17:32:34



Proc by to neslo, nelegalni by bylo, kdyby jsi Delphi ukradl, ale kdyby Ti ho nekdo pujcil
nebo kdyby jsi si napsal program treba notepadem a nekdo, kdo Delphi ma by Ti to prelozil,
myslim, ze to nelegalni neni, ale uplne jisty si nejsem. Protoze program mozna pujcit nejde
(kdyz pisu pujcit, myslim pujcit, tj odinstalovat a nainstalovat jinde), protoze zakoupenim
programu se vlastne nekupuje program, ale pravo ho pouzivat. Tak jedine aby Ti to prelozil
nekdo, kdo ho ma (jde-li to, ale proc by to neslo).

D.

----------
Od: David Mensik[SMTP:mensikd(zv)risc.upol(tec)cz]
Odesl�no: 28. z��� 1998 10:52
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Legalni Delphi pred softwarem, nebo po?

Hi all,
mam jen jeden dotaz - je mozne si koupit legalne Delphi az potom, co uz
prodam par kusu sveho software. Je mi jasne, ze to legalne nejde, ale zajima
mne, jestli existuje nejaka klicka, ktera by to umoznovala.
Prece jen 100.000 (priblizne - Client/Server) je castka vysoka...

Diky Ozon

Delphi 4.0

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 28.9.1998 17:47:00

Josef Dodek wrote:
>
> zdravim,
> pred nejakou dobou (asi 14 dni) jsem nekde videl odkaz na stazeni si 30ti
> denni verze delphi 4.0. a uz nevim kde. Nevite o tom nekdo neco.

Ahoj,

o odkazu nevim, ale slysel jsem ze pry by mela byt na Invexu, zkus to jeste
chvilku vydrzet :-)

--
Petr Vones, amatersky programator

OpenPictureDialog

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 28.9.1998 18:00:58

Krayzel Libor wrote:
>
> Zdravim,
>
> lze ziskat rozmery obrazku, ktere se zobarzuji v pravem hornim rohu u
> tlacitka Preview z objektu OpenPictureDialog? Hledam, hledam, lec marne.

Ahoj,

je to v metode TOpenPictureDialog.DoSelectionChange

begin
FullName := FileName;
ValidPicture := FileExists(FullName) and ValidFile(FullName);
if ValidPicture then
try
FPicture.LoadFromFile(FullName);
FPictureLabel.Caption := Format(SPictureDesc, [FPicture.Width,
FPicture.Height]);
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
FPreviewButton.Enabled := True;
except
ValidPicture := False;
end;


--
Petr Vones, amatersky programator

Velikost obrazku

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 28.9.1998 18:05:33

Krayzel Libor wrote:
>
> Zdravim,
>
> potrebuji zjistit rozmery obrazku (*.GIF, nebo *.JPG). Jak na to?

Ahoj,

v zasade mas dve moznosti. Obrazek zobrazit do pametove bitmapy a z toho
ziskat rozmer, coz ale neni zrovna vtipne reseni, navic bude zoufale pomale.
Druha moznost je ziskat rozmer z formatu daneho souboru, informace o ruznych
formatech najdes tady:

http://www.wotsit.demon.co.uk/

--
Petr Vones, amatersky programator

Insert x Overwrite

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 28.9.1998 18:07:33

Michal Motalik wrote:
>
> Ahojte Delfaci,
> mel bych na vas jeden skromny dotaz. Jak se da zjistit v komponente
> TRichEdit, jestli se budou dalsi psane znaky vkladat do textu, nebo budou
> prepisovat uz napsane znaky?

Ahoj,

hledal jsem v helpu, ale vypada to ze neexistuje zadna zprava ktera by s tim
souvisela. Potom by mohlo byt resenim odvodit si novou komponentu ve ktere budes
sledovat stisknuti Insert a podle toho si nastavis nejakou svoji vlastnost.

--
Petr Vones, amatersky programator

obsluha seriovej linky

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 28.9.1998 18:09:48

Slavom�r Oren��k wrote:
>
> Nevie niekto nahodou, kde by som mohol pozhanat free komponentu na obsluhu
> seriovej linky ?
> Dakujem.

Ahoj,

treba v Delphi kuchyni (http://kuchyn.delphi(tec)cz) nebo na DSP jich par najdes,
napriklad ASYNC32.ZIP. Musis ale pozorne vybirat, protoze nektere komponenty
jsou az prilis zjednodusene na ukor spolehlivosti.

P.S.
Ted zrovna jednu komponentu pro seriovou komunikaci pisu, pokud se vse vydari tak
pristim tydnem by mohla byt betaverze ..... testovani vitano :-)

--
Petr Vones, amatersky programator

Vlastnosti komponent za behu

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 28.9.1998 18:18:09

Zbysek Hlinka wrote:
> >
> > A podivejme, ze by prisny pan ucitel ? :-)
>
> Jasne. A kdo nebude chapat, toho zmlatim rakoskou. :-)

A sakra, tak to abych se tomu na hony vyhybal :-)

> ActiveX? To snad ani neee. Tedy pokud mas na mysli ty hruzy s
> priponou OCX. Tedy, samozrejme se zminim, ze toto lze vyrobit a
> jak, ale pitvat to nehodlam.

No.... mam. Presne receno ty hruzy ktere pak muzes vlozit ho HTML stranky a
otevrit v prohlizeci.

--
Petr Vones, amatersky programator


dva monitory

[*] Michal ��ek����֫Ŭ?��e���n� - 28.9.1998 22:50:03

Zdarec

zkusil jsem dva monitory pod W98 a potreboval jsem k tomu jen dve graficke karty a dva monitory. Instalace probehla
naprosto automaticky. V nastaveni obrazovky se pouze zalozka "setings" zmenila na "monitors" a tam pak byly
zobrazeny oba dva monitory jako dva ctverce jejichz vzajemna poloha urcovala vzajemnou pozici ploch monitoru.
Vytvorila se tak vlastne jedna velka plocha. Prakticky to pak funguje tak ze kdyz prejedes mysi za kraj obrazovky ve
smeru kde mas umisteny druhy monitor proste ti kurzor prejde na druhou obrazovku.
V Delphi 4 Prof. IDE jsem zadnou konkretni podporu pro dva monitory nenasel, ale co se programovani tyka Delphi
podporuji dva monitory tak ze v objektu TScreen je vytvorena vlastnost MonitorCount a pole Monitors. Delphi 3 uz
nemam takze netusim jak je to tam, ale predpokladam ze ty jeste zadnou takovouhle podporu pro programovani aplikaci
pro vic monitoru nemely .. nicmene vyuzit dva monitory pri programovani v D3 by podle me nemel byt problem.

S pozdravem M. Cizek starxax(zv)molly.vabo(tec)cz
-----Original Message-----
From: Petr Ma��k <rtepema(zv)mbox.vol(tec)cz>
To: Delphi konference <delphi-l(zv)fwd(tec)cz>
Date: 28. z��� 1998 22:18
Subject: dva monitory


Ahoj vsem,
nechal jsem se namlsat provozem dvou monitoru, nejse ale zbehly ve Windows 98, mozna to bude zajimat i ostatni. Co je vse treba pro provoz dvou monitor� a zda to jde i s DELPHI 3, verze standard.
Diky, Petr Ma��k rtepema(zv)mbox.vol(tec)cz

dva monitory

[*] Zdenek Drvota <zds(zv)pce.fairnet(tec)cz> - 28.9.1998 22:59:10

Ahoj,
pro dva monitory neni treba specialni software (krome Win98 :-),
je treba jen mit v PC dve (nebo vice-pry az 9) grafickych karet,
a to PCI (nebo jednu z nich AGP). Karty mohou byt navzajem
ruzne, stejne jako monitory (nooo-teoreticky, snad existuji
overene kombinace, ktere nejdou rozchodit, zkuste se podivat
na www u M$).
Plocha se potom roztahne na oba monitory,
takze je jakoby VETSI. Rozlozeni je mozno zvolit ve Win98.
Preji hodne poteseni s televiznim studiem :-)

> Ahoj vsem,
> nechal jsem se namlsat provozem dvou monitoru, nejse ale zbehly ve Windows
> 98, mozna to bude zajimat i ostatni. Co je vse treba pro provoz dvou
> monitor� a zda to jde i s DELPHI 3, verze standard.
> Diky, Petr Ma��k rtepema(zv)mbox.vol(tec)cz
>
>
>
*-----------------------------------------------*
ZDS, spol. s r. o.
Ing. Zdenek Drvota, director
Devotyho 775 tel/fax:+420-40-33837
530 02 Pardubice 41691
Czech Republic
e-mail: drvota(zv)zds(tec)cz (Win1250/ISO-8859-2)
http://www.zds(tec)cz
*-----------------------------------------------*

Form position

[*] Vojtech Semecky <v-soft(zv)mbox.lantanet(tec)cz> - 28.9.1998 23:06:54

> Ano to pojde cez ini file ale to prave nechcem cez ini subory riesit.

Bud pres INI nebo pres registracni databazi. Jinak si to ten FormStorage
pamatovat nebude :-)

Vojtech Semecky
---------------------------------------------------
V-Soft = http://www.v-soft(tec)cz/
Html editor TARANTULE = http://www.tarantule(tec)cz/
Download Island (shareware) = http://www.v-soft(tec)cz/di/

Form position

[*] Marek Repisk� <mrepisky zl(zv)zsnp.sk> - 29.9.1998 06:17:50

> > Ano to pojde cez ini file ale to prave nechcem cez ini subory riesit.
>
> Bud pres INI nebo pres registracni databazi. Jinak si to ten FormStorage
> pamatovat nebude :-)

alebo do EXE suboru :)

Marek Repisky
mrepisky_zl(zv)zsnp.sk


Form position

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 29.9.1998 07:53:37

:-)

Hmm.. Registr nechces, INI nechces, tak si vytvor svuj vlastni
soubor, a tam si to ukladej. INI mi vsak prijde jako nejvhodnejsi,
kdyz nechci zadelat registry. Navic si ho muzes dat do sveho
adresare, nemusi byt v System\. Proste v Create uvedes plnou
cestu.

TUNGLI Jan wrote:

> Ano to pojde cez ini file ale to prave nechcem cez ini subory riesit.
>
> TUNGLI Jan
> tungli(zv)pvt.sk
>
> ----------
> > Od: Marek Repisk <mrepisky_zl(zv)zsnp.sk>
> > Pre: delphi-l(zv)fwd(tec)cz
> > Predmet: Re: Form position
> > D�tum: 28. september 1998 12:23
> >
> > > Potrebujem aby formulary spravali nasledovne>
> > > Po nainstalovani programu aby formulary sa objavovali uprostred
> > > obrazovky
> > ale
> > > ked uzivatel pohne s formularom aby formular zapametal svoju poziciu.
> > > Pouzivam k tomu z RX FormStorage komponentu ktora zapameta polohu
> > formulara - problem je iba v tom ako zistim ze formular este nema
> > zapisanu poziciu - tz. ze ide o cerstvo nainstalovany produkt.
> > Samozrejme mozem nieco zapisovat do registrov ale to sa mi nechce.
> > Predsa FormStorage by mal to vediet ci ma nieco zapisane alebo nie.
> >
> > Nazdar,
> >
> > nepoznam FormStorage. Pre taketo veci pouzivam INI subor. Fcia
> > ReadInteger, ktora cita z INI suboru, ma jeden parameter Default, kam
> > mozes dat vlastnu fciu pre urcenie polohy formu. Ked spustis Tvoj
> > program na pocitaci prvy krat, INI subor neexistuje a preto sa pouzije
> > Default parameter. Pri ukonceni programu ulozis nastavenie do INI suboru
> > a to sa pouzije pri novom starte.
> >
> > Marek Repisky
> > mrepisky_zl(zv)zsnp.sk
> >
>
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


Off-Top ... Monitor

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 29.9.1998 07:53:37

Mgr. Petr Kellner wrote:

> Dva monitory na 1600x1200? No to je teda bomba!
> V tom se to musi programovat!
>
> ??? Delphi nejak podporuje 2 monitory ? pri ladeni, to asi vyzaduje W98,
> napiste o tom neco vic. (byla by to bomba)

No jasne ze ve W98 (ktere take nemam...).


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


Form position

[*] medisoft(zv)uo.fairnet(tec)cz (Medisoft International - Usti) - 29.9.1998 08:10:15




----------
Od: TUNGLI Jan[SMTP:tungli(zv)pvt.sk]
Odesl�no: 28. z��� 1998 11:46
Komu: DELPHI Distribution List
P�edm�t: Form position

Potrebujem aby formulary spravali nasledovne>
Po nainstalovani programu aby formulary sa objavovali uprostred obrazovky ale
ked uzivatel pohne s formularom aby formular zapametal svoju poziciu.
Pouzivam k tomu z RX FormStorage komponentu ktora zapameta polohu formulara - problem je iba v tom ako zistim ze formular este nema zapisanu poziciu - tz. ze ide o cerstvo nainstalovany produkt. Samozrejme mozem nieco zapisovat do registrov ale to sa mi nechce. Predsa FormStorage by mal to vediet ci ma nieco zapisane alebo nie.

TUNGLI Jan
tungli(zv)pvt.sk

--------------------------------------
To by ale melo byt jednoduche. Postup, ktery pouzivas bude takto fungovat jakmile nastavis vlastnost TForm.Position na poScreenCenter.
Potom pri prvnim spusteni programu FormStorage nic nenajde a necha formular byt. Teprve pri dalsim spusteni si precte pozici z registry nebo z ini.
Myslim, ze to tak delam a funguje to.

Jaroslav Kopecky

De/enkryptace a taky RE: Otevreny dopis Martinu

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


Pripravil jsem pro jednoho cloveka ( csobta(zv)mbox.vol(tec)cz - psal jsem Ti, ale neodpovidas, mam pocit, ze se to nekam vykourilo )
takovy maly dokumentik zabyvajici se
(velmi okrajove, ale myslym, ze inspirativne) sifrovanim, kodovanim, zratka
encryptaci. Je to napsano ve Wordu 7 (tzn.6 kompatibilni) a ma to i s jednou
prilohou deset stran a zabira to 180kB-DOC 41kB-ZIP (jak rikam, jen par slov),
takze kdyby mel nekdo zajem ...

Dobra
mailto:dodo(zv)rak.pr.ds.mfcr(tec)cz

{-----RE: otevreny dopis Martinu Fronkovi-----}
Krev, krev, chceme krev . . .
Ale jinak s Tebou souhlasim.
Zejmena souhlasim s timto :

Tak a vylil jsem si srdce a zase trosku nasral ostatni, ktere todle taky
nezajima (timto se jim omlouvam a slibuju, ze k tomuto prispevku se uz
ja osobne do konference nevyjadrim)
- Diky :-)))


----------
Od: Martin Kubecka[SMTP:martin.kubecka(zv)amenit(tec)cz]
Odesl�no: 25. z��� 1998 14:23
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Otevreny dopis Martinu Fronkovi (reakce na Delphi 1 a sharing)

Hele Martine, uz me to fakt nebavi (teda obcas se docela zasmeju -
naposled me pobavilo tvoje okrikovani ucastniku ohledne nutnosti mit
zivnostensky list a potom posles no konference mail resici tve
antisympatie proti Petrovi / tak to me dost pobavilo / :)))). Pokud mas
proti Petrovi osobni vyhrady, fajn, neberu ti to, ale nemusis to fakt
posilat do konference. Osobne si myslim, ze informace v podpisu od Petra
o tom, ze prodava sw od TurboPower ponekud zavani reklamou, ale nejsem
ani spravcem konference, ani mi to nevadi (nebyt te vyssi ceny tak bych
koupil hned ;). Koneckoncu, nejvetsi reklamu mu stejne delas ty (ja byt
Petrem tak si te asi dam jako maskota na sve www stranky :-). Mozna si
to neuvedomujes, ale skutecne mas vzacny dar vyvolavat konflikty
(alespon v mailech - nevim jak v realnem zivote ;).

Tak a vylil jsem si srdce a zase trosku nasral ostatni, ktere todle taky
nezajima (timto se jim omlouvam a slibuju, ze k tomuto prispevku se uz
ja osobne do konference nevyjadrim). Rozhodoval jsem se, zda mam ten
mail poslat jen tobe osobne, ale nakonec jsem si rekl, ze by z toho mohl
byt docela slusny flamewar :-))))

Ahoj

Martin Kubecka

P.S. Veskere kameny smeruj(-te) na mailto:martin.kubecka(zv)amenit(tec)cz

Martin Fron�k wrote:

> bullshits ...

--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon: +420 603 265926 =
= http://www.amenit(tec)cz e-mail: martin.kubecka(zv)amenit(tec)cz =
==============================================================

Off-Top ... Monitor

[*] Dobromil Mal� <Dobromil.Maly(zv)rak.pr.ds.mfcr(tec)cz> - 29.9.1998 08:22:36


>No jasne ze ve W98 (ktere take nemam...).

Posli tento dopis 10000 svym znamym a
Bill je da zadarmo spolu s $1000 :-)))

D.

Smazani canvasu pruhledneho formulare

[*] Juraj Nagy <Juraj.Nagy(zv)nh-trans(tec)cz> - 29.9.1998 08:23:53

Pred casem zde byla diskuse o pruhlednych formularech. Z. Petruj
navrhnul (jeho 2. zpusob) prekryt metodu CreateParams se stylem
WS_EX_TRANSPARENT. Pro mne neni problem, ze se neda refreshnot
pozadi. Problemem ale je, ze nevim jak smazat canvas takoveho
formulare tak, aby se neprekrylo pozadi.
Mozna nekoho napedne i jine reseni, proto popis problemu:
1. Mam uplne normalni Form1 (maximalizovany), na kterem jsou objekty
pozadi - ty se behem prace programu nemeni.
2. Na tom mam umisteny pruhledny Form2 (taky maximalizovany), na
ktery se umistnuji jine nakreslene objekty.
3. Nad tym vsim se ukaze mensi modalni Form3 uprostred obrazovky, kde
se nastavuji parametre prave kresleneho objektu, napr. velikost a
umistneni mrizky (moje komponenta, jsou to pomocne cary pro orientaci
pri umistneni ostatnych objektu) na Form2. Vsechno se deje pomoci
Spineditu. Ta mrizka zaroven podle toho meni svoje vlastnosti. Po
kazde zmene spineditu se nastavi parametre mrizky, puvedni se smaze
(volanim Paintu mrizky) a nakresli se nova (volanim Invalidate).
No a ted ten problem. Kdyz se na Spinedity klika pekne pomalu,
vsechno je OK. Ale kdyz se tlacitko zmackne a zacne automaticke
opakovani, vetsinou se nekde "zapomene" smazat stara mrizka a zustava
na Form2 i s novou. Asi se preskoci nektery Paint a Invalidate.
Nejzajimavejsi je, ze vse se najednou ukaze spravne, kdyz se na Form3
zmackne Alt (Form3 nema zadne menu, ani systemove). No kdyz
vygeneruji spravu o stlaceni Altu programove, tak se nic nedeje.

Budu vdecny za vsechny rady a predem za ne dekuji.

P.S. Je to v Delphi 3.02 Prof

S pozdravem

J. Nagy
NH-TRANS, spol. s r.o.
Podebradova 28
702 00 Ostrava
e-mail: Juraj.Nagy(zv)nh-trans(tec)cz


Form position

[*] Dobromil Mal� <Dobromil.Maly(zv)rak.pr.ds.mfcr(tec)cz> - 29.9.1998 08:24:33


Taky by jsi si mohl svuj exe zvetsit treba o jeden byte/word
a tam si ukladat pocet spusteni, ale asi Ti budou r(hacek)va(carka)t
pripadne antivirove programy.

D.

> Ano to pojde cez ini file ale to prave nechcem cez ini subory riesit.
>
> TUNGLI Jan
> tungli(zv)pvt.sk

Off-Top ... Monitor

[*] Pavel Kral <kral(zv)afx(tec)cz> - 29.9.1998 09:09:38

Jezisi, na tom se fakt da delat?

Pavel

-----Original Message-----


nedelej chute okoli, nebo ta 14" co mam
na stole pude taky z wokna :-)

Form position

[*] TUNGLI Jan <tungli(zv)pvt.sk> - 29.9.1998 09:55:52

Nie asi sme sa nerozumeli. Chcel som modifikovat FormStorage komponentu aby
to dokazal nezavisle na tom ci budem mat nastevena ulozenie cez INI subor alebo cez Registry.
Riesenie som nasiel takto:
V unite AppUnits (z RX komponentov)
do procedury InternalReadFormPlacement(Form: TForm; IniFile: TObject; dodal som par riadkov:

procedure InternalReadFormPlacement(Form: TForm; IniFile: TObject;
begin
...
...
PosStr := IniReadString(IniFile, Section, siNormPos, '');
if PosStr <> '' then begin
DataFound := True;
rcNormalPosition.Left := StrToIntDef(ExtractWord(1, PosStr, Delims), Left);
rcNormalPosition.Top := StrToIntDef(ExtractWord(2, PosStr, Delims), Top);
rcNormalPosition.Right := StrToIntDef(ExtractWord(3, PosStr, Delims), Left + Width);
rcNormalPosition.Bottom := StrToIntDef(ExtractWord(4, PosStr, Delims), Top + Height);
end;

{ *** tungli - pridavny kood pre centralizaciu okna, ak nie je este zapis }

if (PosStr='') and (TForm(Form).Tag=0) then begin
if (Screen.Width - TForm(form).Width)>0 then
TForm(form).Left:=(Screen.Width - TForm(form).Width) div 2;
if (Screen.Height - TForm(form).Height)>0 then
TForm(form).Top:=(Screen.Height - TForm(form).Height) div 2;
end;
{ *** tungli - koniec pridaneho kodu }

...
...
end;

{ Tag vlastnost som pouzil preto, ked bude nastavena aby centralizaciu nevykonal. }

TUNGLI Jan
tungli(zv)pvt.sk

----------
> Od: Zbysek Hlinka <zhlinka(zv)login(tec)cz>
> Pre: delphi-l(zv)fwd(tec)cz
> Predmet: RE: Form position
> D�tum: 29. september 1998 8:53
>
> :-)
>
> Hmm.. Registr nechces, INI nechces, tak si vytvor svuj vlastni
> soubor, a tam si to ukladej. INI mi vsak prijde jako nejvhodnejsi,
> kdyz nechci zadelat registry. Navic si ho muzes dat do sveho
> adresare, nemusi byt v System\. Proste v Create uvedes plnou
> cestu.
>
> TUNGLI Jan wrote:
>
> > Ano to pojde cez ini file ale to prave nechcem cez ini subory riesit.
> >
> > TUNGLI Jan
> > tungli(zv)pvt.sk
> >
> > ----------
> > > Od: Marek Repisk <mrepisky_zl(zv)zsnp.sk>
> > > Pre: delphi-l(zv)fwd(tec)cz
> > > Predmet: Re: Form position
> > > D�tum: 28. september 1998 12:23
> > >
> > > > Potrebujem aby formulary spravali nasledovne>
> > > > Po nainstalovani programu aby formulary sa objavovali uprostred
> > > > obrazovky
> > > ale
> > > > ked uzivatel pohne s formularom aby formular zapametal svoju poziciu.
> > > > Pouzivam k tomu z RX FormStorage komponentu ktora zapameta polohu
> > > formulara - problem je iba v tom ako zistim ze formular este nema
> > > zapisanu poziciu - tz. ze ide o cerstvo nainstalovany produkt.
> > > Samozrejme mozem nieco zapisovat do registrov ale to sa mi nechce.
> > > Predsa FormStorage by mal to vediet ci ma nieco zapisane alebo nie.
> > >
> > > Nazdar,
> > >
> > > nepoznam FormStorage. Pre taketo veci pouzivam INI subor. Fcia
> > > ReadInteger, ktora cita z INI suboru, ma jeden parameter Default, kam
> > > mozes dat vlastnu fciu pre urcenie polohy formu. Ked spustis Tvoj
> > > program na pocitaci prvy krat, INI subor neexistuje a preto sa pouzije
> > > Default parameter. Pri ukonceni programu ulozis nastavenie do INI suboru
> > > a to sa pouzije pri novom starte.
> > >
> > > Marek Repisky
> > > mrepisky_zl(zv)zsnp.sk
> > >
> >
>
>
>
> 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


Off-Top ... Monitor

[*] Dobromil Mal� <Dobromil.Maly(zv)rak.pr.ds.mfcr(tec)cz> - 29.9.1998 10:00:05


Da se delat i na 9" mono, ale nevim co.

----------
Od: Pavel Kral[SMTP:kral(zv)afx(tec)cz]
Odesl�no: 29. z��� 1998 9:09
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Re: Off-Top ... Monitor

Jezisi, na tom se fakt da delat?

Pavel

-----Original Message-----


nedelej chute okoli, nebo ta 14" co mam
na stole pude taky z wokna :-)

Form position

[*] V�t�zslav Gazda������u��n�?��? - 29.9.1998 10:14:15

Ja si to zapisuji do registru pomoci objektu TRegIniFile. Kdyz volam nejakou
cteci metodu (napr. ReadInteger), tak ji jako defaultni hodnotu predavam
aktualni hodnotu dane vlastnosti. Takze pokud je to prvni spusteni tak
vsechny komponenty zustanou tak jak jsem je visualne navrhnul v Delphi.

Vita


Off-Top ... Monitor

[*] Simicek Pavel <simicek(zv)uvss.fme.vutbr(tec)cz> - 29.9.1998 10:39:15

> Jezisi, na tom se fakt da delat?
>
Jo hochu to by ses divil na cem vsem se da delat kdyz nic lepsiho
nemas k dispozici.
P.

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


Jpeg

[*] Vladislav �adsk� <cadsky(zv)a-consultplus(tec)cz> - 29.9.1998 10:49:43


Mam nasledujici problem:
Mam tabulku, v ni pole Tblobfield s bmp.
Pridelal jsem do aplikace moznost ukladani take jpg, tedy mam v tabulce ve stejnem fieldu
jak bmp tak jpg a nevim jak rozeznavat jde-li o bmp nebo jpg. Mohl bych to rozdelit do dvou poli,
ale jde o jednoduchy update u vice jak 200 uzivatelu a proto nechci mnenit strukturu jejich tabulky.

Dale by me zajimalo jestli neexistuje nekde free komponenta na zmenu velikosti (byte) obrazku.
Ale to chci asi moc.

D4 a Oracle 8 na Won95

[*] delphi.abion(zv)post(tec)cz - 29.9.1998 10:57:14

Nem� n�kdo zku�enosti s p��stupem z Delphi 4 (pomoc� BDE 5.00) na Oracle 8 (klient 8.0.4). Na NT to chod� bez probl�mu, ale na 95 dost�v�m hl�ky typu "cannot load library, SQLORA8.DLL".

D�ky za ka�dou radu,

David Vodi�ka
David.Vodicka(zv)email(tec)cz

Smazani canvasu pruhledneho formulare

[*] Jan Fiala <jan.fiala(zv)iname(tec)com> - 29.9.1998 11:51:09

Nestacilo by v create formulare nastavit Brush:=bsClear, coz udela pruhledny
formular.

=======================================
ing. Jan Fiala jan.fiala(zv)iname.com
Prog-Soft s.r.o. Plzen
INFOrmacni System vyrobce a distributory napoju
=======================================

-----P�vodn� zpr�va-----
Od: Juraj Nagy <Juraj.Nagy(zv)nh-trans(tec)cz>
Komu: 'delphi-l(zv)fwd(tec)cz' <delphi-l(zv)fwd(tec)cz>
Datum: 29. z��� 1998 7:36
P�edm�t: Smazani canvasu pruhledneho formulare


>Pred casem zde byla diskuse o pruhlednych formularech. Z. Petruj
>navrhnul (jeho 2. zpusob) prekryt metodu CreateParams se stylem
>WS_EX_TRANSPARENT. Pro mne neni problem, ze se neda refreshnot
>pozadi. Problemem ale je, ze nevim jak smazat canvas takoveho
>formulare tak, aby se neprekrylo pozadi.
>Mozna nekoho napedne i jine reseni, proto popis problemu:
>1. Mam uplne normalni Form1 (maximalizovany), na kterem jsou objekty
>pozadi - ty se behem prace programu nemeni.
>2. Na tom mam umisteny pruhledny Form2 (taky maximalizovany), na
>ktery se umistnuji jine nakreslene objekty.
>3. Nad tym vsim se ukaze mensi modalni Form3 uprostred obrazovky, kde
>se nastavuji parametre prave kresleneho objektu, napr. velikost a
>umistneni mrizky (moje komponenta, jsou to pomocne cary pro orientaci
>pri umistneni ostatnych objektu) na Form2. Vsechno se deje pomoci
>Spineditu. Ta mrizka zaroven podle toho meni svoje vlastnosti. Po
>kazde zmene spineditu se nastavi parametre mrizky, puvedni se smaze
>(volanim Paintu mrizky) a nakresli se nova (volanim Invalidate).
>No a ted ten problem. Kdyz se na Spinedity klika pekne pomalu,
>vsechno je OK. Ale kdyz se tlacitko zmackne a zacne automaticke
>opakovani, vetsinou se nekde "zapomene" smazat stara mrizka a zustava
>na Form2 i s novou. Asi se preskoci nektery Paint a Invalidate.
>Nejzajimavejsi je, ze vse se najednou ukaze spravne, kdyz se na Form3
>zmackne Alt (Form3 nema zadne menu, ani systemove). No kdyz
>vygeneruji spravu o stlaceni Altu programove, tak se nic nedeje.
>
>Budu vdecny za vsechny rady a predem za ne dekuji.
>
>P.S. Je to v Delphi 3.02 Prof
>
>S pozdravem
>
>J. Nagy
>NH-TRANS, spol. s r.o.
>Podebradova 28
>702 00 Ostrava
>e-mail: Juraj.Nagy(zv)nh-trans(tec)cz


Rozlozenie FILENAME

[*] Vladislav �adsk� <cadsky(zv)a-consultplus(tec)cz> - 29.9.1998 12:07:57


ExtractFileDir, ExtractFileDrive, ExtractFileExt, ExtractFileName, ExtractFilePath

Cau Vlada

-----P�vodn� zpr�va-----
Od: Ing. J�n Kuch�r [SMTP:kuchar(zv)tuke.sk]
Odesl�no: 23. z��� 1998 10:09
Komu: Delphi
P�edm�t: Rozlozenie FILENAME

Caute

Potrebujem nasledovnu vec. Zistim si uplnu cestu k nejakemu suboru na disku pomocou prikazu EXPANDFILENAME, ake ako dalej si ho mam rozkuskovat na jednotlive casti, to je na cestu, meno suboru a na jeho priponu. V Pascale na to bol prikaz FSPLIT a v Delphi na to prikaz neviem, tak co teraz.

Dik

Ing. J�n Kuch�r
Katedra inv�ci� a rein�inieringu
SjF TU Ko�ice
Letn� 9
040 01 Ko�ice
E-mail : kuchar(zv)tuke.sk
<<Soubor: ATT00000.html>>

Rozlozenie FILENAME

[*] Pavel Kral <kral(zv)afx(tec)cz> - 29.9.1998 12:20:19

ExtractFilePath(FullFileName);
ExtractFileName(FullFileName);
ExtractFileExt(FullFileName);
Pavel
-----Original Message-----
From: Ing. J�n Kuch�r <kuchar(zv)tuke.sk>
To: Delphi <delphi(zv)pinknet(tec)cz>
Date: 29. z��� 1998 11:14
Subject: Rozlozenie FILENAME


Caute

Potrebujem nasledovnu vec. Zistim si uplnu cestu k nejakemu suboru na disku pomocou prikazu EXPANDFILENAME, ake ako dalej si ho mam rozkuskovat na jednotlive casti, to je na cestu, meno suboru a na jeho priponu. V Pascale na to bol prikaz FSPLIT a v Delphi na to prikaz neviem, tak co teraz.

Dik

Ing. J�n Kuch�r
Katedra inv�ci� a rein�inieringu
SjF TU Ko�ice
Letn� 9
040 01 Ko�ice
E-mail : kuchar(zv)tuke.sk

Rozlozenie FILENAME

[*] Daniel SICHTA <Sichta(zv)asset.sk> - 29.9.1998 12:24:06


Tiez som nieco tak� potreboval ale nechcelo sa mi to hladat v D3 tak som
si urobil funkciu ktora mi hlada urcity znak a vracia jeho poziciu v
retazci. Ak chces poslem ti tu funkciu aj s popisom
sichta(zv)za.asset.sk <mailto:sichta(zv)za.asset.sk> -----Original Message-----
From: Ing. J�n Kuch�r [SMTP:kuchar(zv)tuke.sk]
Sent: 23. september 1998 11:09
To: Delphi
Subject: Rozlozenie FILENAME

Caute

Potrebujem nasledovnu vec. Zistim si uplnu cestu k nejakemu
suboru na disku pomocou prikazu EXPANDFILENAME, ake ako dalej si ho mam
rozkuskovat na jednotlive casti, to je na cestu, meno suboru a na jeho
priponu. V Pascale na to bol prikaz FSPLIT a v Delphi na to prikaz
neviem, tak co teraz.
���

������������������������������������������������������������������������
������� Dik

Ing. J�n Kuch�r
Katedra inv�ci� a rein�inieringu
SjF TU Ko�ice
Letn� 9
040 01 Ko�ice
E-mail : kuchar(zv)tuke.sk <mailto:kuchar(zv)tuke.sk>

Rozlozenie FILENAME

[*] Jaroslav N�dhera <csh(zv)czn(tec)cz> - 29.9.1998 12:32:26

Pretazeno z helpu Delphi:

ExtractFileDir Returns only the drive and directory parts of the file name.
ExtractFileDrive Returns a only the drive'portion of a fully qualified path name.
ExtractFileExt Returns only the file extension.
ExtractFileName Returns only the file name.
ExtractFilePath Returns the path to the specified file.

-----P�vodn� zpr�va-----
Od: Ing. J�n Kuch�r <kuchar(zv)tuke.sk>
Komu: Delphi <delphi(zv)pinknet(tec)cz>
Datum: 29. z��� 1998 10:27
P�edm�t: Rozlozenie FILENAME


Caute

Potrebujem nasledovnu vec. Zistim si uplnu cestu k nejakemu suboru na disku pomocou prikazu EXPANDFILENAME, ake ako dalej si ho mam rozkuskovat na jednotlive casti, to je na cestu, meno suboru a na jeho priponu. V Pascale na to bol prikaz FSPLIT a v Delphi na to prikaz neviem, tak co teraz.

Dik

Ing. J�n Kuch�r
Katedra inv�ci� a rein�inieringu
SjF TU Ko�ice
Letn� 9
040 01 Ko�ice
E-mail : kuchar(zv)tuke.sk

Vlastnosti komponent za behu

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 29.9.1998 12:37:11

Petr Vones wrote:

> > > A podivejme, ze by prisny pan ucitel ? :-)
> >
> > Jasne. A kdo nebude chapat, toho zmlatim rakoskou. :-)
>
> A sakra, tak to abych se tomu na hony vyhybal :-)

Leda ze bys byl silnejsi nez ja. :-) No, ale stejne nevim, co ty bys
tam pohledaval. Nemam rad stouraly... :-)

> > ActiveX? To snad ani neee. Tedy pokud mas na mysli ty hruzy s
> > priponou OCX. Tedy, samozrejme se zminim, ze toto lze vyrobit a
> > jak, ale pitvat to nehodlam.
>
> No.... mam. Presne receno ty hruzy ktere pak muzes vlozit ho HTML stranky
> a otevrit v prohlizeci.

To jedine. Ale pred pouzitim OCX v Delphi durazne varuji. Pokud to
chces pouzit takhle, a mas to v Delphi dobre pripravene, pak je to
vyklad tak na 10-15 minut i s ukazkou, dele nema smysl se tim
zabyvat. Pokud myslis ze ano, zkus mi to vyvratit.


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


Rozlozenie FILENAME

[*] Dobromil Mal� <Dobromil.Maly(zv)rak.pr.ds.mfcr(tec)cz> - 29.9.1998 13:00:26


Je to v napovede :
Unit
SysUtils

ExtractFileExt returns the extension portions of FileName.
function ExtractFileExt(const FileName: string): string;
{-------------------------------------------------------------}
ExtractFileName extracts the name and extension parts of FileName.
function ExtractFileName(const FileName: string): string;
{-------------------------------------------------------------}
ExtractFilePath returns the drive and directory portions of FileName.
function ExtractFilePath(const FileName: string): string;
{-------------------------------------------------------------}
ExpandFileName returns the full path of Filename.
function ExpandFileName(const FileName: string): string;

Dobra.

----------
Od: Ing. J�n Kuch�r[SMTP:kuchar(zv)tuke.sk]
Odesl�no: 23. z��� 1998 11:09
Komu: Delphi
P�edm�t: Rozlozenie FILENAME

<<Soubor: ATT00012.html>>
Caute

Potrebujem nasledovnu vec. Zistim si uplnu cestu k nejakemu suboru na disku pomocou prikazu EXPANDFILENAME, ake ako dalej si ho mam rozkuskovat na jednotlive casti, to je na cestu, meno suboru a na jeho priponu. V Pascale na to bol prikaz FSPLIT a v Delphi na to prikaz neviem, tak co teraz.

Dik

Ing. J�n Kuch�r
Katedra inv�ci� a rein�inieringu
SjF TU Ko�ice
Letn� 9
040 01 Ko�ice
E-mail : kuchar(zv)tuke.sk

Export , import do dbtable

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

> Tabulku databaze napr. Table1 bych chtel naplnit ze souboru xxx.txt
> a take data z Table1 imprtovat do souboru xxx.txt. Jak se to da udelat ?
> Componenta BatchMove to dela mezi tabulkami. Jak se to dela ze souborem.
> Klasicky import,export dat do tabulky databaze. Diky za radu.

Nazdar,

uz tu raz bezala na tuto temu diskusia, ale na nic sa neprislo. Asi si
budes musiet export/import dat pre Tvoju databazu urobit sam. Ak by si
chcel mozem Ti poslat, programik, ktory som si na to napisal. Nie je to
ziaden "inteligent", ale ako inspiracia mozno pomoze.

Marek Repisky
mrepisky_zl(zv)zsnp.sk

Rozlozenie FILENAME

[*] Bardon <INEQSW(zv)ova.pvtnet(tec)cz> - 29.9.1998 13:12:46


Koukni se v Delphi helpu na funkce:
ExtractFileDir
ExtractFileDrive
ExtractFileExt
ExtractFileName
ExtractFilePath
pop��pad� je�t�
ExtractRelativePath

-----P�vodn� zpr�va-----
Od: Ing. J�n Kuch�r [SMTP:kuchar(zv)tuke.sk]
Odesl�no: 29. z��� 1998 12:13
Komu: Delphi
P�edm�t: Rozlozenie FILENAME

Caute

Potrebujem nasledovnu vec. Zistim si uplnu cestu k nejakemu suboru na disku pomocou prikazu EXPANDFILENAME, ake ako dalej si ho mam rozkuskovat na jednotlive casti, to je na cestu, meno suboru a na jeho priponu. V Pascale na to bol prikaz FSPLIT a v Delphi na to prikaz neviem, tak co teraz.

Dik

Ing. J�n Kuch�r
Katedra inv�ci� a rein�inieringu
SjF TU Ko�ice
Letn� 9
040 01 Ko�ice
E-mail : kuchar(zv)tuke.sk <<Soubor: ATT00004.htm>>

Rozlozenie FILENAME

[*] Baluch <tpplus(zv)zasova(tec)cz> - 29.9.1998 13:22:07

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

ExtractFileDir
ExtractFileDrive
ExtractFileExt
ExtractFileName
ExtractFilePath

fse je v helpu

Bye Baluch
-----P�vodn� zpr�va-----
Od: Ing. J�n Kuch�r <kuchar(zv)tuke.sk>
Komu: Delphi <delphi(zv)pinknet(tec)cz>
Datum: 29. z��� 1998 12:15
P�edm�t: Rozlozenie FILENAME


Caute

Potrebujem nasledovnu vec. Zistim si uplnu cestu k nejakemu suboru na disku pomocou prikazu EXPANDFILENAME, ake ako dalej si ho mam rozkuskovat na jednotlive casti, to je na cestu, meno suboru a na jeho priponu. V Pascale na to bol prikaz FSPLIT a v Delphi na to prikaz neviem, tak co teraz.

Dik

Ing. J�n Kuch�r
Katedra inv�ci� a rein�inieringu
SjF TU Ko�ice
Letn� 9
040 01 Ko�ice
E-mail : kuchar(zv)tuke.sk

Export , import do dbtable

[*] Radoslav Balvan <balvanra(zv)datalock.sk> - 29.9.1998 13:24:46

nejak jednoducho to asi nepojde - takze ostava nieco ako toto
//ukazka importu z TXT do tabulky

vstup musi byt specifikovany nejak takto:
"stlpec1|stlpec2|stlpec3|" t.j. hodnoty oddelene niecim (tu: pipe "|")

assignfile(flein, 'FILEIN.TXT');
reset(filein);
table1.Open;
while not eof(filein) do begin
readln(filein, riadok ); //riadok : string -
"stlpec1|stlpec2|stlpec3|"
i := 0; // index of current
field
table1.Append;
while (riadok <> '') do begin
hodnota := copy(riadok, 1, pos(riadok, '|')-1); //hodnota - hodnota
i-teho stlpca
riadok := copy( riadok, pos(riadok, '|')+1, length(riadok) -
pos(riadok, '|')); //riadok bez hodnoty(i)
table1.fields[i].asstring := hodnota;
i := i + 1;
end;
table1.post;
end;
closeFile(filein);

nez to zacnes opisovat, radsej si to skontroluj :-)

--
Maj sa,
R.

Rozlozenie FILENAME

[*] Rudolf Balada <rudolf.balada(zv)parlament(tec)cz> - 29.9.1998 13:39:36

Zkus treba ExtractFilePath nebo ExtractFileName.

Rudolf Balada
kancler(zv)parlament(tec)cz


-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Ing. J�n Kuch�r
Sent: Wednesday, September 23, 1998 11:09 AM
To: Delphi
Subject: Rozlozenie FILENAME


Caute

Potrebujem nasledovnu vec. Zistim si uplnu cestu k nejakemu suboru na
disku pomocou prikazu EXPANDFILENAME, ake ako dalej si ho mam rozkuskovat na
jednotlive casti, to je na cestu, meno suboru a na jeho priponu. V Pascale
na to bol prikaz FSPLIT a v Delphi na to prikaz neviem, tak co teraz.


Dik

Ing. J�n Kuch�r
Katedra inv�ci� a rein�inieringu
SjF TU Ko�ice
Letn� 9
040 01 Ko�ice
E-mail : kuchar(zv)tuke.sk


Langdriver u existujici tabulky

[*] rys(zv)zas-me(tec)cz - 29.9.1998 13:41:08

Dobry den,

vytvoril jsem nekolik tabulek Paradox 7 a nemel jsem spravne nastaveny
LangDriver v BDE. Nevite nekdo, jak se da u existujici tabulky toto
nastaveni zmenit? (Zkousel jsem to pomoci Norton Utilities, coz se sice
podari, ale pak zase BDE hlasi nejake nesrovnalosti s indexy a tabulku
odmitne otevrit.)

Diky,

Karel Rys
rys(zv)zas-me(tec)cz


Export , import do dbtable

[*] Dobromil Mal� <Dobromil.Maly(zv)rak.pr.ds.mfcr(tec)cz> - 29.9.1998 14:00:16


Vse zalezi na formatu toho *.txt, pokud je zde pritomen nejaky oddelovac
nebo je delka poli konstatni, pomuze Excel, ktery to dokaze prevest do dbf
a pritom i upravit kodovani (jazyka) nebo to umi i Access.

Dobra.

----------
Od: Marek Repisk�[SMTP:mrepisky zl(zv)zsnp.sk]
Odesl�no: 29. z��� 1998 13:01
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Re: Export , import do dbtable

> Tabulku databaze napr. Table1 bych chtel naplnit ze souboru xxx.txt
> a take data z Table1 imprtovat do souboru xxx.txt. Jak se to da udelat ?
> Componenta BatchMove to dela mezi tabulkami. Jak se to dela ze souborem.
> Klasicky import,export dat do tabulky databaze. Diky za radu.

Nazdar,

uz tu raz bezala na tuto temu diskusia, ale na nic sa neprislo. Asi si
budes musiet export/import dat pre Tvoju databazu urobit sam. Ak by si
chcel mozem Ti poslat, programik, ktory som si na to napisal. Nie je to
ziaden "inteligent", ale ako inspiracia mozno pomoze.

Marek Repisky
mrepisky zl(zv)zsnp.sk

HTMLtoRGB

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 29.9.1998 14:23:10

Zdravim,

pred casem mi tu nekdo poslal proceduru na prevod HTML barvy do RGB.
Samozrejme, ze ji nikde nemuzu najit. Muzu prosit dotycneho jeste
jednou?
Diky..........................................................
. Libor Krayzel .
. Czech Television, Studio Ostrava .
. Dvorakova 18, 702 00 Ostrava .
. Telephone: 069-6201375 .
. URL: http://members.tripod.com/~sovtop .
. E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz .
. Fidonet: mailto:libor_krayzel(zv)p5.f59.n421.z2.fido(tec)cz .
. E-mail2: mailto:sovtop(zv)email(tec)cz .
.........................................................

Export, import

[*] tomas.mazurek(zv)vitkovice(tec)cz - 29.9.1998 14:33:38

Dobry den z Ostravy

Pred casem jsem do konference posilal prispevek ohledne prevodu
tabulek z TXT do Paradoxu. Tak jej posilam znovu.

Pro nacitani dat z textovych souboru lze pouzit standardni komponentu
TBatchMove. Problem je v tom, ze pro spravne nacteni textoveho souboru
je treba k nemu mit i tzv. schematovy soubor, kde je popis
jednotlivych polozek, tj. od ktere pozice do ktere je urcita polozka.
Pokud tento soubor nechcete psat sami, lze si jej vytvorit opet pomoci
komponenty TBatchMove. Jako zdroj pouzijte onu tabulku Paradoxu, jako
cil pak nejaky lib. Ascii. Typ TBachMove zvolte Copy. Vytvori se nejen
txt soubor, ale i soubor *.sch. A to je prave ten, ktery potrebujete
pro nacitani dat z txt do paradoxu. Pro vlastni import pak pouzijte
opet TBatchMove, zdroj bude pak textak a cil paradox. Typ pak Append.
Samozrejme schematovy soubor staci vytvorit jen jednou.

Mala varovani z praxe:

1. U ascii tabulek i u paradoxu lze pouzit tzv. aliasy,
schematovy soubor je nutno pripadne presouvat i s fyzickou cestou.

2. Je nutno, aby souhlasily data z textaku s konfiguraci BDE. Napr.
kdyz v textaku mate datum ve tvaru mm.dd.yyyy musi byt tento tvar i v
konfiguraci BDE. Podobne je to i s cislicemi.

Jinak na DSP jsem videl nekolik komponent, ktere se zabyvaji exportem
a importem dat, lec vyse zmineny postup mi vyhovuje a tak jsem je
blize nestudoval.

S pozdravem


HTMLtoRGB

[*] Rul��ek Daniel <dan.r(zv)avizo(tec)cz> - 29.9.1998 14:42:10

Mel jsem to v odelsane poste, doufam, ze to je ono


aColor:=ColorToRGB(ColorDialog1.Color);
htmcolor := '#'+IntToHex(GetRValue(aColor),
2)+IntToHex(GetGValue(aColor), 2)+IntToHex(GetBValue(aColor), 2)

> -----Original Message-----
> From: Krayzel Libor [mailto:Libor.Krayzel(zv)czech-tv(tec)cz]
> Sent: Tuesday, September 29, 1998 2:23 PM
> To: 'delphi-l(zv)fwd(tec)cz'
> Subject: HTMLtoRGB
>
>
> Zdravim,
>
> pred casem mi tu nekdo poslal proceduru na prevod HTML barvy do RGB.
> Samozrejme, ze ji nikde nemuzu najit. Muzu prosit dotycneho jeste
> jednou?
> Diky..........................................................
> . Libor Krayzel .
> . Czech Television, Studio Ostrava .
> . Dvorakova 18, 702 00 Ostrava .
> . Telephone: 069-6201375 .
> . URL: http://members.tripod.com/~sovtop .
> . E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz .
> . Fidonet: mailto:libor_krayzel(zv)p5.f59.n421.z2.fido(tec)cz .
> . E-mail2: mailto:sovtop(zv)email(tec)cz .
> .........................................................
>

Vlastnosti komponent za behu

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 29.9.1998 14:49:49

> > No.... mam. Presne receno ty hruzy ktere pak muzes vlozit ho HTML stranky
> > a otevrit v prohlizeci.
>
> To jedine. Ale pred pouzitim OCX v Delphi durazne varuji. Pokud to

Proc? Ja v pohode delam COM objekty bezici na WWW serveru, ktere jsou
volane z ASP skriptu 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 ===
==============================================================

Langdriver u existujici tabulky

[*] Marcello Dvoracci <dvo20um(zv)axpsu.fpf.slu(tec)cz> - 29.9.1998 15:01:55

Normalne si tu tabulku otevri v desktopu a zmen si tam jazyk v table
propertis (vpravo nahore :-)) si vyber Language a modifuj a modifuj dle
libosti.

marcello

On Tue, 29 Sep 1998 rys(zv)zas-me(tec)cz wrote:

> Dobry den,
>
> vytvoril jsem nekolik tabulek Paradox 7 a nemel jsem spravne nastaveny
> LangDriver v BDE. Nevite nekdo, jak se da u existujici tabulky toto
> nastaveni zmenit? (Zkousel jsem to pomoci Norton Utilities, coz se sice
> podari, ale pak zase BDE hlasi nejake nesrovnalosti s indexy a tabulku
> odmitne otevrit.)
>
> Diky,
>
> Karel Rys
> rys(zv)zas-me(tec)cz
>

Rozlozenie FILENAME

[*] Petr Brant <pbrant(zv)softhome(tec)net> - 29.9.1998 15:08:34

ExtractFileName extracts the name and extension parts of FileName.

function ExtractFileName(const FileName: string): string;

Description

The resulting string is the leftmost characters of FileName, starting with
the first character after the colon or backslash that separates the path
information from the name and extension. The resulting string is equal to
FileName if FileName contains no drive and directory parts.

Example

The following code changes the caption of Form1 to read "Editing
<FileName>".

Form1.Caption := 'Editing '+ ExtractFileName(FileName);

Snad ti to pomuze.

*************************************************************************
Petr Brant [pbrant(zv)softhome.net]
programator v MSVC++, obcas Delphi nebo Visual Basic
*************************************************************************


-----Puvodni zprava-----
Od: Ing. Jan Kuchar
Odeslano: 23. zaoi 1998 11:09
Komu: Delphi
Poedmit: Rozlozenie FILENAME

Caute

Potrebujem nasledovnu vec. Zistim si uplnu cestu k nejakemu suboru na disku
pomocou prikazu EXPANDFILENAME, ake ako dalej si ho mam rozkuskovat na
jednotlive casti, to je na cestu, meno suboru a na jeho priponu. V Pascale
na to bol prikaz FSPLIT a v Delphi na to prikaz neviem, tak co teraz.



Dik

Ing. Jan Kuchar
Katedra invacii a rein?inieringu
SjF TU Ko?ice
Letna 9
040 01 Ko?ice
E-mail : kuchar(zv)tuke.sk


Langdriver u existujici tabulky

[*] Karol Zaic <zaic_karol(zv)novitech.sk> - 29.9.1998 15:37:54

rys(zv)zas-me(tec)cz wrote:

> Dobry den,
>
> vytvoril jsem nekolik tabulek Paradox 7 a nemel jsem spravne nastaveny
> LangDriver v BDE. Nevite nekdo, jak se da u existujici tabulky toto
> nastaveni zmenit? (Zkousel jsem to pomoci Norton Utilities, coz se sice
> podari, ale pak zase BDE hlasi nejake nesrovnalosti s indexy a tabulku
> odmitne otevrit.)
>

Langdriver sa da zmenit pomocou programu Database Desktop dodavanym s
Delphi. Tam treba pouzit Table Restructure. Samozrejme musi byt na danu
tabulku exkluzivny pristup, teda nesmie byt otvorena nejakym programom
alebo v Delphi IDE. Data ulozene v tabulke sa ovsem neprekoduju do ineho
kodu, ale to sa da urobit jednoduchym programcekom s pouzitim funkcii
BDE(bde32.hlp) dbiAnsiToNative a dbiNativeToAnsi, ktory prebehne cez
stlpce, v ktorych mohla byt pouzita cestina.

TChart

[*] Kelle Ondrej <kelleon(zv)nnsk.sk> - 29.9.1998 15:43:54

Mne funguje toto:

Chart.PrintResolution := -100;
Chart.PrintPartial(Rect(rleft, rtop, rright, rbottom));

Ondrej Kelle
kelleon(zv)nnsk.sk

> -----Original Message-----
> From: Ales Bukovsky [SMTP:elidisp(zv)mbox.vol(tec)cz]
> Sent: Wednesday, September 30, 1998 4:35 AM
> To: Conference Delphi
> Subject: TChart
>
> Zdravim,
> pouzivam komponentu TChart (D3 Prof) a potrebuju ji vytiskout. Metoda
> pro tisk funguje uplne blbe, tak ze jsem to zkousel pres metodu
> Draw(C,R), kde C je proste canvas printeru. Neco to tiskne, ale
> nerespektuje to nastaveni R (TRect) jako cilove oblasti. Mam dojem, ze
> je to nejaka chyba v komponente. Souradnice X neni chapana jako X, Y
> neni Y, ale neni to ani naopak, Y (!) se treba projevuje v sirce (!)
> tisteneho grafu... Neporadi mi nekdo?
> Predem diky.
> -Ales-


Langdriver u existujici tabulky

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 29.9.1998 15:52:24

Pokud v tom uz mas data, pak budes muset udelat novou tabulku se
spravnym LangDriverem a data presypat. To by nemel byt problem. Kdybys
totiz jen zmenil LD, tak se budou nespravne zobrazovat data. Zmena LD
nema vliv na data :-(


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: rys(zv)zas-me(tec)cz [SMTP:rys(zv)zas-me(tec)cz]
> Odesl�no: 29. z��� 1998 13:41
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Langdriver u existujici tabulky
>
> Dobry den,
>
> vytvoril jsem nekolik tabulek Paradox 7 a nemel jsem spravne nastaveny
>
> LangDriver v BDE. Nevite nekdo, jak se da u existujici tabulky toto
> nastaveni zmenit? (Zkousel jsem to pomoci Norton Utilities, coz se
> sice
> podari, ale pak zase BDE hlasi nejake nesrovnalosti s indexy a tabulku
>
> odmitne otevrit.)
>
> Diky,
>
> Karel Rys
> rys(zv)zas-me(tec)cz


Langdriver u existujici tabulky

[*] MotlicekP(zv)tescosw(tec)cz - 29.9.1998 15:59:56

Snad mas Borland Database Desktop....

Zvol Table Restructure (nebo tak nejak) a pak v dialogu v pravo nahore
zvol Table Language....

Petr Motlicek

> -----P�vodn� zpr�va-----
> Od: rys(zv)zas-me(tec)cz [SMTP:rys(zv)zas-me(tec)cz]
> Odesl�no: 29. z��� 1998 13:41
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Langdriver u existujici tabulky
>
> Dobry den,
>
> vytvoril jsem nekolik tabulek Paradox 7 a nemel jsem spravne nastaveny
>
> LangDriver v BDE. Nevite nekdo, jak se da u existujici tabulky toto
> nastaveni zmenit? (Zkousel jsem to pomoci Norton Utilities, coz se
> sice
> podari, ale pak zase BDE hlasi nejake nesrovnalosti s indexy a tabulku
>
> odmitne otevrit.)
>
> Diky,
>
> Karel Rys
> rys(zv)zas-me(tec)cz


Rozlozenie FILENAME

[*] Zden�k Glaser <glaser(zv)ipl(tec)cz> - 29.9.1998 16:12:39


Pouzij
ExtractFilePath, ..Name, ..Dir, ..Drive, Ext ..
Mnoho zdaru

Ing. J�n Kuch�r wrote:

> Caute Potrebujem nasledovnu vec. Zistim si uplnu cestu k nejakemu
> suboru na disku pomocou prikazu EXPANDFILENAME, ake ako dalej si ho
> mam rozkuskovat na jednotlive casti, to je na cestu, meno suboru a na
> jeho priponu. V Pascale na to bol prikaz FSPLIT a v Delphi na to
> prikaz neviem, tak co
> teraz.
> Dik
>
> Ing. J�n Kuch�r
> Katedra inv�ci� a rein�inieringu
> SjF TU Ko&scaron;ice
> Letn� 9
> 040 01 Ko&scaron;ice
> E-mail : kuchar(zv)tuke.sk



--
====================================================
Zdenek GLASER mailto:glaser(zv)ipl(tec)cz
__________________________________________________________
Office: IPL software s.r.o., Jablonecka 36, 461 09 Liberec, Czech
Republic
tel.: ++420-48-53 96 563, ++420-48-611 24 01, ++420-48-611 24 02
fax.: ++420-48-611 24 03
http://www.ipl(tec)cz
__________________________________________________________
Privat: Borovy vrch 289, 460 14 Liberec 13, Czech Republic
tel.: ++420-48-51 246 15
====================================================

Export , import do dbtable

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 29.9.1998 16:15:01

> uz tu raz bezala na tuto temu diskusia, ale na nic sa neprislo. Asi si

Jaktoze ne??? Prece textovy soubor umi normalne BDE nacist,
on umi pracovat nejen s tabulkami dBase, Paradox a FoxPro,
ale take s textovymi tabulkami. Jen musi byt pole nejak
oddelene a musi existovat .SCH soubor s definici poli...
Pak to chodi vcetne BatchMove.

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 ===
==============================================================

Langdriver u existujici tabulky

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 29.9.1998 16:15:01

> vytvoril jsem nekolik tabulek Paradox 7 a nemel jsem spravne nastaveny
> LangDriver v BDE. Nevite nekdo, jak se da u existujici tabulky toto
> nastaveni zmenit? (Zkousel jsem to pomoci Norton Utilities, coz se sice

Kodovani tabulky umi zmenit Database Desktop - nedela nic s daty,
jen zmeni jazyk.

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 ===
==============================================================

Problemy s video kartou

[*] Martin Tichacek <martin_t(zv)mrp(tec)cz> - 29.9.1998 17:12:18

>>S ATI jsem nikdy problemy nemel. To se ovsem netyka S3 a vsech jejich
>>klonu.
>
>Mam podobne zkusenosti - karty S3 nam delaji problemy s DOSovskymi
>aplikacemi, ktere pouziji nejaky lepsi (VESA) graficky rezim. Vetsinou to
>skonci zatuhnutim Windows. Dle me zkusenosti takhle janci jen nektere
>modely. Take da dost prace nastavit vse tak, aby karty S3 (zrejme vsechny)
>pouzivaly nejakou rozumnou obnovovaci frekvenci v DOSu i ve Windows.


No zase do toho kavram..... off top.

Nastavit S3ce obnovovaci frekvenci - v dosu - dodava se (sice jen s nekterymi)
S3REFRSH, ktery to umi nastavit (treba 800x600x85Hz) - klidne. (zalezi na
monitoru - zda to chce prezit)
(* zkousel jsem to "pouze" na strasne spouste *.trio - ne virgre *)
Pokud ve W95 se nenainstaluje galileo (obdoba dos. s3refrsh - vnuti karte snimk.
fr. sam)
- pokud windowsum zadate monitor (nebo si ho najdou), nastavi vetsinou maximalni
jakou "snese" monitor. (pokud windowsu reknete, ze Vas stary 14"Goldstar je 21"
SONY, tak sorry :-)
Rozumne to funguje hlavne ve win95 OSR2. - pokud je tam nejaky konkretni
monitor - ne obecny vesa, pa se da nastavit snimkova frekv primo windowsama v
malem komboboxu
- pokud tam nacpete - standardni VESA 800x600 - nastavi windows sice neaky
HuMuS, ale da se spustit "rucne" s3refrsh a upravitto. Cesta je to schudna do
prvni zmeny rozlisovacky - pak si w. nastavi zase co chce.

//no pokud by to nebylo prilis proti autorskym pravum, mohli byste si ten
previtek (s3refrsh) sehnat od nekoho, kdo S3ku ma/mel :-)

Mti.

pokud nekdo bude chtit ten s3refrsh po mne, at se obrati ma muj mail a nedava
repy :-)

Jinak - (ne)zalozime spolek spokojenych kartistu-delphistu?
ATI 8MB PCI Xpert(zv)Work ani Expertcolor 1MB PCI S3TRIO 64(padelek ale s orig.
cipem S3) necini(la) potize v D1,3

Delphi

[*] Administrator <Administrator(zv)rosoft.sk> - 29.9.1998 17:17:37


Mam Delphi 4.0 Professional verziu Build 5.37 Je to najnovsia? Kupoval
som to asi pred mesiacom.


Patrik Tesar


Langdriver u existujici tabulky

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 29.9.1998 18:23:28

Jestli tam ma data, tak dopadne jak sedlaci u chlumce.....


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: Marcello Dvoracci [SMTP:dvo20um(zv)axpsu.fpf.slu(tec)cz]
> Odesl�no: 29. z��� 1998 15:02
> Komu: rys(zv)zas-me(tec)cz
> Kopie: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Langdriver u existujici tabulky
>
> Normalne si tu tabulku otevri v desktopu a zmen si tam jazyk v table
> propertis (vpravo nahore :-)) si vyber Language a modifuj a modifuj
> dle
> libosti.
>
> marcello
>
> On Tue, 29 Sep 1998 rys(zv)zas-me(tec)cz wrote:
>
> > Dobry den,
> >
> > vytvoril jsem nekolik tabulek Paradox 7 a nemel jsem spravne
> nastaveny
> > LangDriver v BDE. Nevite nekdo, jak se da u existujici tabulky toto
> > nastaveni zmenit? (Zkousel jsem to pomoci Norton Utilities, coz se
> sice
> > podari, ale pak zase BDE hlasi nejake nesrovnalosti s indexy a
> tabulku
> > odmitne otevrit.)
> >
> > Diky,
> >
> > Karel Rys
> > rys(zv)zas-me(tec)cz
> >

Rozlozenie FILENAME

[*] Simicek Pavel <simicek(zv)uvss.fme.vutbr(tec)cz> - 29.9.1998 18:24:20

> Caute
>
> Potrebujem nasledovnu vec. Zistim si uplnu cestu k nejakemu suboru na =
> disku pomocou prikazu EXPANDFILENAME, ake ako dalej si ho mam =
> rozkuskovat na jednotlive casti, to je na cestu, meno suboru a na jeho =
> priponu. V Pascale na to bol prikaz FSPLIT a v Delphi na to prikaz =
> neviem, tak co teraz.
> =20
> =
> Dik
>

V Delphi jsou na to prikazy ExtractFileName, ExtractFilePath,
ExtractFileExt, ExtractFileDir a ExtractFileDrive.
Vic uz si urcite najdes v helpu.
Zdar Pavel

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


Delphi

[*] Michal ��ek����֫Ŭ?��e���n� - 29.9.1998 18:57:18

Ja mam taky Delphi 4.0 Prof. build 5.37 a to jsem je ziskal ve ctvrtek,
minuly tyden.( diky za ne Borlande ... :-) ).
Ale build 5.37 z nich myslim udelal az service pack. Nejsem si tim ale 100%
jistej ....

Michal Cizek

>
>Mam Delphi 4.0 Professional verziu Build 5.37 Je to najnovsia? Kupoval
>som to asi pred mesiacom.
>
>
>Patrik Tesar


Langdriver u existujici tabulky

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 29.9.1998 20:07:42

> > Normalne si tu tabulku otevri v desktopu a zmen si tam jazyk v table
> > propertis (vpravo nahore :-)) si vyber Language a modifuj a modifuj
> > dle
> > libosti.

> Jestli tam ma data, tak dopadne jak sedlaci u chlumce.....
>
> Martin Fron�k

Blbost (zase), datum se nic nestane. Notabene, kdyz potrebuje zmenit
kodovani ze spatneho na spravne.

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 ===
==============================================================

Probl�my s video kartou

[*] Pavel Malinsk� <spiderland(zv)usa(tec)net> - 29.9.1998 22:17:43

Hi,

pridal bych se k temuz dotazu.

CO JSOU ZBYTECNE KOMPONENTY, kdyz mam jen ty
zakladni co prdlo samo D3 ?


P.S. jak sem tudle psal o podstrceni jineho monitoru,
(u kolegy OK) tak me se to teda nepovedlo.
Nebudu to zatim dale zkouset pac za chvili mam
D4 a teprve kdyby to tam nechodilo tak v
v tech pokusech budu pokracovat.

-----P�vodn� zpr�va-----
Od: Kon��ek Michal <m.konicek(zv)sh.cvut(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 29. z��� 1998 20:33
P�edm�t: Re: Probl�my s video kartou


Muzu se zeptat kterych ? ... diiik moc!

e-mail: m.konicek(zv)sh.cvut(tec)cz
Talk: hobbys(zv)hobbyspc.sh.cvut(tec)cz
ICQ#:7631712

-----Original Message-----
From: Kolar Lubor <LuborK(zv)tnet(tec)cz>
To: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Date: 25. z��� 1998 2:12
Subject: Re: Probl�my s video kartou


Mel jsem problemy podobny (Delphi versus Virge 4MB), pomohlo odstraneni
zbytecnych komponent.
Lubor bIRDIE Kolar
====================
GSM Phone: +420-603-410019
ICQ: 18587772

Probl�my s video kartou

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 29.9.1998 23:36:48

> CO JSOU ZBYTECNE KOMPONENTY, kdyz mam jen ty
> zakladni co prdlo samo D3 ?

To jsou libovolne komponenty, ktere nepotrebujes.
Tam nezalezi, co je to za komponentu, ale kolik jich
na palete je.

Je to pekna cunarna, ale me vubec nechodilo Delphi 2 na
notebooku, kdyz jsem mel dany pocet komponent. Stacilo
jednu odinstalovat a slapalo to. Pritom na velkem PC
to slapalo. Co se tyka Delphi 3, to jsem na notebooku
nezkousel, protoze jsem ho potreboval na testovani BDE
bez Delphi. Nedavno jsem ale na notebook nainstaloval
Delphi 4 a nacpal do nej silene kvantum komponent
a chodi to bezvadne...

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 ===
==============================================================

TChart

[*] Ales Bukovsky <elidisp(zv)mbox.vol(tec)cz> - 30.9.1998 04:35:27

Zdravim,
pouzivam komponentu TChart (D3 Prof) a potrebuju ji vytiskout. Metoda
pro tisk funguje uplne blbe, tak ze jsem to zkousel pres metodu
Draw(C,R), kde C je proste canvas printeru. Neco to tiskne, ale
nerespektuje to nastaveni R (TRect) jako cilove oblasti. Mam dojem, ze
je to nejaka chyba v komponente. Souradnice X neni chapana jako X, Y
neni Y, ale neni to ani naopak, Y (!) se treba projevuje v sirce (!)
tisteneho grafu... Neporadi mi nekdo?
Predem diky.
-Ales-


Vlastnosti komponent za behu

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 30.9.1998 07:57:00

Petr Zahradnik wrote:

> > To jedine. Ale pred pouzitim OCX v Delphi durazne varuji. Pokud to
>
> Proc? Ja v pohode delam COM objekty bezici na WWW serveru, ktere jsou
> volane z ASP skriptu apod.

Pokud to bezi nekde jinde, tak OK. Ale o pouzivani OCX v Delphi
programech jsme se uz tusim bavili... :-)


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


Langdriver u existujici tabulky

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 30.9.1998 08:05:24

Predpokladej prosim, ze v te tabulce data jsou, a pokud byla zalozena
napr. s LD 852 a byla do ni porizena data, a nasledne se zjistilo, ze
(treba kvuli jine aplikaci - ne BDE) je treba LD 867, pak to bude presne
tak, jak rikam. Myslim, ze tomu tak je. Ale Pan Zahradnik si to jiste
byl mezitim okouknou primo na miste :-)


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: Petr Zahradnik [SMTP:clexpert(zv)clexpert(tec)cz]
> Odesl�no: 29. z��� 1998 21:08
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: RE: Langdriver u existujici tabulky
>
> > > Normalne si tu tabulku otevri v desktopu a zmen si tam jazyk v
> table
> > > propertis (vpravo nahore :-)) si vyber Language a modifuj a
> modifuj
> > > dle
> > > libosti.
>
> > Jestli tam ma data, tak dopadne jak sedlaci u chlumce.....
> >
> > Martin Fron�k
>
> Blbost (zase), datum se nic nestane. Notabene, kdyz potrebuje zmenit
> kodovani ze spatneho na spravne.
>
> 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 ===
> ==============================================================

Probl�my s video kartou

[*] Vodnansky David <Vodnansky(zv)allianz(tec)cz> - 30.9.1998 08:26:31

Mam tutez videokartu a problemy veskere zadne. Delphi 1-3 na Win95.

-----------------------------------------------------
David Vodnansky - database analyst
<mailto: vodnansky(zv)allianz(tec)cz>
-----------------------------------------------------


> -----P�vodn� zpr�va-----
> Od: Kon��ek Michal [SMTP:m.konicek(zv)sh.cvut(tec)cz]
> Odesl�no: 27. z��� 1998 20:57
> Komu: delphi-l(zv)fwd(tec)cz; Pinknet konference Delphi
> P�edm�t: Re: Probl�my s video kartou
>
> Nechapu, ze vsechny programy, ktere pouzivaji mnohem narocnejsi funkce
> grafickych karet (hlavne 3D hry) sou v pohode, jedine Delphi se hadaji s
> kazdou druhou.
>
> Mam na mysli muj problem S S3Virge/DX 4MB, ktery nedovoli Delphi ani
> nabehnout, pokud nestahnu HW urychlovani na 1/3 vykonu.
>
> Ptam se (zase po case): existuje uz reseni, nebo ne ?
>

Prestehovani

[*] Ivana Dobnerova <dobner(zv)barbora.mff.cuni(tec)cz> - 30.9.1998 09:35:08

> Date: Tue, 29 Sep 1998 16:30:05 +0200 (MET DST)
> From: Slavek Rydval -- rk <rk(zv)atrey.karlin.mff.cuni(tec)cz>
> To: netadm(zv)kolej.mff.cuni(tec)cz
> Subject: Prestehovani

>
> Preji pekneho dne,
>
> prestehoval jsem se z pokoje s internetem na pokoj s internetem (z A1402
> na A1204). Staci jen zaplatit mesicni poplatky nebo musim jeste neco
> ucinit, aby mi internet chodil?
>
> Dekuji za odpoved
>
> Kvetoslav Rydval
Jakmile zaplatite, do dvou hodin Vam to pujde.
Zdravi Dobnerova


Probl�my s video kartou

[*] Svatopluk V�t <vit(zv)ardo(tec)cz> - 30.9.1998 09:51:26

Take ja se pripojuji, mam totez a naprosto bez problemu. Ovladace z cervna 1998.

Svatopluk Vit
East Trading Company s.r.o. Karvina (www.ardo(tec)cz)

spravce pocitacove site - network administrator
zacinajici delphista - beginner in Delphi

E-mail : vit(zv)ardo(tec)cz ; svatopluk.vit(zv)post(tec)cz
tel : +420 69 63 06 085
ICQ : 11455617

...sem si dovolil....svesticky z moji zahradky...


-----P�vodn� zpr�va-----
Od: Vodnansky David [SMTP:Vodnansky(zv)allianz(tec)cz]
Odesl�no: 30. z��� 1998 8:27
Komu: 'delphi-l(zv)fwd(tec)cz'
P�edm�t: RE: Probl�my s video kartou

Mam tutez videokartu a problemy veskere zadne. Delphi 1-3 na Win95.

-----------------------------------------------------
David Vodnansky - database analyst
<mailto: vodnansky(zv)allianz(tec)cz>
-----------------------------------------------------


> -----P�vodn� zpr�va-----
> Od: Kon��ek Michal [SMTP:m.konicek(zv)sh.cvut(tec)cz]
> Odesl�no: 27. z��� 1998 20:57
> Komu: delphi-l(zv)fwd(tec)cz; Pinknet konference Delphi
> P�edm�t: Re: Probl�my s video kartou
>
> Nechapu, ze vsechny programy, ktere pouzivaji mnohem narocnejsi funkce
> grafickych karet (hlavne 3D hry) sou v pohode, jedine Delphi se hadaji s
> kazdou druhou.
>
> Mam na mysli muj problem S S3Virge/DX 4MB, ktery nedovoli Delphi ani
> nabehnout, pokud nestahnu HW urychlovani na 1/3 vykonu.
>
> Ptam se (zase po case): existuje uz reseni, nebo ne ?
>

Langdriver u existujici tabulky

[*] rys(zv)zas-me(tec)cz - 30.9.1998 10:03:40

>> > Normalne si tu tabulku otevri v desktopu a zmen si tam jazyk v table
>> > propertis (vpravo nahore :-)) si vyber Language a modifuj a modifuj
>> > dle libosti.

Asi mam nejakou divnou verzi Database Desktopu, ale Table Properties jsem
vpravo nahore ani nikde jinde nenasel.

To kodovani jsem potreboval zmenit proto, aby se data spravne setridila.
Zobrazovani bylo v poradku. Vlastne teprve ve chvili, kdy jsem do tabulky
napsal prijmeni zacinajici pismenem C s hackem, jsem si uvedomil, ze je
nekde zrada, protoze se to zaradilo az na konec. Zmenil jsem nastaveni v BDE
a nove tabulky pak jiz tridily spravne, tech starych se to ovsem netykalo.

Nakonec jsem to vyresil tak, ze jsem pomoci Norton Utilities primo v tabulce
zmenil LangDriver. Pak byla tabulka poskozena a musel jsem ji opravit pomoci
nejake z Internetu stazene utilitky.

Mimochodem, existuje v Database Desktopu nebo Exploreru moznost opravy
poskozenych tabulek? Mozna se ptam blbe, ale jsem zacatecnik a na tohle jsem
tam nenarazil.

Karel Rys


______ _ ___
\ \/ \_ --- | Vyssi odborna skola zahradnicka
/ | | Stredni zahradnicka skola
( | | Melnik
\_ ___/ |
_/ \\ ______| www.zas-me(tec)cz
\_ / \_/ tel. 0206/623 023-5
\____/ fax 0206/623 009


Export , import do dbtable

[*] Bardon <INEQSW(zv)ova.pvtnet(tec)cz> - 30.9.1998 10:03:15


Pokud se nepletu, BDE um� textov� soubory, mus� se ale napsat soubor *.sch, kde je popis form�tu v�ty. Lze takto na��tat v�ty, kde jsou polo�ky odd�leny odd�lova�i a u soubor� s pevnou d�lkou v�ty lze nejen ��st, ale i zapisovat.

-----P�vodn� zpr�va-----
Od: Dobromil Mal� [SMTP:Dobromil.Maly(zv)rak.pr.ds.mfcr(tec)cz]
Odesl�no: 29. z��� 1998 13:00
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: RE: Export , import do dbtable

Vse zalezi na formatu toho *.txt, pokud je zde pritomen nejaky oddelovac
nebo je delka poli konstatni, pomuze Excel, ktery to dokaze prevest do dbf
a pritom i upravit kodovani (jazyka) nebo to umi i Access.

Dobra.

----------
Od: Marek Repisk�[SMTP:mrepisky zl(zv)zsnp.sk]
Odesl�no: 29. z��� 1998 13:01
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Re: Export , import do dbtable

> Tabulku databaze napr. Table1 bych chtel naplnit ze souboru xxx.txt
> a take data z Table1 imprtovat do souboru xxx.txt. Jak se to da udelat ?
> Componenta BatchMove to dela mezi tabulkami. Jak se to dela ze souborem.
> Klasicky import,export dat do tabulky databaze. Diky za radu.

Nazdar,

uz tu raz bezala na tuto temu diskusia, ale na nic sa neprislo. Asi si
budes musiet export/import dat pre Tvoju databazu urobit sam. Ak by si
chcel mozem Ti poslat, programik, ktory som si na to napisal. Nie je to
ziaden "inteligent", ale ako inspiracia mozno pomoze.

Marek Repisky
mrepisky zl(zv)zsnp.sk


Zjisteni ze mys oputila komponentu

[*] V�t�zslav Gazda������u��n�?��? - 30.9.1998 10:03:07

Musis obslouzit zpravu WM_MOUSELEAVE.

Vita


ActiveX - distribuce

[*] Ing. Jaroslav K�e�ek - 30.9.1998 10:25:59

Pouzil jsem v programu komponentu TGraph z ActiveX komponent D4-Standard a
nedari se mi to rozchodit na zakaznikove pocitaci. Vybehne chybova hlaska
"Exception EOleSysError ... T��da nen� zaregistrov�na."

Nevim, co vsechno je nutne udelat, aby to zacalo chodit. V helpu pro
pouzivany Graphics Server pisi, ze staci nainstalovat soubory GRAPH32.OCX,
GSW32.EXE, GSWDLL32.DLL do zakaznikova WINDOWS\SYSTEM adresare.
Nainstalovat ale asi neznamena nakopirovat. Krome toho je ke spusteni
serveru nutny jeste soubor GSWAG32.DLL (informace z mych pokusu). Server
jsem spustil na zakaznikove pocitaci, ale OLE nechodi.

Uz mi hori termin, prosim, poradte.

PS.: IS pouzivam take prvne, takze prosim podrobneji.

Dekuji
Jaroslav Krecek

prosba... shanim text internacionaly (fwd)

[*] Liane BBS <bbs(zv)edulib(tec)cz> - 30.9.1998 10:36:53

*** Forwarded file follows ***

Posted By: Demiurg (Demiurg) on 'CZlyrics'
Title: Re: prosba... shanim text internacionaly
Date: Wed Sep 30 09:25:07 1998

Tady je:

Jiz vzhuru psanci teto zeme,
jiz vzhuru vsichni, jez hlad zhnet.
Ted duni pravo v jicnu temne
a vybuch zahrmi naposled.

Od minulosti spejme zpatky,
otroci vzhuru k cilum svym.
Jiz chvi se sveta zaklad vratky.
My nicim nejsme, budme vsim.

Ref:
Posledni bitva vzplala,
dejme se na pochod.
Internacionala
je zitrka lidsky rod.

Delnici tez rolnici bratri,
jsme velkou stranou delnickou.
Vsem lidem zeme jenom patri
a zahaleci at jiz jdou.

Dost napasla se nasi muky
vran, supu hejna krouzici.
Rozptyli den pristi jich shluky,
vecne pla slunce zarici.

Ref:
Posledni bitva ...


Znam tyhle 2 sloky. Mozna jich existuje vic. Demiurg


Probl�my s video kartou

[*] Jan Fiala <jan.fiala(zv)iname(tec)com> - 30.9.1998 11:12:55

S ATI jsem nikdy problemy nemel. To se ovsem netyka S3 a vsech jejich klonu.
Prave se mi dostala do rukou S3 3D (4MB AGP) a pokud jsem nedal rozliseni na
TRUE COLOR, Delphi (v mem pripade 4) se vybec nerozbehly a zatuhl pocitac.

Jan Fiala

-----P�vodn� zpr�va-----
Od: Svatopluk V�t <vit(zv)ardo(tec)cz>
Komu: 'delphi-l(zv)fwd(tec)cz' <delphi-l(zv)fwd(tec)cz>
Datum: 30. z��� 1998 9:59
P�edm�t: RE: Probl�my s video kartou


Take ja se pripojuji, mam totez a naprosto bez problemu. Ovladace z cervna
1998.

Svatopluk Vit
East Trading Company s.r.o. Karvina (www.ardo(tec)cz)

spravce pocitacove site - network administrator
zacinajici delphista - beginner in Delphi

E-mail : vit(zv)ardo(tec)cz ; svatopluk.vit(zv)post(tec)cz
tel : +420 69 63 06 085
ICQ : 11455617

...sem si dovolil....svesticky z moji zahradky...


-----P�vodn� zpr�va-----
Od: Vodnansky David [SMTP:Vodnansky(zv)allianz(tec)cz]
Odesl�no: 30. z��� 1998 8:27
Komu: 'delphi-l(zv)fwd(tec)cz'
P�edm�t: RE: Probl�my s video kartou

Mam tutez videokartu a problemy veskere zadne. Delphi 1-3 na Win95.

-----------------------------------------------------
David Vodnansky - database analyst
<mailto: vodnansky(zv)allianz(tec)cz>
-----------------------------------------------------


> -----P�vodn� zpr�va-----
> Od: Kon��ek Michal [SMTP:m.konicek(zv)sh.cvut(tec)cz]
> Odesl�no: 27. z��� 1998 20:57
> Komu: delphi-l(zv)fwd(tec)cz; Pinknet konference Delphi
> P�edm�t: Re: Probl�my s video kartou
>
> Nechapu, ze vsechny programy, ktere pouzivaji mnohem narocnejsi funkce
> grafickych karet (hlavne 3D hry) sou v pohode, jedine Delphi se hadaji s
> kazdou druhou.
>
> Mam na mysli muj problem S S3Virge/DX 4MB, ktery nedovoli Delphi ani
> nabehnout, pokud nestahnu HW urychlovani na 1/3 vykonu.
>
> Ptam se (zase po case): existuje uz reseni, nebo ne ?
>

Komponenta na lepsi TDBGrid

[*] Administrator <Administrator(zv)rosoft.sk> - 30.9.1998 11:37:39

Neviete o nejakej komponente na DBGrid pre Delphi4.0, kde by si mohol
zvolit policko ComboBox
a CheckButton? (Ako sucast riadku)

Patrik Tesar


ActiveX - distribuce

[*] Petr Brant <pbrant(zv)softhome(tec)net> - 30.9.1998 11:39:44

Registrace se provadi spustenim programu regsvr32.exe s parametrem - v
tomto pripade GRAPH32.OCX.

Tedy v command line napis regsvr32 graph32.ocx. Nemusi to stacit, muze byt
nutne provest totez pro nekterou z nize uvedenych knihoven, ale snad to
nebude nutne.

Mnoho stesti

*************************************************************************
Petr Brant [pbrant(zv)softhome.net]
programator v MSVC++, obcas Delphi nebo Visual Basic
*************************************************************************
-----Puvodni zprava-----
Od: Ing. Jaroslav Koeeek
Odeslano: 30. zaoi 1998 9:26
Komu: DELPHI Distribution List
Poedmit: ActiveX - distribuce

Pouzil jsem v programu komponentu TGraph z ActiveX komponent D4-Standard a
nedari se mi to rozchodit na zakaznikove pocitaci. Vybehne chybova hlaska
"Exception EOleSysError ... Toida neni zaregistrovana."

Nevim, co vsechno je nutne udelat, aby to zacalo chodit. V helpu pro
pouzivany Graphics Server pisi, ze staci nainstalovat soubory GRAPH32.OCX,
GSW32.EXE, GSWDLL32.DLL do zakaznikova WINDOWS\SYSTEM adresare.
Nainstalovat ale asi neznamena nakopirovat. Krome toho je ke spusteni
serveru nutny jeste soubor GSWAG32.DLL (informace z mych pokusu). Server
jsem spustil na zakaznikove pocitaci, ale OLE nechodi.

Uz mi hori termin, prosim, poradte.

PS.: IS pouzivam take prvne, takze prosim podrobneji.

Dekuji
Jaroslav Krecek

Tisk predefinovanych formularu

[*] Jezek Petr, Ing. (DELVINA) <PETR(zv)sevis.sk> - 30.9.1998 11:41:33

Mam takovy dotaz.

Mam klienta, ktery ma stary program v PowerFlexu a tam pouziva specialni
druh tisku.
Ma zadefinovane formulare (s logem, sachovnicovym podkladem, ramecky...)
a ty nacpe do
tiskarny (pred vlastnim tiskem nebo pri spusteni programu) asi v PCL
formatu (pouziva
same HP LaserJet) a pri vlastnim tisku uz posila jen data. Vlastne jako
by mel v tiskarne
preddefinovanou sablonu a tak nemusi pro kazdou stranku znovu posilat
opakujici se data.

Nema nekdo s tim skusenosti nebo nevi jestli se to da i pod Delphi ?

Ing. Petr Jezek
Delvina s.r.o.
Kuzm�nyho 8
010 01 Zilina, SR
telefon: +421 89 624 344
mobil: +421 905 510 550
email: petr(zv)sevis.sk
web: www.delvina.sk


Owner draw menu ?

[*] Petr Brant <pbrant(zv)softhome(tec)net> - 30.9.1998 11:53:19

Ahoj vsem,

mam maly problem: potrebuji udelat owner draw popup menu, tj. takove, aby
misto napisu zde byly barevne prouzky, pripadne barevne kosticky s nazvy
barev. Toto menu ma slouzit pro vyber barev, protoze nechci vybirat barvy
standardnim wokennim dialogem. Nevite nekdo ?

*************************************************************************
Petr Brant [pbrant(zv)softhome.net]
programator v MSVC++, obcas Delphi nebo Visual Basic
*************************************************************************

Design Editor

[*] Michal Motalik <motalik(zv)zl.inext(tec)cz> - 30.9.1998 11:59:07


Ahoj vespolek!

Delam neco jako Run-time Design Editor a nevim si rady s jednou malou ale
dulezitou veci.

Modelova situace:
- mam objekt (je jedno jaky, ale treba TImage) polozeny na panelu
- stisknu na nem tlacitko mysi

Dotaz:
Jakym zpusobem dosahnu toho, aby udalost OnMouseDown odchitil az ten panel a
ne ten objekt co je na nem? (neco takoveho je v Delphi pri navrhu
formularu).

Kdo muze, at pomuze ...

Pavel CABAK
cabak(zv)zl.inext(tec)cz


Anchors a MDI

[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 30.9.1998 12:02:27

Ahoj vsem,

mam problem s vlastosti Anchors v D4. Mam dejme tomu formular a na nem
panel ukotveny do vsech smeru (tj. pri zmene velikosti se meni i
velikost toho panelu. Vse funguje az do okamziku, kdy je ten formular
FormStyle: fsMDIChild. Pak se prava a dolni strana natahne
'donekonecna'. Mam pocit, jako by kotva fungovala vztazne k hlavnimu
formulari (fsMDIForm). Potkal jste to nekdo - da se to nejak
odstranit???

Diky vsem

Mac

--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon: +420 603 265926 =
= http://www.amenit(tec)cz e-mail: martin.kubecka(zv)amenit(tec)cz =
==============================================================

lang. driver a Paradox

[*] tomas.mazurek(zv)vitkovice(tec)cz - 30.9.1998 12:06:57

Dobry den,

zmena lang. driveru lze pouze pri restrukturalizaci tabulky v Dat.
desktopu. Samozrejme lze pouzit i fce BDE API.

Mam sve tab. utility pro kontrolu a obnovu tabulek Paradoxu. Dema
jsou k dispozici. Pokud mas zajem napis...

S pozdravem

Tomas Mazurek


Delphi

[*] Zbyn�k Grygar <zgrygar(zv)zeal(tec)cz> - 30.9.1998 12:18:37

[P��loha v souboru: vcard.vcf]
Michal ��ek wrote:
>
> Ja mam taky Delphi 4.0 Prof. build 5.37 a to jsem je ziskal ve ctvrtek,
> minuly tyden.( diky za ne Borlande ... :-) ).
> Ale build 5.37 z nich myslim udelal az service pack. Nejsem si tim ale 100%
> jistej ....

Ne Inprise se rozhodli p�ekompilovat kompletne celou distribuci takze na
novych CD jiz je 5.37

Zbynek Grygar (zgrygar(zv)zeal(tec)cz)

Langdriver u existujici tabulky

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 30.9.1998 12:29:49

Petr Zahradnik wrote:

> > > Normalne si tu tabulku otevri v desktopu a zmen si tam jazyk v table
> > > propertis (vpravo nahore :-)) si vyber Language a modifuj a modifuj
> > > dle libosti.
>
> > Jestli tam ma data, tak dopadne jak sedlaci u chlumce.....
> >
> > Martin Fron k
>
> Blbost (zase), datum se nic nestane. Notabene, kdyz potrebuje zmenit
> kodovani ze spatneho na spravne.

No, nestane... Data zustanou zachovana, akorad pokud poridil
neco s diakritikou pod puvodnim kodovanim, potom uvidi zpravidla
rozsypany caj. Ale ten samy problem bude mit u jakekoliv
databaze. Konkretne jsem na to narazil i u MS SQL.


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


Langdriver u existujici tabulky

[*] Jaroslav N�dhera <csh(zv)czn(tec)cz> - 30.9.1998 12:37:10

>Mimochodem, existuje v Database Desktopu nebo Exploreru moznost opravy
>poskozenych tabulek? Mozna se ptam blbe, ale jsem zacatecnik a na tohle
jsem
>tam nenarazil.
>
>Karel Rys

Pokud vim, tak neexistuje a jsou to podle me priblble programy. Ovsem na
http://www.rksolution(tec)cz/RKS/Firma.htm je free program PDXRBLD, ktery umi
opravit temer vse (i porusene autoinkrementy, .VAL out of date atd.)

J. Nadhera

-----P�vodn� zpr�va-----
Od: rys(zv)zas-me(tec)cz <rys(zv)zas-me(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 30. z��� 1998 10:26
P�edm�t: Re(2x): Langdriver u existujici tabulky

Anchors a MDI

[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 30.9.1998 13:03:25

Hele Macu, musis nastavit Position u child formulare na poDefaultPosOnly
a uz to slape jak ma. A jestli budes s takovyma volovinama otravovat v
konferenci tak uvidis!!!

Mac

P.S. Hloupemu napovez, chytry na to prijde hned jak odesle pripevek ;)

Martin Kubecka wrote:
> mam problem s vlastosti Anchors v D4. Mam dejme tomu formular a na nem
> panel ukotveny do vsech smeru (tj. pri zmene velikosti se meni i
> velikost toho panelu. Vse funguje az do okamziku, kdy je ten formular
> FormStyle: fsMDIChild. Pak se prava a dolni strana natahne
> 'donekonecna'. Mam pocit, jako by kotva fungovala vztazne k hlavnimu
> formulari (fsMDIForm). Potkal jste to nekdo - da se to nejak
> odstranit???

--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon: +420 603 265926 =
= http://www.amenit(tec)cz e-mail: martin.kubecka(zv)amenit(tec)cz =
==============================================================

Owner draw menu ?

[*] Mirek �ipel <miroslav.cipel(zv)oku-tu(tec)cz> - 30.9.1998 13:45:57


zkus pouzit SetMenuItemBitmaps

M.

-----P�vodn� zpr�va-----
Od: Petr Brant <pbrant(zv)softhome.net>
Komu: 'Konference Delphi' <delphi-l(zv)fwd(tec)cz>
Datum: 30. z��� 1998 12:08
P�edm�t: Owner draw menu ?>Ahoj vsem,
>
>mam maly problem: potrebuji udelat owner draw popup menu, tj. takove, aby
>misto napisu zde byly barevne prouzky, pripadne barevne kosticky s nazvy
>barev. Toto menu ma slouzit pro vyber barev, protoze nechci vybirat barvy
>standardnim wokennim dialogem. Nevite nekdo ?
>
>*************************************************************************
>Petr Brant [pbrant(zv)softhome.net]
>programator v MSVC++, obcas Delphi nebo Visual Basic
>*************************************************************************
>
>

Zjisteni ze mys oputila komponentu

[*] Simicek Pavel <simicek(zv)uvss.fme.vutbr(tec)cz> - 30.9.1998 13:47:51

> V OnMouseMove jenom vim, ze se kurzor pohybuje na danem Controlu, ale jak se
> dozvim, ze jej mys opousti ? (neco jako v OnDRagOver - State - dsDragLeave)
>
> diky za radu
>
> Hobbys
>
>

Tady ti posilam moji starou korespondenci na podobne tema s odpovedi
Petra Vonese. Myslim ze z ni bude vse jasne.
Cau Pavel



Simicek Pavel wrote:
>
> Jeste jednou dopreho odpoledne vsem!
> Jakou udalost mam odchytavat kdyz potrebuju u PaintBoxu zjistit
> okamzik vstupu mysi do jeho oblasti a okamzik jejiho opusteni. V
> podstate by to melo jit s tim jak se meni kurzor pro danou oblast,
> ale nemuzu naji tu udalost.

Ahoj,

TPaintBox zadnou takovou udalost nema. Idealni by bylo odvodit si
novou komponentu ve ktere budes zachytvat zpravy CM_MOUSEENTER a
CM_MOUSELEAVE a k nim si vytvoris udalosti. Pokud ti jde ale jen o
jeden pripad a nechce se ti psat komoponentu tak muzes vyuzit toho ze
tyto zpravy jsou zasilany i do formulare a lParam obsahuje pointer na
danou komponentu. Tady je jednoduchy priklad:

type
TForm1 = class(TForm)
PaintBox1: TPaintBox;
procedure PaintBox1Paint(Sender: TObject);
procedure FormCreate(Sender: TObject);
private
procedure CMMouseEnter(var Msg: TMessage); message CM_MOUSEENTER;
procedure CMMouseLeave(var Msg: TMessage); message CM_MOUSELEAVE;
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.CMMouseEnter(var Msg: TMessage);
begin
inherited;
if Pointer(Msg.lParam) = PaintBox1 then
PaintBox1.Color := clRed;
end;

procedure TForm1.CMMouseLeave(var Msg: TMessage);
begin
inherited;
if Pointer(Msg.lParam) = PaintBox1 then
PaintBox1.Color := clGreen;
end;

procedure TForm1.PaintBox1Paint(Sender: TObject);
begin
with PaintBox1 do
begin
Canvas.Brush.Color := Color;
Canvas.FillRect(ClientRect);
end;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
PaintBox1.Color := clGreen;
end;

Petr Vones, amatersky programator


Langdriver u existujici tabulky

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 30.9.1998 14:05:10

Diky.....tak jsem to myslel.....


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: Zbysek Hlinka [SMTP:zhlinka(zv)login(tec)cz]
> Odesl�no: 30. z��� 1998 13:30
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: RE: Langdriver u existujici tabulky
>
> Petr Zahradnik wrote:
>
> > > > Normalne si tu tabulku otevri v desktopu a zmen si tam jazyk v
> table
> > > > propertis (vpravo nahore :-)) si vyber Language a modifuj a
> modifuj
> > > > dle libosti.
> >
> > > Jestli tam ma data, tak dopadne jak sedlaci u chlumce.....
> > >
> > > Martin Fron k
> >
> > Blbost (zase), datum se nic nestane. Notabene, kdyz potrebuje zmenit
> > kodovani ze spatneho na spravne.
>
> No, nestane... Data zustanou zachovana, akorad pokud poridil
> neco s diakritikou pod puvodnim kodovanim, potom uvidi zpravidla
> rozsypany caj. Ale ten samy problem bude mit u jakekoliv
> databaze. Konkretne jsem na to narazil i u MS SQL.
>
>
> 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


Langdriver u existujici tabulky

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 30.9.1998 14:10:22

V Database Desktopu, kdyz das Restructure, tak mas okno se seznamem
fieldu, a vpravo nahore je textovy napis Table properties a pod tim je
rozbalovaci seznam s ruznymi vlastnostmi tabulky. A jedna z nich je
Table Language. Zkus si to najit, musi to tam byt (pokud mas tabulky
Paradox)

Ale stale plati to, ze se zmeni pouze hlavicka, dat se to nedotkne a pak
bys mohl opravdu mit misto pismen "rozsypany caj"......


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: rys(zv)zas-me(tec)cz [SMTP:rys(zv)zas-me(tec)cz]
> Odesl�no: 30. z��� 1998 10:04
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re(2x): Langdriver u existujici tabulky
>
> >> > Normalne si tu tabulku otevri v desktopu a zmen si tam jazyk v
> table
> >> > propertis (vpravo nahore :-)) si vyber Language a modifuj a
> modifuj
> >> > dle libosti.
>
> Asi mam nejakou divnou verzi Database Desktopu, ale Table Properties
> jsem
> vpravo nahore ani nikde jinde nenasel.
>
> To kodovani jsem potreboval zmenit proto, aby se data spravne
> setridila.
> Zobrazovani bylo v poradku. Vlastne teprve ve chvili, kdy jsem do
> tabulky
> napsal prijmeni zacinajici pismenem C s hackem, jsem si uvedomil, ze
> je
> nekde zrada, protoze se to zaradilo az na konec. Zmenil jsem nastaveni
> v BDE
> a nove tabulky pak jiz tridily spravne, tech starych se to ovsem
> netykalo.
>
> Nakonec jsem to vyresil tak, ze jsem pomoci Norton Utilities primo v
> tabulce
> zmenil LangDriver. Pak byla tabulka poskozena a musel jsem ji opravit
> pomoci
> nejake z Internetu stazene utilitky.
>
> Mimochodem, existuje v Database Desktopu nebo Exploreru moznost opravy
>
> poskozenych tabulek? Mozna se ptam blbe, ale jsem zacatecnik a na
> tohle jsem
> tam nenarazil.
>
> Karel Rys
>
>
> ______ _ ___
> \ \/ \_ --- | Vyssi odborna skola zahradnicka
> / | | Stredni zahradnicka skola
> ( | | Melnik
> \_ ___/ |
> _/ \\ ______| www.zas-me(tec)cz
> \_ / \_/ tel. 0206/623 023-5
> \____/ fax 0206/623 009


Spousteni aplikaci z D

[*] Tomas Malek <tomas(zv)columbus(tec)cz> - 30.9.1998 14:26:11

Ahoj Delphini,

mam nekolik zacatecnickych otazek.

Jedna otazecka : Potrebuju po spusteni Delphi aplikace zobrazit obrazek
jako poklad a presto potom uvodni menu. Potrebuju poradit jak udelat ten

podklad korektne a aby s tim nebyly problemy.

Druha a posledni otazecka : Potrebuju spustet z me aplikace aplikace
jine (s tim, ze u jedne potrebuju spustit slidy z PowerPointu). Po
skonceni aplikace se musi vse korektne ukoncit a opet skocit do me
aplikace. Mohl by mi nekdo napsat i presnou syntaxi spousteni programu z

Delphi a vse co s tim souvisi.

Ja moc moc dekuji...

Odepiste treba primo me, at timto nezatezujete konferenci.

Diky Tomas.

Komponenta na lepsi TDBGrid

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 30.9.1998 14:34:18

Nedavne jsem to tady psal:

podivej se do odkazu na http://www.delphi(tec)cz tam jsem ja pridaval odkaz
na Une Page Delphi2+, tam je takovych veci celkem dost.....


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: Administrator [SMTP:Administrator(zv)rosoft.sk]
> Odesl�no: 30. z��� 1998 11:38
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: Komponenta na lepsi TDBGrid
>
> Neviete o nejakej komponente na DBGrid pre Delphi4.0, kde by si mohol
> zvolit policko ComboBox
> a CheckButton? (Ako sucast riadku)
>
> Patrik Tesar


Problem barevneho kurzoru

[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 30.9.1998 14:36:31

Dobry den. Prosim o radu. Potreboval jsem v Delphi 1 zmenit kurzor mysi. Mam
udelany barevny (16 barev paleta), ktery se mi po natazeni stal cernobilym.
Pouzivam volani:

Const crTercik=1;
..
Screen.Cursors[crTercik]:=LoadCursor(HInstance,pChar('TERCIK'));
..
Screen.Cursor:=crTercik;

S timto souvisi moje otazky:
1/ proc se mi barevny kurzor stane cernobylym
2/ jak se tento kurzor uvolni (nikde jsem to nenasel, v prikladech ho
neuvolnuji)
3/ jak pouzit animovany kurzor *.ANI nebo jak ho natahnout (rozlozit ho na
frame?)
4/ lze nahradit standardni kurzor jinym (nema to vliv na zdroje...?)

Dekuji za kazdou radu
J. Benes


Langdriver u existujici tabulky

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


Pan Zahradnik ma pravdu, o nic neprijdes !

----------
Od: Martin Fron�k[SMTP:FRONEK(zv)ZZNSLANY.CZ]
Odesl�no: 30. z��� 1998 9:05
Komu: 'delphi-l(zv)fwd(tec)cz'
P�edm�t: RE: Langdriver u existujici tabulky

Predpokladej prosim, ze v te tabulce data jsou, a pokud byla zalozena
napr. s LD 852 a byla do ni porizena data, a nasledne se zjistilo, ze
(treba kvuli jine aplikaci - ne BDE) je treba LD 867, pak to bude presne
tak, jak rikam. Myslim, ze tomu tak je. Ale Pan Zahradnik si to jiste
byl mezitim okouknou primo na miste :-)


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: Petr Zahradnik [SMTP:clexpert(zv)clexpert(tec)cz]
> Odesl�no: 29. z��� 1998 21:08
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: RE: Langdriver u existujici tabulky
>
> > > Normalne si tu tabulku otevri v desktopu a zmen si tam jazyk v
> table
> > > propertis (vpravo nahore :-)) si vyber Language a modifuj a
> modifuj
> > > dle
> > > libosti.
>
> > Jestli tam ma data, tak dopadne jak sedlaci u chlumce.....
> >
> > Martin Fron�k
>
> Blbost (zase), datum se nic nestane. Notabene, kdyz potrebuje zmenit
> kodovani ze spatneho na spravne.
>
> 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 ===
> ==============================================================

Indexi v FOXPRO pouzivane DELPHI.

[*] SunSoft - Mr�z �ubom�r <sunsoft(zv)sunsoft.sk> - 30.9.1998 15:22:12

Delphi 4 rozozna databazy z FOXPRO 2.5. Ale ak su k danej tabulke indexove subory, ktore obsahuju indexi
zlozene z fox funkci vtedy ich D4 ignoruje ale zobrazi data z tabulky ak tabulka obsahuje zlozene indexi a aj funkcie
vtedy D4 odmietne vobec zobrazit data z danej tabulky.
Je mozne tieto tabulky vobec nejako otvorit v D4 bez toho aby som musel premenovavat spominane indexove subory.

Potrebujem taketo tabulky nasledne reindexovat. Nechcem sa vzdavat fox funkcii pouzivanych v tychto indexoch.
Vie mi niekto poradit.

S pozdravom Lubo TSC.

Rezani memo poli u SQL serveru

[*] Libor Klicnik <libor_klicnik(zv)aisoft(tec)cz> - 30.9.1998 15:52:08

Jako nove prichozi zdravim vsechny na konferenci,

Setkal se nekdo z vas s podobnym problemem?
Jak ste ho vyresili?

Problem : pri nacitani memo pole vetsiho nez 8192 byte
dojde ke zkraceni o 7990 byte (presneji ve Windows NT 4.0
zkraceni o 7990 byte, ve Windows 95 zkraceni o 7973 byte).
Chyba je patrna jak v Delphi tak DBExploreru. Na datech
je vsak memo kompletni. (Da se to overit v ISQL zadanim:
'select length(memopole) from tabulka'.)

Pouzivaji se objekty TTable a TMemoField.

Konfigurace : Delphi 3.0 (chyba je i u Delphi 2.01), BDE verze 4.51,
server Sybase SQL Anywhere 5.5.03 pres ODBC.

Zatim jsme to obesli nacitanim 8k bloku a jejich spojenim. :-(

Za kazdou informaci dik.

Libor Klicnik
AISoft s.r.o.
libor_klicnik(zv)aisoft(tec)cz

Problemy s video kartou

[*] rys(zv)zas-me(tec)cz - 30.9.1998 16:21:58

>S ATI jsem nikdy problemy nemel. To se ovsem netyka S3 a vsech jejich
>klonu.

Mam podobne zkusenosti - karty S3 nam delaji problemy s DOSovskymi
aplikacemi, ktere pouziji nejaky lepsi (VESA) graficky rezim. Vetsinou to
skonci zatuhnutim Windows. Dle me zkusenosti takhle janci jen nektere
modely. Take da dost prace nastavit vse tak, aby karty S3 (zrejme vsechny)
pouzivaly nejakou rozumnou obnovovaci frekvenci v DOSu i ve Windows.

Karel Rys


Miesanie WAV

[*] Martin Tichacek <martin_t(zv)mrp(tec)cz> - 30.9.1998 16:31:02

Zase ja .... a zase nepomuzu....
ptam se radeji predem : O co Ti jde - potrebujes vyrobit wav slozeny z nejakych
dvou (a ulozit jako jeden veliky wavec) , nebo potrebujes jenom nacpat do
zvukovky neco signalu z vice zdroju. (treba "hudebni" doprovod)?

Mti.


-----P�vodn� zpr�va-----

>Caute
>Zase otravujem s miesanim zvukov. Nasiel som si na internetu jak mi bolo
>doporucene DIRECTX, ale aj tak neviem ako mam zmiesat tie dva rozne zvuky.
>Pomozte mi niekto ako na to.
> Dik


Alt-TAB, Ctrl-Esc, Win-keys

[*] Martin Tichacek <martin_t(zv)mrp(tec)cz> - 30.9.1998 16:34:14

To pitome tlacitko (ktere jakoby zmackne menu start) - je kombinace Ctrl+ESC -
melo by to jit upravit (kdyz kliknes na tu ikonu pravym >vlastnosti > ruzne - tu
se daji zakazat "skoro" vsechny mokre klavesy windows)

Pomuze?

Mti.

-----P�vodn� zpr�va-----
>Podobny problem, i kdyz se to netyka primo Delphi:
>Nevite nekdo, jak se da vyradit z cinnosti Win-klavesa v DOSovskem okne? Mam
>aplikace, ktere bezi v DOSu v lepsim grafickem rezimu, a pokud uzivatel
>stiskne Win-klavesu, dostane se sice do Windows, ale pri pokusu o obnoveni
>aplikace z hlavniho panelu Windows sdeli, ze aplikaci obnovit nelze. A
>sbohem, data...
>
>Zkousel jsem odchytit preruseni klavesnice, lec nefunguje to - Windows to
>stihnou driv. Nevite nekdo, jak se te klavesy zbavit bez zasahu do hardware?
>
>Diky, Karel Rys
>
>>1) SPI_SCREENSAVERRUNNING ... Windows 95 only: Used internally;
>applications
>>should not use this flag.
>>2)SPI_SETFASTTASKSWITCH ... This flag is obsolete. Previous versions of
>>Windows use this flag to enable or disable ALT+TAB fast task switching.
>>Beginning with Windows 95 and Windows NT version 4.0, fast task switching
>is
>>always enabled.

Dlzka WAV

[*] Ing. J�n Kuch�r�����!j��G - 30.9.1998 17:15:48

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

Caute

Mozete mi niekdo povedat ako zistim dlzku WAV suboru v sekundach ( dobu prehravania )
Dik

Ing. J�n Kuch�r
Katedra inv�ci� a rein�inieringu
SjF TU Ko�ice
Letn� 9
040 01 Ko�ice
E-mail : kuchar(zv)tuke.sk

Indexi v FOXPRO pouzivane DELPHI.

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.9.1998 19:02:37

SunSoft - Mr�z �ubom�r wrote:
>
> Delphi 4 rozozna databazy z FOXPRO 2.5. Ale ak su k danej tabulke indexove subory, ktore obsahuju indexi
> zlozene z fox funkci vtedy ich D4 ignoruje ale zobrazi data z tabulky ak tabulka obsahuje zlozene indexi a aj funkcie
> vtedy D4 odmietne vobec zobrazit data z danej tabulky.

Ahoj,

a ohlasi to v tom druhem pripade nejakou chybu ? Pokud ano, tak muze byt problem
v tom ze driver nepodporuje vsechny funkce ktere mohou byt v indexech, neco malo
o tom je tady, treba ti to pomuze:

http://www.inprise.com/devsupport/bde/qanda/1853.html

--
Petr Vones, amatersky programator

Probl�my s video kartou

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.9.1998 19:04:25

Svatopluk V�t wrote:
>
> Take ja se pripojuji, mam totez a naprosto bez problemu. Ovladace z cervna 1998.

> > -----P�vodn� zpr�va-----
> > Od: Kon��ek Michal [SMTP:m.konicek(zv)sh.cvut(tec)cz]
> > Odesl�no: 27. z��� 1998 20:57
> > Komu: delphi-l(zv)fwd(tec)cz; Pinknet konference Delphi
> > P�edm�t: Re: Probl�my s video kartou
> >
> > Nechapu, ze vsechny programy, ktere pouzivaji mnohem narocnejsi funkce
> > grafickych karet (hlavne 3D hry) sou v pohode, jedine Delphi se hadaji s
> > kazdou druhou.
> >
> > Mam na mysli muj problem S S3Virge/DX 4MB, ktery nedovoli Delphi ani
> > nabehnout, pokud nestahnu HW urychlovani na 1/3 vykonu.

Ahoj,

pripojim se take k teto debate, mam kartu S3Trio64V2, konkrente s Delphi 2 a 4
jsem nikdy zadne problemy nemel a to ani pri ruznych rozlisenich. Moje zkusenost
je takova ze, nikdy nepouzivat genericke drivery ktere jsou ve Windows (chodi to
opravdu hrozne) a drivery dodavane s kartou take nebyvaji nejnovejsi. Je dobre
se cas od casu podivat na stranky S3 jestli tam neni nejaky novejsi a aktualizovat
jej. Obcas mivaji opravdu zaludne chyby (nevykreslovani urcitych objektu pri jednom
rozliseni apod.), refresh se da dobre nastavit v zalozce S3 Refresh ktery je
soucasti driveru, misto volby Optimal byva spolehlivejsi nastavit frekvenci rucne,
85 Hz pri 800x600 chodi bez problemu.

Vzhledem k tomu ze se debata vetsinou tyka S3 Virge by mozna nebylo spatne napsat
presne s kterou verzi driveru to funguje aby nevznikaly neustale zmatky .... :-)

--
Petr Vones, amatersky programator

Alt-TAB, Ctrl-Esc, Win-keys

[*] Ing. Jaroslav K�e�ek - 30.9.1998 19:09:10

Nevite, jak zablokovat v D4 tyto kombinace klaves tak, aby se uzivatel
nemohl prepnout nikam jinam z formulare? Zapnuti Form.KeyPreview nepomaha.

Jaky je sled techto udalosti ve Win95? Dostane se to vubec k aktivni
aplikaci? Zrejme ano prostrednictvim TAplication.OnDeactivate, ale da se
zprava v tomto miste zastavit a neposlat dal?

Jaroslav Krecek

PS.: Hodilo by se i Ctrl-Alt-Del, ale nedelam si prilis velke iluze.

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Ing. Jaroslav K�e�ek
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
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Jpeg

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.9.1998 19:24:21

Vladislav �adsk� wrote:
>
> Mam nasledujici problem:
> Mam tabulku, v ni pole Tblobfield s bmp.
> Pridelal jsem do aplikace moznost ukladani take jpg, tedy mam v tabulce ve stejnem fieldu
> jak bmp tak jpg a nevim jak rozeznavat jde-li o bmp nebo jpg. Mohl bych to rozdelit do dvou poli,
> ale jde o jednoduchy update u vice jak 200 uzivatelu a proto nechci mnenit strukturu jejich tabulky.

Ahoj,

Podivej se na strukturu formatu BMP, popis formatu najdes zde (http://www.wotsit.org),
potom si vytvor nejakou vlastni hlavicku podle ktere poznas ze se nejedna o bitmapu ale
o tvoji novou verzi dat. Do te hlavicky si uloz vsechny potrebne informace (pokud mozno
tak aby byla mozna i nejaka dalsi uprava) a za ni pak vlastni data. Pri cteni pak budes
kontrolovat onu hlavicku, pokud ji nenajdes jedna se o puvodni format BMP dat ....

> Dale by me zajimalo jestli neexistuje nekde free komponenta na zmenu velikosti (byte) obrazku.
> Ale to chci asi moc.

Uprime receno jsem to nepochopil .....


--
Petr Vones, amatersky programator

Owner draw menu ?

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.9.1998 19:44:54

Petr Brant wrote:
>
> Ahoj vsem,
>
> mam maly problem: potrebuji udelat owner draw popup menu, tj. takove, aby
> misto napisu zde byly barevne prouzky, pripadne barevne kosticky s nazvy
> barev. Toto menu ma slouzit pro vyber barev, protoze nechci vybirat barvy
> standardnim wokennim dialogem. Nevite nekdo ?

Ahoj,

nepises v jake verzi Delphi to chces, treba v D4 mas u menu vlastnost OwnerDraw.

--
Petr Vones, amatersky programator

ActiveX (Was: Vlastnosti komponent za behu)

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.9.1998 19:53:25

Zbysek Hlinka wrote:
>
> Petr Vones wrote:
>
> > > > A podivejme, ze by prisny pan ucitel ? :-)
> > >
> > > Jasne. A kdo nebude chapat, toho zmlatim rakoskou. :-)
> >
> > A sakra, tak to abych se tomu na hony vyhybal :-)
>
> Leda ze bys byl silnejsi nez ja. :-) No, ale stejne nevim, co ty bys
> tam pohledaval. Nemam rad stouraly... :-)

To asi ne, jsem spise z rodu skritkovitych :-) Ale treba bych se tam necemu
priucil, navic ja .... a stoural ? :-)

> To jedine. Ale pred pouzitim OCX v Delphi durazne varuji. Pokud to
> chces pouzit takhle, a mas to v Delphi dobre pripravene, pak je to
> vyklad tak na 10-15 minut i s ukazkou, dele nema smysl se tim
> zabyvat. Pokud myslis ze ano, zkus mi to vyvratit.

Uprime receno, zatim jsem se tim prilis nezabyval, takze k tomu nemuzu moc
rict. Nicmene dnesni technologie me prijdou jiz natolik komplikovane ze se
o nich da mluvit cele hodiny a i presto se asi nedostane na vsechny detaily
ci problemy .....
--
Petr Vones, amatersky programator

Alt-TAB, Ctrl-Esc, Win-keys

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 30.9.1998 20:04:53

Ing. Jaroslav K�e�ek wrote:
>
> Nevite, jak zablokovat v D4 tyto kombinace klaves tak, aby se uzivatel
> nemohl prepnout nikam jinam z formulare? Zapnuti Form.KeyPreview nepomaha.
>
> Jaky je sled techto udalosti ve Win95? Dostane se to vubec k aktivni
> aplikaci? Zrejme ano prostrednictvim TAplication.OnDeactivate, ale da se
> zprava v tomto miste zastavit a neposlat dal?
>
> Jaroslav Krecek
>
> PS.: Hodilo by se i Ctrl-Alt-Del, ale nedelam si prilis velke iluze.

Ahoj,

jde to takhle, akorat nevim jestli to bude funguvat i v NT:

procedure EnableSysKeys(Enable: Boolean);
var
Param: DWORD;
begin
Param := 0;
SystemParametersInfo(SPI_SETFASTTASKSWITCH, UINT(not Enable), (zv)Param, 0);
// ALT+TAB, CTRL+ESC
SystemParametersInfo(SPI_SCREENSAVERRUNNING, UINT(not Enable), (zv)Param, 0);
// CTRL+ALT+DEL
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
EnableSysKeys(False);
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
EnableSysKeys(True);
end;

--
Petr Vones, amatersky programator


Problem barevneho kurzoru

[*] Ji�� Heinisch - 30.9.1998 20:24:10

ahoj

k bodu 3

procedure TForm1.FormCreate(Sender: TObject);
const
crMyCursor = 5;
Var
hodnota:HCURSOR;
FileCursor:String;
begin

FileCursor:=+'C:\AnimCursory\Drag.Ani';
Hodnota:=LoadCursorFromFile(Pchar(FileCursor));

if hodnota<>0 then
begin
Screen.Cursors[crMyCursor]:= LoadCursorFromFile(Pchar(FileCursor));
DbGridDEIS1.DragCursor:=crMycursor;
end;
end;
ahoj HeiJu



-----P�vodn� zpr�va-----
Od: Bene� Jaroslav <JBenes(zv)cpoj(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 30. z��� 1998 15:36
P�edm�t: Problem barevneho kurzoru


>Dobry den. Prosim o radu. Potreboval jsem v Delphi 1 zmenit kurzor mysi.
Mam
>udelany barevny (16 barev paleta), ktery se mi po natazeni stal cernobilym.
>Pouzivam volani:
>
>Const crTercik=1;
>.
>Screen.Cursors[crTercik]:=LoadCursor(HInstance,pChar('TERCIK'));
>.
>Screen.Cursor:=crTercik;
>
>S timto souvisi moje otazky:
>1/ proc se mi barevny kurzor stane cernobylym
>2/ jak se tento kurzor uvolni (nikde jsem to nenasel, v prikladech ho
>neuvolnuji)
>3/ jak pouzit animovany kurzor *.ANI nebo jak ho natahnout (rozlozit ho na
>frame?)
>4/ lze nahradit standardni kurzor jinym (nema to vliv na zdroje...?)
>
>Dekuji za kazdou radu
>J. Benes
>

Lokalizace InstallShield pro Delphi 4

[*] Jaro <jaro(zv)sinea(tec)cz> - 30.9.1998 20:52:39

Protoze se mnozi dotazy, jak je to s lokalizaci IS pro D4,
rad bych poskytl informaci i touto cestou.
Lokalizace urcena pro IS D3 je beze zeny pouzitelna i pro IS D4.
Pokud ma nekdo zajem o podrobneji informace ohledne lokalizace
IS, kontaktujte me na jaro(zv)sinea(tec)cz
Jaro

Off-Top ... Monitor

[*] Jaro <jaro(zv)sinea(tec)cz> - 30.9.1998 20:53:21

Programovani v Delphi na 14" monitoru povazuji za zoufalstvi.
Ja jsem koupil 17" hned od zacatku (uz je tomu par roku)
A ze to bylo tenkrat hodne penez. Oci mam ale jen jedny
na celej zivot. Krome toho delat na 14" monitoru zabere hodne casu
a je to asi pekna otrava a take nemala financni ztrata.
Dnes se da poridit slusnej 17" monitor v cene tak od
10.000 bez DPH a slusnej 15" uz od 8.000,- (videl jsem i za 5.000,
ale byl slabsi). Na tom 15" jde alespon 800x600. Ostatni je zoufalstvi.

Nyni uz jsem uvazoval o 19" monitoru, ale z prichodem Win98
si zakoupim druhej 15" monitor. Tim naroste plocha mnohem vice za
podstatne mene penez. Kdo to jednou vyzkousi, tak uz se pri progamovani
bez dvou monitoru neobejde. Na jednom monitoru mas formulare a na druhem
zdrojak a treba Object Inspector a dalsi. Zadne silene prepinani mezi
hromadou oken. To je potom parada. Krome toho D4 prinasi
moznost vytvaret programy pro vice monitoru. Je mozne definovat monitor
pro zobrazeni okna.
Vim, ze vetsina programatoru je v zamestnaneckem pomeru a znam jak
se tvari rada sefu na pozadavky svych programatoru.
Ale neni to utopie. staci myslet ekonomicky.
Spocitejte si, ze treba denne udelas o 1 hod. vic prace.
dejme tomu 200 hod. za rok. Kdybych pocital minimalni naklady na prumerneho
programatora 150 Kc/hod (to je bez zapocitani rezie podniku) - nizsi castku
povazuji za vykoristovani - dostanu 30.000,- Kc
To jsou dva dobre monitory 17". Jsou to jednoduche pocty.
Problem je asi v tom, ze u nas malokdo mysli ekonomicky, natoz aby dbal
o zdravi svych zmestnancu.
Jaro.
---------------------------------------------------------------------
-----Puvodni zprava-----
Od: Pavel Malinsky <spiderland(zv)usa.net>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 25. zari 1998 22:59
Predmet: Re: Off-Top ... Monitor


> nedelej chute okoli, nebo ta 14" co mam
>na stole pude taky z wokna :-)
>
>-----Puvodni zprava-----
>Od: Stepan Cerny <chaosz(zv)geocities.com>
>Komu: Delphi konference <delphi-l(zv)fwd(tec)cz>
>Datum: 25. zari 1998 12:17
>Predmet: Off-Top ... Monitor
>
>
>>Panove, prave jsem (se nevratil z hradu, ale) si koupil 17" monitor ...
>>a musim rict ze v 1024x768 se teda programuje :-))), ale hlavne ladi ...
>>jak vino !!!!
>>
>>Vrele doporucuji !!!
>>
>>PS: Ve ScoSu za 7.100,- bez DPH ... Mnam ;-) (www.scos(tec)cz)
>>
>>--
>>Stepan "Chaosz" Cerny
>> tvoric of software
>>chaosz(zv)geocities.com
>>
>

Icona v DBGRID

[*] Jaro <jaro(zv)sinea(tec)cz> - 30.9.1998 20:55:27

Omlouvam se za opozdeny prispevek. Nejakou dobu mi nesla konference.
--

Neni to tak slozite. Muzez to udelat do normalniho TDBGrid.
Lze to i podminene. Mejme napr. dataset Query1, kde polozka
Tisk obsahuje hodnotu 'T' pro radky, ktere chceme vytisknout.
Tyto radky oznacime tak, ze v prvni colums mrizky TDBGrid1
vykresli obrazek tiskarny.
1.
Nekam na formular umisti Image1 a do nej vloz maly obrazek tiskarny.
2.
Napis obsluhu udalosti OnDrawColumnCell

procedure TForm1.DbGrid1DrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumn;
State: TGridDrawState);
begin
(* vykresli tiskarnu do prvniho sloupce *)
if Query1Tisk.AsString = 'T' then
TDBGrid(Sender).Canvas.Draw(13,Rect.Top +
Trunc((Rect.Bottom - Rect.Top - Image1.Height)/2),
Image1.Picture.Bitmap);
end;

Mnoho stesti
Jaro
>>-------------------------------------------------
>>
>>-----P�vodn� zpr�va-----
>>Od: Jan Nov�k <csobta(zv)mbox.vol(tec)cz>
>>Komu: Delphi <delphi(zv)pinknet(tec)cz>
>>Datum: 25. z��� 1998 14:29
>>P�edm�t: Icona v DBGRID
>>
>>
>>>Ahoj vespolek.
>>>Nemate nekdo komponentu DBGRID , ktera by umoznovala
>>>zobrazit iconu v prvni colums mrizky (neco jako napr.
>>>Dbgrid1.Columns[0].Icon:=....) . Nebo jestli se to neda nejak jednoduse
>>>udelat .
>>>Diky za pripadnou pomoc.
>>>
>>
>>
>

Alt-TAB, Ctrl-Esc, Win-keys

[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 30.9.1998 20:58:19

No osetrit takhle aplikaci neumim, ale vypada to, jako by si chtel
udelat z pocitace terminal s jednim programem. Pokud je tomu tak, tak
zkus ZAK (Zero Administration Kit) od MS, ten to umi (teda doufam :-).
Je to free na MS webu.

Mac

Ing. Jaroslav K�e�ek wrote:
>
> Nevite, jak zablokovat v D4 tyto kombinace klaves tak, aby se uzivatel
> nemohl prepnout nikam jinam z formulare? Zapnuti Form.KeyPreview nepomaha.
>
> Jaky je sled techto udalosti ve Win95? Dostane se to vubec k aktivni
> aplikaci? Zrejme ano prostrednictvim TAplication.OnDeactivate, ale da se
> zprava v tomto miste zastavit a neposlat dal?
>
> Jaroslav Krecek
>
> PS.: Hodilo by se i Ctrl-Alt-Del, ale nedelam si prilis velke iluze.

--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon: +420 603 265926 =
= http://www.amenit(tec)cz e-mail: martin.kubecka(zv)amenit(tec)cz =
==============================================================

Off-Top ... Monitor

[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 30.9.1998 21:10:15

Jak vas tak posloucham, tak si asi prejdu z NT na W98 a prikoupim si
jeste jednu 21" :-). Mimochodem, budete-li si nekdy kupovat velky
monitor (myslim 21" a vice), tak rozhodne nesetrete a nekupujte
nejlevnejsi plecku. Ja to udelal, ale nastesti ten monitor mel i
hardwarove problemy, tak jsem ho za 'drobny' doplatek cca 14.000
upgradnul a ted si labuzim v 1200 x 1024 na 100 Hz. Cim vyssi frekvence
u velkych monitoru - tim lepe (napr. na 75 Hz se na 21" neda divat -
prekousnete si za chvili jazyk jak se vam klepe hlava :-). Zkousel jsem
i 1600 x 1200, ale to uz by chtelo tak 24", cely den se na tom delat
neda ... teda pokud nemate plechovou hlavu a sklenene oci.

Mac

Jaro wrote:

> A ze to bylo tenkrat hodne penez. Oci mam ale jen jedny
> na celej zivot. Krome toho delat na 14" monitoru zabere hodne casu
> a je to asi pekna otrava a take nemala financni ztrata.

--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon: +420 603 265926 =
= http://www.amenit(tec)cz e-mail: martin.kubecka(zv)amenit(tec)cz =
==============================================================

Alt-TAB, Ctrl-Esc, Win-keys

[*] Ing. Jaroslav K�e�ek - 30.9.1998 21:45:33

Zachytit message se mi povedlo obsluhou Application.OnMessage, ale nastaveni
Handled na true nezabranilo prepnuti. Jak jinak tedy na to? Co je to za
zpravu cislo 45057?

procedure TForm1.AppMessage(var Msg: TMsg; var Handled: Boolean);
begin
if Msg.message = 45057 then begin
Memo1.Lines.Add(TimeToStr(time) + ' --- ' +IntToStr(Msg.message));
Handled := True;
end;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
Application.OnMessage := AppMessage;
end;


-----P�vodn� zpr�va----- Od: Ing. Jaroslav K�e�ek <grafex(zv)iol(tec)cz>

Nevite, jak zablokovat v D4 tyto kombinace klaves tak, aby se uzivatel
nemohl prepnout nikam jinam z formulare? Zapnuti Form.KeyPreview nepomaha.

Jaky je sled techto udalosti ve Win95? Dostane se to vubec k aktivni
aplikaci? Zrejme ano prostrednictvim TAplication.OnDeactivate, ale da se
zprava v tomto miste zastavit a neposlat dal?

Jaroslav Krecek

PS.: Hodilo by se i Ctrl-Alt-Del, ale nedelam si prilis velke iluze.

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Ing. Jaroslav K�e�ek
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
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Graficke karty

[*] Jan Fiala <jan.fiala(zv)iname(tec)com> - 1.10.1998 06:38:43

Omlouvam se, ze se tu keca porad o grafickych kartach, ale prave jsem si
stahl nejnovejsi ovladace na S3 3D a Delphi 4 kupodivu najednou jede i v
high color (uz nemusi byt nastaveno true color, aby se rozbehlo). Tyka se to
prostredi W98. Na NT 4 to bylo bez problemu.
Vypada to, ze problemy jsou nejspis v S3 a ne u Borlandu, jak nekteri zli
jazykove tvrdi.

Jan Fiala

Owner draw menu ?

[*] Petr Brant <pbrant(zv)softhome(tec)net> - 1.10.1998 07:25:48

Bohuzel je to v D3, protoze D4 nemam a ani mit nebudu. Ted nevim, jestli
mam napsat :-) nebo :-(, kdyz si ctu o tech chybach, ktere v D4 jsou.

*************************************************************************
Petr Brant [pbrant(zv)softhome.net]
programator v MSVC++, obcas Delphi nebo Visual Basic
*************************************************************************


-----Puvodni zprava-----
Od: Petr Vones
Odeslano: 30. zaoi 1998 18:45
Komu: delphi-l(zv)fwd(tec)cz
Poedmit: Re: Owner draw menu ?

Petr Brant wrote:
>
> Ahoj vsem,
>
> mam maly problem: potrebuji udelat owner draw popup menu, tj. takove, aby
> misto napisu zde byly barevne prouzky, pripadne barevne kosticky s nazvy
> barev. Toto menu ma slouzit pro vyber barev, protoze nechci vybirat barvy
> standardnim wokennim dialogem. Nevite nekdo ?

Ahoj,

nepises v jake verzi Delphi to chces, treba v D4 mas u menu vlastnost
OwnerDraw.

--
Petr Vones, amatersky programator

Langdriver u existujici tabulky

[*] Martin Fron�k <FRONEK(zv)ZZNSLANY.CZ> - 1.10.1998 07:59:47

Tak si to zkus, a uvidis....o data samozrejme neprijdes, ale pouzit se
to neda. Opravdu MUSIS data PRESYPAT do JINE TABULKY, ktera ma jiz
spravne nastaveny LD.


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: dodo(zv)rak.pr.ds.mfcr(tec)cz [SMTP:dodo(zv)rak.pr.ds.mfcr(tec)cz] za
> u�ivatele Dobromil Mal�
> Odesl�no: 30. z��� 1998 15:21
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: RE: Langdriver u existujici tabulky
>
> Pan Zahradnik ma pravdu, o nic neprijdes !
>
> ----------
> Od: Martin Fron�k[SMTP:FRONEK(zv)ZZNSLANY.CZ]
> Odesl�no: 30. z��� 1998 9:05
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: RE: Langdriver u existujici tabulky
>
> Predpokladej prosim, ze v te tabulce data jsou, a pokud byla zalozena
> napr. s LD 852 a byla do ni porizena data, a nasledne se zjistilo, ze
> (treba kvuli jine aplikaci - ne BDE) je treba LD 867, pak to bude
> presne
> tak, jak rikam. Myslim, ze tomu tak je. Ale Pan Zahradnik si to jiste
> byl mezitim okouknou primo na miste :-)
>
>
> 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: Petr Zahradnik [SMTP:clexpert(zv)clexpert(tec)cz]
> > Odesl�no: 29. z��� 1998 21:08
> > Komu: delphi-l(zv)fwd(tec)cz
> > P�edm�t: RE: Langdriver u existujici tabulky
> >
> > > > Normalne si tu tabulku otevri v desktopu a zmen si tam jazyk v
> > table
> > > > propertis (vpravo nahore :-)) si vyber Language a modifuj a
> > modifuj
> > > > dle
> > > > libosti.
> >
> > > Jestli tam ma data, tak dopadne jak sedlaci u chlumce.....
> > >
> > > Martin Fron�k
> >
> > Blbost (zase), datum se nic nestane. Notabene, kdyz potrebuje zmenit
> > kodovani ze spatneho na spravne.
> >
> > 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 ===
> > ==============================================================
>
>

Problem barevneho kurzoru

[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 1.10.1998 08:23:36

Ahoj a diky. Funkci LoadCursorFromFile() v Delphi 1 nemohu pouzit (musel
bych si asi udelat external napojeni do DLL). Barevny kurzor ja stale
cernobily. Je treba jeste nekde neco nastavit?
Jaro Benes

> -----P�vodn� zpr�va-----
> Od: Ji�� Heinisch [SMTP:heinisch(zv)post(tec)cz]
> Odesl�no: 30. z��� 1998 19:24
> Komu: Konference Delphi
> P�edm�t: Re: Problem barevneho kurzoru
>
> ahoj
>
> k bodu 3
>
> procedure TForm1.FormCreate(Sender: TObject);
> const
> crMyCursor = 5;
> Var
> hodnota:HCURSOR;
> FileCursor:String;
> begin
>
> FileCursor:=+'C:\AnimCursory\Drag.Ani';
> Hodnota:=LoadCursorFromFile(Pchar(FileCursor));
>
> if hodnota<>0 then
> begin
> Screen.Cursors[crMyCursor]:= LoadCursorFromFile(Pchar(FileCursor));
> DbGridDEIS1.DragCursor:=crMycursor;
> end;
> end;
>
>
>
> ahoj HeiJu
>
>
>
> -----P�vodn� zpr�va-----
> Od: Bene� Jaroslav <JBenes(zv)cpoj(tec)cz>
> Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
> Datum: 30. z��� 1998 15:36
> P�edm�t: Problem barevneho kurzoru
>
>
> >Dobry den. Prosim o radu. Potreboval jsem v Delphi 1 zmenit kurzor mysi.
> Mam
> >udelany barevny (16 barev paleta), ktery se mi po natazeni stal
> cernobilym.
> >Pouzivam volani:
> >
> >Const crTercik=1;
> >.
> >Screen.Cursors[crTercik]:=LoadCursor(HInstance,pChar('TERCIK'));
> >.
> >Screen.Cursor:=crTercik;
> >
> >S timto souvisi moje otazky:
> >1/ proc se mi barevny kurzor stane cernobylym
> >2/ jak se tento kurzor uvolni (nikde jsem to nenasel, v prikladech ho
> >neuvolnuji)
> >3/ jak pouzit animovany kurzor *.ANI nebo jak ho natahnout (rozlozit ho
> na
> >frame?)
> >4/ lze nahradit standardni kurzor jinym (nema to vliv na zdroje...?)
> >
> >Dekuji za kazdou radu
> >J. Benes
> >
>
>

POZOR doslo mi emailem

[*] Ji�� Lebru�ka - 1.10.1998 09:00:00

Tvuj zpusob legrace je mi ponekud vzdaleny.

Jiri Lebruska

-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of Milan
Fiedler
Sent: Friday, October 02, 1998 4:04 PM
To: Konference
Subject: POZOR doslo mi emailem


Zas�l�m V�m na v�dom� info o nov�m viru. Po s�ti je v sou�asn� dob� rozes�l�n soubor, kter� se jmenuje
"BUDDYLST.ZIP", kter� �dajn� obsahuje atraktivn� �et�i� obrazovky.
Jestli�e ho v�ak spus�te, p�ijdete o v�echno!!! Obsah Va�eho pevn�ho
disku bude po�kozen a kdosi prost�ednictv�m internetu z�sk� Va�i
po�tovn� adresu a p��stupov� hesla k Va�emu po��ta�i!!! ZA ?�DN�CH
OKOLNOST� SI TENTO SOUBOR NEKOP�RUJTE ANI NESPOU?T�JTE!!!
Do ob�hu se tento soubor pokud zn�mo dostal 23.9.98.
Roze�lete toto upozorn�n� d�le. Jedn� se o nov�, velmi ni�iv�
virus
a
m�lokdo o n�m zat�m v�. Informaci zve�ejnila firma Microsoft.
Sd�lte tuto informaci ka�d�mu, kdo m� p��stup na Internet tak ,
aby
bylo mo�no zabr�nit dal��m �kod�m.

D�le neotev�rejte ani nespou�t�jte p��padn� do�l� mailov� zpr�vy
ozna�en� "RETURNED OR UNABLE TO DELIVER" (tj. nedoru�eno nebo
nedoru�iteln�"). Tento virus napadne V� po��ta� a n�kter� ��sti vy�ad�
z �innosti. �dajn� se jedn� o velmi nebezpe�n� virus, proti kter�mu
zat�m neexistuje ��inn� ochrana.
Pros�me, dodr�ujte v�echna v��e uveden� pravidla a informujte
sv�
p��tele p�ipojen� na s�?.

Parametry predavane shellem

[*] Vojtech Semecky <v-soft(zv)mbox.lantanet(tec)cz> - 1.10.1998 09:27:58

Mam problem s parametry souboru, ktere dostanu od
Windows95, kdyz uzivatel drag'n'dropem pretahne soubor
na ikonu meho programu. Windows mi jmeno toho souboru
predavaji ve formatu 8.3.
Puvodne jsem myslel, ze jde o nejakou chybu v mem
programu nebo v Delphi, ale kdy to tam napisu rucne,
tak to projde v poradku.

Nevite nekdo co s tim ? Da se nejak z nazvu 8.3 ziskat
dlouhy nazev ?

Diky
Vojtech Semecky


dva monitory

[*] Vojtech Semecky <v-soft(zv)mbox.lantanet(tec)cz> - 1.10.1998 09:27:58

Chtel jsem se zeptat, jak to pak funguje z oknama.
Kdyz treba maximalizuju okno, tak se roztahne pres jeden
nebo pres oba monitory ?
A da se v novych Delphi treba nastavit aby se aplikace spoustela
na tom druhem monitoru nez Delphi ?

Diky
Vojtech Semecky
---------------------------------------------------
V-Soft = http://www.v-soft(tec)cz/
Html editor TARANTULE = http://www.tarantule(tec)cz/
Download Island (shareware) = http://www.v-soft(tec)cz/di/

Sdilene soubory

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 1.10.1998 09:30:18

Zdravim,

mam problem pri otevirani, nebo ukladani souboru na siti, ktere zrovna
nekdo pouziva. Je v Delphi nejake reseni?

.........................................................
. Libor Krayzel .
. Czech Television, Studio Ostrava .
. Dvorakova 18, 702 00 Ostrava .
. Telephone: 069-6201375 .
. URL: http://members.tripod.com/~sovtop .
. E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz .
. Fidonet: mailto:libor_krayzel(zv)p5.f59.n421.z2.fido(tec)cz .
. E-mail2: mailto:sovtop(zv)email(tec)cz .
.........................................................

Owner draw menu ?

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 1.10.1998 09:48:46

> Bohuzel je to v D3, protoze D4 nemam a ani mit nebudu. Ted nevim, jestli
> mam napsat :-) nebo :-(, kdyz si ctu o tech chybach, ktere v D4 jsou.

Ja mam D4 uz 2 mesice a jeste jsem zadne problemy nemel. To, co se tu
psalo, jsou jen male problemky prostredi jako takoveho, se kterymi se
ani nemusis moc setkat. A kdyz se setkas, neni to takova tragedie.

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 ===
==============================================================

Indexi v FOXPRO pouzivane DELPHI. (Sorry test)

[*] Branislav Danko <danko(zv)ns.basl.sk> - 1.10.1998 10:21:08


Toto je len test

-----P�vodn� zpr�va-----
Od: Petr Vones [SMTP:pvones(zv)mbox.vol(tec)cz]
Odesl�no: streda, september 30, 1998 18:03
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Re: Indexi v FOXPRO pouzivane DELPHI.

SunSoft - Mr�z �ubom�r wrote:
>
> Delphi 4 rozozna databazy z FOXPRO 2.5. Ale ak su k danej tabulke indexove subory, ktore obsahuju indexi
> zlozene z fox funkci vtedy ich D4 ignoruje ale zobrazi data z tabulky ak tabulka obsahuje zlozene indexi a aj funkcie
> vtedy D4 odmietne vobec zobrazit data z danej tabulky.

Ahoj,

a ohlasi to v tom druhem pripade nejakou chybu ? Pokud ano, tak muze byt problem
v tom ze driver nepodporuje vsechny funkce ktere mohou byt v indexech, neco malo
o tom je tady, treba ti to pomuze:

http://www.inprise.com/devsupport/bde/qanda/1853.html

--
Petr Vones, amatersky programator


Sdilene soubory

[*] Petr Brant <pbrant(zv)softhome(tec)net> - 1.10.1998 10:26:55



-----Puvodni zprava-----
Od: Krayzel Libor
Odeslano: 1. oijna 1998 8:30
Komu: '*** Delphi'
Poedmit: Sdilene soubory

Zdravim,

mam problem pri otevirani, nebo ukladani souboru na siti, ktere zrovna
nekdo pouziva. Je v Delphi nejake reseni?

.........................................................
. Libor Krayzel .
. Czech Television, Studio Ostrava .
. Dvorakova 18, 702 00 Ostrava .
. Telephone: 069-6201375 .
. URL: http://members.tripod.com/~sovtop .
. E-mail: mailto:Libor.Krayzel(zv)czech-tv(tec)cz .
. Fidonet: mailto:libor_krayzel(zv)p5.f59.n421.z2.fido(tec)cz .
. E-mail2: mailto:sovtop(zv)email(tec)cz .
.........................................................

[Petr Brant]
Kdysi jsem napsal tohle a fungovalo to, tak si z toho vyzobni vse potrebne:

function IsOpened(FileName:string):boolean;
{zkouma, zda je soubor FileName otevren, resp. je-li mozne do nej zapsat}
var FileHandle:integer;
begin
FileHandle:=FileOpen(FileName,fmShareExclusive);
if FileHandle = -1 then
begin
Result:=True;
exit;
end
else
begin
Result:=False;
FileClose(FileHandle);
end;
end;
function ClosedFiles(source, dest:PChar; var Are:bytebool):integer; stdcall;export;
{zkouma, zda neni nektery ze souboru v cilovem adresari otevreny}
var z:integer;
f:TSearchRec;
var dir:string;
begin
{Are=True znamena, ze nejsou otevrene, Are=False znamena, ze je aspon jeden otevreny}
{$i-}
dir:=GetCurrentDir;
ChDir(StrPas(source));
if IOResult<>0 then
begin
WriteToLogFile('Cannot change directory to '+StrPas(source));
Result:=-6;
exit;
end;
{$i+}
Result:=0;
Are:=True;
z:=FindFirst('*.*',faAnyFile,f);
if f.Name = '.' then z:=FindNext(f);
if f.Name = '..' then z:=FindNext(f);
while z=0 do
begin
{$i-}
ChDir(STrPas(dest));
if IOResult<>0 then
begin
WriteToLogFile('Cannot change directory to '+StrPas(dest));
Result:=-10;
SetCurrentDir(dir);
exit;
end;
{$i+}
if FileExists(f.Name) then
begin
if IsOpened(f.Name) then
begin
SysUtils.FindClose(f);
Are:=False;
WriteToLogFile('Any file(s) is opened and cannot be overwritten.');
SetCurrentDir(dir);
exit;
end;
end;
{$i-}
ChDir(StrPas(source));
if IOResult<>0 then
begin
WriteToLogFile('Cannot change directory to '+StrPas(source));
Result:=-6;
SetCurrentDir(dir);
exit;
end;
{$i+}
z:=FindNext(f);
end;
WriteToLogFile('No destination file is opened and can be overwritten.');
SysUtils.FindClose(f);
SetCurrentDir(dir);
end;

*************************************************************************
Petr Brant [pbrant(zv)softhome.net]
programator v MSVC++, obcas Delphi nebo Visual Basic
*************************************************************************

FCGI

[*] Pavel Fuciman <Pavel.Fuciman(zv)union(tec)cz> - 01.10.1998 10:38:46

[P��loha v souboru: vcard.vcf]
Ahoj,
chtel bych se zaptat jestli se uz nekdo setkal s FCGI (Fast Common
Gateway Interface).
Je mozne ho vytvaret v Delphi? Je na to nejaka komponenta?
Ma to neco spolecneho s obycejnym CGI?


Za kazdou radu diky.

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