Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
Export BMP do RTF suboru.
[*] Peter Vlkovic <vlkovic(zv)minv.sk> - 09.4.2001 14:09:11
Ahoj,
potrebujem vlozit BMP obrazok do RTF suboru,
ma s tym niekto skusenosti?
Vlkovic
Oracle a commit
[*] Martin.Chaloupka(zv)bbdo-interone.de - 9.4.2001 14:11:58
> Dobry den.
>
> Narazil jsem na zajimavy problem, ktery bych rad predlozil.
>
> Kdyz se pripojim k databazi Oracle (8.1.6.0, client taktez verze 8)
> pomoci SQLORA8.DLL a otevru si dve aplikace, zmeny z jedne nevidim v
> druhe, dokud tu prvni neuzavru ci nedam "commit". Pokud pouziji starsi
> a doted vyuzivanou SQLORA32.DLL, jsou zmeny videt ihned po ulozeni
> vety, tedy predpokladam, ze po "postu" je volan automaticky zminovany
> "commit".
>
> A ted by me zajimalo, co mam delat, kdyz mam hafo aplikaci, ktere jsou
> napsane v dobe stare knihovny a ted chci prejit na nove "vymozenosti"
> Oracle8 (doted Oracle7).
Pro novou knihovnu (presneji bude se to tykat uzivatelu, kteri se
tam prihlasuji) - Oracle umoznuje nastavit pres 'alter session set
autocommit on'.
Pokud chcete zachovat tuto starou funkcnost, bude treba nastavit
tuto vlastnost pro daneho uzivatele (ted Vam z hlavy nereknu, jak
se to dela, ale zkuste se mrknout do dokumentace na create user,
create session + vlastnost autocommit).
Ale pozor, aby se Vam to nevymstilo pri nejakych upravach
databaze, ktere delate rucne.
>
> Dekuji predem za kazdou odpoved.
>
> KarelH
>
S pozdravem Martin Chaloupka
uz OT: Maly exe z Delphi - korekce uses
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 9.4.2001 14:18:21
On 9 Apr 2001, at 8:28, Bene# Jaroslav wrote:
> [...] Pokud ale
> treba delam obezny SW na zarizeni dle technicke dokumentace, nikdy
> jsem zarizeni nevidel a ocekavam ze si to z Internetu stahne tisic
> ucastniku, tak ten SW musi byt nutne napsany jinak, s ohledem na
> nejmensiho mozneho jmenovatele OS (pokud delam pod Win32 tak asi je to
> W95). [...]
>
> P.S.
> Pokud ale apriori vyloucim nekoho, kdo ma sice jen 486 a 200MB disk
> (ale ma tam alespon W95) tak si ale pak budu rikat, ze jsem spatny
> obchodnik a nenabidnul jsem uzivateli reseni, ktere by ocekaval a
> ktere je jiste v me moci.
Tohle se resi tak, ze se vypise minimalni konfigurace, na ktere to
lze provozovat. Priklad Lokalizatoru 5 - vyzaduji pritomnost COM a
nejmene 32 MB RAM. Stara plechovka s W95 nemusi mit
nainstalovany ani COM, ani dost pameti. Je mi to lito, ale takovy
uzivatel si ani neskrtne. Kdybych mel jit opravdu po minimalnim
moznem jmenovateli (tedy stara instalace W95 bez COM), nikdy
bych Lokalizator 5 nezacal psat, prestoze by to bylo v me moci.
Podlezat pod hranici rozumnych moznosti se nemusi vyplatit.
Prikladem budiz databazovy program. Jestlize ho postavim nad
SQL databazi (MSDE, IB ci co ja vim), pak uzivatel musi mit urcite
minimalni vybaveni. Jestlize ho nema a prizpusobit se nechce,
mohu se rozhodnout takto:
1. Vykaslu se na nej.
2. Podlezu rozumne pozadavky a kvuli nemu udelam variantu nad
Paradoxem.
Zvolim-li bod 2, jsem spatnym obchodnikem, protoze namisto
abych zakaznika presvedcil o nutnosti upgradovat, poustim se do
nebezpecnych dobrodruzstvi.
Takze bude-li muj skvely program volne ke stazeni, pak ma uzivatel
se starym krapem dve moznosti:
1. muj program je tak skvely, ze se mu upgrade vyplati,
2. muj program neni tak skvely jako jeho krap nebo ho nepotrebuje,
takze se na to vykasle.
S pozdravem
Zbysek Hlinka
http://www.hlinka(tec)cz http://www.slhaters(tec)cz
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
WebViewer
[*] daniel.hrna(zv)sme(tec)cz - 9.4.2001 14:24:06
Pouzivam tisk pres WebViewer.
Mam v cyklu nacitanou databazi na formular (jsou to otazky: Otazka, odpovedi
a) b) c) ), Nacteni funguje v poradku, jenom mi vadi, ze pri tisku mi to
rozdeli otazku od odpovedi na jinem liste.
Je to neco jako test autoskoly.
Ale nevim jak dosahnout celistvosti otazky a 3-odpovedi. Pokud by nejaka
funkce zjistila, ze se nevleze cela otazka i s 3-odpodmi na stranku, mela by
tuto otazku tisknout jiz celou na dalsi stranku i s tema odpovedma.
Mam D5Pro.
Prosim, jak toto resit, nemate nekdo nejakou komponentu?
Prosim o zaslani odpovedi tez na e-mail: drak5919(zv)seznam(tec)cz
Moc dik.
Dan
Zistenie nazvu suboru.
[*] kinekus <kinekus(zv)nextra.sk> - 9.4.2001 14:30:29
D4,W98
Ako zistim ci konkretny adresar obsahuje nejake subory a ako sa volaju ?
Dakujem
Fabik
komponenty WDE pre Winbase602
[*] iturcan(zv)gamo.sk - 9.4.2001 14:30:46
Zdravim priaznivcov Delphi
K dispozicii je nova podstatne vylepsena verzia komponent WDE pre pristup k
databazovemu servru Winbase.
Viac informacii najdete na strankach WDE
www.software602(tec)cz\wde
alebo aj na novej stranke
www.software602.sk\wde
Pripadne blizsie otazky rad zodpoviem
S pozdravom
Ivan Turcan
EMAIL - cisty text
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 9.4.2001 14:34:03
> Ahoj,
> poradte mi prosim, jak z emailove zpravy dostat pouze cisty text zpravy,
> pripadne Predmet.
vse zavisi na tom v jakem tvaru mas tu zpravu nactenou. Pokud ji mas v
nativnim tvaru pak:
- Subject:
je polozka v hlavicce. Cili staci nacist z hlavicky prislusny
radek(radky) a pripadne jej prevest z kodovaneho tvaru do textu s
diakritikou (RFC 1342, pokud se nepletu)
- telo zpravy
to uz je horsi - musis se naucit rozparsovat zpravu na prvocinitele.
D. Toman
StrToInt
[*] prajz.rumcajs(zv)quick(tec)cz - 9.4.2001 14:37:20
Uz se tu kdysi neco podobneho objevilo, ale nemuzu to najit.
Mam nejakou takovou fci:
var
s: string;
i: Integer;
begin
i := StrToInt(s);
Potrebuju zjistit, jsou-li v 's' i jine znaky nez cislice, nevite nekdo jak
na to ...RTF -> HTML
[*] CERMAK <CERMAK(zv)procom(tec)cz> - 9.4.2001 14:41:48
Ahoj vsichni
Nevite nekdo o unite, ktera umi prevod z RTF do HTML.
Predem diky
Jaromir Cermak StrToInt
[*] Pavel ZIDEK <delphi(zv)kopr(tec)cz> - 9.4.2001 14:42:17
pomoci val
----- Original Message -----
From: <prajz.rumcajs(zv)quick(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, April 09, 2001 2:37 PM
Subject: StrToInt
> Uz se tu kdysi neco podobneho objevilo, ale nemuzu to najit.
> Mam nejakou takovou fci:
>
> var
> s: string;
> i: Integer;
> begin
> i := StrToInt(s);
>
> Potrebuju zjistit, jsou-li v 's' i jine znaky nez cislice, nevite nekdo
jak
> na to ...
>QReport a Preview chyba
[*] Milan Schembera <milan(zv)missoftware(tec)cz> - 9.4.2001 14:43:37
Zdravim,
ted se mi stala takova zvlastni vec: U projektu, kde jsem mel svuj formular
s TQRPreview a ten jsem odstranil a odstranil i vsechny odkazy na nej v
udalostech OnPreview, se mi najednou pri metode Preview reportu (uz
standardni preview dialog QU Softu) zacaly objevovat hlasky: "Cannot create
file xxx", kde xxx jsou nejake ridici znaky a nasledne "Canvas does not
allow drawing". Stahnul jsem si proto update QuickReportu a ani to
nepomohlo, dela to porad to same. Vratil jsem tam tedy ten muj preview
dialog a vysledek porad tentyz.
Netusi nekdo, co by mohlo byt spatne ?
D3, QR 2.0k, Win2k Prof SP1....
Diky
Milan
FreeIBComponents
[*] Zden�k Brej�a <prog(zv)hjsoft(tec)cz> - 9.4.2001 15:01:51
Ahoj,
Kde se daji sehnat FreeIBComponents? (www.interbase.com to neni)
diky za link
MDIChild a visible
[*] Tomas Bradle <t.bradle(zv)pvtnet(tec)cz> - 9.4.2001 15:11:28
Zdravim vsechny,
nevite nekdo proc u formulare pri volbe FormStyle:=MDIChild se automaticky
nastavi i visible:=true ? Ma to nejake logicke opodstatneni nebo si tvurce
VCL nejak zjednodusil zivot ?
diky
Tomas Bradle
t.bradle(zv)pvtnet(tec)cz
FreeIBComponents
[*] Jiri Binder <j.binder(zv)albacon(tec)cz> - 9.4.2001 15:21:35
From: "Zden�k Brej#a" <prog(zv)hjsoft(tec)cz>
> Kde se daji sehnat FreeIBComponents? (www.interbase.com to neni)
Napr. www.ibphoenix.com sekce Downloads / Contributed
Jiri Binder
StrToInt
[*] Radek Secka <sejda(zv)centrum(tec)cz> - 9.4.2001 15:30:27
Zkus se podivat do helpu na vyjimky (exceptions). Pokud tam jou i jine znaky
nez cislice ja vyvolana vyjimka.
Nebo pouzij proceduru Val.
----- Original Message -----
From: <prajz.rumcajs(zv)quick(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, April 09, 2001 2:37 PM
Subject: StrToInt
> Uz se tu kdysi neco podobneho objevilo, ale nemuzu to najit.
> Mam nejakou takovou fci:
>
> var
> s: string;
> i: Integer;
> begin
> i := StrToInt(s);
>
> Potrebuju zjistit, jsou-li v 's' i jine znaky nez cislice, nevite nekdo
jak
> na to ...
>
>StrToInt
[*] Milan Tomes <Milan.Tomes(zv)haida(tec)cz> - 9.4.2001 15:34:23
Napr:
begin
try
StrToInt(s)
except
on E:EConvertError do
showmessage('Chyba - Cislo nema spravny format');
end;
end;
Milan Tomes
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of prajz.rumcajs(zv)quick(tec)cz
> Sent: Monday, April 09, 2001 2:37 PM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: StrToInt
>
>
> Uz se tu kdysi neco podobneho objevilo, ale nemuzu to najit.
> Mam nejakou takovou fci:
>
> var
> s: string;
> i: Integer;
> begin
> i := StrToInt(s);
>
> Potrebuju zjistit, jsou-li v 's' i jine znaky nez cislice, nevite nekdo jak
> na to ...Zistenie nazvu suboru.
[*] Bednar��k Dalibor <dalibor(zv)torola(tec)cz> - 9.4.2001 15:37:32
Podivej se na funkce FindFirst a FindNext
----- Original Message -----
From: "kinekus" <kinekus(zv)nextra.sk>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, April 09, 2001 2:30 PM
Subject: Zistenie nazvu suboru.> D4,W98
>
> Ako zistim ci konkretny adresar obsahuje nejake subory a ako sa volaju ?
>
>
> Dakujem
> Fabik
> Tlacitka na Taskbaru - dalsi okno aplikace (reakce
[*] Tomas Bradle <t.bradle(zv)pvtnet(tec)cz> - 9.4.2001 15:55:40
Zdravim,
Jestli nekoho zajima tenhle problem, tak tady jsou vysledky zkoumani okolo
modalnich formularu volanych z jinych formu, nez z hlavniho formu.
Zkoumal jsem jak probiha to zobrazovani modalniho formulare a zjistil jsem,
ze mi ten vedlejsi form aplikace nikam neschova, ale pouze se mainform
presune v z-souradnici nahoru (zakreje ten vedlejsi). Proc se ten mainform
presune nahoru ? Pricinou je metoda TApplication.NormalizeAllTopMosts. Tato
funkce je volana v prubehu TForm.ShowModal. Slouzi k tomu, aby sly
zobrazovat modalni formulare i pres okna, ktere maji FormStyle=fsStayOnTop.
Reseni ? Je nejednoznacne a mozna mirne komplikovane pro nektere situace.
Protoze je potreba zabranit volani NormalizeAllTopMosts, ke kteremu dochazi
ve zpracovani zpravy WM_ENABLE v TApplication.WndProc, je traba tomuto
zpracovani zabranit vlozenim WindowHook do zpracovani zprav v
TApplication.WndProc. Ja to mam takhle:
function TfrISMain.MessageHook(var Msg: TMessage): Boolean;
begin
Result:=False;
if (Msg.Msg = WM_ENABLE) then
begin
Result:=true; {toto zabrani dalsimu zpracovani v TApplication.WndProc}
if TWMEnable(Msg).Enabled then
begin
if FWindowList <> nil then
begin
EnableTaskWindows(FWindowList);
FWindowList:=nil;
end;
with Msg do
DefWindowProc(Application.Handle, Msg, WParam, LParam);
end
else
begin
with Msg do
DefWindowProc(Application.Handle, Msg, WParam, LParam);
if FWindowList = nil then
FWindowList:=DisableTaskWindows(application.Handle);
end;
end;
end;
TfrISMain je trida hlavniho okna aplikace do ktere je potreba pridat:
private
FWindowList: Pointer;
protected
function MessageHook(var Msg: TMessage): Boolean; virtual;
a v udalostech OnCreate a OnDestroy:
procedure TfrISMain.FormDestroy(Sender: TObject);
begin
...
Application.UnhookMainWindow(MessageHook);
FTopMostList.Free;
...
end;
procedure TfrISMain.FormCreate(Sender: TObject);
begin
...
FTopMostList:=TList.Create;
Application.HookMainWindow(MessageHook);
...
end;
Vyse uvedeni WindowHook je obdoba zpracovani WM_ENABLE z
TApplication.WndProc, chybi v nem pouze to nestastne volani
TApplication.NormalizeAllTopMosts. Pokud nemate v aplikaci fsStayOnTop okno,
bude vse v poradku. Pokud mate, bude fsStayOnTop okno nad tim modalnim
formem. Jako reseni mne zatim napadlo udelat to modalni okno taky
fsStayOnTop, ale asi to v nekterych pripadech nebude to prave. Napr. pokud
se pouziva i jako nemodalni. Treba nekoho neco napadne, jak tohle resit.
Tomas Bradle
t.bradle(zv)pvtnet(tec)cz
(Delphi 5)
----- Original Message -----
From: "Tomas Bradle" <t.bradle(zv)pvtnet(tec)cz>
To: "Delphi konference new" <delphi-l(zv)clexpert(tec)cz>
Sent: Friday, April 06, 2001 12:36 AM
Subject: Tlacitka na Taskbaru - dalsi okno aplikace (reakce na starsi
prispevek)> Zdravim vsechny,
>
> narazil jsem na problem s pouzitim vice formularu v aplikaci, pokud chci
mit
> pro kazdy form extra tlacitko v TaskBar-u, podobne jako v nasledujicim
> prispevku. Kdyz ale chci vuvolat z nektereho toho formu modalni form,
> aktivuje se mi hlavni form aplikace, na nem se zobrazi ten modalni form.
Po
> ukonceni se opet aktivuje ten predchozi form.
>
> Nevite nekdo jak zabezpecit, aby form, ktery neni hlavnim formem aplikace
a
> ma tlacitko na taskbaru (je extstyle WS_EX_APPWINDOW) neschoval, kdyz
vyvola
> modalni form ? Zda se mi to nelogicke, kdyz se skryje a zustane videt jen
> ten ten modalni form.
>
> diky
>
> Tomas Bradle
> t.bradle(zv)pvtnet(tec)cz
>
>
> > From: "Ales Vasicek" <vasicek(zv)ecommerce(tec)cz>
> > > chtel bych se zeptat, jak udelat dalsi tlacitka v taskbaru (ne v
system
> > > tray). Stejne jak to dela MS Outlook. Potreboval bych to do sve
> > > aplikace, kde si uzivatel poklepe v gridu na nejaky zaznam a vyskoci
mu
> > > nove okno s detailnim popisem. Uzivatel si muze otevrit kolik oken
chce
> > > a rad by se mezi nemi prepinal na taskbaru po vzoru MS Office.
> >
>
oci.dll - Oracle
[*] cis <cis(zv)atlas(tec)cz> - 9.4.2001 15:57:47
Jakou ver. Oracle pouzivas?
alda
----- Original Message -----
From: Olesia <olesia(zv)idirect.com>
To: Delphi-L <delphi-l(zv)clexpert(tec)cz>
Sent: Saturday, April 07, 2001 10:01 PM
Subject: oci.dll - Oracle
> Ahojte.
>
> Mam problem. Nainstalovala som Oracle clienta na Win NT u mojho clienta.
> Pri spusteni mam hlasku : can not find oci.dll
> oci.dll je kniznica, ktora spravidal je v oraclovskom bin adresari.
Overila
> som aj cestu - su nastavene v Path. Toto je moja prva instalacia clientu
na
> WinNT. Neviem, mozno musim nieco dodatocne nastavit? Alebo je to chyba aj
> Delphi?
> Budem vdacna za kazdu pomoc
>
>
> Lelitka
>
>
oci.dll - Oracle
[*] cis <cis(zv)atlas(tec)cz> - 9.4.2001 16:01:28
Prohledej registr a odmas klice ORACLE.
alda
----- Original Message -----
From: Olesia <olesia(zv)idirect.com>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, April 09, 2001 3:32 AM
Subject: RE: oci.dll - Oracle
>
> To vsetko som skusila, nepomaha bohuzial..:-(
> Any other ideas?
>
> diky
>
> Lelitka
>
>
> Nevim jakou mas verzi. Ja instaluji klienty ORACLE pravidelne a casto
> nastava stejny problem jako tvuj. Resim to opetovnou instalaci a pokud to
> nepomuze tak klienta odinstaluji a pote nainstaluji znovu. Pak to vzdy
> funguje.
>
> Problem je ze se pri instalaci obcas zbordeli registry pro klienta.
>
> Jan Skopovy
>
> >
> > Mam problem. Nainstalovala som Oracle clienta na Win NT u mojho clienta.
> > Pri spusteni mam hlasku : can not find oci.dll
> > oci.dll je kniznica, ktora spravidal je v oraclovskom bin adresari.
> Overila
> > som aj cestu - su nastavene v Path. Toto je moja prva instalacia clientu
> na
> > WinNT. Neviem, mozno musim nieco dodatocne nastavit? Alebo je to chyba
aj
> > Delphi?
>
>
TOpenDialog
[*] Martin Bab�k <M.Babik(zv)mus(tec)cz> - 09.4.2001 16:07:46
Zdravim Delphiny,
jak jednoduse vybrat z adresare n-souboru urciteho typu (treba vsechny "txt")? Nebo vsechny soubory z jednoho adresare, ci jen ten adresar? Prijde mi, ze to TOpenDialog, neumi. :-( Diky
M&B
QReport a Preview chyba
[*] Marcant <marcant(zv)sct.sk> - 9.4.2001 17:37:55
Neporadim ti celkom presne, ale nejako to suvisi s vytvaranim temporary
suborov QR,
obvykle po vzniku nejakej chyby pri tlaci alebo preview .Mne v takomto
pripade vzdy pomohlo
vymazat subory v adresari TEMP (asi by stacilo iba jeden konkretny, bohuzial
vsak neviem aky).
MarCaNT
> Zdravim,
>
> ted se mi stala takova zvlastni vec: U projektu, kde jsem mel svuj
formular
> s TQRPreview a ten jsem odstranil a odstranil i vsechny odkazy na nej v
> udalostech OnPreview, se mi najednou pri metode Preview reportu (uz
> standardni preview dialog QU Softu) zacaly objevovat hlasky: "Cannot
create
> file xxx", kde xxx jsou nejake ridici znaky a nasledne "Canvas does not
> allow drawing". Stahnul jsem si proto update QuickReportu a ani to
> nepomohlo, dela to porad to same. Vratil jsem tam tedy ten muj preview
> dialog a vysledek porad tentyz.
>
> Netusi nekdo, co by mohlo byt spatne ?
>
> D3, QR 2.0k, Win2k Prof SP1....
>
> Diky
>
> Milan
>StrToInt
[*] Jiri Novotny <NOVOTNY(zv)ftknw.upol(tec)cz> - 9.4.2001 15:42:50 met-1
> begin
> try
> StrToInt(s)
> except
> on E:EConvertError do
> showmessage('Chyba - Cislo nema spravny format');
> end;
> end;
Nebo pouzit Val, kde treti parametr primo urcuje i neciselnou pozici.
Jirka uz OT: Maly exe z Delphi - korekce uses
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 9.4.2001 17:55:09
Puvodni zprava, kterou napsal Bene# Jaroslav dne 9 Apr 2001,:
> Pokud ale apriori vyloucim nekoho, kdo ma sice jen 486 a 200MB disk (ale
> ma tam alespon W95) tak si ale pak budu rikat, ze jsem spatny obchodnik
> a nenabidnul jsem uzivateli reseni, ktere by ocekaval a ktere je jiste v
> me moci.
Dobry obchodnik neni ten, kdo donuti programatora psat windowsovske
programy pro MS-DOS proto, aby ten soft za dve stovky prodal, ale
ten, kdo s tim programem proda soucasne poradny pocitac.
Obchodnik je jedna vec, programator druha vec. Rada lidi ma stale
jen MS-DOS, rada lidi jen Windows 3.1. A ja rikam, ze to neni duvod,
proc delat stale v Turbo Pascalu nebo Delphi 1. Kdyz nekdo chce,
pak at dobrovolne dela. Ale nelze rikat, ze by se to melo delat,
ze je to spravne a dulezite. A kdo dela jen 10 MB programy
vyzadujici 32-bitove Windows a rychlejsi pocitace, ze je spatny
programator...
S pozdravem
Petr Zahradnik, pocitacovy expert
============================================================
Petr Zahradnik, Computer Laboratory
Obvodova 740/14, P.O. Box 15, 400 07 Usti nad Labem
Telefony: 047-5500610, 047-5501627, 0602-409601
Fax: 047-5511338
WWW: http://www.clexpert(tec)cz, http://www.zahradnik(tec)cz
E-Mail: clexpert(zv)clexpert(tec)cz, petr(zv)zahradnik(tec)cz
ICQ: 21215917
============================================================OT: Konverze .p65->.PDF
[*] brant(zv)dcomm(tec)cz - 9.4.2001 18:16:25
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.
Omlouvam se za OT, nemam nikoho, na koho bych se mohl obratit. Mam na CD
soubor .p65 (patrne PageMaker, jak jsem zjistil pohledem na binarni podobu)
a potreboval bych ho prevest na PDF nebo nejaky podobny citelny format. Mam
to totiz prelozit a je protivne listovat papirovym dokumentem. Najde se
nekdo z Prahy, kdo by byl ochoten to pro me za dobre slovo udelat? Diky
RNDr. Petr Brant [Brant(zv)dcomm(tec)cz]
ICQ # 68652380
D&COMM s.r.o
Korunova�n� 6
Praha 7 Zistenie nazvu suboru.
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 9.4.2001 18:58:59
>
> Ako zistim ci konkretny adresar obsahuje nejake subory a ako sa volaju ?
FindFirst (FidFirstFile)
FindNExt (FindNextFile)
D> Toman
Synapse & RTF
[*] Erik Salaj <winsoft(zv)napri.sk> - 9.4.2001 21:11:37
> Co se stane, kdyz jako inline oznacim prilohu, jejiz ukazani muze byt
> destruktivni? (nejaky zakerny HTML, co VBS skript?) Je postovni klient
> tak tupy, ze jej suse spusti, aby jej ukazal??? Doufam ze ne. Kdyz ale
> ne, tak proc najednou potovni klient, jindy tak dbajici na ono 'inline'
> najednou toto ignoroval? Proc ma byt program ten, kdo rozhoduje
> SVEVOLNE o tom, kdy se teda drzi a kdy nedrzi toho co je v mailu
> napsano? Pak je totiz chovani programu zcela nepredvidatelne, a to je
> spatne!
Podla mna je naopak velmi rozumne spravanie programu prisposobit
(primerane) tak, aby zbytocne neobtazoval uzivatela. Povazujem
za somarinu pytat si od uzivatela povolenie na pozretie obrazka
prilozeneho k mailu, pretoze na to ziadny dovod nie je.
Na druhej strane u spustitelnych suborov take dovody su.
> Spravne to ma byt totiz podle mne tak, ze postovni program vzdy
> nabidne prilohu k ulozeni, a teprve kdyz ji umi zobrazit, tak at nabidne i
> jeji zobrazeni. (ale jen nabidne.. ne ze ji sam rovnou ukaze!) Na to ale
> zadne 'inline' nepotrebujes. A takhle se podle mne maji postovni klienti
> chovat. (A nastesti ten, co pouzivam, se tako chova.) :-)
Pokial ale program bude zakazdym otravovat uzivatela a ziadat
potvrdenie, tak prva vec, ktoru uzivatel urobi je, ze si to
vypne. A vypnutie takychto funkcii je z bezpecnostneho
hladiska daleko horsie ako ich redukcia len na EXE alebo
skript subory.
To potom v idealnom pripade by sa asi Windows mal pred spustenim
kazdeho programu najprv styrikrat opytat, ci naozaj spustit a popri
tom este zdvihnut uzivatelovi hladinu adrenalinu upozorneniami,
co vsetko sa moze po spusteni stat ;-). Skratka user-friendly
software.
Erik
pristup k MySQL na linuxu?
[*] Tomas Vida <vida(zv)uniware(tec)cz> - 9.4.2001 21:16:59
Muzete mi poradit, co pouzit pro pristup k MySQL bezici na linuxu? V archivu
jsem nasel cca 300 prispevku na toto tema a na www.mysql.com je take nekolik
moznosti.
Nerad bych objevoval neco, co jiz davno objevene je.
Prosim o zkusenosti a rady z praxe.
Dekuji za pomoc
Tomas Vida
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.243 / Virov� b�ze: 118 - datum vyd�n�: 30.3.2001
Tlacitka na Taskbaru - dalsi okno aplikace (reakce
[*] Tomas Bradle <t.bradle(zv)pvtnet(tec)cz> - 9.4.2001 21:52:57
Zdravim,
Jestli nekoho zajima tenhle problem, tak tady jsou vysledky zkoumani okolo
modalnich formularu volanych z jinych formu, nez z hlavniho formu.
Zkoumal jsem jak probiha to zobrazovani modalniho formulare a zjistil jsem,
ze mi ten vedlejsi form aplikace nikam neschova, ale pouze se mainform
presune v z-souradnici nahoru (zakreje ten vedlejsi). Proc se ten mainform
presune nahoru ? Pricinou je metoda TApplication.NormalizeAllTopMosts. Tato
funkce je volana v prubehu TForm.ShowModal. Slouzi k tomu, aby sly
zobrazovat modalni formulare i pres okna, ktere maji FormStyle=fsStayOnTop.
Reseni ? Je nejednoznacne a mozna mirne komplikovane pro nektere situace.
Protoze je potreba zabranit volani NormalizeAllTopMosts, ke kteremu dochazi
ve zpracovani zpravy WM_ENABLE v TApplication.WndProc, je traba tomuto
zpracovani zabranit vlozenim WindowHook do zpracovani zprav v
TApplication.WndProc. Ja to mam takhle:
function TfrISMain.MessageHook(var Msg: TMessage): Boolean;
begin
Result:=False;
if (Msg.Msg = WM_ENABLE) then
begin
Result:=true; {toto zabrani dalsimu zpracovani v TApplication.WndProc}
if TWMEnable(Msg).Enabled then
begin
if FWindowList <> nil then
begin
EnableTaskWindows(FWindowList);
FWindowList:=nil;
end;
with Msg do
DefWindowProc(Application.Handle, Msg, WParam, LParam);
end
else
begin
with Msg do
DefWindowProc(Application.Handle, Msg, WParam, LParam);
if FWindowList = nil then
FWindowList:=DisableTaskWindows(application.Handle);
end;
end;
end;
TfrISMain je trida hlavniho okna aplikace do ktere je potreba pridat:
private
FWindowList: Pointer;
protected
function MessageHook(var Msg: TMessage): Boolean; virtual;
a v udalostech OnCreate a OnDestroy:
procedure TfrISMain.FormDestroy(Sender: TObject);
begin
...
Application.UnhookMainWindow(MessageHook);
FTopMostList.Free;
...
end;
procedure TfrISMain.FormCreate(Sender: TObject);
begin
...
FTopMostList:=TList.Create;
Application.HookMainWindow(MessageHook);
...
end;
Vyse uvedeni WindowHook je obdoba zpracovani WM_ENABLE z
TApplication.WndProc, chybi v nem pouze to nestastne volani
TApplication.NormalizeAllTopMosts. Pokud nemate v aplikaci fsStayOnTop okno,
bude vse v poradku. Pokud mate, bude fsStayOnTop okno nad tim modalnim
formem. Jako reseni mne zatim napadlo udelat to modalni okno taky
fsStayOnTop, ale asi to v nekterych pripadech nebude to prave. Napr. pokud
se pouziva i jako nemodalni. Treba nekoho neco napadne, jak tohle resit.
Tomas Bradle
t.bradle(zv)pvtnet(tec)cz
(Delphi 5)
----- Original Message -----
From: "Tomas Bradle" <t.bradle(zv)pvtnet(tec)cz>
To: "Delphi konference new" <delphi-l(zv)clexpert(tec)cz>
Sent: Friday, April 06, 2001 12:36 AM
Subject: Tlacitka na Taskbaru - dalsi okno aplikace (reakce na starsi
prispevek)> Zdravim vsechny,
>
> narazil jsem na problem s pouzitim vice formularu v aplikaci, pokud chci
mit
> pro kazdy form extra tlacitko v TaskBar-u, podobne jako v nasledujicim
> prispevku. Kdyz ale chci vuvolat z nektereho toho formu modalni form,
> aktivuje se mi hlavni form aplikace, na nem se zobrazi ten modalni form.
Po
> ukonceni se opet aktivuje ten predchozi form.
>
> Nevite nekdo jak zabezpecit, aby form, ktery neni hlavnim formem aplikace
a
> ma tlacitko na taskbaru (je extstyle WS_EX_APPWINDOW) neschoval, kdyz
vyvola
> modalni form ? Zda se mi to nelogicke, kdyz se skryje a zustane videt jen
> ten ten modalni form.
>
> diky
>
> Tomas Bradle
> t.bradle(zv)pvtnet(tec)cz
>
>
> > From: "Ales Vasicek" <vasicek(zv)ecommerce(tec)cz>
> > > chtel bych se zeptat, jak udelat dalsi tlacitka v taskbaru (ne v
system
> > > tray). Stejne jak to dela MS Outlook. Potreboval bych to do sve
> > > aplikace, kde si uzivatel poklepe v gridu na nejaky zaznam a vyskoci
mu
> > > nove okno s detailnim popisem. Uzivatel si muze otevrit kolik oken
chce
> > > a rad by se mezi nemi prepinal na taskbaru po vzoru MS Office.
> >
>
komponenty WDE pre Winbase602
[*] Filip Hochman <filip.hochman(zv)atlas(tec)cz> - 09.4.2001 21:53:00
a ja ? :)
S pozdravem,
Filip Hochman.
iturcan(zv)gamo.sk wrote:
>
> Zdravim priaznivcov Delphi
>
> K dispozicii je nova podstatne vylepsena verzia komponent WDE pre pristup k
> databazovemu servru Winbase.
>
> Viac informacii najdete na strankach WDE
>
> www.software602(tec)cz\wde
>
> alebo aj na novej stranke
>
> www.software602.sk\wde
>
> Pripadne blizsie otazky rad zodpoviem
>
> S pozdravom
>
> Ivan Turcan
>
> 24
Delphi & OLE
[*] Radek Se�ka <sejda(zv)centrum(tec)cz> - 9.4.2001 22:05:43
No jo, aj mel spise na mysli neco, co je FREE (protoze zrovna nejaky ten 1000,- navic nemam). Vim neco je i v Delphi v kostce.
Taky jsem mel na mysli neco obecneho (standardy, prostredky). A ne dve stupidni priklady :o|.
----- Original Message -----
From: Pavel ZIDEK
To: delphi-l(zv)clexpert(tec)cz
Sent: Monday, April 09, 2001 9:16 AM
Subject: Re: Delphi & OLE
Pekne DEMO i popis je v "Mistrovstvi v Delphi 3". Mne fungoval v D4.
Pavel
----- Original Message -----
From: Radek Se�ka
To: Delphi Konference
Sent: Sunday, April 08, 2001 9:50 AM
Subject: Delphi & OLE
Dobry den,
potreboval bych nejake linky na materialy o OLE v D5.
Sice jsem si cetl HELP (dost podrobne), ale potreboval bzch si informace srovnat jeste z jineho zdroje.
Poradte
Sejda
QReport a Preview chyba
[*] Jan Tungli <Jan.Tungli(zv)datapac.sk> - 10.4.2001 00:15:37
Zial to je stara znama chyba QR a nie je jedina. Mozes poslat close na
preview form "Standard preview",
alebo pouzivat iny free nastroj ako napr. NSQLRB http://www.tungli.host.sk Jan Tungli
email: jan.tungli(zv)seznam(tec)cz
tungli(zv)datapac.sk
> -----P�vodn� zpr�va-----
> Od: Marcant [SMTP:marcant(zv)sct.sk]
> Odesl�no: 9. apr�l 2001 17:38
> Komu: delphi-l(zv)clexpert(tec)cz
> P�edm�t: Re: QReport a Preview chyba
>
> Neporadim ti celkom presne, ale nejako to suvisi s vytvaranim temporary
> suborov QR,
> obvykle po vzniku nejakej chyby pri tlaci alebo preview .Mne v takomto
> pripade vzdy pomohlo
> vymazat subory v adresari TEMP (asi by stacilo iba jeden konkretny,
> bohuzial
> vsak neviem aky).
>
> MarCaNT
>
> > Zdravim,
> >
> > ted se mi stala takova zvlastni vec: U projektu, kde jsem mel svuj
> formular
> > s TQRPreview a ten jsem odstranil a odstranil i vsechny odkazy na nej v
> > udalostech OnPreview, se mi najednou pri metode Preview reportu (uz
> > standardni preview dialog QU Softu) zacaly objevovat hlasky: "Cannot
> create
> > file xxx", kde xxx jsou nejake ridici znaky a nasledne "Canvas does not
> > allow drawing". Stahnul jsem si proto update QuickReportu a ani to
> > nepomohlo, dela to porad to same. Vratil jsem tam tedy ten muj preview
> > dialog a vysledek porad tentyz.
> >
> > Netusi nekdo, co by mohlo byt spatne ?
> >
> > D3, QR 2.0k, Win2k Prof SP1....
> >
> > Diky
> >
> > Milan
> >MSSQL + Corrupted database
[*] Jan Tungli <Jan.Tungli(zv)datapac.sk> - 10.4.2001 00:21:52
Napada mi ci si nerobil nahodou: alter table ...
A nemas nejaku zalohu DB?
Ak ti chybove hlasenie vypise nejaky kod indexu - ktory hlasi chybu tak by
stacilo odpalit referenciu a potom skusit znovu vytvorit
pre dane polozky.
Jan Tungli
email: jan.tungli(zv)seznam(tec)cz
tungli(zv)datapac.sk
http://www.tungli.host.sk (NEW SQL REPORT BUILDER)
http://www.nexus.hu/tungli
> -----P�vodn� zpr�va-----
> Od: ing. Pavel Zilinec [SMTP:zilinec(zv)email(tec)cz]
> Odesl�no: 9. apr�l 2001 12:46
> Komu: delphi-l(zv)clexpert(tec)cz
> P�edm�t: Re: MSSQL + Corrupted database
>
> Pouze mne napada, ze k nekonzistenci dat by mohlo dojit, pokud by
> doslo k soubeznemu neosetrenemu pristupu dvou lidi naraz (tzv. spinave
> cteni i zapis), ale defaultne to SQL nema nastavene. Dalsi pricinou by
> mohlo byt pole s automaticky generovanou hodnotou (identity), na ktere
> se pak navazujes z jine tabulky (myslim, ze existuje moznost na
> pregenerovani takoveho pole a pak by se ztratila navaznost).
> Jsem ale bohuzel presvedcen, ze jsou to blbosti a neni to asi to, co
> hledas, ale chtel jsi jakekoliv nakopnuti :-(
> Take si nejsem jist, jestli ta chyba, kterou SQL hlasi je stejna,
> kterou se tu snazim ja pospat.
>
> Preji Ti, abys to brzo vyresil.
>
> ------
> ing. Pavel Zilinec
> mailto:zilinec(zv)email(tec)cz
>
> 09.04.2001 bigzero(zv)post(tec)cz:
> > Pouzivame D5 Pro + ADONIS + MSDE7 SP2 a jiz nekolikrat (6x v letosnim
> roce na 50 instalacich, SQL server vzdy bezi na W2000 CZ Pro vesmes SP1)
> doslo k poskozeni DB (DBCC found X consistency errors
> > ...). Mate s tim nekdo jakekoliv zkusenosti ? Nejde mi o to jak to
> opravit, ale spis z jakych pricin k tomuto muze vubec dojit.
>
> > Podle meho zamestnavatele je to jen moje chyba a muj problem (DB musim
> opravit pres noc a nejradeji by mi strhnul i penize za projety benzin
> ...).
>
> > Podle meho nazoru ale integritu DB muzu svoji pripadnou chybou v
> programu dost tezko ovlivnit. Nebo skutecne existuji nejake prikazy, ktere
> by to mohly zpusobovat ?
>
> > Diky za jakekoliv nakopnuti
>
> > Honza
>
> uz OT: Maly exe z Delphi - korekce uses
[*] Hurricane <hurricane(zv)quick(tec)cz> - 10.4.2001 00:42:30
Zdravim
No, Comctrl32.dll neni zrovna ten nejlepsi priklad. Rekni mi, jak chces
napsat pouzitelnou aplikaci bez pouzivani teto knihovny. Tenhle problem se
resi tak, ze si stahnes od MS update, ktery pribalis do sve aplikace. Napr.
ACDSee ma tento update prilinkovany primo v instalatoru a testuje verzi teto
knihovny a pripadne to nainstaluje.
Hurricane
----- Original Message -----
Zalezi asi i na tom, kdo je Vasim zakaznikem. Pokud mate zakazniku pet a
kazdy Vam da rocne vydelat milion, tak je pochopitelne, ze asi detailne
znate jeho HW i potreby a muzete sit SW na miru kazdeho z nich - vzit v
potaz velikost jejich disku, pameti, OS atp.. Pokud ale treba delam
obezny SW na zarizeni dle technicke dokumentace, nikdy jsem zarizeni
nevidel a ocekavam ze si to z Internetu stahne tisic ucastniku, tak ten
SW musi byt nutne napsany jinak, s ohledem na nejmensiho mozneho
jmenovatele OS (pokud delam pod Win32 tak asi je to W95). A abych se
vyhnul problemum update systemu u (anonymniho) zakaznika (byt by mel
upgradovat jen treba comctrl32), tak se musim vyhnout pouzivani urcitych
prvku, komponent a metod. To je obecne problem SW, ktery je urcen pro
siroke spektrum anonymnich uzivatelu, kteri opravdu nerozumi tomu, co a
jak si nastavit v systemu, upgradovat, atp. Optimalizace s tim jde ruku
v ruce. pokud pouziji komponenty tretich stran, kod vzdycky nejak
nabobtna, i kdyz to momentalne vyresi mou situaci (a treba v blizke
budoucnosti zjistim, ze z te komponenty mohu pouzit jen jednu proceduru
:-o ).
Z vlastni zkusenosti vim, ze pokud si stahnu SW, ktery se po instalaci
(nebo prostem spusteni) nechova dobre, tak uz se k nemu nikdy nevratim.
Pokud by tohle byl ale problem mych zakazniku, tak bych asi byl v ...
Jaro B.
P.S.
Pokud ale apriori vyloucim nekoho, kdo ma sice jen 486 a 200MB disk (ale
ma tam alespon W95) tak si ale pak budu rikat, ze jsem spatny obchodnik
a nenabidnul jsem uzivateli reseni, ktere by ocekaval a ktere je jiste v
me moci.oci.dll - Oracle
[*] Olesia <olesia(zv)idirect(tec)com> - 9.4.2001 18:44:46 -0400
Je to Win NT 4.0, Oracle 8.1.7 - Client - Application user
Lelitka
>Prosim o presnejsi specifikaci verze klienta a pouzite volby pri instalaci.
>Pak mozna poradim.
>Jan Skopovy
RTF -> HTML
[*] Hurricane <hurricane(zv)quick(tec)cz> - 10.4.2001 00:47:05
Zdravim
synedit
http://synedit.sourceforge.net (asi, uz si nejsem jistej)
Pouzivam mwCustomEdit (predchudce synEditu) a v jeho HTML exporteru je par
chyb a nedodelanych veci. Neni to ale moc slozity, pripadnou opravu zvladnes
za par minut i s kompilaci.
Hurricane
----- Original Message -----
From: "CERMAK" <CERMAK(zv)procom(tec)cz>
To: "'Konference Delphi (el. adresa)'" <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, April 09, 2001 2:41 PM
Subject: RTF -> HTML
> Ahoj vsichni
>
> Nevite nekdo o unite, ktera umi prevod z RTF do HTML.
> Predem diky
>
>
> Jaromir Cermak
>Delphi & OLE
[*] Lud�k ZITA <konference(zv)sales(tec)cz> - 10.4.2001 02:08:21
----- Original Message -----
From: "Radek Se�ka" <sejda(zv)centrum(tec)cz>
> No jo, aj mel spise na mysli neco, co je FREE (protoze zrovna nejaky ten
1000,- navic nemam). Vim neco je i v Delphi v kostce.
----- Original Message -----
From: Pavel ZIDEK
>> Pekne DEMO i popis je v "Mistrovstvi v Delphi 3". Mne fungoval v D4.
Ahoj.
Zkus se podivat na http://www.marcocantu.com, tam mozna najdes neco ke
stazeni.
Ludek
MDIChild a visible
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 10.4.2001 04:34:03
From: "Tomas Bradle" <t.bradle(zv)pvtnet(tec)cz>
> nevite nekdo proc u formulare pri volbe FormStyle:=MDIChild se automaticky
> nastavi i visible:=true ? Ma to nejake logicke opodstatneni nebo si tvurce
> VCL nejak zjednodusil zivot ?
Ahoj,
toto chovani je implicitne dano tim jak MS kdysi navrhl MDI rozrhani.
Petr Vones, amatersky programator
SetFocus handler
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 10.4.2001 04:35:56
From: "Pavel K�ehula" <pavel.krehula(zv)nlm(tec)cz>
> potreboval bych udelat handler, ktery by reagoval na setfocus
> jakekoliv komponenty na formulari, nevite jestli existuje nejaka
> zprava, ktera by se dala odchytit?
Ahoj,
Screen.OnActiveControlChange
Petr Vones, amatersky programator
Thready a DB
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 10.4.2001 04:37:43
From: "Radim Hampel" <hampel(zv)ecommerce(tec)cz>
> pri pousteni programu pouzivam pro urychleni startu thread, ktery cosi
> nacita z DB. Vse funguje OK, jen pri predcasnem ukoncovani threadu NEKDY
> vyskoci vyjimecka a ja nevim proc. Normalne obsluhuju metody Terminate i
Ahoj,
to je prilis obecne popsane. Jak k te databazi pristupujes ? Pokud pomoci DBE
tak musis mit pro kazdy thread zvlast Session, viz BkQuery priklad v Delphi.
Petr Vones, amatersky programator
Nekolik problemu v Delphi
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 10.4.2001 04:40:46
From: <delphiforum(zv)centrum(tec)cz>
> Prvni je, ze mam ve Formu komponentu TWebBrowser a potrebuju
> poslat prikay, aby zkopiroval oznaceny text do schranky.
Ahoj,
podivej se na BorChatClient, tam je to vyresene:
http://codecentral.borland.com/codecentral/ccweb.exe/listing?id=15754
Petr Vones, amatersky programator
TOpenDialog
[*] Radek Janka <radek.janka(zv)ipsystem(tec)cz> - 10.4.2001 06:28:10
nekde v Optionech toho OpenDialogu se d� nastavit neco jako "multiple files"
(pisu z hlavy musel bych sednout k pocitaci s Delphima) a pak staci nastavit
Filetype "*.txt" a vybrat vsechny zobrazene soubory. Co se tyka tveho
predchoziho dotazu na pripojeni obrazku do Open dialogu, v Delphi 5 (nevim
jestli i drive, znam jenom verze 2 a 5) je TOpenImage dialog ktery obsahuje
i nahled vybran�ho souboru.
> Od: Martin Bab�k [SMTP:M.Babik(zv)mus(tec)cz]
> Zdravim Delphiny,
> jak jednoduse vybrat z adresare n-souboru urciteho typu (treba vsechny
> "txt")? Nebo vsechny soubory z jednoho adresare, ci jen ten adresar?
> Prijde mi, ze to TOpenDialog, neumi. :-( Diky
>
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.167 / Virov� b�ze: 80 - datum vyd�n�: 29.6.2000
MSSQL + Corrupted database
[*] Tomas Vladik <tom.vladik(zv)swadvice(tec)cz> - 10.4.2001 07:06:06
> Pouzivame D5 Pro + ADONIS + MSDE7 SP2 a jiz nekolikrat (6x v
V kazdem pripade je asi uzitecne pouzivat vzdy nejaktualnejsi SP, to je
dnes tusim SP3 ...
T.
Zamceny Paradox
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 10.4.2001 07:54:46
On 9 Apr 2001, at 12:49, Pesek Michal wrote:
> >> > > Ukonci vsechna pripojeni k databazi a tyto soubory vymaz. Mely
> >> > > by byt v adresari s databazi.
> >> >
> >> > Jenze tohle nemuzu radit zakaznikovy.
> >>
> >> Muzes. :-)
>
> A je to bezne. Pouzivame dosovy program, ktery vyuziva paradox tabulky
> na siti. Ve chvily, kdy s timto programem pracovalo cca 40 uzivatelu
> soucasne tak to proste ty zamky nezvladaly. A dodavatel jenom rekl. No
> to musite smazat ty soubory *.lck a nic vic. Takze je to normalni
> praxe.
:-) Nejvetsi chybou je totiz pouziti Paradoxu pro sitove aplikace,
pres veskera bombasticka avicka, ktera Borland nacpal i k Delphi
5. Je experimentalne dokazano, ze Paradox je pro sitovy provoz
nevhodny, protoze tam mohou nastat i horsi chyby nez jen
nezvladnuti seznamu aktualnich zamku.
S pozdravem
Zbysek Hlinka
http://www.hlinka(tec)cz http://www.slhaters(tec)cz
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Potomci TForm
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 10.4.2001 07:58:02
Ahoj,
vytvoril jsem jednoducheho potomka TForm, ktery obsahuje par
public promennych, obsluhu OnKeyDown apod. Z nej jsem odvodil
dalsiho potomka, ktery obsahuje udalost OnCloseQuery. Oba
formy jsem umistil do Object repository a chtel bych z nich
odvozovat vsechny formy v me aplikaci (vybrat z Repository, inherit
from)
Jenze to nejak nefunguje. Vznikaji chybove hlasky typu
Ancestor not found. Chci-li se podivat na "prvniho" potomka
TFormu, pise, ze to nelze, protoze je otevreny decendant.
Co to znamena, resp. jak bych to mel delat spravne?
Dik
David Lebeda
EMAIL - cisty text
[*] Gebauer Lukas <gebylist(zv)mlp(tec)cz> - 10.4.2001 08:07:35
> > Ahoj,
> > poradte mi prosim, jak z emailove zpravy dostat pouze cisty text
> > zpravy, pripadne Predmet.
>
> vse zavisi na tom v jakem tvaru mas tu zpravu nactenou. Pokud ji mas v
> nativnim tvaru pak:
> - Subject:
> je polozka v hlavicce. Cili staci nacist z hlavicky prislusny
> radek(radky) a pripadne jej prevest z kodovaneho tvaru do textu s
> diakritikou (RFC 1342, pokud se nepletu)
> - telo zpravy
> to uz je horsi - musis se naucit rozparsovat zpravu na prvocinitele.
Vsechno toto (i vcetne prekodovavani znakovych sad...) resi moje
Synapse. ;-)
Louci se Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
WEB: http://www.ararat(tec)cz/synapse - Synapse Delphi TCP/IP Library
Synapse & RTF
[*] Gebauer Lukas <gebylist(zv)mlp(tec)cz> - 10.4.2001 08:07:34
> Podla mna je naopak velmi rozumne spravanie programu prisposobit
> (primerane) tak, aby zbytocne neobtazoval uzivatela. Povazujem
> za somarinu pytat si od uzivatela povolenie na pozretie obrazka
> prilozeneho k mailu, pretoze na to ziadny dovod nie je.
> Na druhej strane u spustitelnych suborov take dovody su.
nepochopil si mne. treba muj postovni program ukaze text e-mailu, a pod
nim seznam vsech priloh. Staci si libovolnou prilohu vybrat tim, ze na ni
mysi tuknu... nedochazi nikde k zadnym otravnym otazkam.. ale take
nedochazi k zadnemu svevolnemu pokusu o spousteni kodu. kapisto?
Louci se Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
WEB: http://www.ararat(tec)cz/synapse - Synapse Delphi TCP/IP Library
Thready a DB
[*] Radim Hampel <hampel(zv)ecommerce(tec)cz> - 10.4.2001 08:22:30
Pristup pres ADO a jsem si jist, ze zadna zadny konflikt v DB nenastava.> pri pousteni programu pouzivam pro urychleni startu thread, ktery cosi
> nacita z DB. Vse funguje OK, jen pri predcasnem ukoncovani threadu
NEKDY
> vyskoci vyjimecka a ja nevim proc. Normalne obsluhuju metody Terminate
i
Ahoj,
to je prilis obecne popsane. Jak k te databazi pristupujes ? Pokud
pomoci DBE
tak musis mit pro kazdy thread zvlast Session, viz BkQuery priklad v
Delphi.
Petr Vones, amatersky programator
StrToInt
[*] prajz.rumcajs(zv)quick(tec)cz - 10.4.2001 8:24:12
To je velice hezke, lec nefunkcni. Jakmile se na vstupu 's' objevi cokoliv
nez ciselny retezec, tak to stejne zacne hulakat, ze tohle neni cislo ...
D4 Prof, Win98SE
>co treba takhle
>function IsNumeric(S : String) : Boolean;
>Var I : Integer;
>Begin
> Try
> Result := True;
> i := StrToInt(s);
> Except
> Result := False;
> End;
>End;
Zmena systemovych barev jen v me aplikaci
[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 10.4.2001 08:36:50
Ahoj,
nevite nekdo jak udelat aby se zmenily barvy vsech prvku dle nejakeho
schematu, ale jen pro moji aplikaci - tedy aby treba rolovatka a
tlacitka,... byly ruzove, modre,... Neco jako skiny, ale jen v barvach. Lze
to jen pro moji aplikaci? Diky. S pozdravem
Tomas Rosa
------------------------=[ pinknet on every screen ]=----------------------
Tomas Rosa
Tomas.Rosa(zv)PinkNet(tec)cz
Contact me via EFFATA.NET, my EID: trosa(zv)effata.net
PinkNet Web Server for Win32 - FREEWARE http://pnws.pinknet(tec)cz/
---------------------------------------------------------------------------
MS SQL a create table v stored procedure
[*] Ren� Otisk - 10.4.2001 08:40:04
Hi,
Potreboval bych ve Stored Procedure vytvorit , smazat a alterovat trvalou
table (ne temporary), ale zaboha nemuzu prijit na to, jak mam natlacit ten
nazev v parametru. Nebo je lepsi to vytvaret v delphi, ale tam zase prijdu o
transakci?
Create procedure Pokus
(zv)jmeno varchar(30) (nebo sysname?)
as
...
create table (zv)jmeno
(..
)
...
Nevite nekdo jak na to?
Sroub
MS SQL a create table v stored procedure
[*] Lubo Fule <fule(zv)sct.sk> - 10.4.2001 09:04:12
Musis na to ist takto:
exec ('create table ' + (zv)jmeno + ' (...)')
L.
cize v stor procedure vyskladat prislusny SQL prikaz a spustit ho pomocou
exec
> Potreboval bych ve Stored Procedure vytvorit , smazat a alterovat trvalou
> table (ne temporary), ale zaboha nemuzu prijit na to, jak mam natlacit ten
> nazev v parametru. Nebo je lepsi to vytvaret v delphi, ale tam
> zase prijdu o
> transakci?
>
> Create procedure Pokus
> (zv)jmeno varchar(30) (nebo sysname?)
> as
> ...
>
> create table (zv)jmeno
> (..
> )
> ...
MS SQL a create table v stored procedure
[*] Hynek Svato� <svatos(zv)kam(tec)czu(tec)cz> - 10.4.2001 09:04:35
> Hi,
>
> Potreboval bych ve Stored Procedure vytvorit , smazat a alterovat trvalou
> table (ne temporary), ale zaboha nemuzu prijit na to, jak mam natlacit ten
> nazev v parametru.
Mrkni se na sp_executesql, to vyresi tve trapeni.> Nebo je lepsi to vytvaret v delphi, ale tam
> zase prijdu o
> transakci?
Na prikazy typu create table, drop, atd. se, myslim, nevztahuji transakce.
>
> Create procedure Pokus
> (zv)jmeno varchar(30) (nebo sysname?)
> as
> ...
>
> create table (zv)jmeno
> (..
> )
> ...
>
> Nevite nekdo jak na to?
>
> Sroub
>
Nejsem zastancem promenliveho schematu DB, pokusil bych se vyresit
zalezitost
pres pevnou strukturu relaci a vyhnout se tabulkam, ktere by mi v DB
mnozi nekontrolovane jako trpaslici ...
Keep mailing :-)
=======================
Hynek Svato#
svatos(zv)kam(tec)czu(tec)cz
hynek.svatos(zv)atlas(tec)cz
=======================OT: Zamceny Paradox
[*] Pesek Michal <Michal.Pesek(zv)MNUL.CZ> - 10.4.2001 09:16:01
>> -----Original Message-----
>> Subject: RE: Zamceny Paradox
>>
>>
>> :-) Nejvetsi chybou je totiz pouziti Paradoxu pro sitove aplikace,
>> pres veskera bombasticka avicka, ktera Borland nacpal i k Delphi
>> 5. Je experimentalne dokazano, ze Paradox je pro sitovy provoz
>> nevhodny, protoze tam mohou nastat i horsi chyby nez jen
>> nezvladnuti seznamu aktualnich zamku.
>>
Ja to vim, vy to vite, ale bohuzel je to tak a existuje jen but to ber, nebo
si sezen neco jineho.
A vzhledem k tomu, ze mate podporu a upgrate zadarmo, tak tezko sezenete. A
to vcetne supportu
vzhledem na dalsi produkty nasi firmy.
A investovat do produktu zhruba na 1/2 roku, nez se prejde na novy
nemocnicni system nema cenu.
Jedinou vyhodou je, ze to funguje i na naprostych sitkach jako jsou IBM PS2
coz jsou trochu lepsi 286 s 4mb Ramky.
S pozdravem
Michal PEPR Pesek
http://www.peprsoft(tec)cz OT: Win2000 - WWW
[*] Bednar��k Dalibor <dalibor(zv)torola(tec)cz> - 10.4.2001 09:18:26
AHoj,
potrebuji spustis osobni WWW server na win2000 CZ.
Ale pri pokusu o spusteni mi to porad hlasi chybu 1747 - Overovaci sluzba
neni znama.
Zkousel jsem preinstalovat sitove pripojeni i samotny WWW server, ale bez
uspechu.
Nevite nekdo co s tim muze byt?
PROSIM..
Dik
Win2000 - WWW
[*] Bednar��k Dalibor <dalibor(zv)torola(tec)cz> - 10.4.2001 09:34:48
Tak jsem to rozjel.
Chtelo to nainstalovat klienta site Microsoft.
----- Original Message -----
From: "Bednar��k Dalibor" <dalibor(zv)torola(tec)cz>
To: "forum" <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, April 10, 2001 9:18 AM
Subject: OT: Win2000 - WWW
> AHoj,
> potrebuji spustis osobni WWW server na win2000 CZ.
> Ale pri pokusu o spusteni mi to porad hlasi chybu 1747 - Overovaci sluzba
> neni znama.
> Zkousel jsem preinstalovat sitove pripojeni i samotny WWW server, ale bez
> uspechu.
>
> Nevite nekdo co s tim muze byt?
> PROSIM..
>
> Dik
>Zmena systemovych barev jen v me aplikaci
[*] Jiri Binder <j.binder(zv)albacon(tec)cz> - 10.4.2001 09:42:47
From: Tomas Rosa <trosa(zv)seznam(tec)cz>
> nevite nekdo jak udelat aby se zmenily barvy vsech prvku dle nejakeho
> schematu, ale jen pro moji aplikaci - tedy aby treba rolovatka a
> tlacitka,... byly ruzove, modre,... Neco jako skiny, ale jen v
> barvach. Lze to jen pro moji aplikaci? Diky.
Myslim, ze to jednoduse nejde, jedina moznost podle me je
pouzivat v aplikaci vlastni sady barev bez vyuziti systemovych
barev.
Jiri Binder Export BMP do RTF
[*] Peter Vlkovic <vlkovic(zv)minv.sk> - 10.4.2001 10:02:41
Ahoj,
potrebujem vlozit BMP obrazok do RTF suboru,
ma s tym niekto skusenosti?
Chcem do dokumentu v RTF formate na urcitu
poziciu vlozit bitmapovy obrazok (nie cez OLE).
Neviete ako na to?
Vlkovic
Zmena systemovych barev jen v me aplikaci
[*] Radim Hampel <hampel(zv)ecommerce(tec)cz> - 10.4.2001 10:04:04
Jde jenom menit barvu vsech aktivnich prvku, odchytavat
OnActiveControlChange a tam to menit. Nesmi se zapomenout potom pri
odchodu z prvku vratit barvu na puvodni.
Radim Hampel
>> nevite nekdo jak udelat aby se zmenily barvy vsech prvku dle nejakeho
>> schematu, ale jen pro moji aplikaci - tedy aby treba rolovatka a
>> tlacitka,... byly ruzove, modre,... Neco jako skiny, ale jen v
>> barvach. Lze to jen pro moji aplikaci? Diky.
>
>Myslim, ze to jednoduse nejde, jedina moznost podle me je
>pouzivat v aplikaci vlastni sady barev bez vyuziti systemovych
>barev.
Jiri Binder
Tooltip expression evaluation
[*] Pavol Stolc <pstolc(zv)sc.sknet.sk> - 10.4.2001 10:05:58
Ahoj,
pocas ladenia (Delphi3) mozem vidiet hodnoty "variables" a "object
properties", ked nad nim zastavim kurzor mysi (Environment options:
%subject%). Ak ale takyto objekt, alebo record pouzijem v konstrukcii with
objekt do begin ... end, hodnoty property alebo clenov recordu sa
nezobrazia, ani v Evaluate/Modify dialogu. Je nejaka moznost ako tieto
hodnoty pocas ladenia vidiet?
jednoduchy priklad:
procedure test;
begin
with TForm.Create(Application) do begin
Height := 200;
Width := 200;
Caption := 'Form Caption'; // napr. hodnotu property Caption nezobrazi.
PRECO?
...
ShowModal;
Free;
end;
end;
Pavol Stolc
pstolc(zv)sc.sknet.sk
Pos�l�n� zpr�v okn�m MDIChild
[*] Ing. Lud�k Florian <Ludek.Florian(zv)bluerose(tec)cz> - 10.4.2001 10:12:35
Nazdar fsichni,
Muze mi nekdo poradit, jak poslat zpravu z jednoho MDI okna vsem ostatnim (o
tevrenym) ?
Potrebuji udelat refresh vsech oken, resp DB Gridu v techto oknech. Zmenim-l
i neco v jedne tabulce, tak aby se projevily zmeny ve vsech ostatnich.
Nebo je jiny zpusob nez posilani zprav ?
Dik
Bye Ludan
MSSQL + Corrupted database
[*] Ing. Mgr. Michal =?iso-8859-2?Q?=A9ef=E8=EDk?= <mikese(zv)benefitcz(tec)cz> - 10.4.2001 10:28:27
bigzero(zv)post(tec)cz pise:
>Pouzivame D5 Pro + ADONIS + MSDE7 SP2 a jiz nekolikrat (6x v letosnim roce na 50 instalacich, SQL server vzdy >bezi na W2000 CZ Pro vesmes SP1) doslo k poskozeni DB (DBCC found X consistency errors ...). Mate s tim nekdo >jakekoliv zkusenosti ? Nejde mi o to jak to opravit, ale spis z jakych pricin k tomuto muze vubec dojit.
Mam zkusenosti s verzi 6.5, kde se mi nekolikrat podarilo porusit konzistenci, a to dvema zpusoby:
1. Pokusem opravit polozku primarniho klice (nedostatecnou kontrolou prace uzivatele)
2. Pokusem o update ci insert do tabulky se soucasnym selectem ze stejne tabulky
IB6: IBDataSet.Params
[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 10.4.2001 10:40:12
ahoj,
potreboval bych property params komponente TIBDataSet v IBX 4.52 udelat
published.
bohuzel kdyz si dam menu - component - install packages, tak ibxka nelze
editovat.
unitu se zdrojem mam, ale nevim jak na to (no, moh bych napsat autorovi
;)?
dekuji PeC(zv)
CU onTheFutureOfMatrix
MatriX.CyberSpace.Cz
-< ON - LINE - AGAIN >-
/~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
|[smtp:petr.palicka(zv)atlas(tec)cz]|
|[smtp:peca(zv)email(tec)cz] |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~/Kopirovani z WebBrowser do schranky
[*] <neuman.aritex(zv)email(tec)cz> - 10.4.2001 10:50:15
Dobry den,
chtel jsem se zeptat, kde je problem, kdyz pri pouzivani nasledujiciho prikazu:
webbrowser1.ExecWB(OLECMDID_copy,0);
Mi Delphi zahlasi chybu:
Snaha odvolat c�l p�eta�en�, kter� nen� zaregistrov�n. Nev�te,
pros�m, n�kdo co s t�m ?
Dekuji,
Premysl Neuman
Hled�te kvalitn� p�eklada� anglick�ch www-str�nek?
Zkuste Eurotran: http://www.eurotran(tec)cz
WinSocket Error
[*] Petr Vale� <delphipetr(zv)infoware(tec)cz> - 10.4.2001 11:00:11
Ahoj,
mam CB 4.0 Enterprise + Windows 98 ME.
Problem:
Pri provozu programu jenz pouziva Socket ( komponenta TClientSocket ) se obcas stava, ze program vyhodi chybovou hlasku "WinSocket Error" a prerusi se spojeni. Ovsem byl jsem upozornen, ze se tak stava pouze v prostredi Windows ME, jinde to pry funguje. Jelikoz je nemam, nemohu to ani pripadne odladit. Nemate prosim s timto nekdo zkusenosti.
Diky moc.
Petr.Delphi 5 - screensaver a nahled
[*] Jiri Mlnarik <jmlnarik(zv)grpr.inext(tec)cz> - 10.4.2001 11:11:30
Pisu prvni screensaver a mam problem s urcenim
okna pro preview. Jak mam prevzit souradnice
nahledoveho okna z vlastnosti obrazovky?
J.Mlnarik-Agupi
Synapse & RTF
[*] Lud�k ZITA <konference(zv)sales(tec)cz> - 10.4.2001 11:16:01
----- Original Message -----
From: "Gebauer Lukas" <gebylist(zv)mlp(tec)cz>
> ....
> treba muj postovni program ukaze text e-mailu, a pod
> nim seznam vsech priloh. Staci si libovolnou prilohu vybrat tim, ze na ni
> mysi tuknu... nedochazi nikde k zadnym otravnym otazkam.. ale take
> nedochazi k zadnemu svevolnemu pokusu o spousteni kodu. kapisto?
Ahoj.
Takze pokud ti nekdo posle HTML mail tak si prohlednes stranku bez obrazku a
pak kazdy obrazek zvlast ?
To mi neprijde prilis pohodlne. Jinak pokud pouzijes inline, pak ma sanci
Tvuj klient poznat o co kraci a muze ti bud rovnou zobrazit stranku (coz je
nebezpecne) ale muze Ti nabidnout otevrit tuto HTML prilohu kompletne i s
obrazky. (Tohle se tusim da nastavit v Pegasu)
Takze si myslim, ze rozsireni mailovych hlavicek o "inline" je dulezite a
spravne a nelze to zavrhovat kvuli pripadne nedokonale funkci urciteho
konkretniho emailoveho klienta. Jinak totiz nemuze klient rozpoznat ktere
prilohy patri k telu zpravy a ktere jsou samostatne.
Ludek
Pos�l�n� zpr�v okn�m MDIChild
[*] brant(zv)dcomm(tec)cz - 10.4.2001 11:17:28
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.
Kazde okno ma property Handle, ktera slouzi jako parametr ve funkci
SendMessage. Takze staci, kdyz budes mit v pameti seznam vsech otevrenych
oken a posles zpravu do vsech (i treba do tech, ktere DBGrid neobsahuji). V
okne pak obslouzis tuto zpravu podle potreby.
Jiny zpusob by mohl vypadat tak, ze otestujes, zda okno obsahuje DBGrid
pripojeny na prislusnou tabulku a pokud ano, provede se Refresh tabulky.
Prvni zpusob je jednodussi, sam ho pouzivam k plne spokojenosti a to i po
siti, i kdyz tam se zapisuje cislo zpravy do databaze a kazda stanice si ji
cte.
RNDr. Petr Brant [Brant(zv)dcomm(tec)cz]
ICQ # 68652380
D&COMM s.r.o
Korunova�n� 6
Praha 7
-----Original Message-----
From: Ing. Lud�k Florian [mailto:Ludek.Florian(zv)bluerose(tec)cz]
Sent: Tuesday, April 10, 2001 10:13 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: Pos�l�n� zpr�v okn�m MDIChild
Nazdar fsichni,
Muze mi nekdo poradit, jak poslat zpravu z jednoho MDI okna vsem ostatnim (o
tevrenym) ?
Potrebuji udelat refresh vsech oken, resp DB Gridu v techto oknech. Zmenim-l
i neco v jedne tabulce, tak aby se projevily zmeny ve vsech ostatnich.
Nebo je jiny zpusob nez posilani zprav ?
Dik
Bye Ludan
---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.228 / Virov� b�ze: 109 - datum vyd�n�: 17.1.2001
Prevod dat z Excelu
[*] Jan Naiser <tua(zv)wo(tec)cz> - 10.4.2001 11:49:42
Preji pekny den,
W98SE, D5.01, OFF2k
nekolikaty den se morim s prevodem dat z Excelu do IB pomoci komponent
TExcelApplication, ... Jedna se o vicelistove soubory. Vse by bylo vporadku,
az na uz vicekrat popsane zatuhnuti Excelu. Zjistitl jsem, ze pri nacitani
32761. bunky vytuhne Excel i vlastni aplikace a po jeho odstreleni se
aplikace opet rozbehne, ale cely comp. se vyrazne zpomali a je treba ho
restartovat. Pokud otevru a zavru list, zatuhne uz na 32748. bunce. To cislo
jevi se mi docela podezrele nebot se blizi magickemu cislu 32768. Nezalezi
ani na tom, zda bunky obsahuji data nebo jsou prazdne. Vypada to patrne na
chybu Excelu. Nenasel jste na to nekdo medicinu, pripadne klicku, jak to
obelstit?
Diky, Honza Naiser.
RTF -> HTML
[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 10.4.2001 11:55:05
Neco takoveho jsem delal - neumi to sice vse, ale zaklady jsou polozeny.
Muzu zaslat.>Ahoj vsichni
>
>Nevite nekdo o unite, ktera umi prevod z RTF do HTML.
>Predem diky
>
>
> Jaromir Cermak
S pozdravem
Tomas Rosa
------------------------=[ pinknet on every screen ]=----------------------
Tomas Rosa
Tomas.Rosa(zv)PinkNet(tec)cz
Contact me via EFFATA.NET, my EID: trosa(zv)effata.net
PinkNet Web Server for Win32 - FREEWARE http://pnws.pinknet(tec)cz/
---------------------------------------------------------------------------
Zmena systemovych barev jen v me aplikaci
[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 10.4.2001 11:57:07
> > nevite nekdo jak udelat aby se zmenily barvy vsech prvku dle nejakeho
> > schematu, ale jen pro moji aplikaci - tedy aby treba rolovatka a
>
>Myslim, ze to jednoduse nejde, jedina moznost podle me je
>pouzivat v aplikaci vlastni sady barev bez vyuziti systemovych
>barev.
***To je to co potrebuji - jen muj ListBox, aby mel treba zeleny ScrollBar.
Kuprikladu IE to zrovna na tom ScrollBaru umi. S pozdravem
Tomas Rosa
------------------------=[ pinknet on every screen ]=----------------------
Tomas Rosa
Tomas.Rosa(zv)PinkNet(tec)cz
Contact me via EFFATA.NET, my EID: trosa(zv)effata.net
PinkNet Web Server for Win32 - FREEWARE http://pnws.pinknet(tec)cz/
---------------------------------------------------------------------------
Prevod dat z Excelu
[*] Tomas =?iso-8859-2?Q?Michal=EDk?= <michalik(zv)proca(tec)cz> - 10.4.2001 11:59:12
Ahoj,
na to lek nemam, ale treba pomuze nasledujici: Ulozil bych data do CSV a
v IBObjects je komponenta TIB_Import, kde nastavenim par vlastnosti
dosahnes sveho.
Pokud teda nedelas neco, co ma fungovat automaticky prave s tim Excelem
...
S pozdravem,
Tom
Jan Naiser wrote:
>
> Preji pekny den,
> W98SE, D5.01, OFF2k
>
> nekolikaty den se morim s prevodem dat z Excelu do IB pomoci komponent
> TExcelApplication, ... Jedna se o vicelistove soubory. Vse by bylo vporadku,
> az na uz vicekrat popsane zatuhnuti Excelu. Zjistitl jsem, ze pri nacitani
> 32761. bunky vytuhne Excel i vlastni aplikace a po jeho odstreleni se
> aplikace opet rozbehne, ale cely comp. se vyrazne zpomali a je treba ho
> restartovat. Pokud otevru a zavru list, zatuhne uz na 32748. bunce. To cislo
> jevi se mi docela podezrele nebot se blizi magickemu cislu 32768. Nezalezi
> ani na tom, zda bunky obsahuji data nebo jsou prazdne. Vypada to patrne na
> chybu Excelu. Nenasel jste na to nekdo medicinu, pripadne klicku, jak to
> obelstit?
>
> Diky, Honza Naiser.
--
=================================
Tomas Michalik
ProCA, s. r. o.
V Luzich 818, Praha 4
Czech Republic
e-mail: michalik(zv)proca(tec)cz
tel: +420 2 67283446
MS SQL a create table v stored procedure
[*] Fiala Milan <Milan.Fiala(zv)pvt(tec)cz> - 10.4.2001 12:17:07
Ahoj,
> Potreboval bych ve Stored Procedure vytvorit , smazat a
> alterovat trvalou
> table (ne temporary), ale zaboha nemuzu prijit na to, jak mam
SQL:
declare (zv)jmeno_tabulky varchar(32)
set (zv)jmeno_tabulky = 'tmp_table'
exec ('create table '+(zv)jmeno_tabulky+' (id int)')
snad to bude ono.
Milan
Delphi 5 - screensaver a nahled
[*] Ladislav Fitz <ladislav.fitz(zv)kodytek(tec)cz> - 10.4.2001 12:31:45
> Pisu prvni screensaver a mam problem s urcenim
> okna pro preview. Jak mam prevzit souradnice
> nahledoveho okna z vlastnosti obrazovky?
> J.Mlnarik-Agupi
Vlastnosti obrazovky ti poslou parametr (ted uz si nepamatuju ktery, ale to
se da zjistit) spolu s Handle obrazovky na ktery se ma kreslit preview,
takze ho staci priradit do Canvas.Handle a muze se kreslit
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.237 / Virov� b�ze: 115 - datum vyd�n�: 7.3.2001
Jeste jednou potomci TForm
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 10.4.2001 12:36:25
Ahoj,
jelikoz na muj predchozi dotaz nebyla zadna reakce a ja se zatim
posunul trosku dal, posilam konkretnejsi problem.
Chci vytvorit jakousi nahradu TForm - rikejme ji TC1Form, ktera
se bude od TForm lisit, ze bude mit nastaveno KeyPreview = True
a pri stisku nejake kombinace klaves zavola nejakou metodu. Jak
to do TC1Form spravne zabudovat?
Pokud na TC1Form pridam normalne reakci na OnKeyDown,
rvou na me potomci odvozeni z TC1Form pri nacitani projektu do
Delphi, ze Ancestor not found a pro tyto potomky neni k dispozici
form samotny (F12).
David Lebeda
Synapse & RTF
[*] Gebauer Lukas <gebylist(zv)mlp(tec)cz> - 10.4.2001 12:38:14
> Ahoj.
> Takze pokud ti nekdo posle HTML mail tak si prohlednes stranku bez
> obrazku a pak kazdy obrazek zvlast ? To mi neprijde prilis pohodlne.
> Jinak pokud pouzijes inline, pak ma sanci Tvuj klient poznat o co
> kraci a muze ti bud rovnou zobrazit stranku (coz je nebezpecne) ale
> muze Ti nabidnout otevrit tuto HTML prilohu kompletne i s obrazky.
> (Tohle se tusim da nastavit v Pegasu)
Ano, jde, ale protoze nejsem sebevrah, tak si HTML maily ctu zasadne v
textove podobe, ne v podobe HTML. ;-)
> Takze si myslim, ze rozsireni mailovych hlavicek o "inline" je
> dulezite a spravne a nelze to zavrhovat kvuli pripadne nedokonale
> funkci urciteho konkretniho emailoveho klienta. Jinak totiz nemuze
> klient rozpoznat ktere prilohy patri k telu zpravy a ktere jsou
> samostatne.
Ano, to mas pravdu, proto take nynejsi Synapse (rel.19) toto plne
podporuje, takze se necerti. ;-)
Louci se Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
WEB: http://www.ararat(tec)cz/synapse - Synapse Delphi TCP/IP Library
TWebBrowser a metoda POST !
[*] Jan Grman <janog(zv)pluto.elf.stuba.sk> - 10.4.2001 12:42:46
D5, C/S - TWebBrowser
Ahoj.
Pouzivam komponentu TWebBrowser pre zobrazenie HTML stranok generovanych CGI
vlastnym programom ktory je sucastou sytemu (ide o nahlad tychto stranok).
Momentalne napriklad pomocou metody Navigate spustim nasledujuci dotaz:
http://pocitac/cgi-bin/webserver.cgi/template?ALIAS=dataK7&OBJRECNO=27377&OB
JKIND=8&REPORTNAME=TEST
Pouziva sa metoda GET !
A teraz problem:
- pokusam sa do dotazu zaradit aj data (ktore mozu byt potencionalne velke -
10, 20kB) a chcem zmenit metodu dotazu na POST !!!!
- pomocou Navigate (ani Navigate2) sa mi to ani na zaklade HELPu
nepodarilo...
Ma niekto skusenost a pripadne funkcny kusok kodu volania Navigate alebo
???inej??? metody TWebBrowser ?
Vdaka. JaNo.
janog(zv)pluto.elf.stuba.sk
simulator klavesnice
[*] Hubka Lubos <L.Hubka(zv)trenkwalder(tec)com> - 10.4.2001 13:00:35
> Ach jo,
> a co kdyz ten kurzor bude uplne vpravo? Kdyz ho posunu
> doprava, tak se nic
> nestane a vzapeti ho posunu doleva - takze bude o jeden znak
> vlevo nez by
> mel spravne byt. Tudy cesta nevede!!!
Urcite je cistejsia cesta ist cez HOOK, ale predsa nie je problem, zistit ci
som na konci alebo na zaciatku stringu a podla toho sa spravat.
/LH
Kopirovani z WebBrowser do schranky
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 10.4.2001 13:17:19
From: <neuman.aritex(zv)email(tec)cz>
> chtel jsem se zeptat, kde je problem, kdyz pri pouzivani nasledujiciho
> webbrowser1.ExecWB(OLECMDID_copy,0);
>
> Mi Delphi zahlasi chybu:
>
> Snaha odvolat c�l p�eta�en�, kter� nen� zaregistrov�n. Nev�te,
Ahoj,
tu chybu nehlasi Delphi ale tvoje aplikace. Musis v inicializaci (napriklad
unit hlavniho formulare) volat inicializaci OLE:
initialization
OleInitialize(nil);
finalization
OleUninitialize;
Je to v tom zdrojaku na ktery jsem posilal odkaz minule.
Petr Vones, amatersky programator
Obrazok do RTF
[*] Peter Vlkovic <vlkovic(zv)minv.sk> - 10.4.2001 13:21:37
Ahoj,
nenasla by sa tu nejaka dobra dusa,
ktora by mi vysvetlila, ako
dostat nejaky obrazok (to je jedno
v akom formate) do RTF suboru?
Vlkovic
Algoritmus pro zimni/letni cas
[*] Ji�� Foldyna <jiri.f(zv)avizo(tec)cz> - 10.4.2001 13:34:39
Ahoj,
nevite nekdo, jak je presne definovan algoritmus pro vypocet prechodu na
letni/zimni cas ?
Diky
Ing. Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz
StrToInt
[*] Miroslav Barica <miroslav.barica(zv)matador.sk> - 10.4.2001 13:48:13
samozrejme ked nastane vynimka. ak ti to v IDE vadi, tak vypni
vypisovani vynimiek
> -----Original Message-----
> From: prajz.rumcajs(zv)quick(tec)cz [mailto:prajz.rumcajs(zv)quick(tec)cz]
> Sent: Tuesday, April 10, 2001 8:24 AM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: StrToInt
>
>
> To je velice hezke, lec nefunkcni. Jakmile se na vstupu 's'
> objevi cokoliv
> nez ciselny retezec, tak to stejne zacne hulakat, ze tohle
> neni cislo ...
>
> D4 Prof, Win98SE
> >co treba takhle
> >function IsNumeric(S : String) : Boolean;
> >Var I : Integer;
> >Begin
> > Try
> > Result := True;
> > i := StrToInt(s);
> > Except
> > Result := False;
> > End;
> >End;
>
>
> StrToInt
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 10.4.2001 13:49:40
> To je velice hezke, lec nefunkcni. Jakmile se na vstupu 's' objevi
> cokoliv nez ciselny retezec, tak to stejne zacne hulakat, ze tohle
> neni cislo ...
>
> D4 Prof, Win98SE
> >co treba takhle
> >function IsNumeric(S : String) : Boolean;
> >Var I : Integer;
> >Begin
> > Try
> > Result := True;
> > i := StrToInt(s);
> > Except
> > Result := False;
> > End;
> >End;
>
A neni to jen hlaseni Delphi? Mas vypnute Stop on Delphi
Exceptions nebo jak se to jmenuje?
David Lebeda
Oracle a NUMBER
[*] Karel Hudan <KarelH(zv)cashreform(tec)cz> - 10.4.2001 14:22:11
Dobry den.
Tak jsem tady opet s problemem:
Kdyz mam v tabulce sloupce typu NUMBER a napr. v SQL Exploreru zalozim novou
vetu a inkriminovany sloupec nevyplnim, tak po postu a close/open mi to
vyhodi misto null naproste capiny typu: -1.00025e-105 atp. A to nejlepe na
NUMBER,2,0.
Coz mi pak dela docela problemy to i smazat pres TDBNavigator.
Help, co s tim??
Oracle 8.1.6
BDE 5.1.1.1
Dekuji predem za kazde radu kudy na to.
KarelH
Zmena systemovych barev jen v me aplikaci
[*] Jiri Binder <j.binder(zv)albacon(tec)cz> - 10.4.2001 14:30:15
> > > nevite nekdo jak udelat aby se zmenily barvy vsech prvku dle
> > > nejakeho schematu, ale jen pro moji aplikaci - tedy aby treba
> > > rolovatka a
> >
> >Myslim, ze to jednoduse nejde, jedina moznost podle me je
> >pouzivat v aplikaci vlastni sady barev bez vyuziti systemovych
> >barev.
>
> ***To je to co potrebuji - jen muj ListBox, aby mel treba zeleny
> ScrollBar. Kuprikladu IE to zrovna na tom ScrollBaru umi.
> S pozdravem Tomas Rosa
Je pravda, ze u windowsovskych prvku jde i toto vetsinou ztuha.
Neco lze zmenit obsluhou zprav wm_ctlcolorxxx ale zmenu
nekterych barev jsem nedokazal a docela by me to tez zajimalo.
Napr. zmenu barvy vybraneho textu u TEdit nebo prave ty
scrollbary. nakonec jsem dospel k nazoru, ze nez ztracet cas s
tim jak tyto prvky upravit podle sveho je lepsi je nahradit kompletni
sadou vlastnich a je navzdy pokoj.
Jiri Binder
Instalace Resource Workshop
[*] Petr Reichl <p.reichl(zv)gmc(tec)net> - 10.4.2001 14:33:24
Zdravim vsechny,
prave se snazim nainstalovat Resource Workshop, ktery jsem nasel na
instalacnim CD Delphi5, ale moc se mi to nedari. Porad pise:
--
INSTBI40 caused a general Protection Fault in module BAMGR16.dll at
0004:0D70.
Choose close. INSTBI40 will close.
--
Da se s tim neco delat, nebo to je proste zmrsena instalace. Pokud ano, kde
si muzu stahnout funkcni instalaci.
Best Regards,
Petr Reichl
--
* GMC Software Technology AG
* E-mail: p.reichl(zv)gmc.net
-- Synapse & RTF
[*] Erik Salaj <winsoft(zv)napri.sk> - 10.4.2001 14:37:46
> nepochopil si mne. treba muj postovni program ukaze text e-mailu, a pod
> nim seznam vsech priloh. Staci si libovolnou prilohu vybrat tim, ze na ni
> mysi tuknu... nedochazi nikde k zadnym otravnym otazkam.. ale take
> nedochazi k zadnemu svevolnemu pokusu o spousteni kodu. kapisto?
1. Mne ten kritizovany Outlook Express rovno ukaze aj obrazky
a nemusim nikde tukat.
2. Az tuknes na prilohu, to sa Ta uz nepyta, ci spustit, ak je to
kod? Tak to potom nie je v poriadku podla mna. Co ak tam mas
aj obrazky aj nejaky skript, chces pozriet obrazok ale tuknes
mysou vedla... To uzivatel potom MUSI sam vediet rozhodnut,
co je kod a co nie je a velmi pozorne to sledovat (a davat velky
pozor, kde mysou klikne). Podla mna je daleko vyhodnejsie,
ked na to dava (aspon trochu) pozor program.
3. Na jednej strane Tvoj program vzdy otravuje uzivatela tym,
ze akukolvek prilohu musi najprv odkliknut (vecsinou zbytocne),
na druhej strane uzivatela vobec neupozorni, ze otvorenie prilohy
(ak ide o spustitelny subor) moze byt nebezpecne. Nevidim jedinu
vyhodu takehoto spravania, a podla mna je ten Tvoj program
z tohto hladiska znacne nedorobeny. To samozrejme nebrani
nikomu prezentovat to ako vyhodu a kritizovat ine, daleko
kvalitnejsie programy ;-).
Erik
StrToInt
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 10.4.2001 14:43:55
From: "David Lebeda" <david.lebeda(zv)comarr(tec)cz>
> > To je velice hezke, lec nefunkcni. Jakmile se na vstupu 's' objevi
> > cokoliv nez ciselny retezec, tak to stejne zacne hulakat, ze tohle
> > neni cislo ...
Ahoj,
ano, problem je v tom ze ta funkce je spatne implementovana. Vyjimky jsou
urceny pro obsluhu *vyjimecnych* situaci. Zotaveni z vyjimky, tedy obnova
kontextu je navic casove pomerne narocna. Spravne by funkce mohla vypadat
treba takto:
function IsNumeric(const S: string): Boolean;
var
E, N: Integer;
begin
Val(S, N, E);
Result := (E = 0);
end;
Petr Vones, amatersky programator
IB6 + procedura + ceske znaky
[*] cis <cis(zv)atlas(tec)cz> - 10.4.2001 15:07:25
Zdar vseci
potrebuji poradit jak v procedure predavat varchar do lokalni promenne. Pri
definici lokani promenne odmita nastavit ceske znaky.
ALTER PROCEDURE xxx
AS
declare variable ivypsoc VarChar(1);
.....
alda
Zmena systemovych barev jen v me aplikaci
[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 10.4.2001 15:19:54
>scrollbary. nakonec jsem dospel k nazoru, ze nez ztracet cas s
>tim jak tyto prvky upravit podle sveho je lepsi je nahradit kompletni
>sadou vlastnich a je navzdy pokoj.
***No a mas asi pravdu. A mas tyto prvky vlastni k dispozici, nebo ne.
Pokud ne, budu je muset napsat a nerad bych psal to co uz je hotove. S pozdravem
Tomas Rosa
------------------------=[ pinknet on every screen ]=----------------------
Tomas Rosa
Tomas.Rosa(zv)PinkNet(tec)cz
Contact me via EFFATA.NET, my EID: trosa(zv)effata.net
PinkNet Web Server for Win32 - FREEWARE http://pnws.pinknet(tec)cz/
---------------------------------------------------------------------------
Jeste jednou potomci TForm
[*] Milan Tomes <Milan.Tomes(zv)haida(tec)cz> - 10.4.2001 15:27:36
A neslo by to vytvorit do repository a pak dedit nebo kopirovat ???
Dalsi moznost (mozna) je predefinovat konkretni udalosti napr:
type
TC1Form = class (TForm)
private
FOnKeyDown : TKeyEvent;
procedure FormKeyDown (Sender: TObject; var Key: Word; Shift:
TShiftState);
public
constructor Create(AOwner : TComponent); override;
published
property OnKeyDown : TKeyEvent read FOnKeyDown write FOnKeyDown;
end;
constructor TC1Form.Create(AOwner : TComponent);
begin
inherited Create(AOwner);
TForm(self).OnKeyDown := FormKeyDown;
end;
procedure TC1Form.FormKeyDown(Sender: TObject; var Key: Word; Shift:
TShiftState);
begin
//tvuj kod
if Assigned(FOnKeyDown) then
FOnKeyDown(Sender, Key, Shift);
end;
Nezarucuji, ze to bude fungovat. Je to spis momentalni napad.
S pozdravem
Milan Tome�
Vedouc� v�vojov�ho t�mu Windows
Softwarehouse HAiDA s.r.o.
Nov� Bor
tel: 0424/722291, 0424/222284
email: Milan.Tomes(zv)haida(tec)cz
P.S.: Pokud tohle nemuze fungovat tak jestli se najde dobra duse, ktera mi
vysvetli proc tak budu velice rad :)> Ahoj,
>
> jelikoz na muj predchozi dotaz nebyla zadna reakce a ja se zatim
> posunul trosku dal, posilam konkretnejsi problem.
>
> Chci vytvorit jakousi nahradu TForm - rikejme ji TC1Form, ktera
> se bude od TForm lisit, ze bude mit nastaveno KeyPreview = True
> a pri stisku nejake kombinace klaves zavola nejakou metodu. Jak
> to do TC1Form spravne zabudovat?
>
> Pokud na TC1Form pridam normalne reakci na OnKeyDown,
> rvou na me potomci odvozeni z TC1Form pri nacitani projektu do
> Delphi, ze Ancestor not found a pro tyto potomky neni k dispozici
> form samotny (F12).
>
> David Lebeda
Jak ukoncit Thread?
[*] Ales Vasicek <vasicek(zv)ecommerce(tec)cz> - 10.4.2001 15:29:13
Ahoj,
mam napsany Thread, ktery pouzivam na nacitani dat z DB, ktere se
uzivateli
postupne vypisuji do gridu. Pouzivam ADONIS komponenty. Vse funguje v
pohode, ale zajima me, jak korektne ukoncit dany thread?
Thread vypada nejak takto:
procedure MyThread.Execute;
begin
ADODataSet.Close;
ADODataSet.SQL.Text := '.....';
ADODataSet.Open;
..
..
..
if not Terminated
then begin
........
end;
end;
Problem je totiz v tom, ze kdyz uzivatel napr. zavre aplikaci a muj
thread
jeste bezi, nemuzu ho ukoncit. Pri zavolani MyThread.Terminate se
nestane
nic, cemuz se samozrejme ani nedivim, protoze v tu chvili se provadi SQL
dotaz. Aplikace se zavre az potom, co dany thread (SQL dotaz) probehne.
Proto se ptam: Jak ukoncit (klidne i natvrdo) thread, aby se aplikace
ukoncila okamzite po kliknuti na krizek v liste?
Ales Prevod dat z Excelu
[*] Pavel Gazda <Pavel.Gazda(zv)seznam(tec)cz> - 10.4.2001 15:31:23
> > nekolikaty den se morim s prevodem dat z Excelu do IB pomoci komponent
> > TExcelApplication, ... Jedna se o vicelistove soubory. Vse by bylo
vporadku,
> > az na uz vicekrat popsane zatuhnuti Excelu. Zjistitl jsem, ze pri
nacitani
> > 32761. bunky vytuhne Excel i vlastni aplikace a po jeho odstreleni se
Mel jsem podobny problem pri EXPORTU do Excelu.
Myslim si, ze chyba souvisi s poctem operaci provadenych s Excelem.
Nakonec jsem data nejdrive ulozil do tabulky
XLS.Matice := VarArrayCreate([1,PocRadku,1,PocSloupcu],varVariant);
a tu pak exportoval
XLS.Worksheet.Range['A1','xxx'].Value := XLS.Matice;
Zkus to opacnym postupem
pavel.gazda(zv)seznam(tec)cz
uz OT: Maly exe z Delphi - korekce uses
[*] Jaroslav Nadhera <nadhera(zv)csh(tec)cz> - 10.4.2001 15:35:16
> Dobry obchodnik neni ten, kdo donuti programatora psat windowsovske
> programy pro MS-DOS proto, aby ten soft za dve stovky prodal, ale
> ten, kdo s tim programem proda soucasne poradny pocitac.
>
A kdyz zakaznik na novy pocitac nema a nebo nechce mit? A existuje cela rada
(treba i horsich) reseni, ktere mu vsak na jeho pocitadle pojedou? A kdyz
takovych zakazniku je hodne? Radu "nech je konkurenci, at si natlucou"
neberu, protoze se treba rok budou potykat s nejakym programem, pak zjisti
ze je nepouzitelny a stejne si koupi neco podobne blbeho, co vsak pojede na
jejich stroji. Je to moje zkusenost a kdo ma jinou, tomu zavidim.
> Obchodnik je jedna vec, programator druha vec. Rada lidi ma stale
> jen MS-DOS, rada lidi jen Windows 3.1. A ja rikam, ze to neni duvod,
> proc delat stale v Turbo Pascalu nebo Delphi 1. Kdyz nekdo chce,
> pak at dobrovolne dela. Ale nelze rikat, ze by se to melo delat,
> ze je to spravne a dulezite. A kdo dela jen 10 MB programy
> vyzadujici 32-bitove Windows a rychlejsi pocitace, ze je spatny
> programator...
On je to ale nezanedbatelny segment trhu ti lidi s MSDOSem. Hlavne ted, kdyz
vsichni delaji vse jen pro Windows. Na Sfamexu byla jedna firma s
ucetnictvim pro MSDOS a jaky tam meli naval - my Windowsaci jsme mohli jen
zavidet, nebot nemeli konkurenci.
J. N�dhera
CSH spol. s r.o.
Velflikova 10, 160 00 Praha 6
tel: 02/2431 2344-5, fax: 02/652 28 92
Nedbalova 14, 701 00 Ostrava
tel: 069/663 56 87
e-mail: nadhera(zv)csh(tec)cz WWW: http://www.csh(tec)cz
Jeste jednou potomci TForm
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 10.4.2001 15:43:58
> A neslo by to vytvorit do repository a pak dedit nebo kopirovat ???
To jsem prave udelal. Nicmene uz je to vyresene. Nevim sice, zda
korektne, ale funguje to. Zjistil jsem, ze dfm soubor obvykle zacina
slovem object, ktere uvadi obsazeny objekt. U tech odvozenych
formularu bylo misto slova object slovo inherited. Pak i prazdny
form (tj. potomek, ktery se od predka nelisi nicim novym)
zpusoboval drive popsanou chybu.
Jakmile jsem smazal slovo inherited a nahradil ho object, je vse
v poradku. Jen nechapu, kde se to tam vzalo, zvlast kdyz to Delphi
neni schopnou schroustat.
David Lebeda
>
> > Chci vytvorit jakousi nahradu TForm - rikejme ji TC1Form, ktera se
> > bude od TForm lisit, ze bude mit nastaveno KeyPreview = True a pri
> > stisku nejake kombinace klaves zavola nejakou metodu. Jak to do
> > TC1Form spravne zabudovat?
> >
> > Pokud na TC1Form pridam normalne reakci na OnKeyDown,
> > rvou na me potomci odvozeni z TC1Form pri nacitani projektu do
> > Delphi, ze Ancestor not found a pro tyto potomky neni k dispozici
> > form samotny (F12).
> >IB6 + struktura database
[*] cis <cis(zv)atlas(tec)cz> - 10.4.2001 15:46:40
Zdar
ted jsem si nainstaloval IB z 4.4.2001 a jake bylo prekvapeni. Stare db
soubory nechce otevrit: hlasi nepodporovana struktura, found 8, structure
10. Pritom ve ver. 6 a 6.01 je zakaznik pouzival.
Dale jsem se pokousel nainstalovat tento server na W2k a bez rucnicho zasahu
nefungoval. Knihovnu gds32.dll pro jistotu tvrdohlave umistuje do adresare
c:\dokumenty\setting......
Poradite nekdo co s tim?
alda
Tooltip expression evaluation
[*] Radim Hampel <hampel(zv)ecommerce(tec)cz> - 10.4.2001 15:48:58
Jde o zpusob jakym je to udelane. Kdyby melo IDE nejak parsovat, ke
kteremu with dany element patri, zblaznily by se. Bud se k te vlastnosti
napise i vlastnik(treba jen pro debug a potom se vyhodi), pak to
funguje. A v evaluate/modify, se musi tak stejne psat cela "cesta" k
vlastnosti.
>pocas ladenia (Delphi3) mozem vidiet hodnoty "variables" a "object
>properties", ked nad nim zastavim kurzor mysi (Environment options:
>%subject%). Ak ale takyto objekt, alebo record pouzijem v konstrukcii
with
>objekt do begin ... end, hodnoty property alebo clenov recordu sa
>nezobrazia, ani v Evaluate/Modify dialogu. Je nejaka moznost ako tieto
>hodnoty pocas ladenia vidiet?
>
>Pavol Stolc
>pstolc(zv)sc.sknet.sk
uz OT: Maly exe z Delphi - korekce uses
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 10.4.2001 15:55:05
From: "Jaroslav Nadhera" <nadhera(zv)csh(tec)cz>
> ucetnictvim pro MSDOS a jaky tam meli naval - my Windowsaci jsme mohli jen
> zavidet, nebot nemeli konkurenci.
A co teprve papirova ucetni kniha bez pocitace, to by byl naval ! A nejlepe
jeste zadarmo. Existuje prislovi "Nemam na to abych si kupoval levne veci",
neplati sice vzdy ale v tomto pripade patrne ano.
Petr Vones, amatersky programator
uz OT: Maly exe z Delphi - korekce uses
[*] Radek Janka <radek.janka(zv)ipsystem(tec)cz> - 10.4.2001 16:13:13
Zajimave kam az muze puvodne nevinna debata dojit. Je jasne, ze pokud nekdo
pise profesionalni aplikace v cenach radove tisicu az desetitisicu tak se
bude setkavat s ponekud jinou tridou zakazniku (harwarove i financne) nez
amater ktery napise free nebo share software na evidenci domaci knihovny,
ale myslim si ze technicka uroven pocitacu u cilove skupiny uzivatelu
konkretniho programu se da docela dobre odhadnout predem a podle toho se
zaridit.
Obecne ale neni spravny tlak programatoru na vykonejsi hardware u nove verze
aplikace. Da se oduvodnit tam kde je potreba vyssi vykon pro funkce, ktere
stary hardware nezvladal (CAD aplikace a grafika obecne, ony zminene
databaze atd). Ale proc proboha potrebuje ucetni pentium dvojku na trech
stech megaherzich, kdyz ten software pro ucetnictvi dela porad uplne to
same? Stejne tak obchodni dopisy ktere bezna sekretarka napise za den jsou
na stejne obsahove i graficke urovni at uz je napise ve starem AmiPro nebo v
nejnovejsim wordu. Jediny rozdil je v tom ze se bude muset obejit bez
cervenych vlnovek pod preklapama.
Tvrdit pocitacove pologramotnym uzivatelum - a to nemyslim nijak hanlive, to
jsou ti bezni uzivatele co pocitac zapnou, pusti svuj program a pracuji do
te doby nez jim naskoci nejaka povetsinou anglicka hlaska. Potom zustanou
konsternovane hledet na monitor a zoufale volat o pomoc :-)), tedy tvrdit
temto lidem ze musi upgradovat harware, potom operacni system a nakonec
veskery aplikacni software, tedy investovat nekolik desitek tisic jen proto
aby jejich pocitac delal totez co delal predtim (tedy: psal, tiskl, vrcel
diskem a obcas se zasekl) neni prilis fair.
Malym exe programum zdar preje
Radek :-)
> > ucetnictvim pro MSDOS a jaky tam meli naval - my Windowsaci jsme mohli
> jen
> > zavidet, nebot nemeli konkurenci.
>
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.167 / Virov� b�ze: 80 - datum vyd�n�: 29.6.2000
TWebBrowser a metoda POST !
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 10.4.2001 16:45:04
From: "Jan Grman" <janog(zv)pluto.elf.stuba.sk>
> - pokusam sa do dotazu zaradit aj data (ktore mozu byt potencionalne velke -
> 10, 20kB) a chcem zmenit metodu dotazu na POST !!!!
Ahoj,
priklad najdes na teto strance dole:
http://www.euromind.com/iedelphi/embeddedwb/navigate2.htm
> Ma niekto skusenost a pripadne funkcny kusok kodu volania Navigate alebo
> ???inej??? metody TWebBrowser ?
Ano, nakonec jsem to ale resil jinak:
http://codecentral.borland.com/codecentral/ccweb.exe/listing?id=15754
Petr Vones, amatersky programator
OT: Zamceny Paradox
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 10.4.2001 16:50:33
On 10 Apr 2001, at 9:16, Pesek Michal wrote:
> >> :-) Nejvetsi chybou je totiz pouziti Paradoxu pro sitove aplikace,
>
> Ja to vim, vy to vite, ale bohuzel je to tak a existuje jen but to
> ber, nebo si sezen neco jineho. A vzhledem k tomu, ze mate podporu a
> upgrate zadarmo, tak tezko sezenete. A to vcetne supportu vzhledem na
> dalsi produkty nasi firmy.
>
> A investovat do produktu zhruba na 1/2 roku, nez se prejde na novy
> nemocnicni system nema cenu.
>
> Jedinou vyhodou je, ze to funguje i na naprostych sitkach jako jsou
> IBM PS2 coz jsou trochu lepsi 286 s 4mb Ramky.
Jiste, vzdy je neco za neco. Cenou za to, ze to bezi na starych
krapech je vyssi riziko selhani. S ohledem na stav soucasneho
vyvoje to lze pojmout i jako prechodne (nouzove) reseni, ale
budovat na Paradoxu sitovy system s dlouhodobym vyhledem
provozu bych si rozhodne netroufal - jakozto dodavatel. A
neobmekcily by me ani narky, ze nejsou penize na nove pocitace.
Proste za ty prusery, ktere se u souborove databaze casem vynori,
mi to nestoji. :-)
S pozdravem
Zbysek Hlinka
http://www.hlinka(tec)cz http://www.slhaters(tec)cz
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
uz OT: Maly exe z Delphi - korekce uses
[*] Jaroslav Nadhera <nadhera(zv)csh(tec)cz> - 10.4.2001 17:24:56
>Zajimave kam az muze puvodne nevinna debata dojit. Je jasne, ze pokud nekdo
>pise profesionalni aplikace v cenach radove tisicu az desetitisicu tak se
>bude setkavat s ponekud jinou tridou zakazniku (harwarove i financne) nez
>amater ktery napise free nebo share software na evidenci domaci knihovny,
>ale myslim si ze technicka uroven pocitacu u cilove skupiny uzivatelu
>konkretniho programu se da docela dobre odhadnout predem a podle toho se
>zaridit.
I u SW za desetitisice nechteji uzivatele koupit novy pocitac.
>Ale proc proboha potrebuje ucetni pentium dvojku na trech
>stech megaherzich, kdyz ten software pro ucetnictvi dela porad uplne to
>same?
No protoze prece souborova databaze je nespolehliva (jak se tady porad
tvrdi) a SQL server na 486 nepobezi a nepobezi. A pokud tady na konferenci
reknu, ze i Paradox neni zas tak spatny, tak me nekteri sezerou (dobrou chut
:-)).
>Tvrdit pocitacove pologramotnym uzivatelum - a to nemyslim nijak hanlive,
to
>jsou ti bezni uzivatele co pocitac zapnou, pusti svuj program a pracuji do
>te doby nez jim naskoci nejaka povetsinou anglicka hlaska. Potom zustanou
>konsternovane hledet na monitor a zoufale volat o pomoc :-)), tedy tvrdit
>temto lidem ze musi upgradovat harware, potom operacni system a nakonec
>veskery aplikacni software, tedy investovat nekolik desitek tisic jen proto
>aby jejich pocitac delal totez co delal predtim (tedy: psal, tiskl, vrcel
>diskem a obcas se zasekl) neni prilis fair.
Naprosty souhlas.
J. N�dhera
CSH spol. s r.o.
Velflikova 10, 160 00 Praha 6
tel: 02/2431 2344-5, fax: 02/652 28 92
Nedbalova 14, 701 00 Ostrava
tel: 069/663 56 87
e-mail: nadhera(zv)csh(tec)cz WWW: http://www.csh(tec)cz
Algoritmus pro zimni/letni cas
[*] brant(zv)dcomm(tec)cz - 10.4.2001 17:25:43
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.
Algoritmus nevim, ale pokud potrebujes zjistit, zda aktualni datum je v
obdobi letniho casu, tak na to pouzivam tohle a funguje to:
function IsDaylightSavingTime: boolean;
//zkoum�, zda aktu�ln� datum spad� do letn�ho �asu
var TZI: TIME ZONE INFORMATION;
begin
Result:=(GetTimeZoneInformation(TZI) = TIME ZONE ID DAYLIGHT);
end;
RNDr. Petr Brant [Brant(zv)dcomm(tec)cz]
ICQ # 68652380
D&COMM s.r.o
Korunova�n� 6
Praha 7
-----Original Message-----
From: Ji�� Foldyna [mailto:jiri.f(zv)avizo(tec)cz]
Sent: Tuesday, April 10, 2001 1:35 PM
To: 'Delphi konference'
Subject: Algoritmus pro zimni/letni cas
Ahoj,
nevite nekdo, jak je presne definovan algoritmus pro vypocet prechodu na
letni/zimni cas ?
Diky
Ing. Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz
---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.247 / Virov� b�ze: 120 - datum vyd�n�: 6.4.2001
Zmena systemovych barev jen v me aplikaci
[*] Jiri Binder <j.binder(zv)albacon(tec)cz> - 10.4.2001 17:26:30
> >scrollbary. nakonec jsem dospel k nazoru, ze nez ztracet cas s
> >tim jak tyto prvky upravit podle sveho je lepsi je nahradit
> >kompletni sadou vlastnich a je navzdy pokoj.
>
> ***No a mas asi pravdu. A mas tyto prvky vlastni k dispozici, nebo ne.
Mam i nemam. Udelal jsem si sadu komponent odvozenych od
TCustomControl buttony, toolbar, listbox, edit, kalendar,
pagecontrol ... az po docela zajimavy dbgrid (pouze read-only, ale
viceradkove zahlavi i zaznam, bunky pres vice sloupcu nebo radku
samostatne konfigurovatelne, a prizpusobujici se sirce ..). Vsechny
komponenty jsou dost konfigurovatelne, mohou byt v plochem
stylu, pruhledne .. Sebralo mi to ale tolik casu, ze to jiz nemohu
dotahnout do predatelne podoby a sam bych cizi komponenty v
tomto stavu do sve aplikace nikdy nepouzil. Ja je pouzivam, ale
tim stylem, ze napr chybejici vlastnosti dodelam pokud je potrebuji.
Pisi to zde proto, ze kdyby se nahodou nasel nejaky dostatecne
otrly podivin, komu by se zdaly komponenty nadejne a kdo by na
dodelani chtel spolupracovat, uvital bych to (prosim pres soukromy
mail, ne do konference).
Jiri Binder
j.binder(zv)albacon(tec)cz
Algoritmus pro zimni/letni cas
[*] Ji�� Foldyna <jiri.f(zv)avizo(tec)cz> - 10.4.2001 17:33:51
Ahoj,
tohle umim, ale potreboval bych realizovat funkci neco jako
function IsLetniCas(DatumCas : TDateTime) : boolean;
begin
end;
tedy pro zadany casovy udaj. Nechci kvuli tomu menit nastaveni systemoveho
casu :-)).
Ing. Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz
P�edm�t: RE: Algoritmus pro zimni/letni cas
Algoritmus nevim, ale pokud potrebujes zjistit, zda aktualni datum je v
obdobi letniho casu, tak na to pouzivam tohle a funguje to:
function IsDaylightSavingTime: boolean;
//zkoum�, zda aktu�ln� datum spad� do letn�ho �asu
var TZI: _TIME_ZONE_INFORMATION;
begin
Result:=(GetTimeZoneInformation(TZI) = TIME_ZONE_ID_DAYLIGHT);
end;
RNDr. Petr Brant [Brant(zv)dcomm(tec)cz]
Subject: Algoritmus pro zimni/letni cas
Ahoj,
nevite nekdo, jak je presne definovan algoritmus pro vypocet prechodu na
letni/zimni cas ?
Diky
Ing. Jiri Foldyna
Prevod dat z Excelu
[*] Jan Naiser <tua(zv)wo(tec)cz> - 10.4.2001 17:35:16
Import do IB mam vyreseny a jelikoz ty soubory Excelu jsou vicelistove,
export do jineho formatu neni to prave orechove a navic potrebuju, aby se to
dalo v pripade nutnosti takto zopakovat. Proto by bylo nejvyhodnejsi to OLE.
Ale jak se zda, asi to bude nakonec nepruchodne.
Honza.
----- Original Message -----
From: "Tomas Michal�k" <michalik(zv)proca(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, April 10, 2001 11:59 AM
Subject: Re: Prevod dat z Excelu
> Ahoj,
>
> na to lek nemam, ale treba pomuze nasledujici: Ulozil bych data do CSV a
> v IBObjects je komponenta TIB_Import, kde nastavenim par vlastnosti
> dosahnes sveho.
>
> Pokud teda nedelas neco, co ma fungovat automaticky prave s tim Excelem
> ...
>
> S pozdravem,
> Tom
Algoritmus pro zimni/letni cas
[*] Daniel Rott <roxton(zv)atlas(tec)cz> - 10.4.2001 17:37:45
> nevite nekdo, jak je presne definovan algoritmus pro vypocet
> prechodu na letni/zimni cas ?
Myslim ze je to zrejme z Time Zone Editoru (soucast NtResKit).
(tzedit.exe). Pro EU nyni plati ze prechod na letni cas je posledni
nedeli v breznu v 2 rano (->3) a prechod zpet posledni nedeli
v rijnu v 3 rano (->2).
Daniel
------------------------------------------------------
Daniel Rott - roxton(zv)volny(tec)cz
http://www.volny(tec)cz/roxton
Some minor bugs/features fixed/added
Algoritmus pro zimni/letni cas
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 10.4.2001 17:43:11
> nevite nekdo, jak je presne definovan algoritmus pro vypocet prechodu na
> letni/zimni cas ?
Pokud se nepletu tak by to melo byt takto:
posledni nedele v breznu (02:00 -> 03:00)
posledni nedele v rijnu ? (03:00 -> 02:00) nebo az v Listopadu? (Klaus to o
mesic posunul...)
http://www.rog.nmm.ac.uk/leaflets/summer/summer.html
(Podotykam, ze jsme posunuty o hodinu dopredu od GMT)
D. Toman
Obrazok do RTF
[*] Peter Vlkovic <vlkovic(zv)minv.sk> - 10.4.2001 18:05:43
Ahoj,
Uz som sa pytal dva razy, ale mozno
to niekam zapadlo.
Potrebujem vlozit do RTF suboru obrazok.
Kdesi na internete som vykuchal a upravil
si nasledovnu proceduru, ktora mi
konecne funguje, ale pri uvolnovani
FCanvas to vyhadzuje vynimku.
Neporadil by mi niekto, co robim zle?
Uz sa s tym trapim dva dni.
Za pripadnu pomoc dakujem.
Vlkovic
Tu je ta procedura:
procedure ImageToRTF ( Img: TImage );
const
RTFBegin =
'{\rtf1\ansi '#13#10 + // uvodna sekvencia
'{\fonttbl{\f0 Arial;}}'#13#10+ // tabulka fontov
'{\f0\fs20 '#13#10; // vyberie vychodzi font a velkost
RTFEnd = '}';
var
RTF: TMemoryStream;
HMF: THandle;
FCanvas: TCanvas;
lpBits: pointer;
dwSize: LongInt;
h,h1,w,w1: double;
pPPoint: PPoint;
pPSize: PSize;
BinData: string;
begin
RTF := TMemoryStream.Create;
FCanvas := TCanvas.Create;
FCanvas.Handle := CreateMetafile ( nil );
SetMapMode ( FCanvas.Handle, mm_AnIsoTropic );
pPPoint := nil;
SetWindowOrgEx ( FCanvas.Handle, 0, 0, pPPoint );
pPSize := nil;
SetWindowExtEx ( FCanvas.Handle, Img.Width, Img.Height, pPSize );
FCanvas.StretchDraw ( Rect(0,0, Img.Width, Img.Height),
Img.Picture.Graphic );
HMF := CloseMetafile ( FCanvas.Handle );
dwSize := 0;
dwSize := GetMetaFileBitsEx ( HMF, dwSize, nil );
GetMem ( lpBits,dwSize );
GetMetaFileBitsEx ( HMF, dwSize, lpBits );
h := Img.Height;
h1 := h;
w := Img.Width;
w1 := w;
h := ( h / Screen.pixelsperinch ) * 1440.0;
w := ( w / Screen.pixelsperinch ) * 1440.0;
h1 := 26.46875 * h1;
w1 := 26.46875 * w1;
StreamWriteStr ( RTF, RTFBegin );
StreamWriteStr ( RTF, '{\pict' );
StreamWriteStr ( RTF, '\picscalex100' );
StreamWriteStr ( RTF, '\picscaley100' );
StreamWriteStr ( RTF, '\piccropl0' );
StreamWriteStr ( RTF, '\piccropr0' );
StreamWriteStr ( RTF, '\piccropt0' );
StreamWriteStr ( RTF, '\piccropb0' );
StreamWriteStr ( RTF, '\picw' + IntToStr(Round(w1)) );
StreamWriteStr ( RTF, '\pich' + IntToStr(Round(h1)) );
StreamWriteStr ( RTF, '\picwgoal' + IntToStr(Round(w)) );
StreamWriteStr ( RTF, '\pichgoal' + IntToStr(Round(h)) );
StreamWriteStr ( RTF, '\wmetafile8 '#13#10 ); // + oddeli medzerou
BinData := BinToHex ( lpBits, dwSize );
WritePerPartes ( RTF, BinData, 80 );
FreeMem ( lpBits );
StreamWriteStr ( RTF, '}}'#13#10 );
StreamWriteStr ( RTF, RTFEnd );
WriteMemoryStreamToFile ( RTF,
'D:\Delphi\Album\Rtf_testy\img2rtf\test.rtf' );
DeleteMetaFile ( HMF );
FCanvas.Free();
RTF.Free();
end;Oracle a NUMBER
[*] delphi(zv)htkpro(tec)cz - 10.4.2001 18:34:40
Jedina spolehliva rada jak predejit nize uvedenym problemum je zahodit BDE a
SQLExplorer a zacit s nejakymi funkcnimi komponentami, ktere pouzivaji
pristup primo pre OCI.
S pozdravem
Jan Kadlecek
HTK Pro s.r.o.
http://www.dev-shop(tec)cz
http://www.htkpro(tec)cz
--- P�vodn� dopis ----------------------------------------------------------
Datum: 10.04.2001 14:33
Od: KarelH(zv)cashreform(tec)cz
Pro: Konference DELPHI (DELPHI), ...
V�c: Fw: Oracle a NUMBER
----------------------------------------------------------------------------
>Dobry den.
>
>Tak jsem tady opet s problemem:
>
>Kdyz mam v tabulce sloupce typu NUMBER a napr. v SQL Exploreru zalozim
>novou
>vetu a inkriminovany sloupec nevyplnim, tak po postu a close/open mi to
>vyhodi misto null naproste capiny typu: -1.00025e-105 atp. A to nejlepe na
>NUMBER,2,0.
>Coz mi pak dela docela problemy to i smazat pres TDBNavigator.IB6 + struktura database
[*] cis <cis(zv)atlas(tec)cz> - 10.4.2001 19:10:55
V poradku, pochopim pokud se struktura zmeni treba jak to bylo z 5 na 6.
Mam stesti ze na jednom PC mi zustala ver., kde ma konzola 1.0.0.315 (a dale
dava tyto udaje Base level:6, ODS 10, WI-V6.0.0.627). Posledni instalovana
ver. z 4.4.2001 dava tyto udaje: 1.0.0.334, Base level:6, ODS 10,
WI-V6.0.1.6.
Nedovedu si predstavit to ohromne stesti a radost, kdy si budu stahovat
posledni ver.IB a pak nasledne prevadet vsechny db soubory.
alda
----- Original Message -----
From: Leos Urban <Leos.Urban(zv)iol(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Saturday, March 31, 2001 5:35 PM
Subject: Re: IB6 + struktura database
> > ted jsem si nainstaloval IB z 4.4.2001 a jake bylo prekvapeni. Stare db
> > soubory nechce otevrit: hlasi nepodporovana struktura, found 8,
structure
> > 10. Pritom ve ver. 6 a 6.01 je zakaznik pouzival.
>
> Ze svych poznamek:
> Upgrade databazi mezi verzemi Interbaze
> Databazove soubory (gdb) jsou vytvoreny s urcitou verzi ODS (On-Disc
> Structure), tato verze neni vetsinou prenosna mezi ruznymi verzemi
> Interbaze. Pri upgrade takovych databazi na novy IB server je treba
nejprve
> zazalohovat databazi puvodni (starou) verzi Interbaze, konkretne utilitou
> gbak. Vytvoreny soubor gbk je pak treba obnovit v nove verzi Interbaze,
opet
> utilitou gbak. Aktualni verzi ODS je mozne zjistit utilitou gstat, pro IB6
> je to verze 10.
>
> Leos
>
>
IB6 + procedura + ceske znaky
[*] cis <cis(zv)atlas(tec)cz> - 10.4.2001 19:36:42
Zdar
presne takto jsem to delal ale IB mi to vzdy odmitla a zastavila se na
CHARACTER a nahlasila chybu .
alda
----- Original Message -----
From: Leos Urban <Leos.Urban(zv)iol(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Saturday, March 31, 2001 6:05 PM
Subject: Re: IB6 + procedura + ceske znaky
> > potrebuji poradit jak v procedure predavat varchar do lokalni promenne.
> Pri
> > definici lokani promenne odmita nastavit ceske znaky.
> > ALTER PROCEDURE xxx
> > AS
> > declare variable ivypsoc VarChar(1);
> > .....
>
> Bud pouzijte defaultni znakovou sadu u datab�ze
> nebo nastavujte u parametru CHARACTER SET,
> napr.
>
> create procedure ceska_procedura
> returns (navrat varchar(32) character set WIN1250)
> as
> declare variable testik varchar(32) character set WIN1250;
> begin
> testik = 'Hackovany text';
> navrat = testik;
> suspend;
> end !!
>
> Leos
>
>
SetFocus handler
[*] Jan Skopov� <jsdelphi(zv)atlas(tec)cz> - 10.4.2001 20:10:09
Myslim ze CMFOCUSCHANGED.
Jan Skopovy
Zdravicko,
potreboval bych udelat handler, ktery by reagoval na setfocus
jakekoliv komponenty na formulari, nevite jestli existuje nejaka
zprava, ktera by se dala odchytit?
IB6 + procedura + ceske znaky
[*] Leos Urban <Leos.Urban(zv)iol(tec)cz> - 10.4.2001 20:24:52
Tohle mi funguje, mam pravda Firebird, zkouseno pod Win, resp. z FARu pod
DOSem :-))
Oboje projde.
Leos
PS: Predchozi dnesni maily mi ulitly do 31.brezna, za coz se konferenci
omlouvam...
Varianta 1)
create database "localhost:/techsupp/testik.gdb";
set names DOS852;
connect "localhost:/techsupp/testik.gdb";
set term !! ;
create procedure ceska_procedura
returns (navrat varchar(32) character set WIN1250)
as
declare variable testik varchar(32) character set WIN1250;
begin
testik = 'Svycarska zizala';
navrat = testik;
suspend;
end !!
set term ; !!
execute procedure ceska_procedura;
quit;
Varianta 2)
create database "localhost:/techsupp/testik.gdb" default character set
WIN1250;
set names DOS852;
connect "localhost:/techsupp/testik.gdb";
set term !! ;
create procedure ceska_procedura
returns (navrat varchar(32))
as
declare variable testik varchar(32);
begin
testik = 'Svycarska zizala';
navrat = testik;
suspend;
end !!
set term ; !!
execute procedure ceska_procedura;
quit;
Algoritmus pro zimni/letni cas
[*] Ji�� Foldyna <jiri.f(zv)avizo(tec)cz> - 10.4.2001 20:44:31
> P�edm�t: Re: Algoritmus pro zimni/letni cas
>
> > nevite nekdo, jak je presne definovan algoritmus pro vypocet
> > prechodu na letni/zimni cas ?
>
> Myslim ze je to zrejme z Time Zone Editoru (soucast NtResKit).
> (tzedit.exe). Pro EU nyni plati ze prechod na letni cas je posledni
> nedeli v breznu v 2 rano (->3) a prechod zpet posledni nedeli
> v rijnu v 3 rano (->2).
Ahoj,
na WEBu jsem nasel nasledujici informace:
do r. 1996 (potrebuji to od r. 1990) se zmeny casu odehravaly vzdy posledni
nedeli v breznu a v zari (2->3, 3<-2), od roku 1996 to je v souladu s EU -
tedy posledni nedele v breznu a v rijnu. Soucasne plati, ze obdobi letniho a
zimniho casu stanovi dopredu bud vlada nebo MPSV vyhlaskou nebo zakonem
(prameny se ruzni :-)), melo by to byt podle tohoto schematu. Da se tomu
verit, resp. vi nekdo, ze by to bylo jinak ?
Pokud to sedi, nema nekdo nejaky stepny napad, jak to elegantne urcit (tedy
ne tak, ze budu pro dany rok postupne dekrementovat datum od 31.3. nebo
31.10. a zjistovat, jestli to neni nedele ) ?
Dik
Ing. Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz
Tvorba helpu
[*] <morzol(zv)atlas(tec)cz> - 10.4.2001 20:56:28
Protoze Word z Office 97 neprodukuje RTF kod, ktery by mohl prekladac prelozit. Myslim ze tam neco pridava.
-----P�vodn� zpr�va-----
Od: "delphi-l-owner(zv)clexpert(tec)cz" <delphi-l-owner(zv)clexpert(tec)cz> za u�ivatele "Daniel Dedek" <Dedek(zv)ds(tec)cz>
Odesl�no: 6. dubna 2001 11:31
Komu: "delphi-l(zv)clexpert(tec)cz" <delphi-l(zv)clexpert(tec)cz>
P�edm�t: RE: Tvorba helpu
A ja se pripojim - helpy v RTF musim psat ve Wordu z Officu 95,
nevite nekdo, proc nejdou prekladat soubory RTF z Wordu z Office 97? (
Delphi 3 )
Dan
> Nazdar
> Neznate nejaky freewarovy program na tvorbu helpu fe formatu hlp.
Nechcou
> se mi totiz helpy psat primo v rtf.
> S pozdravem
> Dusan Fojtik
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.243 / Virov� b�ze: 118 - datum vyd�n�: 30.3.2001
uz OT: Maly exe z Delphi - korekce uses
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 10.4.2001 21:52:03
Puvodni zprava, kterou napsal Jaroslav Nadhera dne 10 Apr 2001,:
> A kdyz zakaznik na novy pocitac nema a nebo nechce mit? A existuje cela rada
Zalezi, jestli chces mit na starosti tento segment trhu. Pokud zakaznik
nema nebo nechce mit na pocitac, pak tezko bude mit nebo bude chtit mit
na program.
> (treba i horsich) reseni, ktere mu vsak na jeho pocitadle pojedou? A kdyz
> takovych zakazniku je hodne? Radu "nech je konkurenci, at si natlucou"
Neeee! Nech si je, protoze tim padem je nebudu mit ja :-)))
> On je to ale nezanedbatelny segment trhu ti lidi s MSDOSem. Hlavne ted, kdyz
> vsichni delaji vse jen pro Windows. Na Sfamexu byla jedna firma s
> ucetnictvim pro MSDOS a jaky tam meli naval - my Windowsaci jsme mohli jen
> zavidet, nebot nemeli konkurenci.
Ja sam jsem autorizovany zastupce pro distribuci ucetnich programu
pracujicich pod DOSem. Je to jediny DOS program, ktery dodavam a ktery
sam take pouzivam. Takze vim, co ti zakaznici jsou vetsinu zac. Mezi
nami, nejmene 3/4 uzivatelu ma stejne Windows 95 nebo spis Windows 98.
Takze o to je to horsi, ze jedou DOS program pod Windowsem, kupuji
si tiskarny, ktere s Windowsem nechteji moc chodit apod. No a jinak
ti uzivatele, co maji sunky, tak bud maji takove sunky, ze jim
tam i ten DOS program jede spatne, v kazdem pripade vsak dostat z nich
nejakou korunu, to je tragedie, porad skuci, ze nic nemaji. Nerikam,
ze vsichni, ale jen ti, co maji sunky...
S pozdravem
Petr Zahradnik, pocitacovy expert
============================================================
Petr Zahradnik, Computer Laboratory
Obvodova 740/14, P.O. Box 15, 400 07 Usti nad Labem
Telefony: 047-5500610, 047-5501627, 0602-409601
Fax: 047-5511338
WWW: http://www.clexpert(tec)cz, http://www.zahradnik(tec)cz
E-Mail: clexpert(zv)clexpert(tec)cz, petr(zv)zahradnik(tec)cz
ICQ: 21215917
============================================================uz OT: Maly exe z Delphi - korekce uses
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 10.4.2001 21:57:07
Puvodni zprava, kterou napsal Radek Janka dne 10 Apr 2001,:
> Tvrdit pocitacove pologramotnym uzivatelum - a to nemyslim nijak hanlive, to
> jsou ti bezni uzivatele co pocitac zapnou, pusti svuj program a pracuji do
> te doby nez jim naskoci nejaka povetsinou anglicka hlaska. Potom zustanou
> konsternovane hledet na monitor a zoufale volat o pomoc :-)), tedy tvrdit
> temto lidem ze musi upgradovat harware, potom operacni system a nakonec
> veskery aplikacni software, tedy investovat nekolik desitek tisic jen proto
> aby jejich pocitac delal totez co delal predtim (tedy: psal, tiskl, vrcel
> diskem a obcas se zasekl) neni prilis fair.
????? Proc to neni fair ????? Kdyz ma nekdo sunku pocitac 5 let stary
a ted si ma nejaky novy koupit, tak to neni fair mu to rici? Neni to
blbost? Napriklad ja mam 2 roky stare auto a uz mam skoro sjete gumy,
takze si jdu zitra koupit nove a jedna ta gumicka stoji 5,5 tisice.
Takze to mas 22 litru jen to fikne a me ani nenapadne protestovat.
Pritom bych se na to mohl divat stejne jako ty - proc bych mel davat
nekolik desitek tisic jen proto, aby moje auto jezdilo jako driv
a neplavalo po silnici zleva doprava? Jezdim autem, mam sjete gumy,
potrebuji nove. Delam na pocitaci, uz je to pomala stara sunka,
potrebuji novy. Nebo snad nemuzeme porovnavat auto s pocitacem?
Notabene to auto stoji na udrzbe daleko vic nez pocitac, mezi nami...
S pozdravem
Petr Zahradnik, pocitacovy expert
============================================================
Petr Zahradnik, Computer Laboratory
Obvodova 740/14, P.O. Box 15, 400 07 Usti nad Labem
Telefony: 047-5500610, 047-5501627, 0602-409601
Fax: 047-5511338
WWW: http://www.clexpert(tec)cz, http://www.zahradnik(tec)cz
E-Mail: clexpert(zv)clexpert(tec)cz, petr(zv)zahradnik(tec)cz
ICQ: 21215917
============================================================uz OT: Maly exe z Delphi - korekce uses
[*] Erik Salaj <winsoft(zv)napri.sk> - 10.4.2001 21:58:15
>Obecne ale neni spravny tlak programatoru na vykonejsi hardware u nove
verze
>aplikace. Da se oduvodnit tam kde je potreba vyssi vykon pro funkce, ktere
>stary hardware nezvladal (CAD aplikace a grafika obecne, ony zminene
>databaze atd). Ale proc proboha potrebuje ucetni pentium dvojku na trech
>stech megaherzich, kdyz ten software pro ucetnictvi dela porad uplne to
>same? Stejne tak obchodni dopisy ktere bezna sekretarka napise za den jsou
Lenze je obrovsky rozdiel (aj pre pologramotneho uzivatela), ked program
robi nieco hodinu a ked to robi par minut. A o to tu ide.
>na stejne obsahove i graficke urovni at uz je napise ve starem AmiPro nebo
v
>nejnovejsim wordu. Jediny rozdil je v tom ze se bude muset obejit bez
>cervenych vlnovek pod preklapama.
Ano, a ak chce firma usetrit na pocitacoch, tak dopis sa da napisat aj
perom.
Po obsahovej stranke to bude rovnake, po grafickej - zalezi od sekretarky.
V zaostalych krajinach, kde ludska praca nema takmer ziadnu hodnotu
(v porovnani s cenou pocitaca), to aj moze byt velmi efektivne riesenie.
Vo vyspelych krajinach, kde je ludska praca inac ohodnotena, a kde
z jedneho platu si moze clovek kupit x-pocitacov, o takejto alternative
nikto ani neuvazuje. Ja samozrejme, ze firma si kupi pocitace, pretoze
je pre nu daleko lacnejsie a vyhodnejsie pracu, ktoru zvladne pocitac
prenechat na pocitac. Kym programy budu pisat ludia a pocitace
sa budu seriovo vyrabat, tak vo vyspelych krajinach bude vzdy
vyhodnejsie upgradovat pocitace ako prisposobovat software
staremu hardware.
>Tvrdit pocitacove pologramotnym uzivatelum - a to nemyslim nijak hanlive,
to
>jsou ti bezni uzivatele co pocitac zapnou, pusti svuj program a pracuji do
>te doby nez jim naskoci nejaka povetsinou anglicka hlaska. Potom zustanou
>konsternovane hledet na monitor a zoufale volat o pomoc :-)), tedy tvrdit
>temto lidem ze musi upgradovat harware, potom operacni system a nakonec
>veskery aplikacni software, tedy investovat nekolik desitek tisic jen proto
>aby jejich pocitac delal totez co delal predtim (tedy: psal, tiskl, vrcel
>diskem a obcas se zasekl) neni prilis fair.
Ked dva pocitace robia to iste, nie je to vzdy to iste ;-).
Erik
Prevod dat z Excelu
[*] JIM Design <jim.design(zv)iol(tec)cz> - 10.4.2001 22:14:27
ahoj,
a co kdyby ses do excelu napichnul pres ADO a vyzobal to pomoci TAdoDataset
jak sestavit SQL dotaz na ruzne listy v excelu najdes na
http://www.cybermagic.co.nz/winsoft/adofaq.htm
M.Jirman
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Jan Naiser
Sent: Tuesday, April 10, 2001 11:50 AM
To: Konference Delphi
Subject: Prevod dat z Excelu
Preji pekny den,
W98SE, D5.01, OFF2k
nekolikaty den se morim s prevodem dat z Excelu do IB pomoci komponent
TExcelApplication, ... Jedna se o vicelistove soubory. Vse by bylo vporadku,
az na uz vicekrat popsane zatuhnuti Excelu. Zjistitl jsem, ze pri nacitani
32761. bunky vytuhne Excel i vlastni aplikace a po jeho odstreleni se
aplikace opet rozbehne, ale cely comp. se vyrazne zpomali a je treba ho
restartovat. Pokud otevru a zavru list, zatuhne uz na 32748. bunce. To cislo
jevi se mi docela podezrele nebot se blizi magickemu cislu 32768. Nezalezi
ani na tom, zda bunky obsahuji data nebo jsou prazdne. Vypada to patrne na
chybu Excelu. Nenasel jste na to nekdo medicinu, pripadne klicku, jak to
obelstit?
Diky, Honza Naiser.
Videa - zjisteni velikosti a roztazeni
[*] JIM Design <jim.design(zv)iol(tec)cz> - 10.4.2001 22:14:29
ahoj,
prirad TMediaplayer.DisplayRect
jeste nez das Play
M.Jirman
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Petr Vasicek
Sent: Friday, April 06, 2001 11:12 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Videa - zjisteni velikosti a roztazeni
Zdravim,
nevite prosim nekdo, jak mohu zjisit rozmery otevreneho videa v
TMediaPlayer
a jak ho muzu roztahnout(treba na celou obrazovku).
Diky
Petr Vasicek
-------------------------------------------
The Fastest Browser on Earth now for FREE!!
Download Opera 5 for Windows now! Get it at
http://www.opera.com/download/
-------------------------------------------
Zaokrouhleni realneho cisla
[*] Hazuka Filip <filip.hazuka(zv)multivac(tec)cz> - 10.4.2001 22:50:50
Ahoj Vsem.
Mohl by jste mi nekdo poradit, jakou funkci mam pouzit, kdyz potrebuji
zaokrouhlit realne cislo (extended) na dve desetina mista nahoru. Funkce
Floor a Ceil umi jak jsem vycetl z napovedy jen na cele cislo. Poradte mi
prosim nekdo.
Diky za kazdy napad.
Filip
Tvorba helpu
[*] Lud�k ZITA <konference(zv)sales(tec)cz> - 11.4.2001 00:19:57
Od: "delphi-l-owner(zv)clexpert(tec)cz" <delphi-l-owner(zv)clexpert(tec)cz> za u�ivatele
"Daniel Dedek" <Dedek(zv)ds(tec)cz>
>A ja se pripojim - helpy v RTF musim psat ve Wordu z Officu 95,
>nevite nekdo, proc nejdou prekladat soubory RTF z Wordu z Office 97?
Ahoj.
Myslim, ze je na to ke stazeni u M$ nejaky patch nebo novejsi verze, ktera
uz umi vyssi Wordovske dokumenty.
Ludek
uz OT: Maly exe z Delphi - korekce uses
[*] Lud�k ZITA <konference(zv)sales(tec)cz> - 11.4.2001 00:36:37
----- Original Message -----
From: "Jaroslav Nadhera" <nadhera(zv)csh(tec)cz>
> >Ale proc proboha potrebuje ucetni pentium dvojku na trech
> >stech megaherzich, kdyz ten software pro ucetnictvi dela porad uplne to
> >same?
>
> No protoze prece souborova databaze je nespolehliva (jak se tady porad
> tvrdi) a SQL server na 486 nepobezi a nepobezi. A pokud tady na konferenci
> reknu, ze i Paradox neni zas tak spatny, tak me nekteri sezerou (dobrou
chut
> :-)).
>
Ahoj.
I kdyz nejsem zastancem neustale bobtnajicich programu a v celku s Tebou
souhlasim, tady v tomhle nemas pravdu.
SQL server muze bezet na vykonnem serveru a na stanicich muze bezet pomerne
"tenky" klient klidne i na te 486.
A to je cesta k uspore.
Problem je v tom, ze pokud ma mit system alespon zakladni stabilitu, musi
byt data ulozena na serveru nebo alespon na vyhrazenem pocitaci, na kterem
nikdo nepracuje. Pak se dramaticky zvysi spolehlivost i tech souborovych
databazi. Pokud pobezi SQL server na pocitaci (jak byva spatnym zvykem
nejlepe u vedouciho) a ten tam bude honit kde co, pak se ti muzou hroutit i
SQL servery.
Druha vec je napsat pro SQL program spravne. Pokud pri kazdem vstupu do
evidence (treba faktur) natahnes na klienta kompletni udaje od cisla 1 do
cisla 350, pak samozrejme 486 chrochtne a lehne. Pokud ho nejprve nechas
rict co vlastne potrebuje a na klienta tahas jen to nejnutnejsi, pak vse
muze behat svizne i na pomalejsim stroji.
P.S. 486 s 8MB RAM prece jenom povazuji za nepouzitelny PC (alespon ta pamet
se da za par KC rozsirit).
Ludek
Zaokrouhleni realneho cisla
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 11.4.2001 04:34:32
Podobne jako u Round. Floor(Cislo * 100) / 100
------
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
10.4.2001 Hazuka Filip:
> Ahoj Vsem.
> Mohl by jste mi nekdo poradit, jakou funkci mam pouzit, kdyz potrebuji
> zaokrouhlit realne cislo (extended) na dve desetina mista nahoru. Funkce
> Floor a Ceil umi jak jsem vycetl z napovedy jen na cele cislo. Poradte mi
> prosim nekdo.
> Diky za kazdy napad.
> Filip
uz OT: Maly exe z Delphi - korekce uses
[*] Radek Janka <radek.janka(zv)ipsystem(tec)cz> - 11.4.2001 07:04:59
vyborne prirovnani. Obvykle take pokud potrebuji neco nazorne vysvetlit
pouzivam jako priklad automobily, protoze tem rozumi kazdy i bezny
pocitacovy uzivatel. Takze tabulka prvni:
1. auto mne zivi, jezdim s nim denne pres trista kilometru: potrebuji
mercedes nebo jeste lepe porsche
2. auto pouzivam k beznemu pracovnimu jezdeni ale nejezdim kazdej den: to
porsche zrejme nepotrebuju, asi bude stacit ta oktavka
3. dtto.2, ale obcas v nem potrebuju odvezt dve palety zbozi: to asi
nenalozim, musim mit vetsi a silnejsi auto
4. mam auto rodinne ale jedu jenom obcas na chalupu a jednou za ctrnact dni
do supermarketu: mno, tady by ta stodvacitka asi sla jeste obhajit. I se
sjetyma gumama, ale pozor na policii.
Tabulka druha:
1. Jsem pocitacovy grafik, delam 3D vizualizace
nebo 1a. Jsem databazovy specialista spravuji databazi s desetitisici
zaznamu: jaky potrebuji pocitac?
2. Pocitac mi stoji na stole, bezi sice cely den ale jenom obcas na nem
napisu dopis, obcas fakturu nebo sklouznu po interneru: opravdu potrebuji
ten P4/1,5GHz?
3. dtto 2, ale navic potrebuji na disk ulozit velky archiv realizovanych
zakazek: mozna by to chtelo rozsirit pamet a disk, mozna ta jedna aplikace
bude trochu linejsi, ale nebudu kupovat novej stroj kvuli jedne aplikaci
kdyz ostatni jedou slusne.
4. pocitac zapnu dvakrat v tydnu vecer, jen sem tam nejaky ten dopis na
ourad nebo kouknout na "ten internet": no neni to ono, ja vim, ale mam tu
486ku hodit do srotu?
Uzivatele skupiny 4 budou jiste na sve sunky nadavat, ale pokud na novou
nemaji tak jim muzou slouzit. A je jasne ze kdyz mu odejde harddisk tak si
koupi novy stejne jako ty si koupis nove gumy. Ale gumy na tu stodvacitku
koupi asi v bazaru, do sve stare sunky si koupi "novy" harddisk taky z
bazaru, protoze to 20 gigo se jim pod DOSem nechytne. Ale treba jo... Ale
nebude si ten disk kupovat jenom proto ze ten jeho je tri roky stary a tedy
"out" stejne jako ty si nebudes kupovat cele nove auto jenom proto ze mas
sjete gumy.
Nechme uz toho michani profesionalnich uzivatelu s temi domacimi a
prilezitostnymi. Ono to proste nejde srovnavat.
Radek
> Jezdim autem, mam sjete gumy,
> potrebuji nove. Delam na pocitaci, uz je to pomala stara sunka,
> potrebuji novy. Nebo snad nemuzeme porovnavat auto s pocitacem?
> Notabene to auto stoji na udrzbe daleko vic nez pocitac, mezi nami...
>
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.167 / Virov� b�ze: 80 - datum vyd�n�: 29.6.2000
Zaokrouhleni realneho cisla
[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 11.4.2001 07:05:17
> zaokrouhlit realne cislo (extended) na dve desetina mista
> nahoru. Funkce
y:=ceil(x*100)/100;
staci ;) ?
dekuji PeC(zv)
CU onTheFutureOfMatrix
MatriX.CyberSpace.Cz
-< ON - LINE - AGAIN >-
/~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
|[smtp:petr.palicka(zv)atlas(tec)cz]|
|[smtp:peca(zv)email(tec)cz] |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~/TOpenDialog
[*] Martin Bab�k <M.Babik(zv)mus(tec)cz> - 11.4.2001 07:11:23
Myslis, TOpenPictureDialog ci TSavePictureDialog? Ja chci ulozit obrazek a pokud mozno ho i podstrcit primo do toho dialogu, bez vybrani, jen aby se dopsalo jmeno souboru pod kterym se to ma ulozit.
Ja mohu zjistit typ souboru (ico, bmp atd.) pod kterym se to snazi uzivatel ulozit, abych dle toho mohl ukladat i priponu pridat? Dik
M&B
>>> Radek Janka <radek.janka(zv)ipsystem(tec)cz> 04/10 6:28 >>>
>predchoziho dotazu na pripojeni obrazku do Open dialogu, v Delphi 5 (nevim
>jestli i drive, znam jenom verze 2 a 5) je TOpenImage dialog ktery obsahuje
>i nahled vybran�ho souboru.
>> Od: Martin Bab�k [SMTP:M.Babik(zv)mus(tec)cz]
>> Zdravim Delphiny,
>> jak jednoduse vybrat z adresare n-souboru urciteho typu (treba vsechny
>> "txt")? Nebo vsechny soubory z jednoho adresare, ci jen ten adresar?
>> Prijde mi, ze to TOpenDialog, neumi. :-( Diky
uplne OT: Maly exe z Delphi - korekce uses
[*] Hurricane <hurricane(zv)quick(tec)cz> - 11.4.2001 07:16:46
Zdravim
Tak to bohuzel.
Aktualni ceny:
8 MB EDO RAM / 72 PIN 377
16 MB EDO RAM / 72 PIN 792
32 MB EDO RAM / 72 PIN 1438
8 MB RAM FASTPAGE / 72 PIN, i pro 486 450
16 MB RAM FASTPAGE / 72 PIN, i pro 486 1109
Ta (BTW dokonale stabilni) 486 stoji 1500, takze v porovnani s pametmi.
> P.S. 486 s 8MB RAM prece jenom povazuji za nepouzitelny PC (alespon ta
pamet
> se da za par KC rozsirit).uz OT: Maly exe z Delphi - korekce uses
[*] Radek Janka <radek.janka(zv)ipsystem(tec)cz> - 11.4.2001 07:24:39
OK, pokud to stary software zpracovaval hodinu a novy pet minut je to ono
zvyseni vykonu o kterem jsem psal ze je dobrym duvodem k upgradu. A pokud
tento novy soft potrebuje i novy hard, pak je to v poradku - za sve penize
dostanu viditelne zlepseni.> Lenze je obrovsky rozdiel (aj pre pologramotneho uzivatela), ked program
> robi nieco hodinu a ked to robi par minut. A o to tu ide.
>
>
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.167 / Virov� b�ze: 80 - datum vyd�n�: 29.6.2000
uz OT: Maly exe z Delphi - korekce uses
[*] Jan Krizek <krizek(zv)vitasw(tec)cz> - 11.4.2001 07:30:22
> Stejne tak obchodni dopisy ktere bezna sekretarka
> napise za den jsou na stejne obsahove i graficke urovni at uz je napise ve
> starem AmiPro nebo v nejnovejsim wordu. Jediny rozdil je v tom ze se bude
muset
> obejit bez cervenych vlnovek pod preklapama.
Tohle asi neni spravny priklad nehoraznych vymyslu programatoru. Kontrola
pravopisu, a nejlepe on-line, je vec, ktera v textovem editoru ma byt a je
jasne, ze zvysuje velmi narocnost programu. Jestli obsahova a graficka
uroven je stejna, pak alespon ta formalni - gramaticka je o trochu lepsi. A
je urcite levnejsi Celeron s 128MB, nez sekretarka s jednickou z pravopisu.
Myslim, ze Ti, kteri neustale tvrdi, ze nove programy delaji totez co stare
(a jeste ke vsemu spatne) by si meli na mesic udelat downgrade a schvalne
nainstalovat ten MS-DOS (Win 3.1, ci prvni verzi Win95 apod.) a v nem zit -
schvalne za jak dlouho vam zacnou chybet vymozenosti novych Windows
(odhaduji tak do deseti minut, mozna driv, kdyz se budete potrebovat
urychlene prepnout do jineho programu (plati pouze pro DOS a Win 3.1)). Jsou
veci, ktere z prikazove radky a v textovem rezimu jsou lepsi, ale mezi ne
nepatri aplikace pro koncove uzivatele.
Jina vec jsou nefunkcni rozsirovani programu o skiny apod. kdy casto jsem
videl pocitace, kde Word sel hodne ztuha, ale zato na pozadi na vas mrkala
krasna truecolorova blondyna. Zde by meli byt uzivatele informovani, jak moc
tyhle blbosti stoji. To same jsou sponky, pejsci, kocicky a jina havet, co
se libi, ale zere pocitac. Ale dneska freeware bez podpory skinu, to snad
ani nejde :-))
Honza +Algoritmus pro zimni/letni cas
[*] Jan Krizek <krizek(zv)vitasw(tec)cz> - 11.4.2001 07:30:37
> Pokud to sedi, nema nekdo nejaky stepny napad, jak to
> elegantne urcit (tedy
> ne tak, ze budu pro dany rok postupne dekrementovat datum od
> 31.3. nebo
> 31.10. a zjistovat, jestli to neni nedele ) ?
>
Zjistit, ktery den 31.3. (resp. 31.10.) je a pak odecist odpovidajici pocet
dni. Kdyz 31.3. je pondeli, tak jeden, kdyz utery tak dva atd...
Honza +Vystup z ISAPI dovnitr html stranky
[*] Josef Slan� <slany(zv)hasici.znojmo(tec)cz> - 11.4.2001 07:59:47
Ahoj,
D5 prof., Win2k, IIS 5.
nevite prosim nekdo, jak zaclenit vystup z isapi aplikace
dovnitr hotove html stranky?
Tedy aby mi ISAPI aplikace negenerovala celou stranku, ale
abych ji zavolal nekde v html strance a na toto misto mi
vypsala napriklad obsah nejake tabulky.
Zkousel jsem SSI direktivu #exec, ktera by to podle meho chapani
dokumentace MS mela umet, ale nevypise se mi vubec nic, ani chyba.
Zkousel jsem to nasledujicimi formami:
<!-- #exec CGI=intranet.dll -->
<!-- #exec CGI=intranet.dll?pokus -->
<!-- #exec CGI=c:\inetpub\wwwroot\intranet.dll\e_maily_zn?pokus -->
<!-- #exec CGI=c:\inetpub\wwwroot\intranet.dll -->
Direktivu to zrejme neignoruje, protoze pokud udelam v te intranet.dll
chybu,
vraci to http error 500 (vnitrni chyba serveru).
Prime zavolani z browseru: http://localhost/intranet.dll funguje normalne.
Diky,
Josef Slany
mailto:slany(zv)hasici.znojmo(tec)cz
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.240 / Virov� b�ze: 116 - datum vyd�n�: 23.3.2001
uz OT: Maly exe z Delphi - korekce uses
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 11.4.2001 08:14:15
On 10 Apr 2001, at 15:35, Jaroslav Nadhera wrote:
> > Dobry obchodnik neni ten, kdo donuti programatora psat windowsovske
> > programy pro MS-DOS proto, aby ten soft za dve stovky prodal, ale
> > ten, kdo s tim programem proda soucasne poradny pocitac.
>
> A kdyz zakaznik na novy pocitac nema a nebo nechce mit? A existuje
> cela rada (treba i horsich) reseni, ktere mu vsak na jeho pocitadle
> pojedou? A kdyz takovych zakazniku je hodne? Radu "nech je konkurenci,
> at si natlucou" neberu, protoze se treba rok budou potykat s nejakym
> programem, pak zjisti ze je nepouzitelny a stejne si koupi neco
> podobne blbeho, co vsak pojede na jejich stroji. Je to moje zkusenost
> a kdo ma jinou, tomu zavidim.
Mam zkusenost, ze hodne zakazniku si koupi jednodussi/levnejsi
reseni. Rada z nich toho pozdeji lituje. Mohl bych uvest radu
prikladu s jednim dochazkovym systemem, ktery je levny,
jednoduchy, je vsude inzerovan a pouziva ho hodne zakazniku. A
mohu take uvest radu stiznosti a problemu, diky kterym se ten
levny system prodrazil tak, ze je cenove srovnatelny s mym
resenim, ovsem s daleko nizsim komfortem a vykonem. A to je
moje Dochazka koncipovana jako system pro (predevsim) mensi
az stredni zakazniky.
S pozdravem
Zbysek Hlinka
http://www.hlinka(tec)cz http://www.slhaters(tec)cz
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Synapse & RTF
[*] Gebauer Lukas <gebylist(zv)mlp(tec)cz> - 11.4.2001 08:26:15
Neni tomu az tak jak si myslis, ale nerad bych to tu dale rozpitvaval,
protoz je to uz silny Off-topic. ;-)
Dulezita informace pro Outlookare je ta, ze synapse jiz podporuje vse co
potrebuji.
Osobne mi outlook prestane vadit v okamziku, kdy se nauci vyrabet
standardni e-maily, a ne ty jejich zmrseniny. ;-)
> > nepochopil si mne. treba muj postovni program ukaze text e-mailu, a
> > pod nim seznam vsech priloh. Staci si libovolnou prilohu vybrat tim,
> > ze na ni mysi tuknu... nedochazi nikde k zadnym otravnym otazkam..
> > ale take nedochazi k zadnemu svevolnemu pokusu o spousteni kodu.
> > kapisto?
>
> 1. Mne ten kritizovany Outlook Express rovno ukaze aj obrazky
> a nemusim nikde tukat.
>
> 2. Az tuknes na prilohu, to sa Ta uz nepyta, ci spustit, ak je to kod?
> Tak to potom nie je v poriadku podla mna. Co ak tam mas aj obrazky aj
> nejaky skript, chces pozriet obrazok ale tuknes mysou vedla... To
> uzivatel potom MUSI sam vediet rozhodnut, co je kod a co nie je a
> velmi pozorne to sledovat (a davat velky pozor, kde mysou klikne).
> Podla mna je daleko vyhodnejsie, ked na to dava (aspon trochu) pozor
> program.
>
> 3. Na jednej strane Tvoj program vzdy otravuje uzivatela tym,
> ze akukolvek prilohu musi najprv odkliknut (vecsinou zbytocne),
> na druhej strane uzivatela vobec neupozorni, ze otvorenie prilohy (ak
> ide o spustitelny subor) moze byt nebezpecne. Nevidim jedinu vyhodu
> takehoto spravania, a podla mna je ten Tvoj program z tohto hladiska
> znacne nedorobeny. To samozrejme nebrani nikomu prezentovat to ako
> vyhodu a kritizovat ine, daleko kvalitnejsie programy ;-).
>
> Erik
>
>
Louci se Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
WEB: http://www.ararat(tec)cz/synapse - Synapse Delphi TCP/IP Library
Prevod dat z Excelu
[*] Listuj <listuj(zv)centrum(tec)cz> - 11.4.2001 08:37:56
Ahoj,
potreboval jsem resit neco podobneho. Mel jsem data v Excelu a
potreboval jsem je prehrat do IB6. Asi nejrychlejsi bylo kdyz
jsem si vytvoril VBA makro, ktere vzalo strukturu toho listu a
zapsalo do normalniho textaku SQL prikazy pro INSERT. Pokud budes
chtit mohu zaslat ten modul.
Jako nazvy sloupcu slouzi nazvy hlavicek jednotlivych sloupecku
excelu (bunky v prvnim radku) a zbytek uz jsou data. Jeste jsem
to vysperkoval tim, ze si na prvni misto v nazvu sloupce umistuji
priznak jakeho typu je sloupec (staci 0-numericka hodnota,1-
hodnota vyzadujici uzavreni do apostrofu). A takhle jednoduse
projedu vsechny listy sesitu.
Hezky den, zadosti o modul na soukromy mejl.> Import do IB mam vyreseny a jelikoz ty soubory Excelu jsou
vicelistove,
> export do jineho formatu neni to prave orechove a navic
potrebuju, aby se to
> dalo v pripade nutnosti takto zopakovat. Proto by bylo
nejvyhodnejsi to OLE.
> Ale jak se zda, asi to bude nakonec nepruchodne.
>
> Honza.
*****************
Jarda Jirava
(zv)
LiStuj
listuj(zv)centrum(tec)cz
^^^^^^^^^^^^^^^^^
SW development
^^^^^^^^^^^^^^^^^
*****************
Hrajte on-line hry na http://herna.centrum(tec)cz
Zalo�te si sv�j mail na http://mail.centrum(tec)cz
uz OT: Maly exe z Delphi - korekce uses
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 11.4.2001 08:52:05
Ahoj,
odpovim ti jinak.
Delam pro zadavatele program, pro ktery bylo nekolik zajimavych
pozadavku. Jednim z nich bylo, aby se vesel na jednu disketu (ale pokud
jsem udelal standardni instalaci pomoci InstallShl. tak byl program vzdy
na diskety dve !!! ) a druhym, aby veskera data a tabulky, ktera by se
normalne dala do nejakych externich souboru, se ulozila primo do EXE
(aby uzivatel, jako nepritel cislo jedna, nemohl data nejak pozmenit a
tim ovlivnit vypocty). A prave tenhle program bezi u stovek anonymnich
klientu, o nichz se dozvim jen prave v tom okamziku, kdyz se jim napr.
prekresli spatne ikony na toolbaru (== tedy je to udelano bez toolbaru
atp.). Pokud bych prilinkoval Comctrl32 k instalu, uz se mi to nevejde
na jednu disketu :-) .
A PROC se to dela?
Prave proto, ze uzivatele jsou "neznali" (neni to pravidlo, specialne
tento program pouziva cela sire uzivatelu od tech znalych s nejvyssi
kvalifikaci az po naproste laiky, kteri jsou schopni zhroutit vypnuty
pocitac) a mnohdy jim cini neskutecne potize spustit instalaci ze dvou
disket. A kdyz maji jeste zadat alespon seriove cislo a potvrdit
licencni ujednani, tak to uz jsou uplne vedle.
Ale uplna katastrofa jsou snazivi kutilove, kteri zkousi kde co a jsou
castym zdrojem nespravne cinnosti programu (a casto pouzivaji program
jinak nez je uvedeno).
A vetsina z nich jsou sice profesionalove ve svem oboru, kteri program
pouzivaji pouze k tomu ucelu, ke kteremu je urcen, ale neumi to treba
ani nainstalovat. A ted babo rad. Pokud takovemu uzivateli reknu, aby si
aktualizoval system ("stahnete si prislusnou knihovnu z internetu..."),
tak se setkam s "jistym" nepochopenim.
A na druhe strane je zajem zadavatele, aby vse bezelo tak jak je zadano
(tj. bez problemu). Program prece produkuje data, na kterych ma
zadavatel eminentni zajem!
>Zalezi, jestli chces mit na starosti tento segment trhu. Pokud zakaznik
>nema nebo nechce mit na pocitac, pak tezko bude mit nebo bude chtit mit
>na program.
a tady uz nejte o to, ze pominu tento segment trhu (jako programator).
Kdyz ho proste nekdo "chce" tak ho bude mit za jakoukoliv cenu, i kdyby
mel davat programy zadarmo....
Jaro B.
P.S.
Ale moje situace neni asi uplne typicka...
> -----Original Message-----
> From: Hurricane [mailto:hurricane(zv)quick(tec)cz]
> Sent: Tuesday, April 10, 2001 12:43 AM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: Re: uz OT: Maly exe z Delphi - korekce uses
>
>
> Zdravim
>
> No, Comctrl32.dll neni zrovna ten nejlepsi priklad. Rekni mi,
> jak chces
> napsat pouzitelnou aplikaci bez pouzivani teto knihovny.
> Tenhle problem se
> resi tak, ze si stahnes od MS update, ktery pribalis do sve
> aplikace. Napr.
> ACDSee ma tento update prilinkovany primo v instalatoru a
> testuje verzi teto
> knihovny a pripadne to nainstaluje.
>
> Hurricane
uz OT: Maly exe z Delphi - korekce uses
[*] Jaroslav Nadhera <nadhera(zv)csh(tec)cz> - 11.4.2001 09:05:39
> V zaostalych krajinach, kde ludska praca nema takmer ziadnu hodnotu
> (v porovnani s cenou pocitaca), to aj moze byt velmi efektivne riesenie.
> Vo vyspelych krajinach, kde je ludska praca inac ohodnotena, a kde
> z jedneho platu si moze clovek kupit x-pocitacov, o takejto alternative
> nikto ani neuvazuje. Ja samozrejme, ze firma si kupi pocitace, pretoze
> je pre nu daleko lacnejsie a vyhodnejsie pracu, ktoru zvladne pocitac
> prenechat na pocitac. Kym programy budu pisat ludia a pocitace
> sa budu seriovo vyrabat, tak vo vyspelych krajinach bude vzdy
> vyhodnejsie upgradovat pocitace ako prisposobovat software
> staremu hardware.
Jenze tady je porad lidska prace cenena temer nulove. Firma si poridi
rychlejsi pocitac, program, ktery vse udela za polovinu casu - ale co budou
delat zamestnanci? Firma je nepropusti (nevim proc). Takze radsi plati
(malo) lidi, nez aby si koupili nove vybaveni. A nebo si radsi koupi
pozlacene kliky ke dverim (videl jsem firmu, kde meli nobl budovu, nobl
vybavenou, ale 5 let stare pocitace a jehlickove tiskarny, prototoze pry na
nich je tisk levnejsi a opan sef jine nekoupi).
J. N�dhera
CSH spol. s r.o.
Velflikova 10, 160 00 Praha 6
tel: 02/2431 2344-5, fax: 02/652 28 92
Nedbalova 14, 701 00 Ostrava
tel: 069/663 56 87
e-mail: nadhera(zv)csh(tec)cz WWW: http://www.csh(tec)cz
uz OT: Maly exe z Delphi - korekce uses
[*] Jaroslav Nadhera <nadhera(zv)csh(tec)cz> - 11.4.2001 09:10:01
> SQL server muze bezet na vykonnem serveru a na stanicich muze bezet
pomerne
> "tenky" klient klidne i na te 486.
Ano, ale kdyz maji jen jeden pocitac? A ten je nic moc. Ja vim, jak je to se
spolehlivosti, zejmena na siti. Ale na lokale jsme zadne problemy nemeli a u
pani ucetni, ktera zpracuje za rok 100 faktur neobhajim SQL reseni, protoze
doted delala na 486 a stacilo ji to. A ony i mnohe vetsi firmy nemaji
vykonnejsi pocitac tim mene nejaky, ktery by mohl byt vyhrazeny pro server.
J. N�dhera
CSH spol. s r.o.
Velflikova 10, 160 00 Praha 6
tel: 02/2431 2344-5, fax: 02/652 28 92
Nedbalova 14, 701 00 Ostrava
tel: 069/663 56 87
e-mail: nadhera(zv)csh(tec)cz WWW: http://www.csh(tec)cz
----- Original Message -----
From: Lud�k ZITA <konference(zv)sales(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, April 11, 2001 12:36 AM
Subject: Re: uz OT: Maly exe z Delphi - korekce uses
Synapse & RTF
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 11.4.2001 09:15:21
> Neni tomu az tak jak si myslis, ale nerad bych to tu dale rozpitvaval,
> protoz je to uz silny Off-topic. ;-)
>
> Dulezita informace pro Outlookare je ta, ze synapse jiz podporuje vse co
> potrebuji.
doporucuju rozlisovat MS Outlook a MS Outlook Express. MS OE je podle me
nejpouzitelnejsi mailovy klient (jedine co na nem postradam je lepsi
threadovani zprav - ala Netscape Messenger). Jeho rozhrani mi nejvice
vyhovuje. Ostatni bud neumi to co potrebuju nebo me zdrzuji neprehlednou
spoustou oken (eudora, pegasus).
PS vcera jsem testoval mailovy klient The Bat!. Je to docela ambiciozni
projekt, ktery ale podle me trosku prehnal implementaci ruznych funkci
(libil se mi on-line spell checker - ve stylu MS Word - pisu a hned vidim
preklepy (anglicky) ).
Nabizi miliony ruznych moznosti (neprehledne - ale mozna se na to da
zvyknout) ale presto jsem v nem po prolezani vsech menu nenalezl dulezitou
funkci - zobrazeni puvodniho zdrojoveho kodu zpravy, coz je pro mne dost
dulezita funkce. Nevim, zda to neumi (nebo jsem spatne hledal?), protoze to
autori neimplementovali nebo proto ze z principu to nejde (The Bat umi
ulozit prilohy i mimo vlastni zpravu do specialniho adresare, ale to jsem
mel vypnute).
D. Toman
uz OT: Maly exe z Delphi - korekce uses
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 11.4.2001 09:20:37
>Delam pro zadavatele program, pro ktery bylo nekolik zajimavych
>pozadavku. Jednim z nich bylo, aby se vesel na jednu disketu (ale pokud
>jsem udelal standardni instalaci pomoci InstallShl. tak byl program vzdy
>na diskety dve !!! )
InstallShield (InstallShit ?) je pro male projekty naprosto nepouzitelny.
Tak jsem se jej testoval - ma tak silene velky overhead, ze komprimovana
instalace vysla pomalu delsi nez vlastni zdrojove soubory. Navic (pokud to
vubec umi) se mi nepovedlo vygenerovat instalaci tak, aby on\bsahovala jen
jeden instalacni (exe) soubor
Doporucuju InnoSetup nebo si napsat vlastni setup. - pouzit ZLIB (pouziva ji
i InnoSetup) ke kompresi data. ZLIB je free a existuji i jeji prepisy do
Delphi a komprimuje skvele (inflate metoda je tusim soucasti ZIPu a jeji
autor psal i ZLIB)
D> Toman
uz OT: Maly exe z Delphi - korekce uses
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 11.4.2001 09:24:37
Ahoj,
mam vlastni instalak, cca 150Kb na jednodisketove instalace a staci mi
to.
Jaro B.
> -----Original Message-----
> From: Dalibor Toman [mailto:dtoman(zv)fortech(tec)cz]
> Sent: Wednesday, April 11, 2001 9:21 AM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: Re: uz OT: Maly exe z Delphi - korekce uses
>
>
> >Delam pro zadavatele program, pro ktery bylo nekolik zajimavych
> >pozadavku. Jednim z nich bylo, aby se vesel na jednu disketu
> (ale pokud
> >jsem udelal standardni instalaci pomoci InstallShl. tak byl
> program vzdy
> >na diskety dve !!! )
>
> InstallShield (InstallShit ?) je pro male projekty naprosto
> nepouzitelny.
> Tak jsem se jej testoval - ma tak silene velky overhead, ze
> komprimovana
> instalace vysla pomalu delsi nez vlastni zdrojove soubory.
> Navic (pokud to
> vubec umi) se mi nepovedlo vygenerovat instalaci tak, aby
> on\bsahovala jen
> jeden instalacni (exe) soubor
>
> Doporucuju InnoSetup nebo si napsat vlastni setup. - pouzit
> ZLIB (pouziva ji
> i InnoSetup) ke kompresi data. ZLIB je free a existuji i jeji
> prepisy do
> Delphi a komprimuje skvele (inflate metoda je tusim soucasti
> ZIPu a jeji
> autor psal i ZLIB)
>
> D> Toman
>
>
>
> Instalace BDE z CD Delphi 3
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 11.4.2001 09:27:51
Ahoj,
mam maly problemek,
potreboval bych instalovat BDE verze z Delphi 3 ale nemohu ho nikde na
CD najit. Nevite, prosim, kde je, nebo odkud ho ziskat?
Diky
Jaro B.
P.S.
Opravdu nikdo v konferenci nepsal licencni ujednani d osveho programu,
ktere by odrazelo posledni pravni stav v CR?Kreslenie fontov
[*] Ing. Patrik Tesar <tesar(zv)rainside.sk> - 11.4.2001 09:47:54
Caute
Potreboval by som nejake source code v C alebo PAS
na kreslenie fontov pomocou ciar. Nemusia byt uplne TT
a stacia uplne s pevnou sirou (definovatelnou)
dakujem za rady
S pozdravom
P.IB6:Pridani noveho uzivatele
[*] Dusan Fojtik <fojtikd(zv)aix.upol(tec)cz> - 11.4.2001 09:48:27
Nazdar
Nevite nahodou nekdo, jak pridat v IB6 noveho uzivatele do databaze pomoci
skriptu ?
S pozdravem
Dusan Fojtik
Wokno - On_fokus
[*] Valenta Patrik <valentapat(zv)volny(tec)cz> - 11.4.2001 09:53:58
potrebuji natuknou. Pro prepinani mezi okny potrebuju zachytit udalost ze
okno dostalo fokus. Nejak nemuzu najit ten spravny event. diky.
e-mail : valentapat(zv)volny(tec)cz
ICQ: 54152896
Prevod dat z Excelu
[*] Zden�k Brej�a <prog(zv)hjsoft(tec)cz> - 11.4.2001 09:54:45
Prosim o to makro, dekuji.
----- P�vodn� zpr�va -----
Od: "Listuj" <listuj(zv)centrum(tec)cz>
Komu: <delphi-l(zv)clexpert(tec)cz>
Odesl�no: 11. dubna 2001 8:37
P�edm�t: Re: Prevod dat z Excelu
> Ahoj,
>
> potreboval jsem resit neco podobneho. Mel jsem data v Excelu a
> potreboval jsem je prehrat do IB6. Asi nejrychlejsi bylo kdyz
> jsem si vytvoril VBA makro, ktere vzalo strukturu toho listu a
> zapsalo do normalniho textaku SQL prikazy pro INSERT. Pokud budes
> chtit mohu zaslat ten modul.
>
Prevod dat z Excelu
[*] Jan Naiser <tua(zv)wo(tec)cz> - 11.4.2001 10:09:19
Zkusil jsem a je to pruchodne. Asi je to jedina cesta, jak se dostat pres
magickou hranici 32761 cteni bunky. Navic je to cele nekolikanasobne
rychlejsi. Pripada mi, ze pri vetsim poctu listu a pevne strukture je toto
reseni asi nejprehlednejsi.
Honza Naiser.
----- Original Message -----
From: "Pavel Gazda" <Pavel.Gazda(zv)seznam(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, April 10, 2001 3:31 PM
Subject: Re: Prevod dat z Excelu
> Mel jsem podobny problem pri EXPORTU do Excelu.
> Myslim si, ze chyba souvisi s poctem operaci provadenych s Excelem.
> Nakonec jsem data nejdrive ulozil do tabulky
>
> XLS.Matice := VarArrayCreate([1,PocRadku,1,PocSloupcu],varVariant);
>
> a tu pak exportoval
>
> XLS.Worksheet.Range['A1','xxx'].Value := XLS.Matice;
>
> Zkus to opacnym postupem
>
> pavel.gazda(zv)seznam(tec)cz
Synapse & RTF, ale spis The Bat!
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 11.4.2001 10:27:12
V hlavnim okne Zobrazit/Zdroj zpr�vy RFC 822...
Jinak The Bat! existuje i v cestine, vcetne ceskeho spell checkeru.
A to uzivatelske rozhrani chce opravdu trochu zvyku. Ale zato ty
moznosti ....
------
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
11.4.2001 Dalibor Toman:
> PS vcera jsem testoval mailovy klient The Bat!. Je to docela ambiciozni
> projekt, ktery ale podle me trosku prehnal implementaci ruznych funkci
> (libil se mi on-line spell checker - ve stylu MS Word - pisu a hned vidim
> preklepy (anglicky) ).
> Nabizi miliony ruznych moznosti (neprehledne - ale mozna se na to da
> zvyknout) ale presto jsem v nem po prolezani vsech menu nenalezl dulezitou
> funkci - zobrazeni puvodniho zdrojoveho kodu zpravy, coz je pro mne dost
> dulezita funkce. Nevim, zda to neumi (nebo jsem spatne hledal?), protoze to
> autori neimplementovali nebo proto ze z principu to nejde (The Bat umi
> ulozit prilohy i mimo vlastni zpravu do specialniho adresare, ale to jsem
> mel vypnute).
> D. Toman
Zaokrouhleni realneho cisla
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 11.4.2001 10:31:09
Vzhledem k puvodnimu dotazu zaokrouhlovani na dve desetinna mista
odhaduji, ze slo o penize.
Pro cisla, ve kterych jsou ulozeny penize doporucuji typ TCurrency.
Presnost na pevne 4 mista, nedochazi k problemum, o kterych pises a
ktere se tykaji formatu s plovouci desetinnou teckou.
------
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
11.4.2001 Jan Tungli:
> Inac zaokruhlenie veseobecne je dost velkym problemom. Isty cas som stym
> zaoberal a vysledok je jedna funkcia ktory dokaze zaokruhlovat na x miest
> prirodzene, nahoru a dole.
> Problemy ktore som musel vyriesit boli nasledujuce:
> 1. Ty ulozis do DB hodnotu 3.0 a moze sa stat ze ti DB vrati 2.99999999 a
> to pri zaokruhlovani hore alebo dole je uz problem.
> 2. Ak velke cislo chces zokruhlit napr. na miliony tak postup (c*1000000)
> div 1000000 nemusi byt dobry atd.
> a este nejake ale uz nepametam
> Jan Tungli
> email: jan.tungli(zv)seznam(tec)cz
> tungli(zv)datapac.sk
> http://www.tungli.host.sk (NEW SQL REPORT BUILDER)
> http://www.nexus.hu/tungli
>> -----P�vodn� zpr�va-----
>> Od: Petr Palicka [SMTP:petr.palicka(zv)atlas(tec)cz]
>> Odesl�no: 11. apr�l 2001 7:05
>> Komu: delphi-l(zv)clexpert(tec)cz
>> P�edm�t: RE: Zaokrouhleni realneho cisla
>>
>>
>> > zaokrouhlit realne cislo (extended) na dve desetina mista
>> > nahoru. Funkce
>>
>> y:=ceil(x*100)/100;
>>
>> staci ;) ?
>>
>> dekuji PeC(zv)
>>
>> CU onTheFutureOfMatrix
>> MatriX.CyberSpace.Cz
>>
>> -< ON - LINE - AGAIN >-
>>
>> /~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
>> |[smtp:petr.palicka(zv)atlas(tec)cz]|
>> |[smtp:peca(zv)email(tec)cz] |
>> \~~~~~~~~~~~~~~~~~~~~~~~~~~~~/