Archív konference Delphi

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

Komunikace s Internet Explorerem

[*] Ing. Petr �vejda <lingvista(zv)lingvista(tec)cz> - 4.2.2000 11:43:08

[P��loha v souboru: winmail.dat]
D5Prof, W98, IE5

Uz jsem to tady jednou nakousl a nikdo nevedel. Potreboval bych pri behu
Internet Exploreru pred nactenim stranky odchytit HTML text, ten si nejakym
zpusobem zpracovat a poslat zpatky do Exploreru na vlastni zobrazeni. Pokud
to neni jasne - tak klasickym prikladem by mohli byt on-line prekladace www
stranek. Najde se nekdo, s kym bych se o tom mohl pobavit? Vubec nevim,
odkud zacit.

Ing. Petr Svejda
software specialist


Zatuhnuti Delphi pri startu aplikace

[*] Matula M <asexrm(zv)telecom(tec)cz> - 4.2.2000 11:44:16

Delphi je hodne citline na HW. Pokud mas pretaktovany procesor atd., staci
mirne zvyseni teploty a nastanou uvedene problemy. Stejne je to s pameti.
Pokud je napr. druhy SIM jinych parametru nez prvy, nebo je pomalejsi.

Mirek


----- P�vodn� zpr�va -----
D4 Prof, W98, podledni updaty v�eho co me napada.

"Znicehonic" mi zacaly obcas-casto padat Delphi a cela Wokna (musim
pouzit vypinac) pri pousteni aplikace z Delphi. Samotna pustit jde, ale
pri pusteni z Delphi zmizi jen levy panel s vlastnostni ale aplikace uz
nenajede, Delphi vytuhnou a po par kliknutich i Windows. Na jinem PC tu
aplikaci muzu klidne vyvijet bez problemu.

Tomu padani nepredchazela zadna instalace nebo zasah do pocitace a jine
programy slapou bez problemu. Pak jsem preinstaloval Delphi a dela to
zase. Nemate nekdo napad nebo zkusenost, nez dam format c:?

Ales

--

Ale� Radikovsk�
mail: radik(zv)seznam(tec)cz
tel: +420 603 300093

SQL, ODBC, ADO, BDE - maximalni zmatek, pomoooc

[*] Pavel Bl�hovec <blahovec(zv)stapro(tec)cz> - 4.2.2000 11:50:34

Mam trochu zmatek, pomozte mi prosim ujasnit si vec.

Mam aplikaci client/server:

Pouziji BDE, to se napoji na ODBC a ODBC se napoji na SQL server.
NEBO
Pouziji ADO, to se napoji na ODBC a ODBC se napoji na SQL server.

JE MOJE UVAHA SPRAVNA?

Lze se napojit na ODBC primo, bez ADO a bez BDE, abych nemusel mit na clientskych pocitacich dvoje drivery?

dao

[*] Martin <geoplan(zv)pp.sinet.sk> - 4.2.2000 11:57:00

ten demo by si mi mohol poslat na tino(zv)inmail.sk

martin
----- Original Message -----
Od: Erik Salaj
Komu: delphi-l(zv)fwd(tec)cz
Odoslan�: 3. febru�r 2000 17:48
Predmet: Re: dao


Ak sa pokusim nastavit Active na true napise mi syntaticka chyba v dotazovem vyrazu id obj=: id obj . pravdepodobne nepozna ten parameter. vo vlastnosti params nie je nic, a neviem ako tam nieco dostat.
Ak zrusim riadok where, tak to ide samozrejme nefunguje master detail
DAO komponenty pouzivaju DAO konvenciu pre parametre, t.j. nepouziva sa dvojbodka pred
menom parametra (DAO sam zisti, ze ide o parameter). Cize napr. ak mam dve tabulky

Master(Name, Capital, Continent, Area)

Detail(MasterName, Text)

tak SQL prikaz pre detail dataset je:

SELECT * FROM Detail WHERE MasterName = Name

(a nie SELECT * FROM Detail WHERE MasterName = :Name)

Mam pripraveny aj jednoduchy demo-priklad, ak mi napises Tvoju e-mail
adresu, tak Ti ho poslem.

Erik Salaj


TSpeedButton

[*] Radim Kunz <rkunz(zv)ova(tec)comp(tec)cz> - 4.2.2000 12:24:47

Casto se tu psalo o tom, ze TSpeedButton nepodporuje ImageList.

Kdybych proste udelal novou tridu, do ni pridal property ImageList
a ImageIndex a Paint prepsal zjednodusene takto:

procedure TMySpeedButton.Paint;
begin
inherited Paint;
if fState = bsDown then
ImageList.Draw(Canvas,3,2,ImageIndex,Enabled)
else
ImageList.Draw(Canvas,2,2,ImageIndex,Enabled);
end;

Byl by v tom nejaky problem ?

Zere TSpeedButton zdroje, i kdyz nema glyph ?

Radim Kunz


DIBENG.DLL

[*] Martin Nedopil <nedopil(zv)eskon(tec)cz> - 4.2.2000 13:14:18

Jedna se o knihovnu pro praci s DIB (device independent bitmap).
Byva soucasit WinG API baliku.
Nepouzivas nejakou komponentu vyuzivajici rychle kresleni
na bitmapu pres WinG ?

Martin


sdileni databazi Paradox na TCP/IP pod Delphi3

[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 4.2.2000 13:21:04

> Vzdycky jsem si myslel, ze NetDir nastavi vsichni na spolecnou (pomoci UNC)
> slozku (napr. tam, kde jsou data). To je asi jasne, ale...
>
> ... PrivateDir si kazdy nastavi na SVUJ napr. C:\Temp. Jaky je je tedy
> rozdil mezi NENASTAVENIM PrivateDir (proc taky kdyz jde nekam na muj rychly
> disk - a je jedno jestli do C:\Temp nebo do slozky, ve ktere mam vlastni
> Exe)????
>
Podle me je obvykle celkem jedno, zda a kam se PrivateDir nastavi
(pokud se tedy nenastavuje na jiny nez lokalni disk). Kvuli rychlosti
bych ji nenastavoval na adresar obsahujici nekolik set souboru
apod.
Nicmene tim, ze se PrivateDir nastavi, se predejde problemum,
je-li aplikace umistena v miste se zakazanym zapisem (CDROM,
na siti s opravnenim jen ke cteni apod.).

David


Pomoooc: General SQL Error:

[*] CERMAK <CERMAK(zv)procomcr(tec)cz> - 4.2.2000 14:47:44

This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.

Nevim jake databaze se problem tyka, vypada to na preplneny transakcni log.
Je potreba ho nejak vyprazdnit. V MS SQL se to da udelat pres Enterprise
manager, nabidka Truncate transaction log nebo zalohovanim logu. V jine
databazi to asi bude podobne. Jestlize pouzivate MS SQL 7.0 muzu popsat
postup podroneji, jinak hledejte v napovede.


Jaromir Cermak

-----Original Message-----
From: Pavel Bl�hovec [mailto:blahovec(zv)stapro(tec)cz]
Sent: Friday, February 04, 2000 9:34 AM
To: Delphi
Subject: Pomoooc: General SQL Error:


Pri praci s SQL serverem mi po case zacne vyskakovat hlaska:

General SQL Error:

Can't allocate space for object 'Syslogs' in database 'MainDB' because the
'logsegment' is full. If you ran out of space in Syslogs, dump the
transaction log. Otherwise, use ALTER DATABASE or sp extendsegment to
increase the size of the segment.

Poradi mi nekdo co s tim?

ListView

[*] Pavel Serbajlo <serb(zv)mikulov.sol(tec)cz> - 4.2.2000 14:50:33

Hi,

Mam ListView, ktery obsahuje nekolik ListItems ... tyto prvky spojuji
carou, kterou kreslim primo na canvas. Problem nastava tehdy, pokud
listview prekryju jinym oknem ... vsechny casti car, ktere se skryvaly za
timto oknem zmizi a neprekresli se, ListItems ale ano ... zkousel jsem
cary dokreslovat v ruznych udalostech(OnCustomDraw,OnCustomDrawItem...)
ale nic nepomohlo...

Muze mi nekdo poradit jak na to?


Win98, D5

dik
Pavel Serbajlo


ADO primo z ActiveX knihovny

[*] Tom� Br�dle������i�^����? - 4.2.2000 15:18:31

-----P�vodn� zpr�va-----
Od: Matula M <asexrm(zv)telecom(tec)cz>>Upresni kde je kurzor a jake mas parametry pro open. Nejlepsi bude, kdyz
>uvedes priklad. Ja pouzivam stejne prostredky jako ty, ale neco takoveho se
>mi nestalo.
>


Pouzivam recordset pouze pro nacteni udaju, potom ho uvolnim.
--------------
RS:=FConnection.Execute(GetExecSql, rw, adCmdText);
{GetExecSql je funkce kontruujici SQL select, rw: OleVariant promenna}

with RS do
while not eof do
begin
id:=fields['IdScreen'].value;
scr:=VarToStr(fields['Name'].value);
InsTreeSubNode(FScrNodes, scr, id, ccImage[id =
frPDMain.DefaultScreen]);
{InsTreeSubNode je procedura, ktera pracuje s temi daty}
MoveNext;
end;

rs.close;
rs:=nil;

problemy jsou hlavne s update a insert :
provedu nejakou sekvenci zmen pomoci SQL prikazu exec stp_Name par, insert
neco, update neco
a jakoby od urciteho prahu se ty prikazy neprovadeji. Po restartu programu
je vse
zase OK.

pr.:
FConnection.Execute(GetExecSql, rw, adCmdText);

cili podobne jako ten select...

Ted mne jeste napada, zkusit zmenit providera z MSDASQL na SQLOLEDB.

Zatim vsak diky

Tomas

t.bradle(zv)pvtnet(tec)cz

Pomoooc: General SQL Error:

[*] Vlastimil Bardon <ineq-soft(zv)ova.eridan(tec)cz> - 4.2.2000 15:46:08

Tipuji, ze pouzivas MS SQL Server 6.5. Dochazi Ti misto na LogDevice. Muzes
si zvetsit Device, ve kterem je Log a pak zvetsit velikost logu na dane
databazi - vse snadno pres Enterprise manager. Log narusta dokud neprovedes
jeho backup, nebo dokud ho nevyprazdnis. Pokud na databazi delas jen vyvoj
a ztrata dat te netrapi, tak si nastavTruncate Log On Checkpoint. Pokud
nechces prijit o data, provadej pravidelne backup databaze s vyprazdnenim
logu nebo i backup logu. Vse se da docela rozumne najit a nastavit V
Enterprise manageru.

-----P�vodn� zpr�va-----
Od: Bosnis [SMTP:bosnis(zv)atlas(tec)cz]
Odesl�no: 4. �nora 2000 11:42
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: RE: Pomoooc: General SQL Error:

Trocha teorie

Nektere databaze maji predem definovanou rychlost rustu jednotlivych
objektu
databaze, vetsinou se tento parametr nazyva EXTENT, udava velikost o jakou
se objekt zvetsi pokud se ukladana data do stavajiciho objektu jiz
nevejdou.
Nekde je dokonce i parametr udavajici procentualni zvetseni kazdeho dalsiho
EXTENTU = kazde nasledujici pouziti extentu jej jeste zvetsi o toto dane
procento. ( napr. ORACLE ). Problem muze nastat take proto, ze je
vyzadovano
totonove alokovane misto jako jeden blok = v databazi muze byt celkem dost
volneho mista i tak dojde k chybe.

EXTENT 10kB
ZVETSENI 20%

1.10
2.12
3.14,4
4. ...

Stejne tak i rust dbspaceu ( tabulkovy prostor ) muze byt limitovan
takovymto parametrem => je nutne nedrive zabezpecit zvetseni tohoto
prostoru
a az potom je mozny rust objektu uvnitr neho. Dalsi moznosti je
prevytvoreni
( Rebuild ) tabulkoveho prostoru = defragmentace.


Z uvedeneho vyplyva, ze je potreba zjistit:
jak je nastaven rust databaze
jak je nastaven rust objektu

pokud se nemuze objekt jiz zvetsovat, potom je potreba zvetsit databazi.
pokud je v databazi dost mista je nutne zvetsit dany objekt ( muze se stat
ze neni nastaveno zvetsovani )

SQL Server
Z dotazu je zrejme, ze se jedna o preplneni transakcniho protokolu (
tabulka
syslogs )
proto je nutne zvetsit databazi prikazem

ALTER DATABASE <databaze> ON MORESPACE=<pocet MB>
GO

dale se tento novy prostor musi priradit transakcnimu protokolu

sp_logdevice <databaze>, MORELOGSPACE

Pavel SPEJTEK

e-mail: bosnis(zv)atlas(tec)cz

www: http://freeweb.coco(tec)cz/ps/index.html


-----P�vodn� zpr�va-----
Od: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]za u�ivatele
Pavel Bl�hovec
Odesl�no: 4. �nora 2000 9:34
Komu: Delphi
P�edm�t: Pomoooc: General SQL Error: Pri praci s SQL serverem mi po case zacne vyskakovat hlaska:

General SQL Error:

Can't allocate space for object 'Syslogs' in database 'MainDB' because
the 'logsegment' is full. If you ran out of space in Syslogs, dump the
transaction log. Otherwise, use ALTER DATABASE or sp_extendsegment to
increase the size of the segment.

Poradi mi nekdo co s tim? <<Soubor: ATT00009.htm>>

sdileni databazi Paradox na TCP/IP pod Delphi3

[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 4.2.2000 15:52:15

>
> Vzdycky jsem si myslel, ze NetDir nastavi vsichni na spolecnou (pomoci UNC)
> slozku (napr. tam, kde jsou data). To je asi jasne, ale...
>
> ... PrivateDir si kazdy nastavi na SVUJ napr. C:\Temp. Jaky je je tedy
> rozdil mezi NENASTAVENIM PrivateDir (proc taky kdyz jde nekam na muj rychly
> disk - a je jedno jestli do C:\Temp nebo do slozky, ve ktere mam vlastni
> Exe)????

Protoze to jde pres BDE a nam se podarilo vyvolat chybu BDE prave proto, ze private DIR
byl v miste, kde je EXE coz byla pricina problemu.

A PrivateDir na siti nesouvisi s rychlosti pocitace, ale s propustnosti site. Na ho.. Ti bude
super masina, kdyz vse bude vaznout na sitove komunikaci.
>
> Pokud je tato uvaha spatna, jak je nejlepe nastavit PrivateDir? Kuprikladu
> na klasicke Peer-To-Peer siti, kde data jsou napr. na jednom z peti
> rovnocenych PC.

Uz to tady bylo. Ja treba nastavuji PrivateDir na TEMP ve Windowsech, kde mam podadresar pro svoji aplikaci.
>

Snad jsem to popsal srozumitelne.

P�kny den a pilotum mnoho stastnych pristani...
====================================

ML Software - Martin Lasevic
Budovatelska 459
Ostrava - Poruba, 708 00
tel.: +420 (69) 691 85 11, Paegas : 0603 338 765
fax.: +420 (69) 691 85 11
E-mail : ml_software(zv)email(tec)cz
WWW: http://www.volny(tec)cz/ml_software
Miror : http://freeweb.coco(tec)cz/ml_software
====================================
> Diky
>
> Ing. Petr Svejda
> software specialist
>
> >
> > Pokud nezadas PrivateDir, pak se Ti data budou ukladat asi na
>
>
> > cestu, odkud se spousti vlastni EXE :
> >
> > a) zpomali to cinnost programu
> > b) u vetsiho objemu dat to muze zpusobit komplikace.
>
>
> > > A mam dodatecny dotaz. Pokud se nezada PrivateDir - kam se budou ukladat
> > > docasna data? Budou se tahat po siti? A co to jsou vlastne ty
> > docasna data?
>
>
>

Pridani aliasu

[*] Ing. Zdenek Sraier <sraierzd(zv)atlas(tec)cz> - 4.2.2000 15:52:36

Zdravim,

Zkousim v programu pridat BDE Alias (kdyz neexistuje)

Session.AddStandardAlias('Data', 'c:\data', 'Paradox');
Session.close;
Session.open;
application.processMessages;

Nekdy se to podari, nekdy ne. (na stejnem stroji, stejne windows,
zaloha obnovovana pomoci Norton Ghost). Opakuji pokusy o instalaci.

Zajimave je, ze kdyz spustim BDE Admin a necham ho bezet
(nic v nem nedelam), aplikace v pohode alias vytvori a pracuje s nim.
Tedy alespon si myslim, ze ho vytvori, protoze po ukonceni BDEADMIN
a jeho opetovnem spusteni v konfiguraci NENI a aplikace zase bez
spusteneho BDEADMIN nepracuje.

Nekdy se Alias normalne zapise a je videt v BDEADMIN. Pak je vse OK.

Tusim, ze jde o nejake cesty, ale proc to nekdy jde ?

Instalace BDE je vytvorena pomoci ISX D5P.
Zkusebni pocitac P200/32 MB RAM, W95 USB

S pozdravem Zdenek Sraier

o__o E-mail: sraierzd(zv)email(tec)cz HTTP://www.byll(tec)cz/scuba/zdenek/
( o o) -----------------------------------------------------------
(. .) Strany Potapecske (SP) HTTP://www.byll(tec)cz/scuba/

Propojeni tabulek

[*] Jaro <jaro(zv)sinea(tec)cz> - 4.2.2000 07:10:05 -0800

Ahoj,
mam dve tabulky, ktere jsou propojeny a maji nekolik sec. indexu, v prvni
tabulce lze zaznamy vyhledavat podle libovolneho indexu, ale v te druhe to
nelze, jakmile zmenim index tak se v tabulce zobrazi nesmysl.

Jak mam udelat to, ze druhou tabulku budu moci indexovat jinym klicem, nez jen
"spojovacim" ?
Zkousel jsem ji filtrovat, ale je to moc pomale, kdyz zmenim zaznam v tabulce
prvni. Jeste me napadlo zobrazovat tabulku pres Query, ale nevim jak v ni
vyhledavat, tak jsem to nezkousel. Co s tim ?
=========
Ten druhy zpusob bude dobry.
Udelas to takhle:
Select * from table2 Where spoj_pole = :spoj_pole Order By libovolne sloupece
Qery2 propojis na DataSuurce1, aby se obsadil parametr.

Dalsi moznost je tato:
Select * from table2 Format('Where spoj_pole = %d Order By "%s"
',[spoj_pole_prvni_tabulky, Sloupec_pro_trideni])

Vyhledavat v druhe tabulce lze snadno pomoci funkce Locate.
Ta sice nehleda podle indexu, ale o to ma vice moznosti.
Co se tyka rychlosti, tak problem nebude, protoze druhy dataset bude
maly diky znacne segregaci v podmince Where

Muzes tak libovolne menit trideni druhe tabulky a nemusis budovat tolik indexu.
Index udelej pouze na spoj_pole - tim to bude rychlejsi.
Premira indexu take zpomaluje databazi.

Jaro

Dik.

PS: Tabulky bezi na siti.
Win95,D3,P200,32RAM


None

[*] Lubo� RYBN��EK - 4.2.2000 16:31:16

Uplne nejjednodussi je stahnout si programek, kterej uz to umi. Ale pokud si
ho chces napsat sam, tak by ti mela stacit nejak komponenta. Kdysi sem ji
mel a bylo to myslim TDialUp od nejakyho Itala. Vzdycky ale muzes volat
primo RASAPI (a to neni nic na "mensi aplikaci")
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Vojt�ch Br�zda
> Sent: Thursday, February 04, 2094 2:14 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject:
>
> Cht�l bych ud�lat men�� aplikaci, kter� by po��tala pen�n�
> poplatky za p�ipojen� k Internetu. Nev�m ov�em jak zjistit, �e
> byl aktivov�n modem a tud�, �e mohu zapo��t s po��t�n�m>
> Za jakoukoli radu d�kuji: Br�zda V>
>

Grafy

[*] SPELZA s.r.o. <spelza(zv)spelza(tec)cz> - 4.2.2000 16:40:51

Bohuzel mam jenom D4Std a grafy TeeCharts jsou pouze ve verzi Prof. Takze
jeste jednou, nemate nekdo zkusenosti s nejakou komponentou pro grafy?

Jara.

----- P�vodn� zpr�va -----
Od: Petr Vones <pvones(zv)mbox.vol(tec)cz>
Komu: Konference Delphi <delphi-l(zv)fwd(tec)cz>
Odesl�no: 2. �nora 2000 23:06
P�edm�t: Re: Grafy


> From: SPELZA s.r.o. <spelza(zv)spelza(tec)cz>
> > potrebuji zobrazit grafickou formou vysledky mereni. Nevite o nejakych
> > komponentach (nejlepe free) ktere by toto umoznovaly. Staci mi klasicky
> > sloupcovy a carovy graf.
>
> Ahoj,
>
> Nepises jakou mas verzi Delphi (opravdu to nekdy odpovedi na dotazy dost
> usnadni). Od Delphi 3 mas v palete komponent Additional nativni komponentu
> TeeChart. V Delphi 2 jsou pouze ActiveX komponenty na tvorbu grafu
(ChartFx
> a VtChart). Obecne ale plati, ze ActiveX komponentam je lepsi se vyhnout
> pokud existuji podobne nativni komponenty primo ve VCL.
>
> Petr Vones, amatersky programator
>
>
>

ListView

[*] Michal Hlavac <7hlavac(zv)st.fmph.uniba.sk> - 4.2.2000 16:48:49

Skus pouzit refresh;

Miso

-----P�vodn� zpr�va-----
Od: Pavel Serbajlo <serb(zv)mikulov.sol(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 4. febru�r 2000 14:50
P�edm�t: ListView


>Hi,
>
>Mam ListView, ktery obsahuje nekolik ListItems ... tyto prvky spojuji
>carou, kterou kreslim primo na canvas. Problem nastava tehdy, pokud
>listview prekryju jinym oknem ... vsechny casti car, ktere se skryvaly za
>timto oknem zmizi a neprekresli se, ListItems ale ano ... zkousel jsem
>cary dokreslovat v ruznych udalostech(OnCustomDraw,OnCustomDrawItem...)
>ale nic nepomohlo...
>
>Muze mi nekdo poradit jak na to?
>
>
>Win98, D5
>
>dik
>Pavel Serbajlo
>
>

None

[*] p. Jirman <jim.design(zv)iol(tec)cz> - 4.2.2000 18:09:56

From: Vojt�ch Br�zda <xbrazda(zv)gymzr(tec)cz>>Cht�l bych ud�lat men�� aplikaci, kter� by po��tala pen�n� poplatky za
p�ipojen� k Internetu. Nev�m ov�em jak zjistit, �e >byl aktivov�n modem a
tud�, �e mohu zapo��t s po��t�n�m.


Uz se to tu jednou resilo, jestli chces zjistit jestli je PC online pouzi
toto:

M. Jirman

----- Original Message -----
From: Va�ek N�vrat
To: Delphi forum
Sent: Sunday, December 05, 1999 1:23 AM
Subject: Re: On-line


Ahoj !
Mam pro Tebe reseni tohoto problemu. Nasledujici funkce testne, jestli ma v
ten okamzik pocitac umoznen pristup na Internet - myslim, ze by to melo
fungovat se vsemi druhy netoveho pripojeni, ale na modemu to funguje 100%.

Function InternetGetConnectedState (lpdwFlags: LongInt; dwReserved:
LongInt): Boolean; stdcall; external 'wininet.dll';

implementation

{$R *.DFM}

Function TForm1.Test_Pripojeni (): boolean;
var Flagy: LongInt;
begin
Flagy := 0;
Result := InternetGetConnectedState(Flagy, 0);
end;

{pokud funkce vrati hodnotu TRUE, pocitac je prave pripojen na Net}


S pozdravem...
Vasek Navrat
programator diskmagu Engine


insert mode

[*] p. Jirman <jim.design(zv)iol(tec)cz> - 4.2.2000 18:20:18

Ahoj,

Myslim, ze "Close" ma byt ve predu a "Open" na konci, ale hlavne bych TQuery
k temto prikazum vubec nedoporucoval,
to uz je lepsi TUpdateSQL (ktery je k tomu urcen) viz help z D5:

""TUpdateSQL.Insert""

Specifies the SQL INSERT statement to use when applying a cached insertion
of a record.

property InsertSQL: TStrings;

Description

Set InsertSQL to the SQL INSERT statement to use when applying an insertion
to a dataset. Statements can be parameterized queries. To create a INSERT
statement at design time, use the UpdateSQL editor to create statements,
such as:

INSERT INTO "Country.db"

(Name, Capital, Continent)
VALUES (:Name, :Capital, :Continent)

WHERE :OLD_Name = "Rangoon"

At run time, an application can write a statement directly to this property
to set or change the INSERT statement.

Note: As the example illustrates, InsertSQL supports an extension to normal
parameter binding. To retrieve the value of a field as it exists prior to
application of cached updates, the field name with 'OLD_'. This is
especially useful when doing field comparisons in the WHERE clause of the
statement.

M.Jirman

From: <olej.jozef(zv)slsp.sk>

> Chcel by som sa opytat ci niekto nema skusenost s nasledovnym
> Pri vkladani do paradox. tab. cez SQl insert
>
> try
> with Form1.Query1 do begin
> SQl.Clear;
> SqlStr:='insert into tab1 values ( :k,:p)';
> Sql.Add(SqlStr);
> Close;
> Prepare;
> Params[0].AsString:='12345';
> Params[1].AsString:='0';
> ExecSQL;
> end;
> finally
> Form1.Query1.ClearFields;
> end;
>
> dostanem hlasku "Dataset not in edit or insert mode". V com je problem?
>

Pocet vyskytu retezcu v tabulce

[*] p. Jirman <jim.design(zv)iol(tec)cz> - 4.2.2000 18:32:07

Soucet := 0;
with Query do begin
try
Close;
Sql.Text := 'SELECT Count(NejakyField) FROM tabulka';
Open;
Soucet := Fields[0].AsInteger;
finally
Close;
end; // try
end;

)):snad by to melo byt dostatecne rychle, a to taky zalezi na typu tabulky

M.Jirman

R.Fischer wrote :

> D5 ENT, paradox a Interbase
>
> mam tabulku ktera muze mit radove miliony zaznamu. V teto tabulce mam
> polozku typu string, ktera muze nabyvat libovolnych hodnot.
>
> Potrebuji zjistit kolikrat se mi ktera hodnota v tabulce vyskytuje.
Prozatim
> se mi nepodarilo dospet k nejakemu
> alespon trochu rychlemu reseni

Obdoba TSpeedButton s nastavenim Focusu

[*] p. Jirman <jim.design(zv)iol(tec)cz> - 4.2.2000 18:38:59

V tom pripade (jestli nemas CD od D5 s rozsirenymi komponentami) doporucuji
pouzit TToolButton akorat misto SetFocus ma Marked (nakonec si tam muzes
SetFocus dodelat - to snad svedes ne)
a pouziva misto Glyph ImageList takze velke zrani GDI zdroju nehrozi

M.Jirman

----- Original Message -----
From: Martin Kuska <martin.kuska(zv)amenit(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, February 04, 2000 10:16 AM
Subject: Re: Obdoba TSpeedButton s nastavenim Focusu


From: Jaroslav ��pek <jaroslav.sipek(zv)idea(tec)cz>
> nevite nekdo o komponente podobne TSpeedButton,
> ale aby bylo mozne na ni nastavit Focus.

>Ahoj,

>Muzes napriklad pouzit TBitBtn a jako Caption dat prazdny text. Pozor ale
na
>velkou spotrebu GDI zdroju pri pouzivani komponent s Glyphy, viz:
>http://www.delphi(tec)cz/soubor.asp?rok=2000&mesic=Jan&den=12&first=61&soubor=d
lfaaaci.htm

>Petr Vones, amatersky programator

Cau.
Jenze BitBtn nema vlastnost Down.
Takove tlacitko, ktere by nezralo GDI zdroje a fungovalo jako BitBtn nebo
volitelne jako SpeedButton, vcetne vlastnosti Down a Flat, tu proste chybi.
Nechtel byste ho nekdo naprogramovat? Ja to neumim.

Martin.

SQL, ODBC, ADO, BDE - maximalni zmatek, pomoooc

[*] p. Jirman <jim.design(zv)iol(tec)cz> - 4.2.2000 18:51:32


>From: Pavel Bl�hovec

>Mam trochu zmatek, pomozte mi prosim ujasnit si vec.
>Mam aplikaci client/server:

>Pouziji BDE, to se napoji na ODBC a ODBC se napoji na SQL server.
>NEBO
>Pouziji ADO, to se napoji na ODBC a ODBC se napoji na SQL server.
>JE MOJE UVAHA SPRAVNA?

V podstate ano, ale ADO je rychlejsi napojene pres OLEDB drivery,

>Lze se napojit na ODBC primo, bez ADO a bez BDE, abych nemusel mit na
clientskych pocitacich dvoje drivery?
To zalezi jak je clientska aplikace udelana.

Delphi 5

[*] Jaroslav Pospisil <pospisil(zv)japos(tec)cz> - 4.2.2000 21:21:12

Rad bych se zeptal vsech, kdo mi budou ochotni odpovedet.
Jak se vam pracuje s Delphi5. Uvazuji o koupi, ale po spatnych skusenostech s Delphi4 vaham. Dodnes radeji pracuji s Delphi3. Ty mi samozrejme nemohou poskytnou vse co mi dnes nabizeji Delphi5. Nechci jenom opakovat svo skusenost, kdy jsem v podstate zbytecne nakoupil Delphi4.
Pracuji s verzi profesional.

Dekuji vsem za nazor a radu.


Jaroslav Pospisil
pospisil(zv)japos.com


DIBENG.DLL

[*] Mirun <forcom(zv)telecom(tec)cz> - 4.2.2000 23:23:58

Myslim, ze mi neco podobneho zlobilo pri pouziti X-barevne bitmapy, jejiz
barevna hloubka byla vetsi nez nastavena na obrazovce. Zkus zmenit barevnou
hloubku, (na vice barev), pokud to tim zmizi, prohledni si bitmapy.

Mirun

----- P�vodn� zpr�va -----
Od: Ing. Miroslav Ond��ek <bonnel(zv)telecom(tec)cz>
Komu: Delphi konference <delphi-l(zv)fwd(tec)cz>
Odesl�no: 4. �nora 2000 11:04
P�edm�t: DIBENG.DLL


>Nev� nekdo z vas nahodou, k cemu slouzi ve Win 95/98 knihovna
>C:\WINDOWS\SYSTEM\DIBENG.DLL? U nekterych zakazniku najednou nelze pod
>Win 98 spustit program napsany v Delphi 1 (!) s tim, ze je porusena
>ochrana prave u teto knihovny. Zkousel jsem to u vsech znamych, kteri
>maji krome me jeste nainstalovany W98 a stejnou verzi DIBENG - nikde
>problemy nejsou. Pada to hned pri startu te moji aplikace.

>Diky Mira

SQL, ODBC, ADO, BDE - maximalni zmatek, pomoooc

[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 5.2.2000 00:09:28

Pokud mas BDE, tak uz tam existuje nativni link na SQL server, ale jde to i
pres BDE a ODBC ( ale proc to delat jednoduse, kdyz to de slozite) a navic
spojeni pres BDE a ODBC nepatri mezi nejrychlejsi.

ADO Ti umozni taky primy pristup na SQL ( nepotrebujes BDE !!).

Martin

P�kny den a pilotum mnoho stastnych pristani...
====================================

ML Software - Martin Lasevic
Budovatelska 459
Ostrava - Poruba, 708 00
tel.: +420 (69) 691 85 11, Paegas : 0603 338 765
fax.: +420 (69) 691 85 11
E-mail : ml_software(zv)email(tec)cz
WWW: http://www.volny(tec)cz/ml_software
Miror : http://freeweb.coco(tec)cz/ml_software
====================================> Mam trochu zmatek, pomozte mi prosim ujasnit si vec.
>
> Mam aplikaci client/server:
>
> Pouziji BDE, to se napoji na ODBC a ODBC se napoji na SQL server.
> NEBO
> Pouziji ADO, to se napoji na ODBC a ODBC se napoji na SQL server.
>
> JE MOJE UVAHA SPRAVNA?
>
> Lze se napojit na ODBC primo, bez ADO a bez BDE, abych nemusel mit na
clientskych pocitacich dvoje drivery?

Pridani aliasu

[*] Lauko �tefan <lauko(zv)salamon.sk> - 5.2.2000 00:21:44

Pouzri dalsie proc a funkcie

Session.AddStandardAlias();
Session.SaveConfigFile;
Session.DeleteAlias();

Session.AddStandardAlias() ; Je aktivny len docasne
Session.SaveConfigFile; Trvale zapise

Zmenil by som to takto:

>Session.AddStandardAlias('Data', 'c:\data', 'Paradox');
Session.SaveConfigFile;
>Session.close;
>Session.open;
>application.processMessages;
-----P�vodn� spr�va-----
Od: Ing. Zdenek Sraier <sraierzd(zv)atlas(tec)cz>
Pre: DELPHI Konference <delphi-l(zv)fwd(tec)cz>
D�tum: 4. febru�r 2000 17:52
Predmet: Pridani aliasu


>Zdravim,
>
>Zkousim v programu pridat BDE Alias (kdyz neexistuje)
>
>Session.AddStandardAlias('Data', 'c:\data', 'Paradox');
>Session.close;
>Session.open;
>application.processMessages;
>
>Nekdy se to podari, nekdy ne. (na stejnem stroji, stejne windows,
>zaloha obnovovana pomoci Norton Ghost). Opakuji pokusy o instalaci.
>
>Zajimave je, ze kdyz spustim BDE Admin a necham ho bezet
>(nic v nem nedelam), aplikace v pohode alias vytvori a pracuje s nim.
>Tedy alespon si myslim, ze ho vytvori, protoze po ukonceni BDEADMIN
>a jeho opetovnem spusteni v konfiguraci NENI a aplikace zase bez
>spusteneho BDEADMIN nepracuje.
>
>Nekdy se Alias normalne zapise a je videt v BDEADMIN. Pak je vse OK.
>
>Tusim, ze jde o nejake cesty, ale proc to nekdy jde ?
>
>Instalace BDE je vytvorena pomoci ISX D5P.
>Zkusebni pocitac P200/32 MB RAM, W95 USB
>
>S pozdravem Zdenek Sraier
>
> o__o E-mail: sraierzd(zv)email(tec)cz HTTP://www.byll(tec)cz/scuba/zdenek/
> ( o o) -----------------------------------------------------------
> (. .) Strany Potapecske (SP) HTTP://www.byll(tec)cz/scuba/
>
>

ADO primo z ActiveX knihovny

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

On 4 Feb 00, at 15:18, Tom� Br�dle wrote:

> Ted mne jeste napada, zkusit zmenit providera z MSDASQL na SQLOLEDB.

Tak to urcite udelej, protoze ted to honis uplne nesmyslne pres
ODBC.


S pozdravem

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


SQL, ODBC, ADO, BDE - maximalni zmatek, pomoooc

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

On 4 Feb 00, at 11:50, Pavel Bl�hovec wrote:

> Mam trochu zmatek, pomozte mi prosim ujasnit si vec.
>
> Mam aplikaci client/server:
>
> Pouziji BDE, to se napoji na ODBC a ODBC se napoji na SQL server. NEBO

Ano. Nebo muzes pouzit BDE, nativni driver a SQL, pokud mas D
Enterprise (nebo C/S).

> Pouziji ADO, to se napoji na ODBC a ODBC se napoji na SQL server.
>
> JE MOJE UVAHA SPRAVNA?

Pokud jedes pres ADO, tak na ODBC se napojuj jen v pripade, ze
pro danou databazi neni OLE DB provider.


S pozdravem

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


DIBENG.DLL

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

On 4 Feb 00, at 11:04, Ing. Miroslav Ond��ek wrote:

> Nev� nekdo z vas nahodou, k cemu slouzi ve Win 95/98 knihovna
> C:\WINDOWS\SYSTEM\DIBENG.DLL? U nekterych zakazniku najednou nelze pod
> Win 98 spustit program napsany v Delphi 1 (!) s tim, ze je porusena
> ochrana prave u teto knihovny. Zkousel jsem to u vsech znamych, kteri
> maji krome me jeste nainstalovany W98 a stejnou verzi DIBENG - nikde
> problemy nejsou. Pada to hned pri startu te moji aplikace.

K cemu slouzi nevim, ale se stejnou chybou mi pada dost
zatvrzele Money2000 (stejne nevim, proc to maji jeste v D1). Zjistil
jsem, ze pokud jsem nemel naistalovany driver pro ATI rage 128 od
vyrobce ale nejaky default driver z W89, tak to slo.


S pozdravem

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


OT: Windows recorder

[*] Pavel Medek <Pavel.Medek(zv)talema(tec)cz> - 5.2.2000 08:59:55

Potreboval soft ala recorder z Windows 3.11.
Mam prezentaci vyrobku v HTML a chtel bych ji na vystave
nechat bezet a ona by mela skakat po strankach sama, proste
aby se to hejbalo samo. Potreboval bych tedy neco co
si nahraje to jak prochazim strankama a pak se to dalo ve
smycce pustit.
Nevite nekdo o necem ?

Budu rad i za podnet jak si takovy soft napsat sam, stacilo by kdyby
umel posilat prikazy do Exploreru tak uby to bral jako kliky na odkazy.


Diky

Pavel M.

Delphi 5

[*] Pavel Medek <Pavel.Medek(zv)talema(tec)cz> - 5.2.2000 08:59:52

Delphi 4 jsem nemel, prestoupil jsem z Delphi 3 a jsem velmi spokojen, v podstate me
neobtezuji zadne chyby. Navic se ve velmi brzke dobe chysta servis pack, ktery by mel
odstranit i ty drobne chybicky. Prechod na D5 vrele doporucuji.

----- Original Message -----
Rad bych se zeptal vsech, kdo mi budou ochotni odpovedet.
Jak se vam pracuje s Delphi5. Uvazuji o koupi, ale po spatnych skusenostech s Delphi4 vaham. Dodnes radeji pracuji s Delphi3. Ty mi samozrejme nemohou poskytnou vse co mi dnes nabizeji Delphi5. Nechci jenom opakovat svo skusenost, kdy jsem v podstate zbytecne nakoupil Delphi4.
Pracuji s verzi profesional.

Dekuji vsem za nazor a radu. Jaroslav Pospisil
pospisil(zv)japos.com


Jak prehrat novejsi verzi za chodu ?

[*] Pavel Medek <Pavel.Medek(zv)talema(tec)cz> - 5.2.2000 09:02:07

Mam asi 15 pocitacu v siti, na kterych je exe soubor.
Pak umistuji vzdy novejsi verzi na server.
Pri spusteni programu umim zjistit, ze verze na serveru je novejsi nez na
lokale.
No ted bych potreboval aby se program zavrel, natahla (prepsala) nova verze
a snovu spustil program.

Budu rad za kazde nasmerovani vpred.

Pavel


Windows recorder

[*] Jaroslav Klumpler <xklumpl(zv)informatics.muni(tec)cz> - 5.2.2000 10:22:52

> Budu rad i za podnet jak si takovy soft napsat sam, stacilo by kdyby
> umel posilat prikazy do Exploreru tak uby to bral jako kliky na odkazy.

Dela se to asi takhle:

Explorer :variant;

potom nekde na zacatku, napr. v OnCreate Formu napises:

Explorer:= CreateOleObject('Internetexplorer.Application');
Explorer.Visible := True;
Explorer.GoHome;

OnDestroy muze vypadat takhle:

if not VarIsEmpty(Explorer) then
begin
Explorer.Quit;
end;

A nakonec jsem pouzil komponentu Timer a v pravidelnych intervalech volal:

Explorer.Navigate(url);

kde url je string (napr. C:\www\index.htm) nacteny ze souboru, v kterem je
seznam vsech url te prezentace.

Neni to mozna dokonale, ale funguje to. Snad ti to pomuze.

Jaroslav Klumpler


Prace s COMy, padani na konci (problem s OleUninit

[*] Erik Salaj <winsoft(zv)napri.sk> - 5.2.2000 10:58:04

> Mam problem s padem programu. Program se sklada z nekolika (6) in-proc COM
> objektu.
> V vetsine z nich pouzivam VCL. Objekty maji 2 vlastni interface (jeden je
> pro vsechny stejny a jeden je specificky).
> Vytvareny jsou jako ciMultiInstance, ThrMod = tmSingle nebo tmApartment.
> Cela aplikace je tedy singlethread.
>
> Prace s programem probiha bez problemu, ale na zaver se objevi chyba s
> temito informacemi:
>
> MujEXE caused an invalid page fault in
> module KERNEL32.DLL at 015f:bff9dba7.
> Registers: ...
>
> Po zoufalych pokusech jsem zjistil, ze za to nejspis muze finalization u
> OLECtnrs.
> Nepredpokladam, ze by byla chyba v ni, proto se ptam, cim by to mohlo byt
> zpusobene.
> Domnivam se, ze delam nejakou chybu pri praci s COMama.

Nemas tam globalnu premennu typu interface? Ja som v takej premennej
drzal smernik na COM object a vo finalization unitu som ho rusil (priradenim
nil). Problem bol v tom, ze Delphi este predtym zavolalo CoUninitialize
(aj ked mi nie je jasne preco), toto volanie vsetky COM objekty zrusilo
ale moja premenna stale niekde ukazovala a po jej priradeni na nil (Delphi
vtedy implicitne zavola Release) to davalo chybovu hlasku.

Erik Salaj


Windows recorder

[*] Roman Fiser <rfiser(zv)leknet(tec)cz> - 5.2.2000 11:01:09

> Potreboval soft ala recorder z Windows 3.11.
> Mam prezentaci vyrobku v HTML a chtel bych ji na vystave
> nechat bezet a ona by mela skakat po strankach sama, proste
> aby se to hejbalo samo. Potreboval bych tedy neco co
> si nahraje to jak prochazim strankama a pak se to dalo ve
> smycce pustit.
> Nevite nekdo o necem ?
>

Vyresil bych to jednoduseji do hlavicky kazde HTML stranky pridas

<meta http-equiv="refresh" content="CAS; url=KAM_PRESMEROVAT">
Za cas si dosadis hodnotu po jakou dobu to ma byt videt v sekundach a pote
se automaticky nacte dokument
KAM_PRESMEROVAT. A na posledni strance si doplnis za KAM_PRESMEROVAT odkaz
na prvni dokument.
Tak udelas nekonecnou smycku


S pozdravem,
Roman Fiser,
roman(zv)management(tec)cz

Jak prehrat novejsi verzi za chodu ?

[*] Roman Fiser <rfiser(zv)leknet(tec)cz> - 5.2.2000 11:08:28

> Mam asi 15 pocitacu v siti, na kterych je exe soubor.
> Pak umistuji vzdy novejsi verzi na server.
> Pri spusteni programu umim zjistit, ze verze na serveru je novejsi nez na
> lokale.
> No ted bych potreboval aby se program zavrel, natahla (prepsala) nova
verze
> a snovu spustil program.

Ja to resim tak ze program spustli dalsi aplikaci a sam se ukonci, ta
aplikace pocka dokud se program neukonci a pote
stahne novou verzi, zazalohuje puvodni a pak ji nahradi novou,
kterou spusti.

Myslim ze se to za chodu te puvodni aplikace rozumne vyresit
neda.

S pozdravem,
Roman Fiser
roman(zv)management(tec)cz


Grafy

[*] p. Jirman <jim.design(zv)iol(tec)cz> - 5.2.2000 11:17:34

Staci kouknout na nejznamejsi stranky Delphi komponent a nakou FREE si vybra
t:

www.torry.ru
www.delphipages.com
na www.borland(tec)cz najdes odkaz na nejznamejsi DelphiSuperPage Polsko

M.Jirman

>From: SPELZA s.r.o. <spelza(zv)spelza(tec)cz>>Bohuzel mam jenom D4Std a grafy TeeCharts jsou pouze ve verzi Prof. Takze
>jeste jednou, nemate nekdo zkusenosti s nejakou komponentou pro grafy?

> From: SPELZA s.r.o. <spelza(zv)spelza(tec)cz>
> > potrebuji zobrazit grafickou formou vysledky mereni. Nevite o nejakych
> > komponentach (nejlepe free) ktere by toto umoznovaly. Staci mi klasicky
> > sloupcovy a carovy graf.
>

Jak prehrat novejsi verzi za chodu ?

[*] Jan Votava - DJsoft <djsoft(zv)top(tec)cz> - 5.2.2000 11:42:28

A co kdyby se jako prvni spoustela nejaka "spousteci" aplikace,
ktera by nejdriv zkontrolovala verzi prg, pripadne provedla update a pak
(pripadne aktualizovanou) aplikaci spustila?

Nebijte mne, je to jen napad.

Honza

----- Original Message -----
From: Pavel Medek <Pavel.Medek(zv)talema(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Saturday, February 05, 2000 9:02 AM
Subject: Jak prehrat novejsi verzi za chodu ?> Mam asi 15 pocitacu v siti, na kterych je exe soubor.
> Pak umistuji vzdy novejsi verzi na server.
> Pri spusteni programu umim zjistit, ze verze na serveru je novejsi nez na
> lokale.
> No ted bych potreboval aby se program zavrel, natahla (prepsala) nova
verze
> a snovu spustil program.
>
> Budu rad za kazde nasmerovani vpred.
>
> Pavel


ADO primo z ActiveX knihovny

[*] Erik Salaj <winsoft(zv)napri.sk> - 5.2.2000 11:57:48

> Pouzivam recordset pouze pro nacteni udaju, potom ho uvolnim.
> --------------
> RS:=FConnection.Execute(GetExecSql, rw, adCmdText);
> {GetExecSql je funkce kontruujici SQL select, rw: OleVariant promenna}
>
> with RS do
> while not eof do
> begin
> id:=fields['IdScreen'].value;
> scr:=VarToStr(fields['Name'].value);
> InsTreeSubNode(FScrNodes, scr, id, ccImage[id =
> frPDMain.DefaultScreen]);
> {InsTreeSubNode je procedura, ktera pracuje s temi daty}
> MoveNext;
> end;
>
> rs.close;
> rs:=nil;
>
> problemy jsou hlavne s update a insert :
> provedu nejakou sekvenci zmen pomoci SQL prikazu exec stp_Name par, insert
> neco, update neco
> a jakoby od urciteho prahu se ty prikazy neprovadeji. Po restartu programu
> je vse
> zase OK.

Tu je informacia priamo z dokumentacie MSDA SDK:

The returned Recordset object is always a read-only, forward-only cursor. If
you need a Recordset object with more functionality, first create a
Recordset object with the desired property settings, then use the Recordset
object's Open method to execute the query and return the desired cursor
type.

Cize namiesto Connection.Execute metody pouzi Recordset.Open.

Erik Salaj

Query & Thread

[*] Jirka Virt <virt(zv)volny(tec)cz> - 5.2.2000 12:24:39

Ahoj,
prosim vas, nepomohl by mi nekdo s komponentou tridy TQuery.

Snazil jsem se udelat TQuery na vlastnim Threadu (prikladem mi bylo CD
Delphi5 ...\BKQuery) , ale to porad neni ono.

Ja proste nemohu docilit toho, aby komponenta pracovala pri
Active := True,Open a ExecSql.
Dekuji za pomoc

Jirka Virt

email: virt(zv)volny(tec)cz

On-line

[*] Zdenek Drvota <drvota(zv)zds(tec)cz> - 5.2.2000 19:28:20

ano, ale pozor, je tady jeste doba mezi okamzikem,
kdy ten druhy modem zvedne "sluchatko"
(SPT zacne pocitat cas spojeni),
a dostupnosti internetu, to tato funkce patrne
neresi, a muze to byt treba cela minuta :-((

### p. Jirman napsal dne 4 Feb 00, v 18:09 :
> From: Vojt�ch Br�zda <xbrazda(zv)gymzr(tec)cz>
>
>
> >Cht�l bych ud�lat men�� aplikaci, kter� by po��tala pen�n� poplatky za
> p�ipojen� k Internetu. Nev�m ov�em jak zjistit, �e >byl aktivov�n modem a
> tud�, �e mohu zapo��t s po��t�n�m.
>
>
> Uz se to tu jednou resilo, jestli chces zjistit jestli je PC online pouzi
> toto:
>
> M. Jirman
>
> ----- Original Message -----
> From: Va�ek N�vrat
> To: Delphi forum
> Sent: Sunday, December 05, 1999 1:23 AM
> Subject: Re: On-line
>
>
> Ahoj !
> Mam pro Tebe reseni tohoto problemu. Nasledujici funkce testne, jestli ma
> v ten okamzik pocitac umoznen pristup na Internet - myslim, ze by to melo
> fungovat se vsemi druhy netoveho pripojeni, ale na modemu to funguje 100%.
>
> Function InternetGetConnectedState (lpdwFlags: LongInt; dwReserved:
> LongInt): Boolean; stdcall; external 'wininet.dll';
>
> implementation
>
> {$R *.DFM}
>
> Function TForm1.Test_Pripojeni (): boolean;
> var Flagy: LongInt;
> begin
> Flagy := 0;
> Result := InternetGetConnectedState(Flagy, 0);
> end;
>
> {pokud funkce vrati hodnotu TRUE, pocitac je prave pripojen na Net}
>
>
> S pozdravem...
> Vasek Navrat
> programator diskmagu Engine
>
>


-----------------------------------------------
Ing. Zdenek Drvota e-mail: drvota(zv)zds(tec)cz
director
ZDS, spol. s r.o.
Hronovicka 708 tel:+420-40-6613756
530 02 Pardubice fax:+420-40-6613756
Czech Republic http://www.zds(tec)cz
e-mail: info(zv)zds(tec)cz
Pripojte se k hledani mimozemskych civilizaci:
SETI(zv)Home http://setiathome.ssl.berkeley.edu
Darek, ktery nezklame? CeDecko od nas!
http://www.zds(tec)cz/cdrom/cdrom.asp?sender=mail


OT: Windows recorder

[*] Zdenek Drvota <drvota(zv)zds(tec)cz> - 5.2.2000 19:35:51

Ahoj
Udajne se da i ve win9x pouzit ten recorder
z win3.x, tak to muzes zkusit.

Apropo-uz nekdo videl aspon nejakou betu
Windows Millennium? MS s tim dela zatim velke
tajnosti, ale pritom ma byt (pry) venku uz
letos v lete...

### Pavel Medek napsal dne 5 Feb 00, v 8:59 :
> Potreboval soft ala recorder z Windows 3.11.
> Mam prezentaci vyrobku v HTML a chtel bych ji na vystave
> nechat bezet a ona by mela skakat po strankach sama, proste
> aby se to hejbalo samo. Potreboval bych tedy neco co
> si nahraje to jak prochazim strankama a pak se to dalo ve
> smycce pustit.
> Nevite nekdo o necem ?
>
> Budu rad i za podnet jak si takovy soft napsat sam, stacilo by kdyby
> umel posilat prikazy do Exploreru tak uby to bral jako kliky na odkazy.
>
>
> Diky
>
> Pavel M.
>
>


-----------------------------------------------
Ing. Zdenek Drvota e-mail: drvota(zv)zds(tec)cz
director
ZDS, spol. s r.o.
Hronovicka 708 tel:+420-40-6613756
530 02 Pardubice fax:+420-40-6613756
Czech Republic http://www.zds(tec)cz
e-mail: info(zv)zds(tec)cz
Pripojte se k hledani mimozemskych civilizaci:
SETI(zv)Home http://setiathome.ssl.berkeley.edu
Darek, ktery nezklame? CeDecko od nas!
http://www.zds(tec)cz/cdrom/cdrom.asp?sender=mail


Spo�i� obrazovky

[*] Ale� Kresta <ales.kresta(zv)atlas(tec)cz> - 5.2.2000 20:05:33

Ahoj,
chtel bych se zeptat, jestli(a jak??) jdou v Delphi psat sporice
obrazovky?
Diky za odpoved

Interbase SQL script +NT fonty

[*] J�n Tungli - 5.2.2000 23:46:40

Mam Windows NT WorkStation (Servis Pack6) a Interbase 5
Mam vytvorenu databazu s: Default character set WIN1250

Pokusim spustit SQL script, kde insertujem vety (varchar polia) do tabulky a
ISQL mi neustale odmieta vykonat - nekompactibilne znaky.
Ale znaky su normalne (bezna diaktitika ��軾����)
Ten isty SQL script pod W95 krasne ide.

Kde je zrada?

J�n TUNGLI
Email: tungli(zv)datapac.sk
URL: http://free.netlap.hu/4321/

Editor v gridu

[*] Vaclav Krmela <krmela(zv)ustinadorlici(tec)cz> - 5.2.2000 23:54:51

From: David Lebeda <david.lebeda(zv)comarr(tec)cz>

>
> pokousim se naprogramovat cosi vzhledove obdobneho jako Object
> inspector, tj. 2 sloupce, levy je fixni a obsahuje nazvy nejakych
> vlastnosti no a do praveho sloupce uzivatel doplnuje hodnoty.
> ...........

S sade komponent SiVCL4 je komponenta TPropertyBrowserSinea,
ktera by se dala na toto pouzit. Neni potomkem Gridu, ale Panelu.
Neni to uplne ono, ale dalo by se to velice snadno upravit.

Vaclav Krmela

Spo�i� obrazovky

[*] gT6 <gt6(zv)atlas(tec)cz> - 6.2.2000 00:09:03

[P��loha v souboru: ss-html.zip]
/// --- omlouvam se za prilohu
Ahoj,

viz. priloha

gT6

----- Original Message -----
From: Ale� Kresta <ales.kresta(zv)atlas(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Saturday, February 05, 2000 8:05 PM
Subject: Spo�i� obrazovky


> Ahoj,
> chtel bych se zeptat, jestli(a jak??) jdou v Delphi psat sporice
> obrazovky?
> Diky za odpoved

Jak prehrat novejsi verzi za chodu ?

[*] Pavol Stolc <pstolc(zv)sc.sknet.sk> - 6.2.2000 01:08:55

No ja myslim ze uplne standardne je v tejto suvislosti spustat aplikaciu
pomocou tzv.loaderu, ktoreho ulohou je zistit aktualnu verziu aplikacie a
vykonat potrebne kroky. Takyto loader je schopny trebars podla prihlasenia
alebo prostredia spustat aplikaciu s roznymi parametrami. Ale to uz je asi o
inom.

Pavol Stolc
pstolc(zv)sc.sknet.sk


Delphi 5

[*] Jaro <jaro(zv)sinea(tec)cz> - 5.2.2000 16:54:24 -0800

Delphi 5 jsou v dobrem stavu. Mne se tedy pracuje dobre. Jedinym vetsim
problemem jsou podstatne vyssi naroky na systemove zdroje oproti D3. Ovsem
prechodem na W2000 RC2 problemy s precerpavanim zdroju zcela odpadnou. Delphi 5
jsem spusti 30 x. Dal uz me to nebavilo. Zkuste to nekdo vyzkouset pod W95/98.
Tim chci naznacit, ze D5 se mnohem vice hodi pro WNT nebo W2000. Urcite se
vyplati prechod na D5 a W2000 soucasne. Odpadnou tez problemy s tuhnutim celeho
systemu. Precerpani systemovych zdroju bylo u D5 castou pricinou takoveho stavu,
alespon do doby nez jsem si ty zdroje zacal hlidat.
Jaro
===
Rad bych se zeptal vsech, kdo mi budou ochotni odpovedet.
Jak se vam pracuje s Delphi5. Uvazuji o koupi, ale po spatnych skusenostech s
Delphi4 vaham. Dodnes radeji pracuji s Delphi3. Ty mi samozrejme nemohou
poskytnou vse co mi dnes nabizeji Delphi5. Nechci jenom opakovat svo skusenost,
kdy jsem v podstate zbytecne nakoupil Delphi4.
Pracuji s verzi profesional.

Dekuji vsem za nazor a radu.


Jaroslav Pospisil
pospisil(zv)japos.com


Zmena cizi aplikace

[*] Lumir Karas <lumir.delphi(zv)post(tec)cz> - 5.2.2000 22:39:28 -0800

Ahoj vsichni ve spolek,
urcite to tu bylo, ale potreboval bych zmenit vlastnosti jedne bezici aplikace jako zrusit vlastnost fsStayOnTop nebo ji schovat (zneviditelnit), pripadne zmenit jeji souradnice. Je porad OnTop a na miste, ktere prekazi normalni praci.

Pravdepodobne bych postupoval, ze bych si nasel jeji HANDLE (ale kde si mohu z jistotou zjistit jeji jmeno) a pak s ni pres nej pracoval ale nevim jestli ma kazda vlastnost, kterou potrebuji v aplikaci zmenit svou specifickou proceduru nebo je na to neco obecnejsiho (neco k cemu mohu pristupovat jako TAplication nebo TForm).

Z meho clanku je asi zrejme ze jsem amater a toto jsem jeste nedelal. Proto jestli muzete pomoci predem dekuji.

Lumir.

OF: Komponenty pro Delphi 5 zadarmo!

[*] Jaro <jaro(zv)sinea(tec)cz> - 5.2.2000 22:43:21 -0800

Pripravili jsme pro Delphiny inovovanou sadu komponent SiVCL4 pro Delphi5.
Knihovna by mela byt pouzitelna i pro nizsi verze Delphi.

Vice informaci ziskate na nasem serveru www.sinea(tec)cz v casti "aktuality".
Knihovnu i se zdroji muzete ziskat bezplatne, pokud si ji stahnete z uvedeneho
serveru v casti "download".

Znovu pripominam, ze ucastnici seminare Delphi 2000 mohou ziskat generator
tiskovych sestav pro Delphi 4 a 5 take zcela bezplatne.

S pozdravem Jaro

---------------------------------------------
SINEA software, Ing Jaroslav Skerik, ZAMBERK
e-mail: jaro(zv)sinea(tec)cz http://www.sinea(tec)cz
phone: 0446 612468, mobile phone: 0602 581255
---------------------------------------------


Zadost o prelozenou UDFLIB.DLL z Interbase

[*] Pavel Bare� <Atoll(zv)telecom(tec)cz> - 6.2.2000 11:15:21

Mohl by mi prosim nekdo poslat prelozenou UDFLIB.DLL z Interbase.
Je to soucast Examplse k IB ve zdrojakach, ale ja bohuzel nemam C prekladac.
Poterboji funkci SYSDATE, nebo nejakou, ktera vrati aktualni datum prip. i cas na serveru.

predem moc dekuji

Pavel Bares
Atoll s.r.o.

Jak urychlit ziskani odpovedi v konferenci (Was:

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 6.2.2000 13:17:51

From: Petr Va���ek <czechitout(zv)email(tec)cz>
> Mam takovy problem a byl bych strasne vdecny, kdyby mi s nim nekdo pomohl.

Ahoj,

Je zde urcite dost lidi, kteri by Tobe i jinym radi pomohli. Ale k tomu je
nutne znat vice podrobonosti, predevsim alespon verzi Delphi a aplikovane
servis packy (pokud existuji). Staci tedy napsat, napriklad:

Mam D5 Prof., W95

nebo v pripade problemu s komponentami dodavanymi s Delphi od jinych firem
(napriklad QuickReport) i jejich verzi, tedy treba:

QR 3.0.5

Reseni konkretniho problemu je nekdy opravdu dost rozdilne dle verze Delphi.

Petr Vones, amatersky programator


Tisk ve WIN 3.x

[*] Konference DELPHI <vegainfo(zv)post(tec)cz> - 6.2.2000 13:40:34

Jak vytisknout bitmapu BMP na A4
"fit to screen" ve WINDOWS 3.X?

(DELPHI 1)

DIky moc

Zmena cizi aplikace

[*] gT6 <gt6(zv)atlas(tec)cz> - 6.2.2000 13:56:15

Ahoj,
pokud je aplikace napsana v C/Delphi, tak zkus Restorator 2.5 (www.bome.com).

gT6
----- Original Message -----
From: Lumir Karas
To: Konference Delphi
Sent: Sunday, February 06, 2000 7:39 AM
Subject: Zmena cizi aplikace


Ahoj vsichni ve spolek,
urcite to tu bylo, ale potreboval bych zmenit vlastnosti jedne bezici aplikace jako zrusit vlastnost fsStayOnTop nebo ji schovat (zneviditelnit), pripadne zmenit jeji souradnice. Je porad OnTop a na miste, ktere prekazi normalni praci.

Pravdepodobne bych postupoval, ze bych si nasel jeji HANDLE (ale kde si mohu z jistotou zjistit jeji jmeno) a pak s ni pres nej pracoval ale nevim jestli ma kazda vlastnost, kterou potrebuji v aplikaci zmenit svou specifickou proceduru nebo je na to neco obecnejsiho (neco k cemu mohu pristupovat jako TAplication nebo TForm).

Z meho clanku je asi zrejme ze jsem amater a toto jsem jeste nedelal. Proto jestli muzete pomoci predem dekuji.

Lumir.

ListView

[*] Pavel Serbajlo <serb(zv)mikulov.sol(tec)cz> - 6.2.2000 15:59:08

no jo, ale v jake udalosti? Jak poznam, ze ListView prekrilo jine okno
nebo aplikace?

On Fri, 4 Feb 2000, Michal Hlavac wrote:

> Skus pouzit refresh;
>
> Miso
>
> -----P�vodn� zpr�va-----
> Od: Pavel Serbajlo <serb(zv)mikulov.sol(tec)cz>
> Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
> Datum: 4. febru�r 2000 14:50
> P�edm�t: ListView
>
>
> >Hi,
> >
> >Mam ListView, ktery obsahuje nekolik ListItems ... tyto prvky spojuji
> >carou, kterou kreslim primo na canvas. Problem nastava tehdy, pokud
> >listview prekryju jinym oknem ... vsechny casti car, ktere se skryvaly za
> >timto oknem zmizi a neprekresli se, ListItems ale ano ... zkousel jsem
> >cary dokreslovat v ruznych udalostech(OnCustomDraw,OnCustomDrawItem...)
> >ale nic nepomohlo...
> >
> >Muze mi nekdo poradit jak na to?
> >
> >
> >Win98, D5
> >
> >dik
> >Pavel Serbajlo
> >
> >
>

Delphi 5

[*] p. Jirman <jim.design(zv)iol(tec)cz> - 6.2.2000 16:55:09

Take se pripojuji, protoze jsem presel z D3 do D5 (hlavne kvuli ADO apod.),
a obcas se mi stane, ze najednou na par vterin ztuhnou (mam P233MMX 100MB RA
M W98),
ale to rozhodne nemuze prevazit jejich bezchybnost a spoustu novych veci (MI
DAS,CORBA apod.)
Takze prechod nejen doporucuji, ale povazuji za nutnost.

M.Jirman

----- Original Message -----
From: Jaro <jaro(zv)sinea(tec)cz>> Delphi 5 jsou v dobrem stavu. Mne se tedy pracuje dobre. Jedinym vetsim
> problemem jsou podstatne vyssi naroky na systemove zdroje oproti D3. Ovse
m
> prechodem na W2000 RC2 problemy s precerpavanim zdroju zcela odpadnou. Del
phi 5
> jsem spusti 30 x. Dal uz me to nebavilo. Zkuste to nekdo vyzkouset pod W95
/98.
> Tim chci naznacit, ze D5 se mnohem vice hodi pro WNT nebo W2000. Urcite se
> vyplati prechod na D5 a W2000 soucasne. Odpadnou tez problemy s tuhnutim c
eleho
> systemu. Precerpani systemovych zdroju bylo u D5 castou pricinou takoveho
stavu,
> alespon do doby nez jsem si ty zdroje zacal hlidat.
> Jaro
> ===
> Rad bych se zeptal vsech, kdo mi budou ochotni odpovedet.
> Jak se vam pracuje s Delphi5. Uvazuji o koupi, ale po spatnych skusenostec
h s
> Delphi4 vaham. Dodnes radeji pracuji s Delphi3. Ty mi samozrejme nemohou
> poskytnou vse co mi dnes nabizeji Delphi5. Nechci jenom opakovat svo skuse
nost,
> kdy jsem v podstate zbytecne nakoupil Delphi4.
> Pracuji s verzi profesional.

Tisk ve WIN 3.x

[*] p. Jirman <jim.design(zv)iol(tec)cz> - 6.2.2000 17:16:08

Jestli je v D1 TPrinter tak by to slo pres nej.

M. Jirman
----- Original Message -----
From: Konference DELPHI
To: delphi-l(zv)fwd(tec)cz
Sent: Sunday, February 06, 2000 1:40 PM
Subject: Tisk ve WIN 3.x


Jak vytisknout bitmapu BMP na A4
"fit to screen" ve WINDOWS 3.X?

(DELPHI 1)

DIky moc

JPEG - errory

[*] Tom� Fr�ba - 6.2.2000 17:46:06

M�l bych tu drobn� probl�mek. M�m n�jak� probl�my se zobrazov�n�m JPEG�.
P�e mi to errory, nap�. #52,#41. Cht�l bych se proto dot�zat, jestli n�kdo nev�te, co s t�m, p��padn� kde naj�t jejich seznam. Nebo m�m snad chybu v programu?

P�edem D�kuji za odpov��.

Tom� Fr�ba


offtopic - POP3 server

[*] Petr Mat�jovsk�����隲����ej�� - 6.2.2000 20:29:40

Ahoj

Neznate nekdo nejaky POP3 server, ktery beha pod W95 nebo NT a je FREE ???
Nasel sem servery pouze pod Linux.

Moc se omlouvam za offtopic

Petr Matejovsky

Delphi 5

[*] Delphi Konferencia <delphi(zv)enterkosice.sk> - 6.2.2000 21:30:14

Ako je to s aplikaciami napisanymi v D5 - chodia pod
Win95/98 v poriadku, alebo treba taktiez Win2000?
Alebo treba zapnut sledovanie systemu :-))

Dufam ze nie.

forgo

> >
> > Take se pripojuji, protoze jsem presel z D3 do D5 (hlavne kvuli ADO
apod.),
> > a obcas se mi stane, ze najednou na par vterin ztuhnou (mam P233MMX
100MB RA
> > M W98),
> > ale to rozhodne nemuze prevazit jejich bezchybnost a spoustu novych veci
(MI
> > DAS,CORBA apod.)
> > Takze prechod nejen doporucuji, ale povazuji za nutnost.
>
> Problem je v tom, ze i kdybys mel 500 MB RAM, tak pod W98
> ti to se systemovymi zdroji nepomuze. Musis si zapnout sledovani
> systemu a jak se blizis k cervene (asi 15%), tak je nutne pozavirat
> par formularu.
> Vhodnejsi je vsak prejit na lepsi wokna
>
> Jaro
>
> >
> > M.Jirman
> >
> > ----- Original Message -----
> > From: Jaro <jaro(zv)sinea(tec)cz>
> >
>
>

Radiotrack

[*] katerina.zankova(zv)post(tec)cz - 6.2.2000 21:48:33

Nevi nekdo, jak ovladat kartu RadioTrack
od AIMS Lab? Je to 1. verze karty.

Dodavany software je uplne priserny,
obzvlast v oblasti ladeni.

D4/WINDOWS 98

Diky Katka


Pro kazdeho e-mailova schranka zdarma na:
*** http://POST.CZ

Radiotrack

[*] bohous m <bohous_m(zv)seznam(tec)cz> - 06.2.2000 22:51:55

Ma nekdo zkusenosti s posilanim zprav
pres WIN POPUP?

Jde mi o zasilani a prijimani zprav.

Vim, ze win popup pouziva nejakou
virtualni schranku, ke ktere pristupuje.

Poradi nekdo, jak v DELPHI k tomuto
pristupovat a jak s tim pracovat? Pouzivam
DELPHI 4 standartni a W98 SE.

dIKY


-- http://email.seznam(tec)cz
-- email zdarma na cely zivot


Palety v Delphi II

[*] Petr Va���ek���s7��+h��ޙ���̿ - 6.2.2000 22:37:41

Dobry den,
Mam takovy problem a byl bych strasne vdecny, kdyby mi s nim nekdo pomohl.
Potreboval bych vedet, jak v Delphi u nejakeho Projectu muzu menit napriklad
barvu Menu, Buttonu apod. Vim, ze normalne je to zavisle na nastaveni
Windows, ale muzu si nejak nastavit v mem Projectu, aby napriklad barva menu
byla clNavy a text v menu clWhite?
Dekuju moc za odpoved
Petr Vasicek
(Mam Delphi 4 Client/Server Suite, Win98)

On-line

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 6.2.2000 23:13:34

From: Zdenek Drvota <drvota(zv)zds(tec)cz>
> ano, ale pozor, je tady jeste doba mezi okamzikem,
> kdy ten druhy modem zvedne "sluchatko"
> (SPT zacne pocitat cas spojeni),
> a dostupnosti internetu, to tato funkce patrne
> neresi, a muze to byt treba cela minuta :-((

Ahoj,

To je pravda, lze to resit zadanim nejake pevne konstanty, ktera pak bude
castecne eliminovat tuto chybu. Videl bych vsak i jina reseni, vetsina
slusnych provideru poskytuje casovy rozpis pripojeni, ze ktereho lze pak
urcit priblizne provolanou castku. Ono pri tech astronomickych cenach je
nejaka ta koruna uz nepodstatna.

> > Mam pro Tebe reseni tohoto problemu. Nasledujici funkce testne, jestli ma
> > v ten okamzik pocitac umoznen pristup na Internet - myslim, ze by to melo
> > fungovat se vsemi druhy netoveho pripojeni, ale na modemu to funguje 100%.
> >
> > Function InternetGetConnectedState (lpdwFlags: LongInt; dwReserved:

K tomu poznamka, tato funkce je dostupna po instalaci IE4 a vyssi, coz by
ale nemel byt problem. Dalsi moznost je periodicky sledovat pocet aktivnich
RAS pripojeni pres RasEnumConnections nebo monitorovat TAPI volani.

Preklad RAS hlavicek (vcetne maleho dema) najdes tady (RAS.ZIP):
http://delphi-jedi.org/Jedi:APILIBRARY:127651041

Petr Vones, amatersky programator

Radiotrack

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 6.2.2000 23:13:40

From: <katerina.zankova(zv)post(tec)cz>
> Nevi nekdo, jak ovladat kartu RadioTrack
> od AIMS Lab? Je to 1. verze karty.
>
> Dodavany software je uplne priserny,
> obzvlast v oblasti ladeni.

Ahoj,

Neco je ke stazeni tady, je to sice v C, ale to si snadno prelozis:
http://free.prohosting.com/~ctsir/software/pradio/rt-sdk.zip

Petr Vones, amatersky programator


Delphi 5

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 6.2.2000 23:13:56

From: Delphi Konferencia <delphi(zv)enterkosice.sk>
> Ako je to s aplikaciami napisanymi v D5 - chodia pod
> Win95/98 v poriadku, alebo treba taktiez Win2000?

Ahoj,

Pokud v nich prilis nepouzivas komponenty TBitBtn, TSpeedButton a TDBNavigator
tak je to zcela bez problemu i na W9x. V rozsahlych aplikacich je dobre trochu
setrit se systemovymi zdroji, pokud uvazujes jejich provoz na W9x.

Petr Vones, amatersky programator

QuickReport a nastaveni tiskarny

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 6.2.2000 23:14:09

From: Hojda Pavel <hojda(zv)mmp.plzen-city(tec)cz>
> pouzivam D4 a sestavy QuickReport. Kdyz dam jen samotny tisk
> sestavy, tak vse probehne v poradku. Pokud ale pred tiskem spustim print
> setup a chci napr. nastavit rozsah tisku stranek od-do, tak po stisku
> tlacitka -tisk- to zahlasi chybu List index out of bounds(6) a nekdy se
> vytiskne jen titulek sestavy. Potom uz ani nelze sestavu zobrazit. Kdyz
> ukoncim aplikaci a postim sestavu znovu, tak potom se sestava zobrazi.

Ahoj,

A mas nejnovejsi update QR3.0.5 ? Pokud ne, tak si jej stahni od QuSoftu:
http://www.qusoft.no/scripts/download.dll/getfile?Filename=QR305SD4.EXE

Petr Vones, amatersky programator

AUTOSIZE na StatusBar.

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 6.2.2000 23:14:56

From: Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk>
> Ako by sa dalo spravit nieco ako AutoSize of Panels Width na StatusBare ?

Ahoj,

Pokud jsem to dobre pochopil, tak treba takhle:

procedure TForm1.Button1Click(Sender: TObject);
var
S: String;
begin
S := '123';
with StatusBar1 do
begin
Canvas.Font := Font;
Panels[0].Width := Canvas.TextWidth(S) + 6;
Panels[0].Text := S;
end;
end;

Petr Vones, amatersky programator

Spo�i� obrazovky

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 6.2.2000 23:14:13

From: Ale� Kresta <ales.kresta(zv)atlas(tec)cz>
> chtel bych se zeptat, jestli(a jak??) jdou v Delphi psat sporice
> obrazovky?

Ahoj,

Priklad najdes tady:
http://community.borland.com/article/0,1410,19534,00.html

Petr Vones, amatersky programator

Zmena cizi aplikace

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 6.2.2000 23:14:40

From: Lumir Karas <lumir.delphi(zv)post(tec)cz>
> urcite to tu bylo, ale potreboval bych zmenit vlastnosti jedne bezici aplikace jako
> zrusit vlastnost fsStayOnTop nebo ji schovat (zneviditelnit), pripadne zmenit jeji
> souradnice. Je porad OnTop a na miste, ktere prekazi normalni praci.

Ahoj,

Nejdrive musis zjistit alespon tridu toho okna. To lze pomoci nastroje WinSight
ktery mas u Delphi. Jako priklad jsem pouzil "Sledovani systemu". To ma ponekud
nezvykle nazev tridy okna cesky (vetsinou to tak nebyva).

procedure TForm1.Button2Click(Sender: TObject);
var
W: HWND;
begin
W := FindWindow('Sledov�n� syst�mu', nil);

SetWindowPos(W, HWND_NOTOPMOST, 0, 0, 0, 0,
SWP_NOSIZE or SWP_NOMOVE or SWP_SHOWWINDOW);

SetWindowPos(W, 0, 10, 10, 0, 0,
SWP_NOSIZE or SWP_NOACTIVATE or SWP_NOZORDER);
end;

Petr Vones, amatersky programator

ListView

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

From: Pavel Serbajlo <serb(zv)mikulov.sol(tec)cz>
> Mam ListView, ktery obsahuje nekolik ListItems ... tyto prvky spojuji
> carou, kterou kreslim primo na canvas. Problem nastava tehdy, pokud
> listview prekryju jinym oknem ... vsechny casti car, ktere se skryvaly za
> timto oknem zmizi a neprekresli se, ListItems ale ano ... zkousel jsem
> cary dokreslovat v ruznych udalostech(OnCustomDraw,OnCustomDrawItem...)
> ale nic nepomohlo...

Ahoj,

Muzes to udelat napriklad takhle:

procedure TForm1.ListView1CustomDraw(Sender: TCustomListView;
const ARect: TRect; var DefaultDraw: Boolean);
begin
with Sender.Canvas do
begin
Pen.Width := 2;
MoveTo(50, 20);
LineTo(100, 20);
end;
end;

Petr Vones, amatersky programator

JPEG - errory

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 6.2.2000 23:15:08

From: Tom� Fr�ba <fryba(zv)volny(tec)cz>
> M�l bych tu drobn� probl�mek. M�m n�jak� probl�my se zobrazov�n�m JPEG�.
> P�e mi to errory, nap�. #52,#41. Cht�l bych se proto dot�zat, jestli
> n�kdo nev�te, co s t�m, p��padn� kde naj�t jejich seznam. Nebo m�m snad
> chybu v programu?

Ahoj,

Nedavno o tom byl clanek na community webu:
http://community.borland.com/article/0,1410,20433,00.html

Petr Vones, amatersky programator

OT: Windows recorder

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 6.2.2000 23:15:36

From: Zdenek Drvota <drvota(zv)zds(tec)cz>
> Udajne se da i ve win9x pouzit ten recorder
> z win3.x, tak to muzes zkusit.

Ahoj,

Tady je clanek, kde je popsana podobna aplikace pro Win9x:
http://zive.cpress(tec)cz/r-art.asp?id=2807&app=0x6877405&ref=9

> Apropo-uz nekdo videl aspon nejakou betu
> Windows Millennium? MS s tim dela zatim velke
> tajnosti, ale pritom ma byt (pry) venku uz
> letos v lete...

No potes, uz ted z toho mam hruzu. Co jsem cetl, tak uz to pry MS nekolikrat
stornoval pro nepouzitelnost vytvoreneho grafickeho rozhrani. Doufejme ze MS
nepripravi na dalsi rok i novou verzi MS-DOSu :-)

Petr Vones, amatersky programator


Delphi 5

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 6.2.2000 23:15:25

From: Jaro <jaro(zv)sinea(tec)cz>
> Delphi 5 jsou v dobrem stavu. Mne se tedy pracuje dobre. Jedinym vetsim
> problemem jsou podstatne vyssi naroky na systemove zdroje oproti D3. Ovsem

Ahoj,

Presne tak, Delphi 5 je na tom rozhodne lepe nez D4, takze bych jej taktez
doporucoval. Ohledne systemovych zdroju na Win9x, soucasti Windows je mala
utilita "Meric systemovych prostredku" (lze ji doinstalovat z Ovl.Panely ->
System -> Pridat/Ubrat programy -> System -> Prislusenstvi -> Detaily...).
Ta slouzi prave k monitorovani volnych syst.zdroju, tray ikona pak prubezne
ukazuje volne prostredky, pokud tyto poklesnou pod 10% zobrazi dialog s
varovnym hlasenim cimz lze predejit pripadnemu krachu systemu. Po jeji
instalaci je pak vhodne si ji pridat i do seznamu aplikaci Po spusteni.

> prechodem na W2000 RC2 problemy s precerpavanim zdroju zcela odpadnou. Delphi 5
> jsem spusti 30 x. Dal uz me to nebavilo. Zkuste to nekdo vyzkouset pod W95/98.

Spustil jsem jej 4x, zbylo jeste cca 20% GDI.

> Tim chci naznacit, ze D5 se mnohem vice hodi pro WNT nebo W2000. Urcite se
> vyplati prechod na D5 a W2000 soucasne. Odpadnou tez problemy s tuhnutim celeho

Uz jen proto, ze nektere vlastnosti nejsou ve Win9x podporovany, jako napriklad
ladeni vice procesu.

Petr Vones, amatersky programator

ProgressBar na StatusBare.

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 6.2.2000 23:15:04

From: Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk>
> Ako nastavim aby na mojom Style:=fsMDIForm je statusbar na ktory chcem
> umiestnit ProgressBar alebo Gauge ale stale mi to dava mimo a potom preraza
> cez fsMDIChild okna. HowTo ?

Ahoj,

TStatusBar neni kontainerem pro dalsi komponenty. Lze si vsak odvodit od
neho novou komponentu a tu upravit aby do ni bylo mozno umistovat dalsi
komponenty: TXYStatusBar = class(TStatusBar)
public
constructor Create(AOwner: TComponent); override;
end;

constructor TXYStatusBar.Create(AOwner: TComponent);
begin
inherited;
ControlStyle := ControlStyle + [csAcceptsControls];
end;

Petr Vones, amatersky programator

Grafy

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 6.2.2000 23:15:57

From: SPELZA s.r.o. <spelza(zv)spelza(tec)cz>
> Bohuzel mam jenom D4Std a grafy TeeCharts jsou pouze ve verzi Prof. Takze
> jeste jednou, nemate nekdo zkusenosti s nejakou komponentou pro grafy?

Ahoj,

Pak se tedy podivej do palety komponent ActiveX, tam by jsi mel mit alespon
ChartFx a VtChart.

Petr Vones, amatersky programator

DIBENG.DLL

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 6.2.2000 23:15:53

From: Mirun <forcom(zv)telecom(tec)cz>
> Myslim, ze mi neco podobneho zlobilo pri pouziti X-barevne bitmapy, jejiz
> barevna hloubka byla vetsi nez nastavena na obrazovce. Zkus zmenit barevnou
> hloubku, (na vice barev), pokud to tim zmizi, prohledni si bitmapy.

Ahoj,

V knowlegde base MS pri teto chybe doporucuje budto aktualizovat driver video
karty nebo prepnout na vetsi barevnou hloubku (alespon HighColor 16bitu). Dale
to pry take zpusobuji nektere drivery HP tiskaren.

Petr Vones, amatersky programator

Zatuhnuti Delphi pri startu aplikace

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

From: Matula M <asexrm(zv)telecom(tec)cz>
> Delphi je hodne citline na HW. Pokud mas pretaktovany procesor atd., staci
> mirne zvyseni teploty a nastanou uvedene problemy. Stejne je to s pameti.
> Pokud je napr. druhy SIM jinych parametru nez prvy, nebo je pomalejsi.

Ahoj,

Coz plati nejen pro Delphi ale i jine aplikace :-) Zkratka HW neni dobre
podcenovat a pocitac sestaveny z kdejakeho srotu (MB Tomato & spol.. ;-)
se na vaznejsi praci zkratka moc nehodi. Pretaktovavani procesoru je jiz
kapitola sama pro sebe. Dost dobre jsem nikdy nepochopil vyznam toho mit
o par % rychlejsi procesor (zvlaste kdyz HD jsou vcelku stale jeste dost
pomale) za cenu zvysene nespolehlivosti a celkove nestability systemu.

Petr Vones, amatersky programator

Zatuhnuti Delphi pri startu aplikace

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 6.2.2000 23:16:10

From: Marian Winkler <ag.art(zv)iol(tec)cz>
> nemam moc velke zkusenosti, ale proc jsou podle Tebe
> W95 OSR2 stabilnejsi nez W98. Celkem kratkou dobu

Ahoj,

Vychazim jen z praktickych zkusenosti (ktere samozrejme nejsou objektivnim
meritkem) kde problemy s W98 jsou vetsi nez s W95 OSR2. Dale je nutne brat
v uvahu, ze W98 jsou jeste stale dost "mlade", takze terpve snad W98 SE by
mohly byt pouzitelne.

Petr Vones, amatersky programator

Zatuhnuti Delphi pri startu aplikace

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 6.2.2000 23:18:25

From: Jaroslav Nadhera <nadhera(zv)csh(tec)cz>
> A co kdyz se deje neco takoveho u zakaznika (treba jen u jednoho ze sta).
> Mam jej nutit k prechodu na NT nebo si instalovat IE5, kdyz on ani nevi, co
> to je. Nebo mu mam koupit NT za sve? Protoze on ma jakesi Windowsy a na
> zrovna tech jeho MUSI (podle jeho nazoru) chodit veskery software (i kdyz by
> byla ve Windowsech chyba). A pokud neco nechodi, neni to chyba Windowsu, ale
> aplikacniho softwaru. Nejlepsi je argument "me chodi Word, tak mam vse v
> poradku, ale ten vas soft je tak mizernej, ze u me nechodi".

Ahoj,

Dobre, ale co chces tedy slyset ? Nechci zde delat zadneho advokata Microsoftu,
ale je dobre si pripomenout ze rada Windows9x jsou vlastne jen takova hracka do
kancelare na Office nebo pro doma na hry a Internet, na vaznou praci jsou NTcka.
Ze si je ne kazdy muze (chce) dovolit pochopil i MS, kdyz opet pracuje na dalsi
spotrebitelske verzi Windows, opet nezalozene na NT (bohuzel).

Samozrejme i za takove situace lze udrzet Windows9x v pouzitelnem stavu, ale to
vyzaduje urcitou spolupraci i od uzivatele. Pokud ma na pocitaci alespon trochu
dulezita data, da si obvykle rict, ze neni mozne vzit CD prilohu z libovolneho
pocitacoveho casopisu a nainstalovat tam veskere smeti co se na tom CD najde se
slovy: "Vsak on si s tim ten system nejak poradi...". To je take jeden z duvodu
proc se v nekterych firmach aplikuje (ne vzdy smysluplnym a rekneme i citlivym
zpusobem) systemova politika omezujici uzivatelum "delat si co chteji". Svet uz
je ale takovy ....

Univerzalni reseni za tohoto stavu zkratka neexistuje, lze ale prece definovat
zakladni podminky pro provoz te ci one aplikace, a to jak HW tak SW. Pripadne
problemy lze pak resit technickou podporou.

V budoucnosti bude mozna pro nektere ulohy vyhodnejsi pouziti jednoucelovych
systemu (zalozenych napriklad na procesorech Crusoe od fy Transmeta). Stale
masivnejsim nasazovanim vypocetni techniky se pro nektere ucely prave sikora
programovatelnost a univerzalnost operacnich systemu neukazuje jako zcela
optimalni reseni. Nemluve o tom, ze soucasne opojeni technikou a "dulezitosti"
ohromneho mnozstvi informaci treba casem opet pomine a lidstvo se zacne
zaobirat jinymi problemy, ale to uz je zcela jina debata ... :-)

Petr Vones, amatersky programator


TaskBar

[*] Adler Michal <adler(zv)nex.tel(tec)cz> - 6.2.2000 23:44:24

Preju hezky vecer,
mel bych tady takovou prkotinku. Potrebuju, aby po startu moji aplikace
nebylo videt jeji tlacitko na taskbaru. Vi nekdo jak to zaridit?

ShowWindow(Handle,sw_Hide);
SetActiveWindow(Application.Handle);
ShowWindow(Application.Handle, SW_Hide);

tohle mi nejak nefunguje (teda ne pri staru). Pokud to zavolam treba stiskem
tlacitka, tak je to v poradku, ale ja potrebuju aby se aplikace vubec
neukazala na taskbaru.

Predem dekuju za jakoukoliv odpoved.

Zatuhnuti Delphi pri startu aplikace

[*] Lud�k ZITA - 7.2.2000 01:14:12

From: Petr Vones <pvones(zv)mbox.vol(tec)cz>
> From: Marian Winkler <ag.art(zv)iol(tec)cz>
> > nemam moc velke zkusenosti, ale proc jsou podle Tebe
> > W95 OSR2 stabilnejsi nez W98. Celkem kratkou dobu
>
> Ahoj,
>
> Vychazim jen z praktickych zkusenosti (ktere samozrejme nejsou objektivnim
> meritkem) kde problemy s W98 jsou vetsi nez s W95 OSR2. Dale je nutne brat
> v uvahu, ze W98 jsou jeste stale dost "mlade", takze terpve snad W98 SE by
> mohly byt pouzitelne.
>
> Petr Vones, amatersky programator

Moje zkusenost (cca 20 PC pomer W98 : W95 cca 1 : 1,5 . HW od P166MMX pres
ruzne Celerony az k PII533, nejcasteji ovsem CELERON 400)
1) Pro PC s procesorem pomalejsim nez C400 nebo pameti mensi nez 64 MB
jedine W95 (samozrejma OSR2)
2) Pro "lepsi" procesory s RAM alespon 64MB je zase naopak lepsi a
stabilnejsi W98 (rozdil mezi "normalnimi" a SE zatim prakticky nepoznatelny)
Je ovsem treba si dat pozor na vyber videokarty. Ve dvou pripadech jsem
vznikle potize odstranil vymenou velmi exotickych videokaret za RIVU TNT
Vsude jsou ovsem rozumne MB.
Ty PC jsem nestavel a jde o vice zakazniku s ruznymi SW pozadavky a PC
pochazeji z ruznych zdroju.
Vsude beha BDE a Paradox!!!! tabulky vetsinou tak 2-4 PC v siti
peer-to-peer.
Nemam vyraznejsi problemy.
Nejvice ovsem zalezi na KAZNI ZAKAZNIKA.
Pokud vezme kazde CD z nejakeho casopisu a nacpe tam co tam najde je konec.

Ludek ZITA


periodicky backup

[*] Marian Winkler <ag.art(zv)iol(tec)cz> - 7.2.2000 01:30:07

Ahoj,

Jak jde co nejjednoduseji zajistit periodicky backup
celeho adresare?
Potrebuji to pro D5 i D1 ve Win9x.

Predem dik.

ag.art
Marian Winkler
ag.art(zv)iol(tec)cz
GSM: +42 0604 880 555

dodatecne zavedeni ref. integrity

[*] Marian Winkler <ag.art(zv)iol(tec)cz> - 7.2.2000 01:34:46

Ahoj,

mam prosbu. Do starsi aplikace pod D1 bych potreboval
dodatecne pridat referencni integritu bez vetsich zasahu do kodu.
Jak to provest co nejbezbolestneji?
Data jsou v Paradoxu 5.

Dik

ag.art
Marian Winkler
ag.art(zv)iol(tec)cz
GSM: +42 0604 880 555

Delphi 5

[*] Jaro <jaro(zv)sinea(tec)cz> - 6.2.2000 20:08:49 -0800

>
> Take se pripojuji, protoze jsem presel z D3 do D5 (hlavne kvuli ADO apod.),
> a obcas se mi stane, ze najednou na par vterin ztuhnou (mam P233MMX 100MB RA
> M W98),
> ale to rozhodne nemuze prevazit jejich bezchybnost a spoustu novych veci (MI
> DAS,CORBA apod.)
> Takze prechod nejen doporucuji, ale povazuji za nutnost.

Problem je v tom, ze i kdybys mel 500 MB RAM, tak pod W98
ti to se systemovymi zdroji nepomuze. Musis si zapnout sledovani
systemu a jak se blizis k cervene (asi 15%), tak je nutne pozavirat
par formularu.
Vhodnejsi je vsak prejit na lepsi wokna

Jaro

>
> M.Jirman
>
> ----- Original Message -----
> From: Jaro <jaro(zv)sinea(tec)cz>
>

OT: Disk I/O error + MS Outlook

[*] caoperator(zv)ozjc.cpost(tec)cz - 7.2.2000 6:52:18

Zdravim po narocnem vikendu 8^),

mam dva dotazy:

1. Kdyz si vytvorim formular, kde mam komponentu DriveComboBox a DirectoryListBox, tyto komponenty propojim mezi sebou relaci DirectoryListBox.Drive := DriveComboBox.Drive, tak mi to funguje do te doby, nez se pokusim sahnout nekam, kde neni disk - typicky mechanika bez diskety. V tom pripade mi vyskoci oskliva hlaska, ze nastala vyjimka s popisem "Disk I/O error" a program se stopne. Tahle vyjimka nastane na DirectoryListBoxu, protoze samotny DriveComboBox problem nedela, i kdyz ho nastavim na prazdnou mechaniku. Jakym zpusobem muzu otestovat, zda v mechanice je medium, popr. jakym zpusobem muzu pouzit vlastni osetreni teto chyby (vlastni chybove hlaseni, vlastni udalosti apod.)? Zkousel jsem hledat odpoved v delfackem helpu, tam me to postrcilo smerem k vlastnimu osetreni vyjimek, ale nepochopil jsem z toho prakticky nic...

2. Jakym zpusobem muzu z Delphi spolupracovat s MS Outlookem? Zahledl jsem tu par zminek o MAPI - jak se da ziskat, popr. existuje nejaka takova komponenta, ktera by mi zajistila alespon zakladni mailove sluzby (odeslat mail, prijmout mail, precist obsah mailu a od koho/komu je zasilka urcena)? Uvitam i rady a tipy, jak na to...

Diky

David Viktora (038/7010362, 0603/844618)
region�ln� oper�tor certifika�n� autority
�esk� po�ta s.p., o.z. VTJ�
Nemanick� 16
370 20 �esk� Bud�jovice
hot-line 07:00 - 11:30, 12:00 - 15:00

---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.116 / Virov� b�ze: 55 - datum vyd�n�: 10.1.2000


query alebo table

[*] Martin <geoplan(zv)pp.sinet.sk> - 7.2.2000 07:01:43

dobry,

mam databazu v Acces 97, asi 5-10 tis zaznamov. Je lepsie pouzit pristup pomocou komponentou Query alebo table ? Prip ake su vyhody a nevyhody.

Martin


ProgressBar na StatusBare.

[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 7.2.2000 07:06:03

Takovy status bar uz existuje, jmenuje se AlStatusBar (je nekde na Torry) a
chova se jako kontejner (i napr. pro tlacitka aj.)
Jaro B.

> -----P�vodn� zpr�va-----
> Od: Petr Vones [SMTP:pvones(zv)mbox.vol(tec)cz]
> Odesl�no: 6. �nora 2000 23:15
> Komu: Konference Delphi
> P�edm�t: Re: ProgressBar na StatusBare.
>
> From: Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk>
> > Ako nastavim aby na mojom Style:=fsMDIForm je statusbar na ktory chcem
> > umiestnit ProgressBar alebo Gauge ale stale mi to dava mimo a potom
> preraza
> > cez fsMDIChild okna. HowTo ?
>
> Ahoj,
>
> TStatusBar neni kontainerem pro dalsi komponenty. Lze si vsak odvodit od
> neho novou komponentu a tu upravit aby do ni bylo mozno umistovat dalsi
> komponenty:
>
>
> TXYStatusBar = class(TStatusBar)
> public
> constructor Create(AOwner: TComponent); override;
> end;
>
> constructor TXYStatusBar.Create(AOwner: TComponent);
> begin
> inherited;
> ControlStyle := ControlStyle + [csAcceptsControls];
> end;
>
> Petr Vones, amatersky programator
>
>

Delphi 5

[*] Jaro <jaro(zv)sinea(tec)cz> - 6.2.2000 22:08:49 -0800

> Ako je to s aplikaciami napisanymi v D5 - chodia pod
> Win95/98 v poriadku, alebo treba taktiez Win2000?
> Alebo treba zapnut sledovanie systemu :-))

Pozor - to je neco jineho. Rec byla o tom, ze D5 "zerou"
vice systemovych zdroju nez D3 (pochopitelne).
Jak hodme hladovy na zdroje bude tvuj program, to zalezi
zejmena na tobe - jak to naprogramujes.

Jinak vysledny program bude funkcni na W95/98/2000
bez ohledu na to pod kterym systemem ho skompilujes.
Jaro

>
> Dufam ze nie.
>
> forgo
>

Windows recorder

[*] Ing. Zdenek Sraier <sraierzd(zv)atlas(tec)cz> - 7.2.2000 07:35:50

Prijde mi nejjednodussi pouzit HTML TAG

<META HTTP-EQUIV="Refresh" Content="20; URL=http://url_nekam.htm">

do kazde stranky v sekci <TITLE>, cislo 20 je pocet sekund, po kterych
se natahne stranka url_nekam.htm.

Proc se drbat pravym recorderem na leve komponente :o))))


S pozdravem Zdenek Sraier

o__o E-mail: sraierzd(zv)email(tec)cz HTTP://www.byll(tec)cz/scuba/zdenek/
( o o) -----------------------------------------------------------
(. .) Strany Potapecske (SP) HTTP://www.byll(tec)cz/scuba/


----- Original Message -----
From: Jaroslav Klumpler <xklumpl(zv)informatics.muni(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Saturday, February 05, 2000 10:22 AM
Subject: Re: Windows recorder


> > Budu rad i za podnet jak si takovy soft napsat sam, stacilo by kdyby
> > umel posilat prikazy do Exploreru tak uby to bral jako kliky na odkazy.
>

Pridani aliasu

[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 7.2.2000 08:08:26

Ahoj zkus misto Session.Close pouzit Session.SavaConfigFile;

Martin

P�kny den a pilotum mnoho stastnych pristani...
====================================

ML Software - Martin Lasevic
Budovatelska 459
Ostrava - Poruba, 708 00
tel.: +420 (69) 691 85 11, Paegas : 0603 338 765
fax.: +420 (69) 691 85 11
E-mail : ml_software(zv)email(tec)cz
WWW: http://www.volny(tec)cz/ml_software
Miror : http://freeweb.coco(tec)cz/ml_software
====================================> Zdravim,
>
> Zkousim v programu pridat BDE Alias (kdyz neexistuje)
>
> Session.AddStandardAlias('Data', 'c:\data', 'Paradox');
> Session.close;
> Session.open;
> application.processMessages;
>

dodatecne zavedeni ref. integrity

[*] Mirek Junek <mjunek(zv)uo.fairnet(tec)cz> - 7.2.2000 08:16:14

Ahoj,
uplne nejjednoduseji je pouzit Database desktop nebo Paradox for Windows a
dat Table restructure. Osobne ale pouzivani referencni integrity (alespon u
Pdox tabulek) nedoporucuji, protoze pokud se neco pokazi (napr. se poboura
tabulka), s RI to uz vetsinou nedas dohromady. Problemy jsou i s tim, kdyz
si napr. potrebujes prenest tabulky jinam a nenakopirujes si vsechny
tabulky, pak tabulku u tebe neotevres.

Zaver: doporucuju si ref. integritu pohlidat v programu.

Hodne zdaru,
Mirek

| Ahoj,
|
| mam prosbu. Do starsi aplikace pod D1 bych potreboval
| dodatecne pridat referencni integritu bez vetsich zasahu do kodu.
| Jak to provest co nejbezbolestneji?
| Data jsou v Paradoxu 5.
|
| Dik
|
| ag.art
| Marian Winkler
| ag.art(zv)iol(tec)cz
| GSM: +42 0604 880 555
|
|
|

Pridani aliasu

[*] Ing. Zdenek Sraier <sraierzd(zv)atlas(tec)cz> - 7.2.2000 08:42:02

From: Lauko �tefan <lauko(zv)salamon.sk>

> >Session.AddStandardAlias('Data', 'c:\data', 'Paradox');
>
> Session.SaveConfigFile;
>
> >Session.close;
> >Session.open;
> >application.processMessages;

Diky, to bylo presne ono.

Zdenek


Priamy pristup na disk

[*] Martin �ajbik (Marcant) <marcant(zv)sct.sk> - 7.2.2000 08:49:22

Mohol by mi niekto poradit, ako z Delphi pouzit priame volania BIOS-u (priamy pristup na disk bez pouzitia WinAPI) ?

DIBENG.DLL

[*] Ing. Miroslav Ond��ek - 7.2.2000 08:59:34

Problem je v tom, ze to dela jen na (zatim) 2 pocitacich z cca 300. Na
mem PC to nenasimuluji, at delam s rozlisem co delam (RIVA TNT2).
Kazdopadne dekuji vsem za odpovedi, alespon vim, do jakeho smeru se mam
soustredit. A propos, ted me napada, mohl by to delat animovany gif
(barevna hloubka 8 bit)?

Jeste jednou vsem diky

Mira

----- Original Message -----
From: Mirun <forcom(zv)telecom(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, February 04, 2000 11:23 PM
Subject: Re: DIBENG.DLL


Myslim, ze mi neco podobneho zlobilo pri pouziti X-barevne bitmapy,
jejiz
barevna hloubka byla vetsi nez nastavena na obrazovce. Zkus zmenit
barevnou
hloubku, (na vice barev), pokud to tim zmizi, prohledni si bitmapy.

Mirun

console app

[*] Marian Goryl <goryl(zv)otcina.sk> - 7.2.2000 09:02:40

mozem poprosit o malicky priklad consolovej aplikacie v D3.
napriklad co vypise hlasku hello


dakujem

email: goryl(zv)otcina.sk


Jak prehrat novejsi verzi za chodu ?

[*] Pavel Medek <Pavel.Medek(zv)talema(tec)cz> - 7.2.2000 09:10:07

Uz jsem vetsinu problemu vyresil, jen neumim pockat az se ukonci
ta aplikace, ktera ma byt nahrazena novejsi.

Pavel

----- Original Message -----
From: Roman Fiser <rfiser(zv)leknet(tec)cz>
> Ja to resim tak ze program spustli dalsi aplikaci a sam se ukonci, ta
> aplikace pocka dokud se program neukonci a pote
> stahne novou verzi, zazalohuje puvodni a pak ji nahradi novou,
> kterou spusti.
>

komponenty Servers v D5

[*] Radoslav =?iso-8859-1?Q?Krehl=EDk?= <heretic(zv)softok(tec)cz> - 07.2.2000 09:12:58


V delphi 5.0enterpise jsou dodavany komponenty pro ovladani Wordu, Excelu,
Powerpointu, vse pod skupinou komponent zvanou Servers. Existuji k tomu
nejake examples??
Heretic


Pomoooc: General SQL Error Podruhe

[*] Pavel Bl�hovec <blahovec(zv)stapro(tec)cz> - 7.2.2000 09:13:21

Mam skutecne problem, prelozit si to umim, ale provest vyprazdeni toho
segmentu neumim.

Mam Delphi 5, Windows 2000 Prof, SQL Server 6.5, p�istupuji na datab�ze p�es
ADO a ODBC

----- Original Message -----
From: Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, February 04, 2000 10:07 AM
Subject: RE: Pomoooc: General SQL Error:>
> >Can't allocate space for object 'Syslogs' in database 'MainDB' because
> >the 'logsegment' is full. If you ran out of space in Syslogs, dump the
> transaction log.
> >Otherwise, use ALTER DATABASE or > sp_extendsegment to increase the size
> of the segment.
>
> >Poradi mi nekdo co s tim?
>
> To chces prelozit do cestiny nebo mas skutecne nejaky problem?
> Jestli mas skutecny problem, doporucoval bych napsat i jaky SQL server
> pouzivas.
>
> Jura
>

Zadost o prelozenou UDFLIB.DLL z Interbase

[*] Slavomir Skopalik <skopalik(zv)atlas(tec)cz> - 7.2.2000 09:22:13


UDF nemam, ale SYSDATE se u IB skyva pod funkci 'now'.
Exam: Insert Into Table VALUES ('now');

Slavek

-----P�vodn� zpr�va-----
Od: Pavel Bare� [SMTP:Atoll(zv)telecom(tec)cz]
Odesl�no: 6. �nora 2000 11:15
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Zadost o prelozenou UDFLIB.DLL z Interbase

Mohl by mi prosim nekdo poslat prelozenou UDFLIB.DLL z Interbase.
Je to soucast Examplse k IB ve zdrojakach, ale ja bohuzel nemam C prekladac.
Poterboji funkci SYSDATE, nebo nejakou, ktera vrati aktualni datum prip. i cas na serveru.

predem moc dekuji

Pavel Bares
Atoll s.r.o.

<<Soubor: ATT00005.html>>

SQL, ODBC, ADO, BDE - maximalni zmatek, pomoooc

[*] Pavel Bl�hovec <blahovec(zv)stapro(tec)cz> - 7.2.2000 09:22:11

Jze pristoupit pres OLEDB drivery na Linuxov� server PostgreSQL nebo MySQL?
Resp. jestli existuji drivery, ktere mi to umo�n� pro tyto servery.

Aplikaci vyvijim na SQL 6.5, ale realny chodu potum bude na jedne z
jmenovanych.

----- Original Message -----
From: p. Jirman <jim.design(zv)iol(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, February 04, 2000 6:51 PM
Subject: Re: SQL, ODBC, ADO, BDE - maximalni zmatek, pomoooc


>
> >From: Pavel Bl�hovec
>
> >Mam trochu zmatek, pomozte mi prosim ujasnit si vec.
> >Mam aplikaci client/server:
>
> >Pouziji BDE, to se napoji na ODBC a ODBC se napoji na SQL server.
> >NEBO
> >Pouziji ADO, to se napoji na ODBC a ODBC se napoji na SQL server.
> >JE MOJE UVAHA SPRAVNA?
>
> V podstate ano, ale ADO je rychlejsi napojene pres OLEDB drivery,
>
> >Lze se napojit na ODBC primo, bez ADO a bez BDE, abych nemusel mit na
> clientskych pocitacich dvoje drivery?
> To zalezi jak je clientska aplikace udelana.
>
>

Frames

[*] Ing. Keder Vladim�r <keder(zv)columbex.sk> - 7.2.2000 09:26:03

Ahoj vsetci

Mam D5 a zacal som pouzivat Frames. Vytvoril som si rozne ramce a
potrebujem ich zobrazovat na zaklade uzivatelovho vyberu. Skusal som ho
vytvarat dynamicky ako formulare, ale ramec sa mi nezobrazi

mam vytvorene ramce Frame1, Frame2, .... FrameN

v procedure som ich skusal vytvorit takto

procedure .....
var frmSkrinka: TFrames;
begin
case skrinka of
1: begin
frmSkrinka:=TFrame1.Create(Self);
...
end;
......
end;
........
end;

Kde robim chybu ?

Vlado

OT: Transakce

[*] Milan Schembera <spravce(zv)spektrum(tec)cz> - 7.2.2000 09:29:11

Hello,

pardon za OFF, ale netusite nekdo, zda lze na MS SQL 7 delat Browse na tabulky, ktery ma otevreny jiny uzivatel v transakci ? Pristupuju pres ADO z Delphi 5, ale je to spis problem serveru. Zkousel jsem ruzny nastaveni, nic nepomohlo.


S pozdravem a pranim hezkeho dne

Milan Schembera

Zatuhnuti Delphi pri startu aplikace

[*] Ales Radikovsky <radik(zv)volny(tec)cz> - 07.2.2000 09:32:16

Jeste jednou dekuji vsem za rady a nazory. Nakonec jsem podlehl tlaku
doby a nainstaloval Windows 2000 final, i kdyz anglicke :-( Aplikace lze
zase bez problemu vyvijet....
Co se tyce hardwaru, tak jako svoji "testovaci" ulohu na funkci zeleza
povazuji preklad jadra pod Linuxem, tim prinejmensim eliminuji vliv
spatne instalace Windows. A na svem zeleze jadro bez problemu prekladam.
"Dobre" pretaktovany procesor (v mem pripade Celeron) nevidim jako
problem, ani nevim jestli ho v soucasne dobe pretaktovany mam nebo ne,
ale po spravne volbe tektovaci frekvence s tim nebyly problemy.

Ales

--

Ale� Radikovsk�
mail: radik(zv)seznam(tec)cz
tel: +420 603 300093


Jak prehrat novejsi verzi za chodu ?

[*] Pavol Stolc <pstolc(zv)sc.sknet.sk> - 7.2.2000 09:57:48

----- Original Message -----
From: Pavel Medek <Pavel.Medek(zv)talema(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, February 07, 2000 9:10 AM
Subject: Re: Jak prehrat novejsi verzi za chodu ?> Uz jsem vetsinu problemu vyresil, jen neumim pockat az se ukonci
> ta aplikace, ktera ma byt nahrazena novejsi.

Ten problem by si nemusel riesit, pokial by si to spustal pomocou loaderu
ako som pisal.
Ale ak to potrebujes riesit ako uvadzas potom pozri do archivu tejto
konferencie, bolo to tu uz viackrat uvedene. Jedna z moznosti (asi nie
najprofesionalnejsia) je aj testovat existenciu GlobalAtom, ktory vytvori
tvoja aplikacia pri starte a zrusi pri ukonceni.


Pavol Stolc
pstolc(zv)sc.sknet.sk

console app

[*] Pavol Stolc <pstolc(zv)sc.sknet.sk> - 7.2.2000 10:09:35

Zaskrtni: Project options/Linker/Generate console application

program hello; begin writeln('hello') end.

Pavol Stolc
pstolc(zv)sc.sknet.sk


Hlavickovy subor z C do Delphi

[*] Iko <iko(zv)kamarad(tec)cz> - 7.2.2000 09:23:33 -0000

Caute...

prerobil som jeden hlavickovy subor pre DLL z
C do Delphi takto:

C:
typedef struct tagBBGOOD {
char id[4];
char code[13];
char name[20];
double sprice;
double pprice;
double qty;
int tax;
LPSTR fmt;
BYTE user;
} BBGOOD, *LPBBGOOD;

Delphi:
type BBGOOD=record
id:array[0..3] of char;
code:array[0..12] of char;
name:array[0..19] of char;
sprice:double;
pprice:double;
qty:double;
tax:integer;
fmt:pchar;
user:byte;
end;
LPBBGOOD=^BBGOOD;

Ked to ale pustim, tak mi vypise, ze Access
Violation v tej kniznici. Mam
nieco zle? Diky..... iko
iko(zv)kamarad(tec)cz


Transakce

[*] Radek Pospisil <radek.pospisil(zv)sprinx(tec)cz> - 7.2.2000 10:35:16

Zkuste nastavit nejnizsi uroven izolace transakci:

SET TRANSACTION ISOLATION LEVEL READ UNCOMMITTED

bye

R.Pospisil

> -----Original Message-----
> From: Milan Schembera [mailto:spravce(zv)spektrum(tec)cz]
> Sent: Monday, February 07, 2000 9:29 AM
> To: 'delphi-l(zv)fwd(tec)cz'
> Subject: OT: Transakce
>
>
> Hello,
>
> pardon za OFF, ale netusite nekdo, zda lze na MS SQL 7 delat
> Browse na tabulky, ktery ma otevreny jiny uzivatel v
> transakci ? Pristupuju pres ADO z Delphi 5, ale je to spis
> problem serveru. Zkousel jsem ruzny nastaveni, nic nepomohlo.
>
>
> S pozdravem a pranim hezkeho dne
>
> Milan Schembera
>
>

Jak prehrat novejsi verzi za chodu ?

[*] Viktor.Lostak(zv)chmi(tec)cz (Viktor Lostak) - 7.2.2000 10:52:40

Nejlepsi je v te druhe aplikaci cekat na ukonceni te prvni pomoci fce
WaitForSingleObject, ktere se preda handle procesu te prvni aplikace.

Viktor

----- Original Message -----
From: Pavol Stolc <pstolc(zv)sc.sknet.sk>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, February 07, 2000 9:57 AM
Subject: RE: Jak prehrat novejsi verzi za chodu ?> ----- Original Message -----
> From: Pavel Medek <Pavel.Medek(zv)talema(tec)cz>
> To: <delphi-l(zv)fwd(tec)cz>
> Sent: Monday, February 07, 2000 9:10 AM
> Subject: Re: Jak prehrat novejsi verzi za chodu ?
>
> > Uz jsem vetsinu problemu vyresil, jen neumim pockat az se ukonci
> > ta aplikace, ktera ma byt nahrazena novejsi.
>
> Ten problem by si nemusel riesit, pokial by si to spustal pomocou loaderu
> ako som pisal.
> Ale ak to potrebujes riesit ako uvadzas potom pozri do archivu tejto
> konferencie, bolo to tu uz viackrat uvedene. Jedna z moznosti (asi nie
> najprofesionalnejsia) je aj testovat existenciu GlobalAtom, ktory vytvori
> tvoja aplikacia pri starte a zrusi pri ukonceni.
>
> Pavol Stolc
> pstolc(zv)sc.sknet.sk
>
>

console app

[*] garalda <garalda(zv)mail(tec)cz> - 7.2.2000 10:57:19

Napriklad:

MujProjekt.dpr

program MujProgram;

uses MujProgramUnit;

{$APPTYPE CONSOLE}

{$R *.RES}

begin
Init;
end.

MujProgramUnit.pas

unit MujProgramUnit;

interface

uses
FileCtrl, SysUtils, Classes;

type

procedure Init;

implementation

procedure Init;
begin
... Tvuj kod ...
end;

end.

mozem poprosit o malicky priklad consolovej aplikacie v D3.
napriklad co vypise hlasku hello


dakujem

email: goryl(zv)otcina.sk

console app

[*] garalda <garalda(zv)mail(tec)cz> - 7.2.2000 11:05:34

[P��loha v souboru: HelloUnit.pas]
[P��loha v souboru: HelloProj.dpr]
Sorry, nebylo to uplne presne. Prikladam priklad.

Ma to celkem 235 Byte, tak snad mi to odpustite...


mozem poprosit o malicky priklad consolovej aplikacie v D3.
napriklad co vypise hlasku hello


dakujem

email: goryl(zv)otcina.sk

Jak prehrat novejsi verzi za chodu ?

[*] Josef A. Cerny <vyvoj(zv)atlascon(tec)cz> - 7.2.2000 11:06:25

> Mam asi 15 pocitacu v siti, na kterych je exe soubor.
> Pak umistuji vzdy novejsi verzi na server.
> Pri spusteni programu umim zjistit, ze verze na serveru je novejsi nez na
> lokale.
> No ted bych potreboval aby se program zavrel, natahla (prepsala) nova
verze
> a snovu spustil program.
>
> Budu rad za kazde nasmerovani vpred.

Presne tento problem je vyresen ve Windows 2000. Takze "nejsnadnejsi"
cesta je dle meho pockat na W2000. Taky uz jsem na ne nateseny.

Josef Cerny

Spo�i� obrazovky

[*] Josef A. Cerny <vyvoj(zv)atlascon(tec)cz> - 7.2.2000 11:20:58

> chtel bych se zeptat, jestli(a jak??) jdou v Delphi psat sporice
> obrazovky?

Screen-saver je v principu obycejny program, ktery byl prejmenovan, aby mel
priponu .scr. Aby mohl spolupracovat se operacnim systemem a tvarit se
"profesionalne", musi splnovat nekolik podminek:
* Umoznit nastavovani - treba v ini souboru, nebo v registry
* Poskytnout vlastni popis - lze pridanim radky {$D SCRNSAVE "Muj ssaver"}
na zacatku DPR. Text v uvozovkach se objevi v seznamu jmen sporicu.
* Rozlisovat mezi aktivnim a nastavovacim rezimem - lze testovat spoustecim
parametrem "s" pro aktivni rezim, "c" pro nastavovaci rezim. Je treba si dat
pozor na hlavni formular, bo jednou to bude dialog pro nastavovani
parametru, podruhe velike okno pres celou obrazovku.
* Nedovolit vicenasobne spusteni sebe sama
* Skoncit pri stisku klavesy nebo pohybu mysi.

Samotne zavedeni do Windows - zmenit priponu .exe na .scr a zkopirovat do
systemoveho adresare windows.

Josef Cerny
********************************************
* Josef A. Cerny
* analyst and programmer
*
* ATLAS consulting, spol. s r.o.
* Chocholouskova 9
* 709 16 Ostrava
* Czech Republic
*
* office : +420 69 661 64 32
* secretary: +420 69 661 33 33
* fax : +420 69 661 33 30
* cellular : +420 604 23 83 29
* e-mail : cerny(zv)atlascon(tec)cz
* private : cernyja(zv)email(tec)cz
* WWW : http://www.atlascon(tec)cz
********************************************

Lze pod NT sdilet COM port?

[*] Karel Kral <kral(zv)purus(tec)cz> - 07.2.2000 11:32:39

Mam nasledujici problem:
Na NT4 WS bezi trvale standardni RAS server pro prichozi volani. Vola se
na nej pouze vyjimecne. Ted jde o to, bych chtel taky velice zridka
odeslat nejaky soubor tak, ze z Delphi zavolam nejaky program pro prenos
souboru (jde o zvlastni program se specialnim komunikacnim protokolem).
Je tedy velice hloupe kvuli tomu pridavat dalsi linku a modem.

Lze nejak tomu RAS serveru z neho programu v Delphi rict: ted me nechej
port, pak s nim neco delat a pote, co si prenesu zase rict: vezmi si
port?

Za pripadne zkusenosti predem diky.
--
______________________________________________________
Karel Kral, informatik
Purus, s.r.o., Cezavy 627, 664 56 Blucina, CZ
Tel: 05/47235000, 0602/552432, Fax: 05/47231203
E-Mail: mailto:kral(zv)purus(tec)cz, WWW: http://www.purus(tec)cz
______________________________________________________


Delphi 5

[*] Pavel ZIDEK <kopr(zv)kopr(tec)cz> - 7.2.2000 11:56:02

Taky se pripojuji troskou. Sice delam v D4, ale taky tuhnou za nejasnych
okolnosti. Po nejake dobe jsem zjistil, ze pri programovani nesmim
poslouchat hudbu z CeDecka, protoze to nekde bere poradny kus pameti.

>
> Problem je v tom, ze i kdybys mel 500 MB RAM, tak pod W98
> ti to se systemovymi zdroji nepomuze. Musis si zapnout sledovani
> systemu a jak se blizis k cervene (asi 15%), tak je nutne pozavirat
> par formularu.
> Vhodnejsi je vsak prejit na lepsi wokna
>

Pavel


INTERBASE & NUMERIC field

[*] V�t�zslav Vicherek <kvasar(zv)kvasar(tec)cz> - 7.2.2000 12:20:36

jakym zpusobem resite na interbazi polozky numeric? Me se stala takova vec, ze kdyz mam v tabulce polozku DEC(8,2), tak ji nedokazu zobrazit ani editovat s tou desetinou casti. Zkousel jsem to pres SQL s uspechem updatnou, ale zase se v dbgridu a dbeditu zobrazilo pouze cele cislo. Ani DBExplorer si s tim nedokazal poradit :(

Honza Fiala


REINDEXACE FOXPRO ODBC

[*] Bednar��k Dalibor - 7.2.2000 13:01:59

Ahoj

Nevite nekdo, jak se da vyvolat reindexace DBF tabulek pres Foxpro ODBC Driver????
Pres BDE mi fungovalo( no jak se to veme). DbiRegenIndexes, ale u ODBC Driveru
mi to pise Capability not suported.
Nebo ze by to vazne neslo?

Za pripadnou radu predem dekuji....

Dalibor

Dotaz

[*] Martin Zapletal <zaplik(zv)volny(tec)cz> - 7.2.2000 13:21:24

Jak v Delphi 5 (WIN95, 98, NT) zjist�m, jestli disk pracuje, nebo je v klidu. Mysl�m t�m obdobu blikaj�c� led od HDD, FD, CD?

Zaplik(zv)volny(tec)cz

Zvuk

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 7.2.2000 14:01:56

Ahoj, nevim, jestli jde MIDI, ale WAVE jde takto :
(UDDF):

var FindHandle, ResHandle: THandle;
ResPtr: Pointer;
begin
FindHandle:=FindResource(HInstance, '<Name of your Ressource>', 'WAVE');
if FindHandle<>0 then begin
ResHandle:=LoadResource(HInstance, FindHandle);
if ResHandle<>0 then begin
ResPtr:=LockResource(ResHandle);
if ResPtr<>Nil then
SndPlaySound(PChar(ResPtr), snd_ASync or snd_Memory);
UnlockResource(ResHandle);
end;
FreeResource(FindHandle);
end;
end;

{----------}
Resource pak muze vypadat takto :

Jmeno1 WAVE soubor1.WAV
Jmeno2 WAVE soubor2.WAV
atd...
> ----------
> Od: Bene> � Jaroslav[SMTP:JBenes(zv)cpoj(tec)cz]
> Odesl�no: 4. �nora 2000 7:33
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: RE: Zvuk
>
> Ahoj,
> potreboval bych prehrat MID soubor, ale z resource. Jde to?
> Diky
> Jaro B.
>
> > -----P> �vodn� zpr�va-----
> > Od: Petr Vones [SMTP:pvones(zv)mbox.vol(tec)cz]
> > Odesl�no: 3. �nora 2000 23:25
> > Komu: Konference Delphi
> > P�edm�t: Re: Zvuk
> >
> > From: Marek Robert <robert.marek(zv)vsp(tec)cz>
> > > Jsem tu v konferenci novy, proto nevim, jestli toto tema tady nahodou
> > > nebezi.
> > > Nemate n�kdo zkusenosti s praci se soubory WAV v Delphi ? Interni help o
> > > praci se zvukem mlci a
> > > komponenta MediaPlayer slouzi jen k praci se zvukovym CD,
> >
> > Ahoj,
> >
> > To neni pravda, TMediaPlayer umi prehravat i WAV soubory. Staci mu jej
> > zadat
> > do FileName (pri nastavenem DeviceType na dtAutoSelect).
> >
> > Petr Vones, amatersky programator
> >
> >
> >
>

Editor v gridu

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 7.2.2000 14:57:22

Ahoj,
podivej se sem : http://www.tmssoftware.com/
Je tam komponenta TAdvColumnGrid, ktera me vylozene
nadchla. Je free pro nekomercni pouziti a jinak stoji
cely balik myslim 60$ (nebo 90? ted vazne nevim)
rozhodne bych ale rekl, ze to stoji zato!

Umi defacto totez, jako EQGrid od DevExperts
(http://www.devexpress.com) nad kterou se tu
nekdo rozplyval :-))) ale je podstatne levnejsi.

Dobra.

> ----------
> Od: David Lebeda[SMTP:david.lebeda(zv)comarr(tec)cz]
>
> pokousim se naprogramovat cosi vzhledove obdobneho jako Object
> inspector, tj. 2 sloupce, levy je fixni a obsahuje nazvy nejakych
> vlastnosti no a do praveho sloupce uzivatel doplnuje hodnoty.
> Narozdil od Object inspektoru ale plati zjednodusujici predpoklady:
>
> 1) vsechna data jsou stejneho typu - string
> 2) veskere povolene hodnoty pro kazdou vlastnost jsou v nejake
> databazove tabulce. Nelze napsat nic, co by neslo vybrat z teto
> tabulky.
>
> Cili libilo by se mi, aby v pravem sloupci byla v kazde bunce nejaka
> obdoba ComboBoxu. No a uplne nejlepsi, ale uz nikoli nezbytne
> nutne, by bylo automaticke doplnovani zapocateho textu, takze
> uzivatel by napsal prvnich par pismen a zbytek by mu to nabizelo
> samo.
>
>

autorun

[*] bures <bures(zv)ssakhk(tec)cz> - 7.2.2000 15:08:26

Ahoj tvuj dotaz je velmi obecny ale pokusim se napsat aspon par veci co k tomu budes potrebovat

1) cestu k programu muzes ji odvodit treba z cestu k tvymu menu na ktery se budes odvolavat autorunem na CD (doufam ze jsem to spravne pochopil)
a to je Application.ExeName. To ti vrati cestu k tvojemu menu,
ExtractFileDrive(Application.ExeName) zjisti disk odkud jsi spustil svoje menu
ExtractFilePath(Application.ExeName) zjisti cestu do adresare tveho menu (vcetne disku)
2) zda ssoubor ktery chces spustit opravdu existuje zjistis traba If FileExists(nejaky soubor) then .....
3) Soubor programu na ktery chces spustit, spusis treba WinExec(Pchar(nejaky soubor),SW SHOWNORMAL);
4) Soubory ktere chces spoustet si traba zapis do Ini Souboru viz http://www.ssakhk(tec)cz/home/bures/delphi/hint20.htm
5) pokud chces to menu spoustet z CD pomoci autorunu tak nezapomen ze tam zadavas 'relativni' cestu
a proto pro zjiskani cestu k tvemu projektu nemuzes pouzit GetCurrentDir protoze ten bude z nejvetsi pravdepodobnosti
korenovy adresar toho CD, to same plati kdyz se na svuj projekt odvolavas z MSIE.

Doufam ze ti to pomuze Vlada




----- Original Message -----
From: charon / smidek
To: konference delphi
Sent: Tuesday, February 07, 1995 1:55 PM
Subject: autorun


Preji hezky den,

muzete mi, prosim poradit jakym zpusobem naprogramovat autorun pro urcity i nekym jinym
dodany program.
(delphi 3 - standart)

predem diky, charon II


autorun

[*] Petr Hodbod <hodbod(zv)mendelu(tec)cz> - 07.2.2000 15:10:22

Zdravim,
pokud to chapu spravne, tak se jedna o autorun na CD pro spusteni
aplikace po zasunuti do mechaniky???
Pokud ne muzete lepe specifikovat problem?
Zdravim Petr Hodbod

charon / smidek wrote:

> Preji hezky den, muzete mi, prosim poradit jakym zpusobem
> naprogramovat autorun pro urcity i nekym jinym dodany program.
> (delphi 3 - standart) predem diky, charon II

--
__________________________________

Ing. Petr Hodbod
Dep. of Computer Science
Mendel University of Agriculture
fax : +420 5 4513 5008
email: hodbod(zv)mendelu(tec)cz
___________________________________

Pozice kurzoru v bunce StringGrid

[*] Bran��k Pavel* <brancik(zv)let(tec)cz> - 7.2.2000 15:16:28

Dobry den,
jakym zpusobem lze zjistit aktualni pozici kurzoru v bunce StringGridu
(ekvivalent vlastnosti SelStart v� Tedit).
Mam Delphi 4.0 standard.
Dekuji za odpoved.
Pavel Brancik---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.118 / Virov� b�ze: 56 - datum vyd�n�: 17.1.2000


Access 97

[*] Petr Hodbod <hodbod(zv)mendelu(tec)cz> - 07.2.2000 15:17:50

Dobry den,
mam dotaz ohledne komponenty TAccessReport. Mam pod Accessem hotovou
sestavu a rad bych ji pouzil v Deplhi. V helpu jsem toho moc nenasel a
pri bliysim studiu komponenty jsem absolutne nenasel nic jak to nastavit
a nacist formular nebo report. Muze mi nekdo poradit?
Mam D5, NT4 sp6, a Access97. No a pokud by to slo pro Access2000 tak tim
lepsi, to ale asi chci mnoho co?
Dekui za jakoukoliv radu
S pozdravem Petr Hodbod

--
__________________________________

Ing. Petr Hodbod
Dep. of Computer Science
Mendel University of Agriculture
fax : +420 5 4513 5008
email: hodbod(zv)mendelu(tec)cz
___________________________________

autorun

[*] Lud�k ZITA - 7.2.2000 15:22:55

From: charon / smidek <charon(zv)ipex(tec)cz>
>Preji hezky den,
>
> muzete mi, prosim poradit jakym zpusobem naprogramovat autorun pro
>urcity i nekym jinym
> dodany program.
> (delphi 3 - standart)

Co si predstavujes pod pojmem "autorun".
Pokud to ma byt automaticke spusteni pri startu windows pak
staci zapsat do vetve registru
HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Run
cestu k programu
napr :
var
Reg: TRegistry;
begin
Reg := TRegistry.Create;
try
Reg.RootKey := HKEY_CURRENT_USER;
if Reg.OpenKey('\Software\Microsoft\Windows\CurrentVersion\Run', True)
then Reg.WriteString('MujProgram','"C:\xxxxxxx\MujProgram.exe"');
finally
Reg.CloseKey;
Reg.Free;
end;
end;

MIDAS

[*] CERMAK <CERMAK(zv)procomcr(tec)cz> - 7.2.2000 15:34:14

Ahoj

mam D5 enterprise, W98

Mel jsem projekt v D3 C/S vyuzivajici technologie MIDAS. Projekt jsem
prevedl do Delphi 5. Klient i server se mi podarilo prevest a oba bez
problemu spolupracuji. Jediny problem se mi vyskytl na serveru pri editaci.
Kdyz udelam nejaky zasah do TLB knihovny ( bud pridam pres TLB editor novou
metodu k nekteremu z objektu (resp interfacu), nebo pridam do projektu novy
remote data modul), prostredi Delphi mi zacne zbesile otevirat vsechny
remote data moduly na serveru. Kdyz je jich hodne, delphi vycerpa prostredky
Windows a je to na restart. Pod D3 jsem podobne problemy nemel.

Nesetkali jste se s tim nekdo? Je to problem v nekorektnim prevodu TLB?
Napiste mi prosim vas jak jste to pripadne resili.
Rozdeleni serveru na vice casti by bylo prilis pracne.

Dekuju prdem za jakykoliv
tip


Jaromir Cermak


Midi a noty

[*] sup(zv)svitap(tec)cz - 7.2.2000 15:50:16

Dobry den, poradte prosim:
Jak v midi vybrat nastroj a zahrat na nem jednu nebo nekolik not (akord).
Nejlepe bez meziukladani souboru na disk a jejich prehravani...
V tomto oboru jsem uplnej zacatecnik, tak prosim polopate.
Pomozte starostlivemu otci, jehoz dite se uci hrat na mandolinu.....

Jaroslav Weiss
odd. informatiky

SVITAP J.H.J. s.r.o.
Kijevska 6-8
SVITAVY
568 02

tel: ++420-461-568 202
fax: ++420-461-568 300
E-mail: sup(zv)svitap(tec)cz
URL: www.svitap(tec)cz
FTP: ftp.svitap(tec)cz


SQL Query a Memory

[*] Michal Hlavac <7hlavac(zv)st.fmph.uniba.sk> - 7.2.2000 15:51:19

Te noha,

ono je to velmi zaujimave. No zo zaciatku. Mam Data Module. je tam 1
TDatabase, 4 TDataSource, 4 TRxQuery a jeden TSQLUpDate. Cele to bezi na
systeme ze:

Jedna query je vseobecna s all zaznamami. Asi Select id, nazov, adresa, psc
from users.usmev

Potom je dalsia query ale ta je takato: Select * from users.usmev where ID =
:ID

Dalsie dve query maju ine tabulky, ale su napojene cez ID ako druha query.
Jednoducho filter.

A problem. vzdy mi to pri posuvani v DBGride napojenom na 1. query vypisalo
Access violation. Samozrejme, ze po pusteni klavesy sa aktualizovali dalsie
tri query. Dlho som nevedel, co by to mohlo, az tak raz v posteli napadlo,
ze sa tu pisalo, ze ono to robi tak, ze to "vsetko" frca do pamate. A kedze
je toho vela, tak nech sa paci Access violation. Tuto hlasku mi raz robilo
pri pretekani pamate. Takze som mojim malickym mozockom vydedukoval, ze by
to aj tak mohlo byt teraz.

Skusi ma niekto nakopnut (aj do zadku, lebo to su moje subj. nazory) a
poradit mi ako by sa to dalo vyriesit. Ozaj naco sluzi TRXMemoryData,
TMemoryTable a TQBEQuery

Dik, dik, dik moc, Miso


Web pocitadlo

[*] Majo Petrik <zajodelphi(zv)hotmail(tec)com> - 07.2.2000 15:00:51 gmt

myslim ze by to malo na standartny vystup
poslat cestu k tomi obrazku...
Majo


>From: sup(zv)svitap(tec)cz
>Reply-To: delphi-l(zv)fwd(tec)cz
>To: delphi-l(zv)fwd(tec)cz
>Subject: Web pocitadlo
>Date: Tue, 1 Feb 2000 11:09:56 +0100
>
>Dobry den. Delam webovsky pocitadlo.
>Neni mi jasny, jak dostanu vygenerovany obrazek z programu.
>
> x:=inttostr(i); // i je cislo navstevnika
> s:=copy('000000',1,6-length(x))+x;
> xp:=TPicture.Create;
> xp.bitmap.canvas.font.name:='Lucida Console';
> xp.bitmap.canvas.font.Size:=-20;
> xp.bitmap.canvas.font.Style:=[fsbold];
> xp.bitmap.canvas.font.Color:=clGreen;
> xp.bitmap.canvas.brush.Color:=$00DDE4D8;
> xp.bitmap.height:=xp.bitmap.canvas.TextHeight(s);
> xp.bitmap.width:=xp.bitmap.canvas.TextWidth(s);
> xp.bitmap.canvas.textout(0,0,s);
> xj:=TJPEGImage.create;
> xj.Assign(xp.bitmap);
>.... Jak dal? Zatim to resim tak, ze to ulozim:
> xj.savetofile('d:\wwwroot\number.jpg');
>a zobrazim na dalsi strance.
>
>Ale jak udelat aby fungovalo <img src="script.exe">
>
>
>Jaroslav Weiss
>odd. informatiky
>
>SVITAP J.H.J. s.r.o.
>Kijevska 6-8
>SVITAVY
>568 02
>
>tel: ++420-461-568 202
>fax: ++420-461-568 300
>E-mail: sup(zv)svitap(tec)cz
>URL: www.svitap(tec)cz
>FTP: ftp.svitap(tec)cz

______________________________________________________
Get Your Private, Free Email at http://www.hotmail.com


Zadost o prelozenou UDFLIB.DLL z Interbase

[*] Pavel Bare� <Atoll(zv)telecom(tec)cz> - 7.2.2000 16:02:07

Dekuji za radu, to je presne to co jsem potreboval.

Pavel Bares
Atoll s.r.o.


----- Original Message -----
From: Slavomir Skopalik <skopalik(zv)atlas(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, February 07, 2000 9:22 AM
Subject: RE: Zadost o prelozenou UDFLIB.DLL z Interbase


UDF nemam, ale SYSDATE se u IB skyva pod funkci 'now'.
Exam: Insert Into Table VALUES ('now');

Slavek

-----P�vodn� zpr�va-----
Od: Pavel Bare� [SMTP:Atoll(zv)telecom(tec)cz]
Odesl�no: 6. �nora 2000 11:15
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Zadost o prelozenou UDFLIB.DLL z Interbase

Mohl by mi prosim nekdo poslat prelozenou UDFLIB.DLL z Interbase.
Je to soucast Examplse k IB ve zdrojakach, ale ja bohuzel nemam C prekladac.
Poterboji funkci SYSDATE, nebo nejakou, ktera vrati aktualni datum prip. i
cas na serveru.

predem moc dekuji

Pavel Bares
Atoll s.r.o.

<<Soubor: ATT00005.html>>

autorun

[*] Pavel Bl�hovec <blahovec(zv)stapro(tec)cz> - 7.2.2000 16:06:12

je to velice proste
staci do rootu disku pridat soubor autorun.inf
v nemz bude toto:

[autorun]
OPEN=PROGRAM.EXE
ICON=IKONA.ICO

kde PROGRAM.EXE je jmeno souboru ktery se ma spustit (vcetne cesty, tj. \APP\PRG\MOJE.EXE) a IKONA.EXE je soubor obsahujici ikonku
----- Original Message -----
From: charon / smidek
To: konference delphi
Sent: Tuesday, February 07, 1995 1:55 PM
Subject: autorun


Preji hezky den,

muzete mi, prosim poradit jakym zpusobem naprogramovat autorun pro urcity i nekym jinym
dodany program.
(delphi 3 - standart)

predem diky, charon II


Frames

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 7.2.2000 16:19:02

Ahoj,

nezapominas nastavit Parenta?

Slavek

> Ahoj vsetci
>
> Mam D5 a zacal som pouzivat Frames. Vytvoril som si rozne ramce a
> potrebujem ich zobrazovat na zaklade uzivatelovho vyberu. Skusal som ho
> vytvarat dynamicky ako formulare, ale ramec sa mi nezobrazi

> Vlado


-------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
-------------------------------------------------
http://www.swnet(tec)cz
Magazin informacne vyspelych jedincu
-------------------------------------------------


Natazeni sestavy QReportu ze souboru

[*] J.Faltynek <FS_software(zv)telecom(tec)cz> - 7.2.2000 16:25:55

Potreboval bych male postrceni - mam ulozene sestavy z QuickReportu (D4,SP vsechny,W98) na disku a potrebuji po startu aplikace jednu z nich natahnout primo do preview, aniz by uzivatel musel pouzit buton "Open" v QRPreview. Muze mi poradit nekdo, kdo s tim jiz neco zkousel?

diky,Jirka


Web pocitadlo

[*] Josef A. Cerny <vyvoj(zv)atlascon(tec)cz> - 7.2.2000 16:34:53

> >Dobry den. Delam webovsky pocitadlo.
> >Neni mi jasny, jak dostanu vygenerovany obrazek z programu.

> >Ale jak udelat aby fungovalo <img src="script.exe">

Predokladam, ze pises cgi skript v Delphi.

Pouzij komponentu TWebModule, pridej akci WebAction a:

with Response do
begin
ContentType := 'img/jpeg';
ContentStream := xj;
end;

Josef Cerny

********************************************
* Josef A. Cerny
* analyst and programmer
*
* ATLAS consulting, spol. s r.o.
* Chocholouskova 9
* 709 16 Ostrava
* Czech Republic
*
* office : +420 69 661 64 32
* secretary: +420 69 661 33 33
* fax : +420 69 661 33 30
* cellular : +420 604 23 83 29
* e-mail : cerny(zv)atlascon(tec)cz
* private : cernyja(zv)email(tec)cz
* WWW : http://www.atlascon(tec)cz
********************************************

Web pocitadlo - CGI

[*] Daniel Rott <roxton(zv)atlas(tec)cz> - 7.2.2000 16:34:11

> Majo Petrik napsal
> myslim ze by to malo na standartny vystup
V pripade CGI presne tak.

> poslat cestu k tomi obrazku...
Nikoliv vsak cestu, ale data (obsah onoho
souboru), ale nejprve musi byt hlavicka
WriteLn('image/gif) nasledovana prazdnym
radkem. Pak uz nasleduji vlastni data.

Daniel

TaskBar

[*] Lauko �tefan <lauko(zv)salamon.sk> - 7.2.2000 16:53:39

U mna to takto funguje D4.
V D2 = ShowWindowAsync( Handle, SW_HIDE );
Pozrite komponentou TTrayIcon.


procedure MainForm.FormCreate(Sender: TObject);
begin
Left := -5000;
ShowWindowAsync( Application.Handle, SW_HIDE );
Application.ProcessMessages;
end;

Initialization
begin
ShowWindow( Application.Handle, SW_HIDE );
Application.ProcessMessages;
end;

end.

ShowWindowAsync( Application.Handle, SW_HIDE );
-----P�vodn� spr�va-----
Od: Adler Michal <adler(zv)nex.tel(tec)cz>
Pre: 'delphi-l(zv)fwd(tec)cz' <delphi-l(zv)fwd(tec)cz>
D�tum: 7. febru�r 2000 1:29
Predmet: TaskBar


>Preju hezky vecer,
>mel bych tady takovou prkotinku. Potrebuju, aby po startu moji aplikace
>nebylo videt jeji tlacitko na taskbaru. Vi nekdo jak to zaridit?
>
>ShowWindow(Handle,sw_Hide);
>SetActiveWindow(Application.Handle);
>ShowWindow(Application.Handle, SW_Hide);
>
>tohle mi nejak nefunguje (teda ne pri staru). Pokud to zavolam treba
stiskem
>tlacitka, tak je to v poradku, ale ja potrebuju aby se aplikace vubec
>neukazala na taskbaru.
>
>Predem dekuju za jakoukoliv odpoved.
>
>
>

TaskBar

[*] Majo Petrik <zajodelphi(zv)hotmail(tec)com> - 07.2.2000 16:16:41 gmt

showwindow(application.handle,sw_hide)
maj sa
MAJO


>From: Adler Michal <adler(zv)nex.tel(tec)cz>
>Reply-To: delphi-l(zv)fwd(tec)cz
>To: "'delphi-l(zv)fwd(tec)cz'" <delphi-l(zv)fwd(tec)cz>
>Subject: TaskBar
>Date: Sun, 6 Feb 2000 23:44:24 +0100
>
>Preju hezky vecer,
>mel bych tady takovou prkotinku. Potrebuju, aby po startu moji aplikace
>nebylo videt jeji tlacitko na taskbaru. Vi nekdo jak to zaridit?
>
>ShowWindow(Handle,sw_Hide);
>SetActiveWindow(Application.Handle);
>ShowWindow(Application.Handle, SW_Hide);
>
>tohle mi nejak nefunguje (teda ne pri staru). Pokud to zavolam treba
>stiskem
>tlacitka, tak je to v poradku, ale ja potrebuju aby se aplikace vubec
>neukazala na taskbaru.
>
>Predem dekuju za jakoukoliv odpoved.
>
>

______________________________________________________
Get Your Private, Free Email at http://www.hotmail.com


nastaveni spusteni programu v registru

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 7.2.2000 17:20:54

Nevim, z jake verze Windows jsi vychazel, ale ve Win95
to neni RunAsService, ale RunServices. Mozna, ze bude
fungovat oboji a nebyl by problem to vyzkouset, ale
nechce se mi restartovat Windows.

Dobra.

> ----------
> Od: Lubo> � RYBN��EK[SMTP:mosek(zv)admiton(tec)cz]
>
> Druha moznost je pouzit klic
> HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\RunAsService
> V tom pripade se tvuj program spusti jeste PRED zobrazenim prihlasovaciho
> dialogu
>
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of Ren> �
>
> Potreboval bych poradit, kam a jaky prikaz strcit do registru na soubor,
> ktery se musi spustit po spusteni ve vsech uzivatelskych profilech i v
> nastaveni mimo heslo (Prihlasovaci dialog -> Storno)
>

OT: Pocet otvorenych suborov

[*] Peter Vlkovic <vlkovic(zv)minv.sk> - 07.2.2000 17:30:12

Nevie niekto poradit nejaky trik,
aby bolo mozne v DOS-ovskej
aplikacii mat sucasne otvorenych
viac suborov (napr. 30) ?
Vdaka.

Peter


ADO Test

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 7.2.2000 17:31:07

This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.

Dobry den vsem,
na strance http://www.cybermagic.co.nz/winsoft/adofaq.htm
je dotaz (hned ten prvni) jak zjistit, zda je nainstalovano
ADO, ale nevim odkud se vzala ta funkce (konstatnta ?)
GetADOVersion.

Q : How do I check in my application if ADO is installed?
A : try
ShowMessage('ADO version ' + GetADOVersion + ' installed');
except
ShowMessage('ADO not installed');
end;

Vite to nekdo prosim ?

Dobra.

SQL, ODBC, ADO, BDE - maximalni zmatek, pomoooc

[*] Vlastimil Bardon <ineq-soft(zv)ova.eridan(tec)cz> - 7.2.2000 17:57:54

Dovolim si sumarizovat:
1. BDE - nativni driver - databaze
2. BDE - ODBC - databaze
3. ADO - OLEDB - databaze
4. ADO - ODBC - databaze

pripadne za pouziti dalsich komponent
5. Delphi - OLEDB - databaze
6. Delphi - ODBC - databaze
7. Delphi - Nativni driver - databaze

Jo a jeste jsem videl nejake DAO componenty a to je myslim to 6. Ikdyz jsou tady povvolanejsi odbornici.
-----P�vodn� zpr�va-----
Od: Zbysek Hlinka [SMTP:zhlinka(zv)login(tec)cz]
Odesl�no: 5. �nora 2000 7:58
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Re: SQL, ODBC, ADO, BDE - maximalni zmatek, pomoooc

On 4 Feb 00, at 11:50, Pavel Bl�hovec wrote:

> Mam trochu zmatek, pomozte mi prosim ujasnit si vec.
>
> Mam aplikaci client/server:
>
> Pouziji BDE, to se napoji na ODBC a ODBC se napoji na SQL server. NEBO

Ano. Nebo muzes pouzit BDE, nativni driver a SQL, pokud mas D
Enterprise (nebo C/S).

> Pouziji ADO, to se napoji na ODBC a ODBC se napoji na SQL server.
>
> JE MOJE UVAHA SPRAVNA?

Pokud jedes pres ADO, tak na ODBC se napojuj jen v pripade, ze
pro danou databazi neni OLE DB provider.


S pozdravem

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

Jak prehrat novejsi verzi za chodu ?

[*] Vlastimil Bardon <ineq-soft(zv)ova.eridan(tec)cz> - 7.2.2000 18:02:14

Lepsi je spustit jinou aplikaci, ktera overi, zda neni na serveru novejsi
kopie, pokud je, tak ji stahne a pak spusti, v opacnem pripade hned spusti
a v obou pripadech se pak ukonci. Uzivatel nemusi ani tusit ze ma zastupce
na jinou aplikaci.

-----P�vodn� zpr�va-----
Od: Roman Fiser [SMTP:rfiser(zv)leknet(tec)cz]
Odesl�no: 5. �nora 2000 11:08
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Re: Jak prehrat novejsi verzi za chodu ?

> Mam asi 15 pocitacu v siti, na kterych je exe soubor.
> Pak umistuji vzdy novejsi verzi na server.
> Pri spusteni programu umim zjistit, ze verze na serveru je novejsi nez na
> lokale.
> No ted bych potreboval aby se program zavrel, natahla (prepsala) nova
verze
> a snovu spustil program.

Ja to resim tak ze program spustli dalsi aplikaci a sam se ukonci, ta
aplikace pocka dokud se program neukonci a pote
stahne novou verzi, zazalohuje puvodni a pak ji nahradi novou,
kterou spusti.

Myslim ze se to za chodu te puvodni aplikace rozumne vyresit
neda.

S pozdravem,
Roman Fiser
roman(zv)management(tec)cz

Zjisteni skriptu z MS SQL

[*] Vlastimil Bardon <ineq-soft(zv)ova.eridan(tec)cz> - 7.2.2000 18:06:25

Kolega nekde zahlednul, ze existuje OLE objekt na serveru, ktery umi vratit
skript zvoleneho databazoveho objektu na MS SQL. Prosim nevite o tom nekdo
neco blizsiho? (Hlavne pro MS SQL7, ale bylo by idealni, kdyby se to tykalo
jak MS SQL 6.5, tak i MS SQL 7).

Pomoooc: General SQL Error Podruhe

[*] Vlastimil Bardon <ineq-soft(zv)ova.eridan(tec)cz> - 7.2.2000 18:16:39

DUMP TRANSACTION WITH TRUNCATE_ONLY

... ale over si to radeji v helpu

-----P�vodn� zpr�va-----
Od: Pavel Bl�hovec [SMTP:blahovec(zv)stapro(tec)cz]
Odesl�no: 7. �nora 2000 9:13
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Pomoooc: General SQL Error Podruhe

Mam skutecne problem, prelozit si to umim, ale provest vyprazdeni toho
segmentu neumim.

Mam Delphi 5, Windows 2000 Prof, SQL Server 6.5, p�istupuji na datab�ze p�es
ADO a ODBC

----- Original Message -----
From: Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, February 04, 2000 10:07 AM
Subject: RE: Pomoooc: General SQL Error:>
> >Can't allocate space for object 'Syslogs' in database 'MainDB' because
> >the 'logsegment' is full. If you ran out of space in Syslogs, dump the
> transaction log.
> >Otherwise, use ALTER DATABASE or > sp_extendsegment to increase the size
> of the segment.
>
> >Poradi mi nekdo co s tim?
>
> To chces prelozit do cestiny nebo mas skutecne nejaky problem?
> Jestli mas skutecny problem, doporucoval bych napsat i jaky SQL server
> pouzivas.
>
> Jura
>

Sporic obrazovky

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 7.2.2000 18:19:48

Ahoj,
ja bych jeste doplnil, ze pokud chces i vlastni "nahled"
(ve vlastnostech obrazovky na zalozce Sporic obrazovky)
tak Windows (32!) predavaji parametry /p xyz, kde xyz
je handle toho maleho okynka.

Prejmenovani *.EXE na *.SCR neni nutne delat rucne,
staci bud v project source uvest {$E SCR} nebo to
lze nastavit v IDE Delphi-Project-Options-zalozka
Aplication.

A s tim skoncenim pri pohybu mysi nebo stiskem
klavesy to neni uplne pravda; mel by jsi kontrolovat,
zda uzivatel ma aktivovanou volbu "Chranit heslem"
a podle toho se zachovat (tzn. zobrazit std. dialog)
Navic, je lepsi kontrolovat spis Application.OnMessage
nez Form.OnKeyDown / Press / Up.

Dale je nutne nastavit SystemParametersInfo prave
tak, ze bezi ssaver (zamezi se Alt-Tab, Ctrl-Alt-Del
(navrhuji zkratku CAD :-)) a po ukonceni se to musi
opet nastavit zpet... No, neni to takova sranda :-)
Pro vice informaci doporucuji studium UDDF, TI's
a quand-u.

Dobra.

> ----------
> Od: Josef A. Cerny[SMTP:vyvoj(zv)atlascon(tec)cz]
>
> > chtel bych se zeptat, jestli(a jak??) jdou v Delphi psat sporice
> > obrazovky?
>
> Screen-saver je v principu obycejny program, ktery byl prejmenovan, aby mel
> priponu .scr. Aby mohl spolupracovat se operacnim systemem a tvarit se
> "profesionalne", musi splnovat nekolik podminek:
> * Umoznit nastavovani - treba v ini souboru, nebo v registry
> * Poskytnout vlastni popis - lze pridanim radky {$D SCRNSAVE "Muj ssaver"}
> na zacatku DPR. Text v uvozovkach se objevi v seznamu jmen sporicu.
> * Rozlisovat mezi aktivnim a nastavovacim rezimem - lze testovat spoustecim
> parametrem "s" pro aktivni rezim, "c" pro nastavovaci rezim. Je treba si dat
> pozor na hlavni formular, bo jednou to bude dialog pro nastavovani
> parametru, podruhe velike okno pres celou obrazovku.
> * Nedovolit vicenasobne spusteni sebe sama
> * Skoncit pri stisku klavesy nebo pohybu mysi.
>
> Samotne zavedeni do Windows - zmenit priponu .exe na .scr a zkopirovat do
> systemoveho adresare windows.
>
>

Jak prehrat novejsi verzi za chodu ?

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 7.2.2000 18:26:32

Bud pomoci WaitForSingleObject,
nebo, ponekud ehm, no, zkratka dokud
existuje hlavni okno cekat
while FindWindow(PChar('TForm1'), nil)<>0 do
Application.ProcessMessages;

(bez komentare prosim :-)))

Dobra.

> ----------
> Od: Pavel Medek[SMTP:Pavel.Medek(zv)talema(tec)cz]
>
> Uz jsem vetsinu problemu vyresil, jen neumim pockat az se ukonci
> ta aplikace, ktera ma byt nahrazena novejsi.
>
> ----- Original Message -----
> From: Roman Fiser <rfiser(zv)leknet(tec)cz>
>
> > Ja to resim tak ze program spustli dalsi aplikaci a sam se ukonci, ta
> > aplikace pocka dokud se program neukonci a pote
> > stahne novou verzi, zazalohuje puvodni a pak ji nahradi novou,
> > kterou spusti.
>

cluster API

[*] Tom� Vin� <T.Vins(zv)Aquasoft(tec)cz> - 7.2.2000 18:27:09

Psal nekdo dll s vyuzitim CLUSTER API a byl by ochoten podelit se o
zkusenosti?
Po uvodnim dni studia mi prijde, ze to neni az tak jednoduche a informace
nejsou uplne dostupne.

(D5, NT4SP4)

Diky

<Masa(zv)aquasoft(tec)cz>

Pocet otvorenych suborov

[*] JAHODA Jozef <jahoda(zv)asset.sk> - 7.2.2000 18:46:11

Peter Vlkovic wrote

> Nevie niekto poradit nejaky trik,
> aby bolo mozne v DOS-ovskej
> aplikacii mat sucasne otvorenych
> viac suborov (napr. 30) ?
>
Do Config.sys alebo do Autoexec.bat dopis

FILES = 35 (mozes az do 255), ale pozor, lebo cim vecsie cislo, tak
tym viac pameti Ti to zozerie.

JJ


VSECHNA DATA Z KONFERENCE OPET ON-LINE

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 7.2.2000 18:50:29

Preji vsem pekneho dne,

diky podpore serveru www.management(tec)cz jsem mohl umistit opet
vsechna data Internet, tentokrate na dobu neurcitou. Proto stahujte
z adresy:

http://www.management(tec)cz/delphi

Aktualizace bude jako doted pravidelne jednou za mesic, s tim, ze
starsi data zustanou na svem miste a budete si je moci stahnout
dle potreby i pozdeji.

Preji prijemne a hlavne rychle stahovani (doporucuji vikendovy cas).

Slavek


-------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
-------------------------------------------------
http://www.swnet(tec)cz
Magazin informacne vyspelych jedincu
-------------------------------------------------


OT: JavaScript, framy, reload, back,...

[*] Jan Fryscak <fryscak(zv)scio(tec)cz> - 7.2.2000 19:24:40

Ahoj,
omlouvam se za off-topic, ale uz si s tim hraju nekolik dnu a nevim co s
tim.
Mam okno otevrene Javascriptem, kde jsou 2 framy. Horni frame (maly) slouzi
predevsim k odecitani casu (od zadane hodnoty do nuly pomoci javascriptu).
Spodni frame je radove vetsi, cili se nacita relativne dlouho. Mam dva pro
problemy, ktere jsem oba schopen vyresit, ale nikoli najednou.

1. zajistit, aby se cas zacal odecitat az po nacteni spodniho frameu
2. zajistit, aby se reloudnutim (ci jakkoli jinak) nezacal odecitat znovu

ad 1. pri otevirani okna dam do horni frameu nejaky text (napr. "pockejte az
se nacte zbytek" a na konec dolnihu frameu pridam kod javascriptu, ktery
zameni obsah hornihu frameu "odecitacim" framem
ad 2. pri reloadu se koukam do databaze, kde je nejaky parametr, ktery rika,
zda je frame nacitan poprve ci nikoli. Podle toho nastavim odecitani casu od
puvodni hodnoty nebo od hodnoty zjistene ze soucasneho casu

toto reseni funguje, ale bohuzel s jednou vyjimkou
Pokud dam v browseru "back", tak se do horniho frame vrati puvodni obsah a
odecitani tedy vubec nebezi. Resil jsem to tak, ze jsem nakonec frameu s
textem pridal "history.forward()", ale fungujete to jenom v Nescape. V
Exploreru se zacne odecitat od casu posledniho reloadu (tedy v principu se
cas do nuly nemusi dostat nikdy).

Budu vdecen za kazdy napad

Diky Honza

P.S. zkousel jsem i pragma: no-cache, expires:0 apod, ale nepomohlo to



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