Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
jcl - ExceptionDilaog kde najit chybu?
[*] Zapletal Martin <zapletal(zv)inoma(tec)cz> - 19.1.2006 14:01:55
Vstup je textovy soubor, po radcich se nacita do programu, alanyzuje a
zapisuje do dbf, vstupni data se zahodi. Pravdepodobne bude ale asi problem
na strane Apollo nad kterym dbf beha. Pokud po kazdem 100 000 zaznamu zavru
vsechny otevrene databaze a v zapeti je znovu otevru tak chyba zmizi a
zpracovani dobehne do konce OK.
Martin
> Tezko poradit bez znalosti toho programu... Jestli jsem to pochopil
> spravne nacita se v cyklu neco (textovy soubor? databaze) radek po
> radku. Nactena data se ukladaji do nejakeho pole stringu? Nebo se jen
> zpracuji a zahodi?
>
Jak zaridit, aby program bezel jako sluzba?
[*] Petr Svejda <petr(zv)svejda(tec)cz> - 19.1.2006 14:19:57
Mam jednoduch program na kopirovani dat (bezpecnostni kopie). Potrebuji,
abych ho mohl spustit na serveru (Win2003 Server) jako sluzbu.
Podminka je vsak takova, aby se program spustil jeste tehdy, nez dojde k
prihlaseni. Server se totiz automaticky kazdy den v noci restartuje,
pripadne pri vypadku proudu ho automaticky shazuje a nahazuje UPSka.
Zkousel jsem hledat v Gogglu, ale nepodarilo se mi najit nejakou zakladni
nit.
Voditkem bude pravdepodobne v Delphi New application/Services...., ale co
dal? Jak se program registruje, jak odregistruje, jake musi program splnovat
pozadavky oproti normalni aplikaci,...?
Nema nekdo nejaky kus kodu, vzorove aplikace, ze ktere by se dalo
odstartovat, pripadne pochopit princip?
Diky moc.
Petr Svejda
www.isoft(tec)cz
DevExpress Grid, problem se svislym posuvnikem
[*] Pavel Malinsky <malinsky(zv)pmcom(tec)cz> - 19.1.2006 13:37:53
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of petr palicka
> Pavel Malinsky napsal(a):
> > No, hned kricet je taky uchylny :)) sou to dost vymakany komponenty
> > a chce to nejaky cas na jejich pochopeni.
>
> zjevne ano. Ale preci jenom mi pripadaji znacne prekomplikovane.
> Treba se s nimi casem lepe sziju.
:) ja se neszil dodnes a stale me prekvapuje, ze obcas objevuju veci ktere
bych
psal rucne (samozrejme az potom co je napisu ruco :)) )
> > Otazka je v jakem modu ten grid pouzivate (GridMode), zda
> je to napriklad
> > cxTableView nebo cxDBtableView apod.
Nevim co bys mohl delat spatne(resp. cos kde mohl prenastavit), ale
kdyz to vezmu jen zakladne tak vezmu Grid, vytvorim Level, k nemu
DBTableView,
priradim datasource(pouzivam IBO) a nastavim KeyFieldNames (na primarni
klic).
Jeste vygeneruju sloupce ktery chci a hotovo funguje.
Tzn. vsechna property muzu nechat v defaultnim stavu.
S pozdravem a dikem
=====================================
> Pavel Malinsky; malinsky(zv)pmcom(tec)cz <
=====================================
> GSM: 602 652 203 | ICQ: 322015967 <
=====================================
porovnani TMethod
[*] Jan Harman <jharman(zv)volny(tec)cz> - 19.1.2006 14:29:58
Zdravim vsechny,
prosim vas, jak porovnam zda ZpracujProc ukazuje na Zpracuj1 nebo
na Zpracuj2? Zkousim
"ZpracujProc = Zpracuj1" -- to pochopitelne pise ze nema parametry
"(zv)ZpracujProc = (zv)Zpracuj1" -- to pise ze pozaduje promennou
Diky.
Type TZpracujProc = Procedure (i: Integer) of object;
TExp = class
...
ZpracujProc : TZpracujProc;
Procedure Zpracuj1(i: Integer);
Procedure Zpracuj2(i: Integer);
end;
Jak zaridit, aby program bezel jako sluzba?
[*] Ludek Finstrle <ludek.finstrle(zv)pzkagis(tec)cz> - 19.1.2006 14:25:57
> Mam jednoduch program na kopirovani dat (bezpecnostni kopie). Potrebuji,
> abych ho mohl spustit na serveru (Win2003 Server) jako sluzbu.
...
> Voditkem bude pravdepodobne v Delphi New application/Services...., ale co
> dal? Jak se program registruje, jak odregistruje, jake musi program splnovat
> pozadavky oproti normalni aplikaci,...?
>
> Nema nekdo nejaky kus kodu, vzorove aplikace, ze ktere by se dalo
> odstartovat, pripadne pochopit princip?
Ted nerozumim, zda nutne potrebujete, aby to byla nativni sluzba. Pokud
ne, pak existuje srvany.exe a podobne veci primo od MS, ktere umi
libovolny program spustit jako service.
Luf
Jak zaridit, aby program bezel jako sluzba?
[*] Jonas Marian <jonas(zv)komercpoj(tec)cz> - 19.1.2006 14:37:58
Podivej se na ScktSrvr.dpr ve slozce Delphi\Source\Vcl , da se z toho dost okoukat, vyhodou je to ze vysledny exe lze spustit jako normalni aplikaci anebo jako sluzbu.
Marian
> Mam jednoduch program na kopirovani dat (bezpecnostni kopie). Potrebuji, abych ho mohl spustit na serveru (Win2003 Server) jako sluzbu.
porovnani TMethod
[*] Pavel Poles <delphi(zv)noni(tec)cz> - 19.1.2006 15:10:01
> "ZpracujProc = Zpracuj1" -- to pochopitelne pise ze nema parametry
> "(zv)ZpracujProc = (zv)Zpracuj1" -- to pise ze pozaduje promennou
>
Neslo by neco jako TMethod(Zpracuj1).Code = TMethod(ZpracujProc).Code ?
Pavel Poles
porovnani TMethod
[*] Jan Harman <jharman(zv)volny(tec)cz> - 19.1.2006 15:18:01
> > "ZpracujProc = Zpracuj1" -- to pochopitelne pise ze nema
> > parametry
> > "(zv)ZpracujProc = (zv)Zpracuj1" -- to pise ze pozaduje promennou
> >
> Neslo by neco jako TMethod(Zpracuj1).Code =
> TMethod(ZpracujProc).Code ?
...to nejde taky, u pretypovani TMethod(Zpracuj1) to napize
"Invalid typecast":(
Jan Harman
Chyba pri tisku pres Quickreport
[*] Lukas Barton <lukas(zv)cnawr(tec)cz> - 19.1.2006 21:38:27
Zdravim,
mam u jednoho zakaznika problem s tiskem pres Quickreport.
Obcas se stane, ze nektere pole na sestave chybi. Vzdy se jedna o
cisla nebo datumy.
Tisknu primo a aplikace bez nahledu pomoci metody Print.
Databaze je pripojeno pres IB komponenty a je to Firebird.
Verze Delphi 6.
Setkal jste se s tim nekdo? Vyresli jste to?
Mne se to bohuzel nedari na svem PC reprodukovat.
Lukas
DateTimePicker - nastaveni formatu casu podle Long
[*] Ing. Jiri Sokol <js-delphi(zv)seznam(tec)cz> - 19.1.2006 16:58:08
Ahoj.
Pouzil jsem ve sve aplikaci komponentu DateTimePicker.
V *.dpr mam:
LongTimeFormat := 'hh:mm:ss';
abych se vyhnul problemum s ruznym nastavenim ruznych prostredi.
Bohuzel jsem prave zjistil, ze tato komponenta nastaveni pomoci LongTimeFromat ignoruje.
Jak to resite vy?
Myslite na to u kazdeho vytvareneho okna a kazde komponente nastavujete format zvlast?
Diky za napad.
Jirka
staticka aplikace a LCD
[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 19.1.2006 16:20:06
delphin(zv)post(tec)cz dne 19 Jan 2006 v 12:39:
> > obrazu do matice LCD, ne?? U CRT monitoru to tak je... neresil to
> > nekdo
>
> U CRT+Plazma se snizuje jas pouze u pouzivanych bodu v dusledku
> opotrebeni materialu. U LCD se snizuje jas celoplosne nezavisle na
> pouzitych bodech v dusledku opotrebeni podsvetleni.
Nedavno jsem videl notebook, staricky, ktery mel na displeji krasne viditelne T602 :) Pravda,
netusim, co to melo za LCD monitor, ale vypalene to v nem rozhodne bylo...
Karel Rys
DateTimePicker - nastaveni formatu casu podle Long
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 20.1.2006 08:05:10
> Pouzil jsem ve sve aplikaci komponentu DateTimePicker.
> V *.dpr mam:
> LongTimeFormat := 'hh:mm:ss';
> abych se vyhnul problemum s ruznym nastavenim ruznych prostredi.
Ahoj,
v 1000 Tipu a triku jsem nasel tento zpusob zmeny formatu:
var
Fmt: string;
Fmt := 'HH:mm:ss';//trebas
SendMessage(DateTimePicker1.Handle, DTM_SETFORMATA, 0,
integer(Fmt));
Nezkousel jsem.
David Lebeda
Import mezi tabulkami ruznych struktur
[*] Venca Zaruba <zaruba(zv)elastoform(tec)cz> - 20.1.2006 08:01:09
Milou malou sobotu vsem,
Nemate nekdo jednoduse resen import mezi tabulkami ruznych struktur tak aby si
uzivatel mohl urcit vazbu mezi poli. Samplik jsem nasel u DBEXPL32 (JVCL), ale ten
k tomu, jestli jsem dobre pochopil, vyuziva komponenty s BDE. Ja bych to potreboval s ADO.
Prijemny zbytek dne
Vasek Zaruba
8^)staticka aplikace a LCD
[*] Jan Fiala <jan.fiala(zv)wo(tec)cz> - 20.1.2006 08:41:14
19.1.2006 Tyslic Jiri:
>>
>> Zdravim vsechny.
>> Nemam nekdo zkusenosti se zobrazenim aplikace na LCD - jde o
>> aplikaci, ktera stale na LCD monitoru zobrazuje totez, jen se
>> jednou za par minut zmeni hodnoty. Po nejakem case asi dojde
>> k poskozeni (vypaleni) toho statickeho obrazu do matice LCD,
>> ne?? U CRT monitoru to tak je... neresil to nekdo nejak?
>>
>> Kejchal
> LCD monitor pracuje na zcela jinem principu, takze k necemu takovemu by dojit nemelo.
K tomu by doslo, pokud by na LCD panel svitilo slunce, ale ne za
normalniho provozu
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
OT : Hledame pracovni silu na praci s MSSQL 2000,
[*] Lasevic, Martin <mlasevic(zv)ratiopharm(tec)cz> - 20.1.2006 09:59:19
Zdravim,
Pro nasi interni potrebu hledame externistu (moznost prace na ZL nebo na dohodu) na realizaci projektu nad MSSQL2000, OLAP a Reporting Services.
Pozadujeme vybornou znalost vyse uvedeneho.
Misto vykonu prace : Praha.
Pripadne nabidky nebo dotazy zasilejte na adresu mlasevic(zv)ratiopharm(tec)cz
======================================
ing. Martin Lasevic
Software Specialist
Tel.: +420-2-51 02 11 30, +420-602-298 904
Fax: +420-2-51 02 11 23
mailto:mlasevic(zv)ratiopharm(tec)cz
DevExpress Grid, problem se svislym posuvnikem
[*] Karel Kral <kralkonf(zv)purusmeda(tec)cz> - 20.1.2006 10:19:21
My je pouzivame a nemuzeme si je vynachvalit. Chce to ale nenatahovat
obrovske (> nekolik tisic zaznamu). Neznam tak vymakany grid a stale je
se cemu ucit. Hodne toho je k nalezeni na supportu a v newsech.
Pavel Malinsky napsal(a):
>> -----Original Message-----
>> From: delphi-l-owner(zv)clexpert(tec)cz
>> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of petr palicka
>
>> Ahoj,
>
> Ahoj,
>
>> koupili jsme expressquantumgrid. Na prvni pohled je to sice pekne,
>> ale prijde mi misty znacne uchylnej. Napriklad pri otevreni datasetu
>
> No, hned kricet je taky uchylny :)) sou to dost vymakany komponenty
> a chce to nejaky cas na jejich pochopeni.
>
--
______________________________________________________
Karel Kral, reditel IT / IT manager
PURUS-MEDA, s.r.o., Palackeho 174, 621 00 Brno, CZ
E-Mail: kral(zv)purusmeda(tec)cz
______________________________________________________
Delphi a Cache, prip. db4o
[*] Jan Sebelik <honza(zv)haes(tec)cz> - 20.1.2006 11:07:24
> > Jde o spolecny problem, totiz jak pracovat
> > s daty objektove na klientovi, kdyz komponenty (at uz z
> > Delphi nebo z .NET) se tomuto pristupu urputne brani.
>
> Nevim jak Delphi, to jsem uz prestal sledovat, ale komponenty
> .NET 2 se tomu
> nebrani, naopak, jdou tomuto pristupu docela na ruku.
> Zbysek Hlinka
No, to zalezi, co si kdo pod tim "objektovemu pristupu urputne brani" predstavi.
Jak DataSet z Delphi, tak databazove komponenty v .NET jsou postaveny na SQL.
SQL pritom ale neni objektove.
SQL "select" vraci datovou mnozinu, nikoli mnozinu objektu.
Ja jsem stale presvedcenej, ze to je zakladni problem.
Pokud se pohnu v Gridu o radek dolu (na jiny objekt), tezko mohu predpokladat, ze se mi vsechno zacne chovat jinak, protoze tento objekt ma jinou implementaci virtualnich metod, nez objekt na predchozim radku.
To je jenom nastrel jednoho z mnoha problemu, jejich souhrn nazyvam "urputne brani".
A je jedno, jesli jsem v Delphi nebo v .NET.
(upozornuju, ze jsem jeste zcela nevstrebal .NET 2)
Jsem fakt zvedavej na tvoji prednasku na seminari o Data Objects.
Mozna me presvedcis, ze to je fakt uz dokonale domysleny a ze moje obavy o objektovost jsou zbytecne.
Honza
====================================
= RNDr. Jan Sebelik - HAES
= Skolici a konzultacni stredisko pro vyvoj SW
= www.haes(tec)cz
= Vojtiskova 321
= 507 81 Lazne Belohrad
====================================
Delphi a Cache, prip. db4o
[*] Jan Sebelik <honza(zv)haes(tec)cz> - 20.1.2006 11:19:25
Preposilam jednu myslenku z mailu, ktery jsem dostal od Pavla Bezstarosti jako odpoved na muj mail do konference.
Honza
====================================
= RNDr. Jan Sebelik - HAES
= Skolici a konzultacni stredisko pro vyvoj SW
= www.haes(tec)cz
= Vojtiskova 321
= 507 81 Lazne Belohrad
====================================
-----Original Message-----
From: Pavel Bezstarosti
Sent: Friday, January 20, 2006 9:35 AM
To: honza(zv)haes(tec)cz
Subject: FW: Delphi a Cache, prip. db4o
Cache 5.1 prichazi s novym nativnim .NET propojenim. To by mohlo pomoci ke
tvorbe komponent zalozenych nad objekty (alespon tusim).
-----------
Enhanced .NET Support NEW!
Advances in Cache's .NET connectivity* include native support for ADO.NET
components. Also new is a "managed object" projection that automatically
generates .NET assemblies from Cache objects. A plugin lets developers who
prefer to work in Visual Studio easily access and use Cache's managed ..NET
object projections.
-----------
Besta
Delphi a Cache, prip. db4o
[*] Zbysek Hlinka <konference(zv)hlinka(tec)cz> - 20.1.2006 11:55:27
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Jan Sebelik
> Sent: Friday, January 20, 2006 11:07 AM
>
> Jak DataSet z Delphi, tak databazove komponenty v .NET jsou
> postaveny na SQL.
> SQL pritom ale neni objektove.
> SQL "select" vraci datovou mnozinu, nikoli mnozinu objektu.
Prihlas se nekdy na skoleni, slysel jsem, ze v Laznich Belohrad se poradaji
perfektni. ;) Ja ti tam ukazu, ze v .NET2 je to ponekud jinak.
Jinymi slovy: data muzes natahnout _mimo_jine_ i z SQL databaze. Komponentam
je pri tom naprosto putna, kde jsi data vyhrabal, a do znacne miry je jim i
putna, jak je mas usporadane. Klidne jim muzes podstrcit mnozinu objektu.
> Ja jsem stale presvedcenej, ze to je zakladni problem.
> Pokud se pohnu v Gridu o radek dolu (na jiny objekt), tezko
> mohu predpokladat, ze se mi vsechno zacne chovat jinak,
> protoze tento objekt ma jinou implementaci virtualnich metod,
> nez objekt na predchozim radku.
Grid je ze sve povahy relacni zalezitost. Ale grid neni jedina komponenta.
S pozdravem
Zbysek Hlinka
E-mail: hlinka zavin. hlinka(tec)cz
Delphi a Cache, prip. db4o
[*] Martin Nedopil <martin.nedopil(zv)hon(tec)cz> - 20.1.2006 12:05:28
> Jak DataSet z Delphi, tak databazove komponenty v .NET jsou postaveny na
> SQL.
> SQL pritom ale neni objektove.
> SQL "select" vraci datovou mnozinu, nikoli mnozinu objektu.
Neni pravda. Pokud vim tak DataAdapter umi vzit nejen z SQL, ale i XML a
obecne z kazdeho IEnumerable, tedy jsi-li schopny napsat tridu, ktera
rozhrani IEnumerable implementuje pak je mozne brat i z
objektovych dat? Nebo ne?
> Ja jsem stale presvedcenej, ze to je zakladni problem.
> Pokud se pohnu v Gridu o radek dolu (na jiny objekt), tezko mohu
> predpokladat, ze se mi vsechno zacne chovat jinak, protoze tento objekt ma
> jinou implementaci virtualnich metod, nez objekt na predchozim radku.
>
No a tady dle meho navic smesujes hrusky z jabkama.
Copak nemuze byt vystupem z objektovych dat grid?
To cekas zobrazeni, ktere dela to, ze vysledkem bude grid,
kde kazdy radek bude mit jine sloupce v zavislosti na
objektu, ktery ziskal?
Ano, chci-li po objektove databazi vsechny doklady za leden,
dostanu x objektu faktur, prijemek, vydejek, ale jejich
zobrazeni je uz druha vec.
> To je jenom nastrel jednoho z mnoha problemu, jejich souhrn nazyvam
> "urputne brani".
> A je jedno, jesli jsem v Delphi nebo v .NET.
> (upozornuju, ze jsem jeste zcela nevstrebal .NET 2)
A mluvme i o jinych systemech. Treba Qi od DCConcept.
Ti (jedno proc, zeptejte se jich) naimplementovali objektovy
model na relacni.... mimochodem jejich system je promakany,
kdyz jsme delali u nas vyberove rizeni nevyhrali, ale ucarovalo
me:
+ moznost zobrazeni vsech formularu v Jave a v prohlizeci
+ prisne objektovy model dat (maji nadherny graf vsech objektu, ktery se
svym
rozsahem vyrovna schematu Temelina).
- nicmene objektovy model je ulozen v MS-SQL tabulkach
ve kterych je dolovani nemozne (neb maji od frameworku
nesmyslne nazvy).
- vnejsi nepristupnost programum tretich stran (zpusobeno castecne tim
ulozenim objektu). Maji vlastni pascal-like jazyk, ale integrace tretich
stran
nelze....
Jo a tusim ze to psali taky v D.
Martin DevExpress Grid, problem se svislym posuvnikem
[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 20.1.2006 12:19:29
Ahoj,
Pavel Malinsky napsal(a):
> Nevim co bys mohl delat spatne(resp. cos kde mohl prenastavit), ale
> kdyz to vezmu jen zakladne tak vezmu Grid, vytvorim Level, k nemu
> DBTableView,....
uz to kolega nasel. Mel tam jeste detail a tam mel GridMode nastaven
opacne. Po nastaveni stejne jako nadrizeneho pohledu to je OK.
Dik za rady.
Peca
Vyrez obrazku
[*] Petr Berek <sojokl(zv)seznam(tec)cz> - 20.1.2006 12:59:32
Samotnym problemem je udelat ten vyrez, aby se tam zobrazil obdelnik.
Napadlo me pouzit funkci rectandl, ale to mi udela bily plny obdelnik.
Jak udelat ten klasicky, tak to nevim.
Kazdopadne odchytim udalosti onMouseDown, onMouseMove a onMouseUp.
V onMouseDown si zachytim jen souradnice x, y
V onMouseMove budu zvetsovat zase pomoci x, y ten obdelnik
V onMouseUp zachytim souradnice x, y
Ale co dal? Pises TCanvas.CopyRect. Z napovedy jsem vycetl, ze to ma
tyto parametry:
Dest: TRect - tohle je cilovy obdelnik, kam bude ten vyrez zkopirovan
Canvas: TCanvas; - toto je canvas na kterem je zdrojovy obdlelnik
Source: TRect - toto nevim presne co je, ale myslim si, ze to je
zdrojovy obdelnik.
Muzes mi nejak poradit jak toto pouzit a jak udelat ten vlastni
vyrezovy obdelnik?
Diky
Petr
Vyrez obrazku
[*] Pavel Poles <delphi(zv)noni(tec)cz> - 20.1.2006 13:19:34
> Napadlo me pouzit funkci rectandl, ale to mi udela bily plny obdelnik.
> Jak udelat ten klasicky, tak to nevim.
>
funkce Rectangle kresli obdelnik, nevyplnuje jej, problem bude spis v
tom ze ho kreslis pri kazdem
mousemove a uz ho nikdy zpet nesmazes. Myslim ze se to obvykle resi
pomoci XOR (viz napr. kresleni
cary pri zvetsovani / premistovani sloupcu v gridu)
Pavel Poles
Jak zaridit, aby program bezel jako sluzba?
[*] Petr Vones <konference(zv)petrvones(tec)net> - 20.1.2006 13:31:35
From: "Petr Svejda" <petr(zv)svejda(tec)cz>
> Voditkem bude pravdepodobne v Delphi New application/Services...., ale co
> dal? Jak se program registruje, jak odregistruje, jake musi program splnovat
> pozadavky oproti normalni aplikaci,...?
Ano, instalace se provadi z command-line pomoci prepinacu.
Windows Service psane v Delphi se ovsem dost spatne ladi, nemluve o temer
zadne podpore pro souvisejici veci (zapis do EventLogu, MSI instalace apod.)
Je sice mozne si napsat framework kde se jedna aplikace bude chovat jako
service nebo konzolova aplikace (pro ladeni), ale je stejne treba provest
nekolik oprav v RTL/VCL aby to vubec fungovalo.
Po jedne zkusenosti s psanim pomerne rozsahle Windows Service v Delphi mohu
prohlasit, ze .NET je pro tento ucel idealni platforma a Delphi Win32 bych k
tomu uz opravdu nepouzil.
Petr Vones
Vyrez obrazku
[*] little_bobes(zv)centrum(tec)cz - 20.1.2006 14:07:37
Ahoj,
pri kresleni vyberoveho okna postupuji nasledovne:
- mam globalni promenne pro vychozi hodnoty X1, Y1 (OnMouseDown) a koncove
hodnoty X2, Y2 (OnMouseMove)
procedure MouseDown(...);
begin
X1 := X;Y1 := Y;X2 := X;Y2 := Y;
DrawRect(X, Y, X, Y);
end;
procedure MouseMove(...);
begin
DrawRect(X1, Y1, X2, Y2);
X2 := X;Y2 := Y;
DrawRect(X1, Y1, X2, Y2);
end;
procedure MouseUp(...);
begin
DrawRect(X1, Y1, X2, Y2);
end;
procedure DrawRect(pX1, pY1, pX2, pY2: Integer);
begin
// nejprve si uloz stare hodnoty canvas.pen a brush
...
canvas.pen.style := psDashDotDot;
canvas.pen.mode := pmNotXor;
canvas.pen.width := 1;
canvas.pen.color := clRed;
Canvas.Brush.Style := bsclear;
Canvas.Rectangle(pX1, pY1, pX2, pY2);
...
// a tady je zase obnov
end;
S pozdravem
Bob (D4 c/s, FB 1.5)
From: Petr Berek
> Samotnym problemem je udelat ten vyrez, aby se tam zobrazil obdelnik.
> Napadlo me pouzit funkci rectandl, ale to mi udela bily plny obdelnik.
> Jak udelat ten klasicky, tak to nevim.
> Kazdopadne odchytim udalosti onMouseDown, onMouseMove a onMouseUp.
> V onMouseDown si zachytim jen souradnice x, y
> V onMouseMove budu zvetsovat zase pomoci x, y ten obdelnik
> V onMouseUp zachytim souradnice x, y
Jak zaridit, aby program bezel jako sluzba?
[*] Petr Langer <langer(zv)xdom(tec)cz> - 20.1.2006 14:13:38
Ahoj
----- Original Message -----
From: "Petr Vones" <konference(zv)petrvones.net>
Subject: Re: Jak zaridit, aby program bezel jako sluzba?
> Po jedne zkusenosti s psanim pomerne rozsahle Windows Service v Delphi
> mohu
> prohlasit, ze .NET je pro tento ucel idealni platforma a Delphi Win32 bych
> k
> tomu uz opravdu nepouzil.
>
> Petr Vones
>
musim rict, ze moznost pouziti:
System.Diagnostics.Debugger.Launch();
je pro ladeni jakehokoliv projektu, tedy i servisu, idealni. Neexistuje neco
podobneho i pro D5?
Diky,
Petr Langer Vyrez obrazku
[*] Petr Berek <sojokl(zv)seznam(tec)cz> - 20.1.2006 13:33:35
> funkce Rectangle kresli obdelnik, nevyplnuje jej, problem bude spis v
> tom ze ho kreslis pri kazdem
> mousemove a uz ho nikdy zpet nesmazes. Myslim ze se to obvykle resi
> pomoci XOR (viz napr. kresleni
> cary pri zvetsovani / premistovani sloupcu v gridu)
>
Mohl bys uvest nejaky priklad, nebo neco, kde je to lepe vysvetleno?Jak zaridit, aby program bezel jako sluzba?
[*] delphin(zv)post(tec)cz - 20.1.2006 14:43:40
> musim rict, ze moznost pouziti:
> System.Diagnostics.Debugger.Launch();
>
> je pro ladeni jakehokoliv projektu, tedy i servisu, idealni. Neexistuje
> neco
> podobneho i pro D5?
Na to existuje placeny plug-in do IDE, ale uz si nevzpomenu, jak se jmenuje.
Me se ovsem vice osvedcil model dat vlastni kod service do samostatneho
vlakna do vlastni unity a rozhrani service vlakno pouze vytvori+spusti a
zastavi+zrusi. Pro ucely ladeni se pak vlakno zakompiluje do normalniho
okenniho projektu a muzu si ladici informace normalne vypisovat do oken,
krokovat bez omezeni, na tlacitka spoustet ruzne akce atd. atd.
QI - was: Re: Delphi a Cache, prip. db4o
[*] Petr Langer <langer(zv)xdom(tec)cz> - 20.1.2006 14:09:38
Ahoj,
kdyz uz jsi to tu nacal, tak jenom doplnim (a snad neprozradim nic co
nemam), treba se to bude hodit i nekomu jinemu:
>
> A mluvme i o jinych systemech. Treba Qi od DCConcept.
> Ti (jedno proc, zeptejte se jich) naimplementovali objektovy
> model na relacni.... mimochodem jejich system je promakany,
> kdyz jsme delali u nas vyberove rizeni nevyhrali, ale ucarovalo
> me:
> + moznost zobrazeni vsech formularu v Jave a v prohlizeci
popis veskerych formularu a jejich prvku je ulozen na Aplikacnim Serveru
(AS), takze na klienta se posle informace o rozlozeni + prislusna data. Co
se tyce zobrazeni v prohlizeci, zatim je z historickych duvodu pouze IE,
chysta se ale i podpora ostatnich prohlizecu.
> + prisne objektovy model dat (maji nadherny graf vsech objektu, ktery se
> svym
> rozsahem vyrovna schematu Temelina).
to je pravda, kdo ho videl poprve, nechtel uverit, ze to muze fungovat.
> - nicmene objektovy model je ulozen v MS-SQL tabulkach
> ve kterych je dolovani nemozne (neb maji od frameworku
> nesmyslne nazvy).
z principu slozitosti mapovaciho pajslu neni opravdu prime dolovani takrka
mozne, nicmene viz. dalsi bod
> - vnejsi nepristupnost programum tretich stran (zpusobeno castecne tim
> ulozenim objektu). Maji vlastni pascal-like jazyk, ale integrace tretich
> stran
> nelze....
Je v testovani publikovani funkci AS pres WebServices, (kdy nadstavba AS
slouzi jako WS server) kterezto je pak mozne konzumovati v libovolnem
prostredi (testovano v C# a Java).
>
> Jo a tusim ze to psali taky v D.
>
Ano, D5.
> Martin
>
Petr Langer Jak zaridit, aby program bezel jako sluzba?
[*] lukas <lukas(zv)cnawr(tec)cz> - 20.1.2006 15:57:46
> Na to existuje placeny plug-in do IDE, ale uz si nevzpomenu, jak se jmenuje.
> Me se ovsem vice osvedcil model dat vlastni kod service do
> samostatneho vlakna do vlastni unity a rozhrani service vlakno pouze
> vytvori+spusti a zastavi+zrusi. Pro ucely ladeni se pak vlakno
> zakompiluje do normalniho okenniho projektu a muzu si ladici
> informace normalne vypisovat do oken, krokovat bez omezeni, na
> tlacitka spoustet ruzne akce atd. atd.
Ja jsem bez probelmu v Delphi 7 Pro odladil sluzbu pro ukladani mailu do databaze.
Jedina otravna vec, je ji pustit z Ovladaci panely -> Sluzby a potom se k ni
pripojit z menu v Delphi.
Misto oken jsou stejne lepsi ladici vypisi, muzu ji tak pustit i na maily u
zakaznika, kam s debuggerem nemuzu a hned videt, co se kde deje.
Paradox a Microsoft Paradox Driver
[*] Hash <parizsky(zv)gmail(tec)com> - 20.1.2006 15:53:45
DDV,
mam problem s ODBC driverem pro paradox. V ODBC Datasources mam zalozen
zdroj s cestou k paradox tabulkam. Na PC kde je nainstalovano BDE se provede
select z tabulky bez problemu, bohuzel na PC bez BDE mi to napise chybu:
[Microsoft][ODBC Paradox Driver] External table is not in the expected
format.
Pritom ta tabulka je standart ASCII paradox table.
Nevi prosim nekdo co kde nastavit aby to slo pouzit ? Nebo ODBC Paradox
driver bez BDE proste nefunguje ?
Snazim se pouzit ODBC protoze tabulky i aplikace by mela byt na DVD
samostatne spustitelna bez nutnosti cokoliv instalovat.
Dik
Ladap
Seminar 2006
[*] Jan Sebelik <honza(zv)haes(tec)cz> - 20.1.2006 15:59:46
(odpoved preposilam do konference Delphi)
From: Luhan Jaromir [mailto:J.Luhan(zv)Aquasoft(tec)cz]
Ahoj Honzo,
jestli mas porad jeste zajem videt na seminari Delphi 2006 a porad nemas nekoho, kdo by to odprednasel, treba bych s tim mohl neco udelat. Nejsem uz sice u Borlandu, takze to nebude mit oficialni punc, ale zase by to mohlo byt verohodnejsi, ze to neni jenom marketing.
Zdravi
Mira Luhan
____________
Ahoj Miro,
diky za nabidku.
Nabidka prednasek sice letos vyrazne prevysuje disponibilni cas, takze mi da hodne prace (a diplomacie), abych to proskrtal, ale tuhle nabidku si nenecham ujit.
Na post-Win32 Delphi se tady uz hodne naplivalo a presto, anebo prave proto, si myslim, ze to hodne lidi zaujme.
Osnovu dame nejak dohromady, do seminare zbyvaji jeste skoro 2 mesice.
Pral bych si, kdyby z toho vylezlo nejake zajimave porovnani, abychom si mohli udelat nazor zda (kdy, za jakych podmimek) v teto linii pokracovat nebo se ji zcela vzdat ve prospech Visual Studia.
Opakuji:
Delphi 200x neskolime. Delame chybu nebo ne?
Honza
====================================
= RNDr. Jan Sebelik - HAES
= Skolici a konzultacni stredisko pro vyvoj SW
= www.haes(tec)cz
= Vojtiskova 321
= 507 81 Lazne Belohrad
====================================
Vyrez obrazku
[*] Radek Cervinka <radek.cervinka(zv)technodat(tec)cz> - 20.1.2006 16:21:48
little_bobes(zv)centrum(tec)cz napsal(a):
> Ahoj,
>
> pri kresleni vyberoveho okna postupuji nasledovne:
> - mam globalni promenne pro vychozi hodnoty X1, Y1 (OnMouseDown) a koncove
> hodnoty X2, Y2 (OnMouseMove)
>
TCanvas.DrawFocusRect
neni to lepsi?
viz help
R.
Seminar 2006
[*] Marek Dostal <konf(zv)agnis(tec)cz> - 20.1.2006 16:39:49
> From: Luhan Jaromir [mailto:J.Luhan(zv)Aquasoft(tec)cz]
> Ahoj Honzo,
> jestli mas porad jeste zajem videt na seminari Delphi 2006 a porad nemas
> nekoho, kdo by to odprednasel, treba bych s tim mohl neco udelat. Nejsem
> uz sice u Borlandu, takze to nebude mit oficialni punc, ale zase by to
> mohlo byt verohodnejsi, ze to neni jenom marketing.
>
> Zdravi
> Mira Luhan
Tohle by me urcite zajimalo.
Marek Dostal
D7Prof, WinXP, FireBird 1.0, 1.5
Paradox a Microsoft Paradox Driver
[*] Ing. Jiri Sokol <js-delphi(zv)seznam(tec)cz> - 20.1.2006 16:45:50
From: "Hash" <parizsky(zv)gmail.com>
Sent: Friday, January 20, 2006 3:53 PM
> Snazim se pouzit ODBC protoze tabulky i aplikace by mela byt na DVD
> samostatne spustitelna bez nutnosti cokoliv instalovat.
>
> Dik
> Ladap
S podobnym problemem nemam zkusenost, ale proc i pro takovy projekt
nepouzijes klasicke SQL? Firebird nabizi Embded version, ktera jde (viz uz
nekolik navodu v milosti) bezproblemu provozovat z CD bez jakekoli instalace
a mas transakcni databazi a ne problemovy paradox...
Zvaz to - kompnenty z Delphi s Firebirdem slapou v pohode... Urcite se Ti to
vyplati
Ahoj
Jirka
DateTimePicker - nastaveni formatu casu podle Long
[*] Ing. Jiri Sokol <js-delphi(zv)seznam(tec)cz> - 20.1.2006 16:21:48
From: "Lebeda David" <david.lebeda(zv)comarr(tec)cz>
Sent: Friday, January 20, 2006 8:05 AM
> Fmt := 'HH:mm:ss';//trebas
> SendMessage(DateTimePicker1.Handle, DTM_SETFORMATA, 0,
> integer(Fmt));
>
> Nezkousel jsem.
>
> David Lebeda
Ahoj.
No tohle resi nastaveni formatovani u jednoho DateTimePicker-u... Jenomze ja
mam a v budoucnu klidne i muzu mit dalsi dost formularu, na kterych se podle
potreb tato komponenta objevi.
Puvodne jsem muj dotaz myslel tak, jestli byste mi nebyli schopni poradit
zpusob, jak donutit DateTimePicker, aby si vzal nastaveni z promenne
LongTimeFormat a ne z nastaveni systemu (resp. mistniho nastaveni prostredi
uzivatele)
To bych z kazdeho frame-u popr z kazdeho formulare nejakou rekurzi musel
prochazet vsechny objekty, jestli nahodou nejsou typu DateTimePicker a u
vsech menit vlastnost Format := LongTimeFormat
Tohle je taky resenim, ale proc takhle slozite, kdyz to prece musi jit
jednodusseji - vzdyt zmenou LongTimeFormat ovlivnuju i jine komponenty, tak
proc ne tuhle - co je spatne?
Mate nekdo dalsi napad, prosim?
Diky moc
Jirka
Delphi 2005 cmd line compiller
[*] Jiri Vojtek <jiri(zv)vojtek.biz> - 20.1.2006 19:22:01
Zdravim,
marne jsem se pokusel rozbehnout kompilaci delphi 2005 win32 z
prikazove radky. Jsem uplne neschopny, nebo to proste nejde ?
Kazde nahopnuti uvitam
Jiri Vojtek
FindFirst, FindNext a pripona
[*] mdelphi(zv)centrum.sk - 20.1.2006 19:40:02
Ked prehladavam cez FindFirst a FindNext subory a nachadza sa tu adresar s nazvom "IB Expert 2.0" bez pripony, tak potom, ked ho rozkladam na subor a priponu, tak dostanem subor IB Expert 2 a priponu 0. V skutocnosti vsak tento adresar priponu nema. Ako to mam urobit, aby som dostal korektny vysledok?
Vdaka za kazdu radu
www.MartinKasman.sk
FindFirst, FindNext a pripona
[*] Jan Fiala <jan.fiala(zv)wo(tec)cz> - 20.1.2006 20:14:04
20.1.2006 mdelphi(zv)centrum.sk:
> Ked prehladavam cez FindFirst a FindNext subory a nachadza sa tu
> adresar s nazvom "IB Expert 2.0" bez pripony, tak potom, ked ho
> rozkladam na subor a priponu, tak dostanem subor IB Expert 2 a
> priponu 0. V skutocnosti vsak tento adresar priponu nema. Ako to mam
> urobit, aby som dostal korektny vysledok?
To co je za posledni teckou je proste pripona, at se ti to libi nebo
ne. Muzes to udelat tak, ze pokud bude mit nalezeny soubor atribut
faDirectory, nebudes to rozkladat na jmeno a priponu
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
FindFirst, FindNext a pripona
[*] delphin(zv)post(tec)cz - 20.1.2006 20:54:07
> Ked prehladavam cez FindFirst a FindNext subory a nachadza sa tu adresar s
> nazvom "IB Expert 2.0" bez pripony, tak potom, ked ho rozkladam na subor a
> priponu, tak dostanem subor IB Expert 2 a priponu 0. V skutocnosti vsak
> tento adresar priponu nema. Ako to mam urobit, aby som dostal korektny
> vysledok?
>
Pripona je vsechno za posledni teckou az do konce. Pokud chcete takovy
adresar bez pripony, pojmenujte ho "IB Export 2.0."
DateTimePicker - nastaveni formatu casu podle Long
[*] Jaroslav Uher <jarek(zv)iuher(tec)cz> - 21.1.2006 13:13:14
On 20 Jan 2006 at 16:21, Ing. Jiri Sokol wrote:
> > Fmt := 'HH:mm:ss';//trebas
> > SendMessage(DateTimePicker1.Handle, DTM_SETFORMATA, 0,
> > integer(Fmt));
> >
> > Nezkousel jsem.
> No tohle resi nastaveni formatovani u jednoho DateTimePicker-u...
> Jenomze ja mam a v budoucnu klidne i muzu mit dalsi dost formularu, na
> kterych se podle potreb tato komponenta objevi. Puvodne jsem muj dotaz
> myslel tak, jestli byste mi nebyli schopni poradit zpusob, jak donutit
> DateTimePicker, aby si vzal nastaveni z promenne LongTimeFormat a ne z
> nastaveni systemu (resp. mistniho nastaveni prostredi uzivatele) To
> bych z kazdeho frame-u popr z kazdeho formulare nejakou rekurzi musel
> prochazet vsechny objekty, jestli nahodou nejsou typu DateTimePicker a
> u vsech menit vlastnost Format := LongTimeFormat
>
> Tohle je taky resenim, ale proc takhle slozite, kdyz to prece musi jit
> jednodusseji - vzdyt zmenou LongTimeFormat ovlivnuju i jine
> komponenty, tak proc ne tuhle - co je spatne?
>
> Mate nekdo dalsi napad, prosim?
copak ty nepouzivas jednoho predka od ktereho sve dalsi form(y)
dedis?
Potom si je pouze 'prozenes' cyklem a mas *vymalovano*.
A pokud potrebujes takto nastavovat jen nektere, pouzij properity Tag
Jarek Uher
FireBird 1.5 a InterBase komponenty
[*] Pavel Lavicka <konference(zv)zus(tec)cz> - 21.1.2006 22:57:54
Ahoj vsichni,
prave zacinam pracovat na nove apolikaci, ve ktere bych chtel poprve v
zivote pouzit databaci FireBird ver. 1.5. Chtel bych se zeptat, zda i pro
tuto verzi databaze jsou stale pouzitelne komponenty pro primy pristup k
InterBase obsazene v Delphi 6, nebo zda byste mi doporucili nejake jine,
nejlepe free (neni podminkou)
Za odpovedi predem dekuji
Pavel Lavicka
DateTimePicker - nastaveni formatu casu podle Long
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 22.1.2006 08:58:38
> No tohle resi nastaveni formatovani u jednoho DateTimePicker-u... Jenomze ja
> mam a v budoucnu klidne i muzu mit dalsi dost formularu, na kterych se podle
> potreb tato komponenta objevi.
> Puvodne jsem muj dotaz myslel tak, jestli byste mi nebyli schopni poradit
> zpusob, jak donutit DateTimePicker, aby si vzal nastaveni z promenne
> LongTimeFormat a ne z nastaveni systemu (resp. mistniho nastaveni prostredi
> uzivatele)
> To bych z kazdeho frame-u popr z kazdeho formulare nejakou rekurzi musel
> prochazet vsechny objekty, jestli nahodou nejsou typu DateTimePicker a u
> vsech menit vlastnost Format := LongTimeFormat
Ahoj,
zakladni problem je zrejme v tom, ze TDateTimePicker je prvek
obsazeny primo ve Windows a Delphi ho jen zapouzdruje. Zrejme se
tedy implicitne sam kouka primo do Win a VCL se mu nesnazi vnutit
format ze sve promenne - to jen jen muj odhad situace, nezkoumal
jsem.
Podobnych zalezitosti, kdy bys chtel neco zmenit najednou pro vsechny
instance dane komponenty - a nejde zdaleka jen o datetimepicker, uz
pravidelne pouzivam reseni zminene ve vedlejsim mailu.
Zjednodusene: Mam dva potomky TForm, rekneme
TUnivForm = class(TForm)
a TAppForm = class(TUnivForm)
a vsechny formulare aplikace se dedi od TAppForm. V TUnivForm
resim vychytavky, ktere jsou nezavisle na aplikaci - hodi se vzdy a
vsude. V TAppForm resim zalezitosti, ktere se rovnez tykaji vsech
formularu, ale souvisi jen s konkretni aplikaci a nejsou prenosne do jine
aplikace. Pro upravy komponent se pak pouzije cykl
for i := 0 to ComponentCount - 1 do
if Components[i] is TDatetimepicker then...
apod. Takto se elegantne da vyresit spousta ruznych nectnosti.
David Lebeda
FireBird 1.5 a InterBase komponenty
[*] Pavel Malinsky <malinsky(zv)pmcom(tec)cz> - 22.1.2006 08:02:33
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Pavel Lavicka
Ahoj,
> prave zacinam pracovat na nove apolikaci, ve ktere bych chtel poprve v
> zivote pouzit databaci FireBird ver. 1.5. Chtel bych se
> zeptat, zda i pro
> tuto verzi databaze jsou stale pouzitelne komponenty pro
> primy pristup k
> InterBase obsazene v Delphi 6, nebo zda byste mi doporucili
> nejake jine,
> nejlepe free (neni podminkou)
Osobne pouzivam http://www.ibobjects.com/ k plne spokojenosti,
sice neco stoji ale at mas prehled. :)
S pozdravem a dikem
=====================================
> Pavel Malinsky; malinsky(zv)pmcom(tec)cz <
=====================================
> GSM: 602 652 203 | ICQ: 322015967 <
=====================================
FireBird 1.5 a InterBase komponenty
[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 22.1.2006 10:04:43
Ahoj,
Pavel Malinsky napsal(a):
>> -----Original Message-----
....
>> zeptat, zda i pro tuto verzi databaze jsou
>> stale pouzitelne komponenty pro primy pristup k
>> InterBase obsazene v Delphi 6
ano, jsou. Pouzivame je (ale je potreba si z codecentral stahnout
aktualizaci). Nedostanes se na nove vlastnosti FB a API.
>> nebo zda byste mi doporucili nejake jine...
>
> Osobne pouzivam http://www.ibobjects.com/ k plne spokojenosti,
> sice neco stoji ale at mas prehled. :)
Takze pro prehled doplnim jeste FIBPlus od Devrace. Hodlame na ne
prejit, anzto jsou pribuzne s IBX (ty z delphi). IBO jsme zkouseli a oc
si s nimi nerozumeli (ale to neznamena, ze je zatracuju, proste odlisny
pristup).
Z free jestli se nepletu, tak ZeosLib, UIB (Unified Interbase?).
Peca
FireBird 1.5 a InterBase komponenty
[*] Peter Ondras <konfery(zv)pse.sk> - 22.1.2006 11:22:48
Bezproblemov sa daju pouzivat komponenty IBX z Delphi. Nedoporucujem
pouzivat vsak IBTable. Problemy mozu nastat snad len pri komponentach zo
zalozky IBAdmin, tie ale pri FB 1.5 nie su potrebne pretoze ku firebirdu
je dodavany nastroj gfix ovladany z prikazoveho riadku a s nim sa daju
databazy kopirovat, zalohovat, obnovovat a komplexne spravovat.
> -----Original Message-----
> pouzit databaci FireBird ver. 1.5. Chtel bych se zeptat, zda i pro
> tuto verzi databaze jsou stale pouzitelne komponenty pro primy pristup
k
> InterBase obsazene v Delphi 6 FireBird 1.5 a InterBase komponenty
[*] Jaroslav Uher <jarek(zv)iuher(tec)cz> - 22.1.2006 12:56:55
On 22 Jan 2006 at 10:04, petr palicka wrote:
> Pavel Malinsky napsal(a):
> > Osobne pouzivam http://www.ibobjects.com/ k plne spokojenosti,
> > sice neco stoji ale at mas prehled. :)
> Takze pro prehled doplnim jeste FIBPlus od Devrace. Hodlame na ne
> prejit, anzto jsou pribuzne s IBX (ty z delphi). IBO jsme zkouseli a
> oc si s nimi nerozumeli (ale to neznamena, ze je zatracuju, proste
> odlisny pristup).
FIBPlus (v D6P) pouzivame jiz 2 roky take k absolutni spokojenosti.
Ale POZOR. Nemaji ekvivalent k TIBTable !
Takze zalezi na zpusobu prace s tabulkami. Nam nechybi.
IBOjects maji vetsi nabidku komponent.
Jarek Uher
TClientDataSet a read only data z TQuery
[*] Petr Fiser <petr.fiser(zv)3jservis(tec)cz> - 22.1.2006 13:54:59
Dobry den
Mam nasledujici problem.
Do TClientDataSet natahnu data pres Query SQL dotazem a chci je upravovat a
dale tisknout.
Data ktera jsou natazena pres Query jsou ale ReadOnly. Nove zaznamy jdou
pridavat, ale s natazenymi nelze udelat nic, jen odstranit.
Je to asi dane tim ze Query je read only dataset.
Da se nekde neco nastavit v TClientDataSet aby to fungovalo. Nebo zmenit
zpusob prace s komponentou?
Propojeni: TffQuery->TDataSetProvider->TClientDataSet->TDataSource->...
D5, FF2
Petr Fiser
Vyreseno: TClientDataSet a read only data z TQuery
[*] Petr Fiser <petr.fiser(zv)3jservis(tec)cz> - 22.1.2006 14:17:00
Pardon. Uz to mam. Blokoval to TDBNavigator tlacitko Edit bylo vypnute.
Petr Fiser
FireBird 1.5 a InterBase komponenty
[*] Jaroslav Uher <jarek(zv)iuher(tec)cz> - 22.1.2006 16:35:10
On 22 Jan 2006 at 15:49, petr palicka wrote:
> roky zkouseli, tak s nimi nefungovali stadardni DataAware komponenty
> (ty so "pasuji" na TDataSet). Tedy zadny TDBGrid, TDBEdit,... nic
> takove neslo na IBO pripojit, museli se pouzivat IBO ridici prvky.
>
> Ja vim, na tema DataAware komponent se tu lecjaky flam resil, ale
> to
> nic nemeni na tom, ze leckomu dostacuji :-)
>
> Pro seriozni praci doporucuju vyzkouset IBO i FIBPlus, pripadne i
> dalsi (Zeos, UIB,...).
to jsem absolvoval pred 2 roky a firma se rozhodla koupit prave
FIBPlus. Zatim mne za to nepropustila :-)
BTW, pouzivam k nim napojeni na TSMDBGrid bez problemu.
Jarek U.
FireBird 1.5 a InterBase komponenty
[*] Pavel Malinsky <malinsky(zv)pmcom(tec)cz> - 22.1.2006 16:13:08
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of petr palicka
Ahoj,
> > IBOjects maji vetsi nabidku komponent.
>
> Coa mit _musi_. Teda, navim, jak ted, ale kdyz jsme je
> pred cca 2-3
> roky zkouseli, tak s nimi nefungovali stadardni DataAware
> komponenty (ty
> so "pasuji" na TDataSet). Tedy zadny TDBGrid, TDBEdit,... nic takove
> neslo na IBO pripojit, museli se pouzivat IBO ridici prvky.
Ale nemusi :)) , existuje paleta iboTDataset a to je presne to co pouzivam,
(http://www.ibobjects.com/ibotdata.html) ,
je to prave pro "bezne" DBAware komponenty. Ty ibo gridy aspol take
nepouzivam.
Resp pouzivam IBO datasety + Devexpress gridy aspol.
IBO se da koupit take po "baliccich".
S pozdravem a dikem
=====================================
> Pavel Malinsky; malinsky(zv)pmcom(tec)cz <
=====================================
> GSM: 602 652 203 | ICQ: 322015967 <
=====================================
Paradox a Microsoft Paradox Driver
[*] Hash <parizsky(zv)gmail(tec)com> - 22.1.2006 16:07:08
Jedna se o 5 let funkcni aplikaci, ktera za dobu sve funkcnosti vytvorila
par tisic tabulek. Jejich prevod do jine databaze by asi trval docela
dlouho. Hlavne zmena datoveho zdroje aplikace je z duvodu architektury a
velikosti aplikace rozhodne beh na dlouhou trat. Z financnich duvodu by bylo
lepsi rozchodit paradox na DVD nez uzpusobit aplikaci na SQL.
Vygooglil jsem info ze instalace BDE neni nutna...staci hodit par dll k
aplikaci a z HDD vse funguje, bohuzel po vypaleni hlasi chybu s nedostatkem
pameti...a to ma pravdepodobne co delat se zamykanim tabulek ( to jeste
pozdeji zkouknu )..
Kadopadne ten ODBC driver pro paradox bez bde proste nejede.:(
Ladap
>> Snazim se pouzit ODBC protoze tabulky i aplikace by mela byt na DVD
> >> samostatne spustitelna bez nutnosti cokoliv instalovat.
> >>
> >> Dik
> >> Ladap
>
> >nepouzijes klasicke SQL? Firebird nabizi Embded version, ktera jde (viz
> uz
> >nekolik navodu v milosti) bezproblemu provozovat z CD bez jakekoli
> instalace
>
FireBird 1.5 a InterBase komponenty
[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 22.1.2006 15:49:06
Ahoj,
Jaroslav Uher napsal(a):
> FIBPlus (v D6P) pouzivame jiz 2 roky take k absolutni spokojenosti.
> Ale POZOR. Nemaji ekvivalent k TIBTable!
coz je IMHO jedine dobre, alespon nenavadi ke spatnym navykum.
> IBOjects maji vetsi nabidku komponent.
Coa mit _musi_. Teda, navim, jak ted, ale kdyz jsme je pred cca 2-3
roky zkouseli, tak s nimi nefungovali stadardni DataAware komponenty (ty
so "pasuji" na TDataSet). Tedy zadny TDBGrid, TDBEdit,... nic takove
neslo na IBO pripojit, museli se pouzivat IBO ridici prvky.
Ja vim, na tema DataAware komponent se tu lecjaky flam resil, ale to
nic nemeni na tom, ze leckomu dostacuji :-)
Pro seriozni praci doporucuju vyzkouset IBO i FIBPlus, pripadne i
dalsi (Zeos, UIB,...).
Peca
FireBird 1.5 a InterBase komponenty
[*] Marek Dostal <konf(zv)agnis(tec)cz> - 23.1.2006 08:36:15
> prave zacinam pracovat na nove apolikaci, ve ktere bych chtel poprve v
> zivote pouzit databaci FireBird ver. 1.5. Chtel bych se zeptat, zda i pro
> tuto verzi databaze jsou stale pouzitelne komponenty pro primy pristup k
> InterBase obsazene v Delphi 6, nebo zda byste mi doporucili nejake jine,
> nejlepe free (neni podminkou)
Pouzivame dbExpres komponenty v Delphi 7 (jsou v Delphi od verze 6, ve verzi
6 tam byly nejake chyby, ktere byly ve verzi D7 odstraneny) a standardni
komponenty pro praci s daty, ktere jsme si rozsirili o nasi pozadovanou
funkcnost. Obcas sice narazime na neco, co to neumi, ale zatim to nikdy
nebyla neprekonatelna prekazka.
Marek Dostal
D7Prof, WinXP, FireBird 1.0, 1.5
Delphi 2005 cmd line compiller
[*] viktordoubek(zv)volny(tec)cz - 23.1.2006 08:42:16
Nenapsal jsi, co Ti vlastne konkretne nejde, ale ja jsem si zrovna
nedavno hral s dcc32.exe v D7 a jedina trochu zakerna vec byla, ze
je treba pred kompilaci projektu nastavit pracovni adresar do
adresare s .dpr (v davce prikaz cd). A samozrejme mu dat cesty na
knihovny (-I -R -U).
> marne jsem se pokusel rozbehnout kompilaci delphi 2005 win32
> z prikazove radky. Jsem uplne neschopny, nebo to proste nejde ?Delphi 2005 cmd line compiller
[*] jiri <jiri(zv)vojtek.biz> - 23.1.2006 09:48:21
Tak ten pracovni adresar me nenapadl. Knihovny jsem nastavil.
Zkusim a snad to pomuze. Dekuji za nakopnuti.
J.V.
On Mon, 23 Jan 2006 08:42:16 +0100, viktordoubek wrote
> Nenapsal jsi, co Ti vlastne konkretne nejde, ale ja jsem si zrovna
> nedavno hral s dcc32.exe v D7 a jedina trochu zakerna vec byla, ze
> je treba pred kompilaci projektu nastavit pracovni adresar do
> adresare s .dpr (v davce prikaz cd). A samozrejme mu dat cesty na
> knihovny (-I -R -U).
>
> > marne jsem se pokusel rozbehnout kompilaci delphi 2005 win32
> > z prikazove radky. Jsem uplne neschopny, nebo to proste nejde ?
Detekce procesu
[*] david.kopecek(zv)hacktrack(tec)com - 23.1.2006 10:10:23
Zdravim ,,
mam service ktera po startu spousti urcite aplikace, nektere spusti
nekolikrat s ruznymy parametry. Jak je mozne overit jeslti dana
aplikace bezi ?, napriklad kdyz spustim procesy
test.exe
test.exe output1.dat
test.exe output2.dat
jak overi v te service ze jedou..
Diky David
OT: Cislo disku
[*] Ing. Dubsky Jan <dubsky(zv)s-palava(tec)cz> - 23.1.2006 10:08:23
Zajimalo by me, jestli cislo harddisku je zalezitost HW nastavena z vyroby,
nebo jestli se generuje napr. pri formatovani disku s je tudiz touto
cinnosti zamenitelne.
Honza
Cislo disku
[*] Martin Pisarik <martin.pisarik(zv)seznam(tec)cz> - 23.1.2006 10:22:24
Lze je softwarove zmenit.
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Ing. Dubsky Jan
> Sent: Monday, January 23, 2006 10:08 AM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: OT: Cislo disku
>
>
> Zajimalo by me, jestli cislo harddisku je zalezitost HW nastavena
> z vyroby,
> nebo jestli se generuje napr. pri formatovani disku s je tudiz touto
> cinnosti zamenitelne.
>
> Honza
>
>
Kombinace cisel
[*] Lada <lada.xt(zv)volny(tec)cz> - 23.1.2006 11:26:29
Zdravim,
mam rekneme 10 cisel a soucet, ktery je souctem x z nich.
Tzn. potrebuju najit kombinaci x cisel z deseti, ktera se bude rovnat
souctu..
Poradi prosim nekdo algoritmus, kterym bych tuto ulohu resil?
Pokud by byl i zdrojak nejake fce, moc by mne to pomohlo.
Diky, Lada
Kombinace cisel
[*] Petr Fiser <petr.fiser(zv)3jservis(tec)cz> - 23.1.2006 11:44:30
Kdysi davno jsem udelal toto a fungovalo to.
const
TEST = 5683;
var
Nums: array[0..22] of Word = (420, 440, 442, 454, 456, 470, 484, 512,
541, 566, 568, 572, 584, 584, 594, 616, 622, 668, 684, 822,
830, 1038, 1366); //4194303
function TForm1.FindNumArray(Nums: array of Word): Boolean;
var
S: String;
I, J, K, L: LongWord;
Max: Extended;
begin
Result := FALSE;
Max := Power(2, High(Nums));
for I := 1 to Round(Max) - 1 do begin
K := 0;
L := 1;
for J := 0 to High(Nums) - 1 do begin
if (I and L) <> 0 then K := K + Nums[J];
L := 2 * L;
end;
//... test na vysledek
if K = TEST then begin
Label1.Caption := IntToStr(K) + ' (' + S + ') ' + IntToStr(I);
L := 1;
S := '';
for J := 0 to High(Nums) - 1 do begin
if (I and L) <> 0 then S := S + Format('%d ,', [Nums[J]]);
L := 2 * L;
end;
Result := TRUE;
Exit;
end else
Label1.Caption := 'IntToStr(K)';
end;
end;
Petr Fiser
> Zdravim,
>
> mam rekneme 10 cisel a soucet, ktery je souctem x z nich.
> Tzn. potrebuju najit kombinaci x cisel z deseti, ktera se bude rovnat
> souctu..
> Diky, Lada
Kombinace cisel
[*] Petr Fiser <petr.fiser(zv)3jservis(tec)cz> - 23.1.2006 12:02:32
Sem to ze zvedavosti pustil a je tam jedna chyba (asi jsem si s tim potom
jeste nekdy hral)
Radek: Label1.Caption := IntToStr(K) + ' (' + S + ') ' + IntToStr(I); ma
byt az na konci pred Result := TRUE jinak v promenne S nic neni
Pokud se podari najit hledane cislo, na Label1 se vypise hledane cislo, blok
cisel ze kterych se to secetlo, a pocet pokusu pro nalezeni kombinace.
V opacnem pripade je tam zobrazen jen pocet pokusu k nalezeni kombinace
Petr Fiser
Tisk z dosu na tiskarne ve win
[*] Dalibor <dalibor(zv)torola(tec)cz> - 23.1.2006 14:28:42
Ahoj, nevite nekdo o nejakem reseni jak tisknou z dosu na novejsich tiskarnach, treba konkretne na PagePro 1350?
Tato tiskarna ma sice LPT, ale primo v readme jsem se docetl, ze prikazy PRINT a COPY nepodporuje.
Neexistuje nejaky treba rezidentni program ktery by se o to postaral?
Dekuji
Dalibor
Tisk z dosu na tiskarne ve win
[*] Patrik Valenta <valentapat(zv)volny(tec)cz> - 23.1.2006 18:59:00
Zalezi jestli jenom texty nebo i grafiku, ja jsem to kdysi resil tiskem do
souboru, a win aplikace hlidala zmeny tohoto souboru. Pak to vytiskla tato
aplikace na cemkoli.
valik
----- Original Message -----
> Ahoj, nevite nekdo o nejakem reseni jak tisknou z dosu na novejsich
> tiskarnach> Neexistuje nejaky treba
> rezidentni program ktery by se o to postaral?
Tisk z dosu na tiskarne ve win
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 23.1.2006 19:09:01
Puvodni zprava ze dne 23.1.2006:
> Ahoj, nevite nekdo o nejakem reseni jak tisknou z dosu na novejsich
> tiskarnach, treba konkretne na PagePro 1350? Tato tiskarna ma sice
> LPT, ale primo v readme jsem se docetl, ze prikazy PRINT a COPY
> nepodporuje. Neexistuje nejaky treba rezidentni program ktery by se
> o to postaral?
Nevim, jestli myslis totez co ja, ale zdejsi nas kolega dela DOSPrint,
coz je program, ktery prevezme textovy soubor a prevede ho na
jakoukoliv tiskarnu nainstalovanou ve Windows. Musis si ale zajistit,
aby to sestavu vyplivlo do textaku. Informace zde:
http://www.redlich(tec)cz/popisdp.htm
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================
InputBox overload
[*] Kalhous <kalhous(zv)eu(tec)cz> - 24.1.2006 07:33:51
Podle helpu existuji overload varianty InputBoxu pro zadani napriklad integer nebo double cisla. Jak donutim prekladac aby tyto overload pouzil a nehlasil nesouhlas typu parametru? Doufal jsem ze to pozna prave podle toho ze treti parametr neni string ale double. A ono ne a ne a ne.
Z.Kalhous
Tisk z dosu na tiskarne ve win
[*] Radek Cervinka <radek.cervinka(zv)technodat(tec)cz> - 24.1.2006 06:45:48
Dalibor napsal(a):
> Ahoj, nevite nekdo o nejakem reseni jak tisknou z dosu na novejsich tiskarnach, treba konkretne na PagePro 1350?
> Tato tiskarna ma sice LPT, ale primo v readme jsem se docetl, ze prikazy PRINT a COPY nepodporuje.
> Neexistuje nejaky treba rezidentni program ktery by se o to postaral?
>
> Dekuji
>
> Dalibor
>
http://www.google.com/search?hl=en&q=dos+print&btnG=Google+Search
tj. treba
http://www.dosprn.com/
R.
InputBox overload
[*] Lucky62 <lucky62(zv)datarix.sk> - 24.1.2006 08:53:58
Ahoj prednedavnom som to riesil v D7:
Problem je, ze InputBox vo variante ktora vracia string je v unite Dialogs,
zatial co ostatne varianty v QDialogs.
Treba QDialogs pridat do uses, ovsem treba s programom distribuovat
prislusne DLL.
Lucky
----- Original Message -----
From: "Kalhous" <kalhous(zv)eu(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, January 24, 2006 7:33 AM
Subject: InputBox overload
> Podle helpu existuji overload varianty InputBoxu pro zadani napriklad
> integer nebo double cisla. Jak donutim prekladac aby tyto overload pouzil
> a nehlasil nesouhlas typu parametru? Doufal jsem ze to pozna prave podle
> toho ze treti parametr neni string ale double. A ono ne a ne a ne.
> Z.Kalhous
>
>
>
InputBox overload
[*] Jan Fiala <jan.fiala(zv)wo(tec)cz> - 24.1.2006 08:13:54
24.1.2006 Kalhous:
> Podle helpu existuji overload varianty InputBoxu pro zadani
> napriklad integer nebo double cisla. Jak donutim prekladac aby tyto
> overload pouzil a nehlasil nesouhlas typu parametru? Doufal jsem ze
> to pozna prave podle toho ze treti parametr neni string ale double. A ono ne a ne a ne.
> Z.Kalhous
Prekladac donutis tak, ze tam posles spravne parametry (viz help)
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
Fast Report a odezva aplikaci pri vytvareni sestav
[*] pilifs <pilifs(zv)seznam(tec)cz> - 24.1.2006 09:44:03
Zdravim ve spolek,
pouzivam FastReport 3 a primo v sestavach mam komponenty pro prisup k
datum (ADODatabse, ADOQuery). Pokud je vyber z DB ponekud delsi tak
dochazi k neprijemnemu zamrznuti aplikace. Prubeh zpracovavani sestavy
se objevuje az po dokonceni dotazu na DB. Lze toto nejak prostredky
FastReportu vyresit? Nepodarilo se mi teda nic najit, jedine ty dotazy
resit mimo sestavu (ve vlakne) a pak to na report teprve napojit. To se
mi, ale moc nelibi, chtel bych mit celou logiku sestavy v jednom miste.
Diky za rady
D5 Ent. WinXP, FastReport 3.0
Fast Report a odezva aplikaci pri vytvareni sestav
[*] Jan Sebelik <honza(zv)haes(tec)cz> - 24.1.2006 10:06:05
> pouzivam FastReport 3 a primo v sestavach mam komponenty pro prisup k
> datum (ADODatabse, ADOQuery). Pokud je vyber z DB ponekud delsi tak
> dochazi k neprijemnemu zamrznuti aplikace. Prubeh zpracovavani sestavy
> se objevuje az po dokonceni dotazu na DB. Lze toto nejak prostredky
> FastReportu vyresit? Nepodarilo se mi teda nic najit, jedine ty dotazy
> resit mimo sestavu (ve vlakne) a pak to na report teprve napojit. To se
> mi, ale moc nelibi, chtel bych mit celou logiku sestavy v jednom miste.
Nepouzivam FastReport, nevim, jak to mas sestaveny.
Taky ti do toho nechci kecat, kdyz nevim, o co presne jde.
Dovolim si nicmene nazor.
Nemyslim si ale, ze architektura, na ktere trvas, by nutne musela byt ta nejlepsi.
Podel meho soudu: Sestava = data + design
a)
Data muzes principialne ziskavat z nejruznejsich zdroju, nikoli vyhradne pres "select" do MSSQL nebo Access (ADO).
Muzes je dostat z jakekoli jine databaze pres jine komponenty.
Nebo v XML.
Taky je muzes pripadne nejak dopocitavat.
Taky je muzes zobrazovat jinak, nez pres sestavu - treba export do Excel.
b)
Design je oddelena zalezitost.
Tataz data lze zobrazovat rozdilnymi zpusoby.
Jsem proto toho nazoru, ze pokud bych programoval nejakej framework na sestavy (a delal jsem jich par), pak bych do casti "design" posilal hotova data jako libovolny DataSet. Tvuj problem s case potrebnym na sestaveni dat by pak vypadal jinak.
Ale promin, pokud jsem diky neznalosti tveho problemu nekde mimo.
Honza
====================================
= RNDr. Jan Sebelik - HAES
= Skolici a konzultacni stredisko pro vyvoj SW
= www.haes(tec)cz
= Vojtiskova 321
= 507 81 Lazne Belohrad
====================================
Fast Report a odezva aplikaci pri vytvareni sestav
[*] pilifs <pilifs(zv)seznam(tec)cz> - 24.1.2006 10:28:06
>> pouzivam FastReport 3 a primo v sestavach mam komponenty pro prisup k
>> datum (ADODatabse, ADOQuery). Pokud je vyber z DB ponekud delsi tak
>> dochazi k neprijemnemu zamrznuti aplikace. Prubeh zpracovavani sestavy
>> se objevuje az po dokonceni dotazu na DB. Lze toto nejak prostredky
>> FastReportu vyresit? Nepodarilo se mi teda nic najit, jedine ty dotazy
>> resit mimo sestavu (ve vlakne) a pak to na report teprve napojit. To se
>> mi, ale moc nelibi, chtel bych mit celou logiku sestavy v jednom miste.
>>
> a)
> Data muzes principialne ziskavat z nejruznejsich zdroju, nikoli vyhradne pres "select" do MSSQL nebo Access (ADO).
> Muzes je dostat z jakekoli jine databaze pres jine komponenty.
> Nebo v XML.
> Taky je muzes pripadne nejak dopocitavat.
> Taky je muzes zobrazovat jinak, nez pres sestavu - treba export do Excel.
>
>
Takhle to mam udelane ted, ze data si pripravim v datasetu mimo sestavu.
Potom je tam "preliju" pomoci k tomu existujici komponenty.
> b)
> Design je oddelena zalezitost.
> Tataz data lze zobrazovat rozdilnymi zpusoby.
>
> Jsem proto toho nazoru, ze pokud bych programoval nejakej framework na sestavy (a delal jsem jich par), pak bych do casti "design" posilal hotova data jako libovolny DataSet. Tvuj problem s case potrebnym na sestaveni dat by pak vypadal jinak.
>
Jde mi o to, ze klienti maji na stejnou sestavu nekdy ponekud odlisne
pozadavky. Vzhledem k tomu, ze FastReport umoznuje dost komfortni tvorbu
sestav a pripravu dat v ramci svych schopnosti chci toto prave primo do
sestavy presunout. Z aplikace se zavola jen vybrana sestava dle klienta
a vyjede konkretne jeho modifikace. V pripade zmen by melo stacit jen
upravit samotnou sestavu aniz bych musel sahat do aplikace. To same
plati pro dalsi pripadne modifikace pro jine klienty.
Priebezne zreobrazovanie formulara
[*] Hlas <hlas(zv)inmail.sk> - 24.1.2006 11:12:09
ako zabezpecit priebezne zreobrazovanie formulara
pocas behu dlhsieho procesu aby bol pekne vykreslovany
progressbar pripadne nejaky label na zobrazenie
kontinualnosti priebehu operacie aj v pripade ze sa
prepinam medzi viacerymi aplikaciami?
skusam:
1. FormMain.update
nerobi nic
2. iba Update
sprava sa rovnako
3. FormMain.refresh
funguje ale pocas priebehu uz niesom schopny hybat danym formularom
a umiestnit ho na ine miesto obrazovky
4. FormMain.repaint
funguje ako refresh
Priebezne zreobrazovanie formulara
[*] Milan Tomes <delphi(zv)haida(tec)cz> - 24.1.2006 11:20:10
Umistenim dlouhotrvajiciho kodu do separatniho vlakna.
S pozdravem
Milan Tomes
Hlas napsal(a):
> ako zabezpecit priebezne zreobrazovanie formulara
> pocas behu dlhsieho procesu aby bol pekne vykreslovany
> progressbar pripadne nejaky label na zobrazenie
> kontinualnosti priebehu operacie aj v pripade ze sa
> prepinam medzi viacerymi aplikaciami?
>
Priebezne zreobrazovanie formulara
[*] Venca Zaruba <zaruba(zv)elastoform(tec)cz> - 24.1.2006 11:18:10
> ako zabezpecit priebezne zreobrazovanie formulara
> pocas behu dlhsieho procesu aby bol pekne vykreslovany
> progressbar pripadne nejaky label na zobrazenie
> kontinualnosti priebehu operacie aj v pripade ze sa
> prepinam medzi viacerymi aplikaciami?
>
>
A dat proces do vlakna?
Priebezne zreobrazovanie formulara
[*] Martin Burle <mburle2(zv)volny(tec)cz> - 24.1.2006 11:32:11
> ako zabezpecit priebezne zreobrazovanie formulara
> pocas behu dlhsieho procesu aby bol pekne vykreslovany
> progressbar pripadne nejaky label na zobrazenie
> kontinualnosti priebehu operacie aj v pripade ze sa
> prepinam medzi viacerymi aplikaciami?
Zkus volat v nejakych rozumnych intervalech application.processmessages. Mel
bys ale soucasne osetrit pripadne interakce uzivatele s ovladacimi prvky
(treba jejich disablovanim) a jinymi okny aplikace. Pak si muzes okynkem
hybat podle libosti ;).
MB
Priebezne zreobrazovanie formulara
[*] delphin(zv)post(tec)cz - 24.1.2006 11:30:11
Priebezne zreobrazovanie formulara
[*] Zapletal Martin <zapletal(zv)inoma(tec)cz> - 24.1.2006 11:24:10
Application.ProcessMessages
Martin
> ako zabezpecit priebezne zreobrazovanie formulara
> pocas behu dlhsieho procesu aby bol pekne vykreslovany
> progressbar pripadne nejaky label na zobrazenie
> kontinualnosti priebehu operacie aj v pripade ze sa
> prepinam medzi viacerymi aplikaciami?
>
>
> skusam:
>
> 1. FormMain.update
> nerobi nic
>
> 2. iba Update
> sprava sa rovnako
>
> 3. FormMain.refresh
> funguje ale pocas priebehu uz niesom schopny hybat danym formularom
> a umiestnit ho na ine miesto obrazovky
>
> 4. FormMain.repaint
> funguje ako refresh
>
>
>
>
msaccess a zabezpeceni
[*] Karel Vomacko <karelvomacko(zv)seznam(tec)cz> - 24.1.2006 11:38:12
Zdravim,
rad bych se zeptal jestli se da nejak zabezpecit soubor mdb (proti smazani)? Popisu problem: Kompletni system hesel a uziv. uctu mam ve sve vlastni aplikaci v delphi a nechtel bych aby se museli nastavovat prava uzivatelu ve windows nebo v mdb souboru. Staci mi aby mdb byl na sitovem disku viditelny - proto aby do nej mohl program pristupovat pred ADO a aby se nedal smazat. Do mdb by mi pak stacilo jedno jmeno a heslo ktere budu pouzivat ve sve aplikaci. Nechtel bych taky aby se dal mdb otevrit a editovat primo na serveru - toto by melo jit jen z me aplikace.
Muzete mi dat par drobnych rad jak to provest? Diky
Priebezne zreobrazovanie formulara
[*] Hlas <hlas(zv)inmail.sk> - 24.1.2006 11:44:12
dal som tam timer ktory robi kazdych 5 sekund toto:
procedure TFormMain.Timer1Timer(Sender: TObject);
begin
ProgressBar1.Repaint;
Label10.Repaint;
Application.ProcessMessages;
end;
ale nesprava sa to dobre
Priebezne zreobrazovanie formulara
[*] Zapletal Martin <zapletal(zv)inoma(tec)cz> - 24.1.2006 11:56:14
Co to znamena nechova se to dobre? Repaint Label a Progress uz delat
nemusis. A nemusis to volat z Timeru. Dej si ProcessMessages do te smycky
ktera Ti posouva ten ProgressBar.
Martin
> dal som tam timer ktory robi kazdych 5 sekund toto:
>
> procedure TFormMain.Timer1Timer(Sender: TObject);
> begin
> ProgressBar1.Repaint;
> Label10.Repaint;
> Application.ProcessMessages;
> end;
>
> ale nesprava sa to dobre
>
>
>
Priebezne zreobrazovanie formulara
[*] Lukas Barton <lukas(zv)cnawr(tec)cz> - 24.1.2006 12:06:14
Hlas wrote:
>dal som tam timer ktory robi kazdych 5 sekund toto:
>
>procedure TFormMain.Timer1Timer(Sender: TObject);
>begin
> ProgressBar1.Repaint;
> Label10.Repaint;
> Application.ProcessMessages;
>end;
>
>ale nesprava sa to dobre
>
>
>
>
>
Timer taky funguje pomoci posilani zpravy.
Musite ve for cyklu, kde zpracovavate data, volat treba kazdy 1000 prubeh
Application.ProcessMessages; Lukas
Priebezne zreobrazovanie formulara
[*] Martin Burle <mburle2(zv)volny(tec)cz> - 24.1.2006 12:24:16
> > procedure TFormMain.Timer1Timer(Sender: TObject);
> > begin
> > ProgressBar1.Repaint;
> > Label10.Repaint;
> > Application.ProcessMessages;
> > end;
Timer je zavisly prave na processmessages, tj. pokud se nezpracovavaji
zpravy, timer se "nespusti".
MB
Priebezne zreobrazovanie formulara
[*] Hlas <hlas(zv)inmail.sk> - 24.1.2006 13:22:20
> ano ked som vyhodil tie repainty tak
> sa zda ze to chodi, nie je to idealne ale ano
> zalezi ako casto sa robia jednotlive kroky
> potom dlhsie reaguje samozrejme aj ten presun formulara
>
Martin :
>> Co to znamena nechova se to dobre? Repaint Label a Progress uz delat
>> nemusis. A nemusis to volat z Timeru. Dej si ProcessMessages do te smycky
>> ktera Ti posouva ten ProgressBar.
>>access - objekt OLE
[*] Ladislav Fitz <ladislav.fitz(zv)kodytek(tec)cz> - 24.1.2006 13:40:22
zdravim
kdyz si v accessu vlozim do polozky typu OLE nejaky soubor a pak ho ctu ve
svem programu dostanu pred nim nejakou hlavicku - nevite nekdo strukturu
tehle hlavicky?
diky FireBird 1.5 a InterBase komponenty
[*] Jaroslav Uher <jarek(zv)iuher(tec)cz> - 24.1.2006 19:48:49
On 22 Jan 2006 at 15:49, petr palicka wrote:
> roky zkouseli, tak s nimi nefungovali stadardni DataAware komponenty
> (ty so "pasuji" na TDataSet). Tedy zadny TDBGrid, TDBEdit,... nic
> takove neslo na IBO pripojit, museli se pouzivat IBO ridici prvky.
>
> Ja vim, na tema DataAware komponent se tu lecjaky flam resil, ale
> to
> nic nemeni na tom, ze leckomu dostacuji :-)
>
> Pro seriozni praci doporucuju vyzkouset IBO i FIBPlus, pripadne i
> dalsi (Zeos, UIB,...).
to jsem absolvoval pred 2 roky a firma se rozhodla koupit prave
FIBPlus. Zatim mne za to nepropustila :-)
BTW, pouzivam k nim napojeni na TSMDBGrid bez problemu.
Jarek U.Delphi 2005 cmd line compiller
[*] viktordoubek(zv)volny(tec)cz - 24.1.2006 19:48:49
Nenapsal jsi, co Ti vlastne konkretne nejde, ale ja jsem si zrovna
nedavno hral s dcc32.exe v D7 a jedina trochu zakerna vec byla, ze
je treba pred kompilaci projektu nastavit pracovni adresar do
adresare s .dpr (v davce prikaz cd). A samozrejme mu dat cesty na
knihovny (-I -R -U).
> marne jsem se pokusel rozbehnout kompilaci delphi 2005 win32
> z prikazove radky. Jsem uplne neschopny, nebo to proste nejde ?
FireBird 1.5 a InterBase komponenty
[*] Pavel Malinsky <malinsky(zv)pmcom(tec)cz> - 24.1.2006 19:48:49
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of petr palicka
Ahoj,
> > IBOjects maji vetsi nabidku komponent.
>
> Coa mit _musi_. Teda, navim, jak ted, ale kdyz jsme je
> pred cca 2-3
> roky zkouseli, tak s nimi nefungovali stadardni DataAware
> komponenty (ty
> so "pasuji" na TDataSet). Tedy zadny TDBGrid, TDBEdit,... nic takove
> neslo na IBO pripojit, museli se pouzivat IBO ridici prvky.
Ale nemusi :)) , existuje paleta iboTDataset a to je presne to co pouzivam,
(http://www.ibobjects.com/ibotdata.html) ,
je to prave pro "bezne" DBAware komponenty. Ty ibo gridy aspol take
nepouzivam.
Resp pouzivam IBO datasety + Devexpress gridy aspol.
IBO se da koupit take po "baliccich".
S pozdravem a dikem
=====================================
> Pavel Malinsky; malinsky(zv)pmcom(tec)cz <
=====================================
> GSM: 602 652 203 | ICQ: 322015967 <
=====================================
Priebezne zreobrazovanie formulara
[*] Hlas <hlas(zv)inmail.sk> - 24.1.2006 19:48:49
ako zabezpecit priebezne zreobrazovanie formulara
pocas behu dlhsieho procesu aby bol pekne vykreslovany
progressbar pripadne nejaky label na zobrazenie
kontinualnosti priebehu operacie aj v pripade ze sa
prepinam medzi viacerymi aplikaciami?
skusam:
1. FormMain.update
nerobi nic
2. iba Update
sprava sa rovnako
3. FormMain.refresh
funguje ale pocas priebehu uz niesom schopny hybat danym formularom
a umiestnit ho na ine miesto obrazovky
4. FormMain.repaint
funguje ako refresh
Priebezne zreobrazovanie formulara
[*] m.zaplik(zv)volny(tec)cz - 24.1.2006 19:44:48
Mozna by stacilo dat vsechny prvky na Panel nebo do nejakeho GroupBoxu nebo
tak nejak a pouze u nej dat Enable:=false. Myslim ze jsem to uz nekde
pouzil. A mam ten dojem ze se ostatni nezasednou. Ale zkusil bych to.
Martin
> Podobnou vec resim taky --- jak to disablovani udelat nejak efekt(ivn)e?
> Mam
> aplikaci se spoustou kontrolek a Tlacitkem. Pred stiskem Tlacitka je v
> nejakem z mnoha moznych stavu, neco je enabled, neco ne. Potreboval bych,
> aby po stisku Tlacitka (ktere spusti casove narocny kod prubezne
> vyvolavajici ProcessMessages) se nejlepe vse zadisablovalo nejak
> automaticky, hromadne a po dobehnuti obsluhy Tlacitka se vratilo do
> puvodniho stavu, aniz bych to musel resit extra procedurou, ktera kazde
> kontrolce nastavuje Enabled podle stavu aplikace a toho, jestli obsluha
> Tlacitka zacina nebo konci.
>
> Dokonce jeste lepsi by bylo, kdyby se to ani nedisablovalo, protoze okno
> aplikace se vsemi prvky zasedlymy vypada tak trochu divne, kdyby se to jen
> znepristupnilo, aby to po dobu obsluhy Tlacitka nereagovalo na pripadne
> uzivatelovy akce. V podstate neco, jako kdybych nic nedisabloval a misto
> Application.ProcessMessages volal Form1.Repaint, jenomze ten neustaly
> repainting na muj vkus prilis blika (navic to asi neni uplne "bezpecne",
> ze
> kdyby treba ta zatez generovana obsluhou Tlacitka jednou nebyla tak velka,
> mohl by uzivatel neco zmacknout).
> Pripadne diky, P.
>
>
Tisk z dosu na tiskarne ve win
[*] Radek Cervinka <radek.cervinka(zv)technodat(tec)cz> - 24.1.2006 19:40:46
Dalibor napsal(a):
> Ahoj, nevite nekdo o nejakem reseni jak tisknou z dosu na novejsich tiskarnach, treba konkretne na PagePro 1350?
> Tato tiskarna ma sice LPT, ale primo v readme jsem se docetl, ze prikazy PRINT a COPY nepodporuje.
> Neexistuje nejaky treba rezidentni program ktery by se o to postaral?
>
> Dekuji
>
> Dalibor
>
http://www.google.com/search?hl=en&q=dos+print&btnG=Google+Search
tj. treba
http://www.dosprn.com/
R.Vykreslovani komponent do bitmapy
[*] likeapear <likeapear(zv)centrum(tec)cz> - 24.1.2006 17:18:37
Ahoj,
mozna uz se to tu resilo, ale nevim jestli z toho byl nejaky zaver...
Kadopadne, potrebuji vykreslit nejake komponenty (TWinControl) do
bitmapy (TBitmap). Ale nejak se mi to nedari. :-( Pokud pouziju
TWinControl.PaintTo tak se nevykresli vsechny komponenty a nekterych se
vykresli jenom cast (napr. TComboBox). Pokud pouziju BitBlt, tak je to
vykresleno kompletne, ale podminkou je, ze vykreslovane komponenty musi
byt viditelne, coz je pro me nepouzitelne. Poradi mi nekdo co s tim?
Tady je funkce, kterou pouzivam pro vykresleni komponenty do bitmapy:
[code]
procedure PaintWinCtrlToBitmap(Ctrl: TWinControl; Bmp: TBitmap);
begin
Bmp.Width:=Ctrl.Width;
Bmp.Height:=Ctrl.Height;
Bmp.Canvas.Brush.Color:=clRed;
Bmp.Canvas.FillRect(Ctrl.BoundsRect);
Bmp.Canvas.Lock;
try
// Ctrl.PaintTo(Bmp.Canvas,0,0); // nevykresli vse
BitBlt(Bmp.Canvas.Handle, 0, 0, Bmp.Width, Bmp.Height,
Ctrl.Canvas.Handle, 0, 0, SRCCOPY); // Ctrl musi byt videt
finally
Bmp.Canvas.UnLock;
end;
end;
[/code]
Dekuji mnohokrat
{likeapear}
Priebezne zreobrazovanie formulara
[*] Pavel Smerk <xsmerk(zv)fi.muni(tec)cz> - 24.1.2006 16:00:31
On Tue, Jan 24, 2006 at 03:31:48PM +0100, Pavel Smerk wrote:
> On Tue, Jan 24, 2006 at 11:32:11AM +0100, Martin Burle wrote:
> > > ako zabezpecit priebezne zreobrazovanie formulara
> > > pocas behu dlhsieho procesu aby bol pekne vykreslovany
> > > progressbar pripadne nejaky label na zobrazenie
> > > kontinualnosti priebehu operacie aj v pripade ze sa
> > > prepinam medzi viacerymi aplikaciami?
> >
> > Zkus volat v nejakych rozumnych intervalech application.processmessages. Mel
> > bys ale soucasne osetrit pripadne interakce uzivatele s ovladacimi prvky
> > (treba jejich disablovanim) a jinymi okny aplikace. Pak si muzes okynkem
> > hybat podle libosti ;).
>
> Podobnou vec resim taky --- jak to disablovani udelat nejak efekt(ivn)e? Mam
> aplikaci se spoustou kontrolek a Tlacitkem. Pred stiskem Tlacitka je v
> nejakem z mnoha moznych stavu, neco je enabled, neco ne. Potreboval bych,
> aby po stisku Tlacitka (ktere spusti casove narocny kod prubezne
> vyvolavajici ProcessMessages) se nejlepe vse zadisablovalo nejak
> automaticky, hromadne a po dobehnuti obsluhy Tlacitka se vratilo do
> puvodniho stavu, aniz bych to musel resit extra procedurou, ktera kazde
> kontrolce nastavuje Enabled podle stavu aplikace a toho, jestli obsluha
> Tlacitka zacina nebo konci.
Jeste teda, kdyz uz sem pisu: pokud ve vyse popsane situaci kontrolky
nezadisabluju a ProcessMessages volam, mohu i v prubehu vykonavani te casove
narocne obsluhy Tlacitka klikat na kontrolky, a spoustet tak prislusny kod.
Jedine, co nereaguje, je "krizek" vpravo nahore (ukonceni aplikace/okna).
Mimo vykonavani toho casove (teda vlastne jsem mel psat spis vypocetne)
narocneho kodu reaguje normalne. Jak zpusobit, aby "fungoval" porad?
Diky, P.
Priebezne zreobrazovanie formulara
[*] Vaclav Sazima <vaclav.sazima(zv)utilia(tec)cz> - 24.1.2006 16:46:34
Ahoj,
Pavel Smerk wrote:
> Podobnou vec resim taky --- jak to disablovani udelat nejak efekt(ivn)e? Mam
> aplikaci se spoustou kontrolek a Tlacitkem. Pred stiskem Tlacitka je v
> nejakem z mnoha moznych stavu, neco je enabled, neco ne. Potreboval bych,
> aby po stisku Tlacitka (ktere spusti casove narocny kod prubezne
> vyvolavajici ProcessMessages) se nejlepe vse zadisablovalo nejak
> automaticky, hromadne a po dobehnuti obsluhy Tlacitka se vratilo do
> puvodniho stavu, aniz bych to musel resit extra procedurou, ktera kazde
> kontrolce nastavuje Enabled podle stavu aplikace a toho, jestli obsluha
> Tlacitka zacina nebo konci.
projit Controly na formu pres Controls a ControlCount, ulozit si jejich
stav treba do pole nebo do jejich tagu, pak vsechny zakazat, po skonceni
obnovit. Aby to nevypadalo blbe, vyjmul bych z toho nektere controly,
treba labely (operator is). Take je dobre si nechat povelene nejake
tlacitko, kterym jde proces prerusit.
Vaclav Sazima
Fast Report a odezva aplikaci pri vytvareni sestav
[*] pilifs <pilifs(zv)seznam(tec)cz> - 24.1.2006 19:48:50
>> pouzivam FastReport 3 a primo v sestavach mam komponenty pro prisup k
>> datum (ADODatabse, ADOQuery). Pokud je vyber z DB ponekud delsi tak
>> dochazi k neprijemnemu zamrznuti aplikace. Prubeh zpracovavani sestavy
>> se objevuje az po dokonceni dotazu na DB. Lze toto nejak prostredky
>> FastReportu vyresit? Nepodarilo se mi teda nic najit, jedine ty dotazy
>> resit mimo sestavu (ve vlakne) a pak to na report teprve napojit. To se
>> mi, ale moc nelibi, chtel bych mit celou logiku sestavy v jednom miste.
>>
> a)
> Data muzes principialne ziskavat z nejruznejsich zdroju, nikoli vyhradne pres "select" do MSSQL nebo Access (ADO).
> Muzes je dostat z jakekoli jine databaze pres jine komponenty.
> Nebo v XML.
> Taky je muzes pripadne nejak dopocitavat.
> Taky je muzes zobrazovat jinak, nez pres sestavu - treba export do Excel.
>
>
Takhle to mam udelane ted, ze data si pripravim v datasetu mimo sestavu.
Potom je tam "preliju" pomoci k tomu existujici komponenty.
> b)
> Design je oddelena zalezitost.
> Tataz data lze zobrazovat rozdilnymi zpusoby.
>
> Jsem proto toho nazoru, ze pokud bych programoval nejakej framework na sestavy (a delal jsem jich par), pak bych do casti "design" posilal hotova data jako libovolny DataSet. Tvuj problem s case potrebnym na sestaveni dat by pak vypadal jinak.
>
Jde mi o to, ze klienti maji na stejnou sestavu nekdy ponekud odlisne
pozadavky. Vzhledem k tomu, ze FastReport umoznuje dost komfortni tvorbu
sestav a pripravu dat v ramci svych schopnosti chci toto prave primo do
sestavy presunout. Z aplikace se zavola jen vybrana sestava dle klienta
a vyjede konkretne jeho modifikace. V pripade zmen by melo stacit jen
upravit samotnou sestavu aniz bych musel sahat do aplikace. To same
plati pro dalsi pripadne modifikace pro jine klienty.InputBox overload
[*] Lucky62 <lucky62(zv)datarix.sk> - 24.1.2006 19:48:49
Ahoj prednedavnom som to riesil v D7:
Problem je, ze InputBox vo variante ktora vracia string je v unite Dialogs,
zatial co ostatne varianty v QDialogs.
Treba QDialogs pridat do uses, ovsem treba s programom distribuovat
prislusne DLL.
Lucky
----- Original Message -----
From: "Kalhous" <kalhous(zv)eu(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, January 24, 2006 7:33 AM
Subject: InputBox overload
> Podle helpu existuji overload varianty InputBoxu pro zadani napriklad
> integer nebo double cisla. Jak donutim prekladac aby tyto overload pouzil
> a nehlasil nesouhlas typu parametru? Doufal jsem ze to pozna prave podle
> toho ze treti parametr neni string ale double. A ono ne a ne a ne.
> Z.Kalhous
>
>
>
Priebezne zreobrazovanie formulara
[*] Hlas <hlas(zv)inmail.sk> - 24.1.2006 19:48:50
dal som tam timer ktory robi kazdych 5 sekund toto:
procedure TFormMain.Timer1Timer(Sender: TObject);
begin
ProgressBar1.Repaint;
Label10.Repaint;
Application.ProcessMessages;
end;
ale nesprava sa to dobre
OT: Cislo disku
[*] Ing. Dubsky Jan <dubsky(zv)s-palava(tec)cz> - 24.1.2006 19:48:49
Zajimalo by me, jestli cislo harddisku je zalezitost HW nastavena z vyroby,
nebo jestli se generuje napr. pri formatovani disku s je tudiz touto
cinnosti zamenitelne.
Honza
Tisk z dosu na tiskarne ve win
[*] Dalibor <dalibor(zv)torola(tec)cz> - 24.1.2006 19:48:49
Ahoj, nevite nekdo o nejakem reseni jak tisknou z dosu na novejsich tiskarnach, treba konkretne na PagePro 1350?
Tato tiskarna ma sice LPT, ale primo v readme jsem se docetl, ze prikazy PRINT a COPY nepodporuje.
Neexistuje nejaky treba rezidentni program ktery by se o to postaral?
Dekuji
Dalibor
Delphi 2005 cmd line compiller
[*] jiri <jiri(zv)vojtek.biz> - 24.1.2006 19:48:50
Tak ten pracovni adresar me nenapadl. Knihovny jsem nastavil.
Zkusim a snad to pomuze. Dekuji za nakopnuti.
J.V.
On Mon, 23 Jan 2006 08:42:16 +0100, viktordoubek wrote
> Nenapsal jsi, co Ti vlastne konkretne nejde, ale ja jsem si zrovna
> nedavno hral s dcc32.exe v D7 a jedina trochu zakerna vec byla, ze
> je treba pred kompilaci projektu nastavit pracovni adresar do
> adresare s .dpr (v davce prikaz cd). A samozrejme mu dat cesty na
> knihovny (-I -R -U).
>
> > marne jsem se pokusel rozbehnout kompilaci delphi 2005 win32
> > z prikazove radky. Jsem uplne neschopny, nebo to proste nejde ?
Priebezne zreobrazovanie formulara
[*] Martin Burle <mburle2(zv)volny(tec)cz> - 24.1.2006 20:34:56
> ako zabezpecit priebezne zreobrazovanie formulara
> pocas behu dlhsieho procesu aby bol pekne vykreslovany
> progressbar pripadne nejaky label na zobrazenie
> kontinualnosti priebehu operacie aj v pripade ze sa
> prepinam medzi viacerymi aplikaciami?
Zkus volat v nejakych rozumnych intervalech application.processmessages. Mel
bys ale soucasne osetrit pripadne interakce uzivatele s ovladacimi prvky
(treba jejich disablovanim) a jinymi okny aplikace. Pak si muzes okynkem
hybat podle libosti ;).
MB
Priebezne zreobrazovanie formulara
[*] Pavel Smerk <xsmerk(zv)fi.muni(tec)cz> - 24.1.2006 20:34:56
On Tue, Jan 24, 2006 at 11:32:11AM +0100, Martin Burle wrote:
> > ako zabezpecit priebezne zreobrazovanie formulara
> > pocas behu dlhsieho procesu aby bol pekne vykreslovany
> > progressbar pripadne nejaky label na zobrazenie
> > kontinualnosti priebehu operacie aj v pripade ze sa
> > prepinam medzi viacerymi aplikaciami?
>
> Zkus volat v nejakych rozumnych intervalech application.processmessages. Mel
> bys ale soucasne osetrit pripadne interakce uzivatele s ovladacimi prvky
> (treba jejich disablovanim) a jinymi okny aplikace. Pak si muzes okynkem
> hybat podle libosti ;).
Podobnou vec resim taky --- jak to disablovani udelat nejak efekt(ivn)e? Mam
aplikaci se spoustou kontrolek a Tlacitkem. Pred stiskem Tlacitka je v
nejakem z mnoha moznych stavu, neco je enabled, neco ne. Potreboval bych,
aby po stisku Tlacitka (ktere spusti casove narocny kod prubezne
vyvolavajici ProcessMessages) se nejlepe vse zadisablovalo nejak
automaticky, hromadne a po dobehnuti obsluhy Tlacitka se vratilo do
puvodniho stavu, aniz bych to musel resit extra procedurou, ktera kazde
kontrolce nastavuje Enabled podle stavu aplikace a toho, jestli obsluha
Tlacitka zacina nebo konci.
Dokonce jeste lepsi by bylo, kdyby se to ani nedisablovalo, protoze okno
aplikace se vsemi prvky zasedlymy vypada tak trochu divne, kdyby se to jen
znepristupnilo, aby to po dobu obsluhy Tlacitka nereagovalo na pripadne
uzivatelovy akce. V podstate neco, jako kdybych nic nedisabloval a misto
Application.ProcessMessages volal Form1.Repaint, jenomze ten neustaly
repainting na muj vkus prilis blika (navic to asi neni uplne "bezpecne", ze
kdyby treba ta zatez generovana obsluhou Tlacitka jednou nebyla tak velka,
mohl by uzivatel neco zmacknout).
Pripadne diky, P.Detekce procesu
[*] david.kopecek(zv)hacktrack(tec)com - 24.1.2006 20:34:56
Zdravim ,,
mam service ktera po startu spousti urcite aplikace, nektere spusti
nekolikrat s ruznymy parametry. Jak je mozne overit jeslti dana
aplikace bezi ?, napriklad kdyz spustim procesy
test.exe
test.exe output1.dat
test.exe output2.dat
jak overi v te service ze jedou..
Diky David
Priebezne zreobrazovanie formulara
[*] Zapletal Martin <zapletal(zv)inoma(tec)cz> - 24.1.2006 20:34:56
Co to znamena nechova se to dobre? Repaint Label a Progress uz delat
nemusis. A nemusis to volat z Timeru. Dej si ProcessMessages do te smycky
ktera Ti posouva ten ProgressBar.
Martin
> dal som tam timer ktory robi kazdych 5 sekund toto:
>
> procedure TFormMain.Timer1Timer(Sender: TObject);
> begin
> ProgressBar1.Repaint;
> Label10.Repaint;
> Application.ProcessMessages;
> end;
>
> ale nesprava sa to dobre
>
>
>
Tisk z dosu na tiskarne ve win
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 24.1.2006 20:32:54
Puvodni zprava ze dne 23.1.2006:
> Ahoj, nevite nekdo o nejakem reseni jak tisknou z dosu na novejsich
> tiskarnach, treba konkretne na PagePro 1350? Tato tiskarna ma sice
> LPT, ale primo v readme jsem se docetl, ze prikazy PRINT a COPY
> nepodporuje. Neexistuje nejaky treba rezidentni program ktery by se
> o to postaral?
Nevim, jestli myslis totez co ja, ale zdejsi nas kolega dela DOSPrint,
coz je program, ktery prevezme textovy soubor a prevede ho na
jakoukoliv tiskarnu nainstalovanou ve Windows. Musis si ale zajistit,
aby to sestavu vyplivlo do textaku. Informace zde:
http://www.redlich(tec)cz/popisdp.htm
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================
FireBird 1.5 a InterBase komponenty
[*] Marek Dostal <konf(zv)agnis(tec)cz> - 24.1.2006 20:08:53
> prave zacinam pracovat na nove apolikaci, ve ktere bych chtel poprve v
> zivote pouzit databaci FireBird ver. 1.5. Chtel bych se zeptat, zda i pro
> tuto verzi databaze jsou stale pouzitelne komponenty pro primy pristup k
> InterBase obsazene v Delphi 6, nebo zda byste mi doporucili nejake jine,
> nejlepe free (neni podminkou)
Pouzivame dbExpres komponenty v Delphi 7 (jsou v Delphi od verze 6, ve verzi
6 tam byly nejake chyby, ktere byly ve verzi D7 odstraneny) a standardni
komponenty pro praci s daty, ktere jsme si rozsirili o nasi pozadovanou
funkcnost. Obcas sice narazime na neco, co to neumi, ale zatim to nikdy
nebyla neprekonatelna prekazka.
Marek Dostal
D7Prof, WinXP, FireBird 1.0, 1.5
Priebezne zreobrazovanie formulara
[*] delphin(zv)post(tec)cz - 24.1.2006 20:32:55
Cislo disku
[*] Martin Pisarik <martin.pisarik(zv)seznam(tec)cz> - 24.1.2006 20:08:52
Lze je softwarove zmenit.
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Ing. Dubsky Jan
> Sent: Monday, January 23, 2006 10:08 AM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: OT: Cislo disku
>
>
> Zajimalo by me, jestli cislo harddisku je zalezitost HW nastavena
> z vyroby,
> nebo jestli se generuje napr. pri formatovani disku s je tudiz touto
> cinnosti zamenitelne.
>
> Honza
>
>
Kombinace cisel
[*] Petr Fiser <petr.fiser(zv)3jservis(tec)cz> - 24.1.2006 20:08:53
Sem to ze zvedavosti pustil a je tam jedna chyba (asi jsem si s tim potom
jeste nekdy hral)
Radek: Label1.Caption := IntToStr(K) + ' (' + S + ') ' + IntToStr(I); ma
byt az na konci pred Result := TRUE jinak v promenne S nic neni
Pokud se podari najit hledane cislo, na Label1 se vypise hledane cislo, blok
cisel ze kterych se to secetlo, a pocet pokusu pro nalezeni kombinace.
V opacnem pripade je tam zobrazen jen pocet pokusu k nalezeni kombinace
Petr Fiser
InputBox overload
[*] Kalhous <kalhous(zv)eu(tec)cz> - 24.1.2006 20:32:55
Podle helpu existuji overload varianty InputBoxu pro zadani napriklad integer nebo double cisla. Jak donutim prekladac aby tyto overload pouzil a nehlasil nesouhlas typu parametru? Doufal jsem ze to pozna prave podle toho ze treti parametr neni string ale double. A ono ne a ne a ne.
Z.Kalhous
FireBird 1.5 a InterBase komponenty
[*] Pavel Malinsky <malinsky(zv)pmcom(tec)cz> - 24.1.2006 19:42:47
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Pavel Lavicka
Ahoj,
> prave zacinam pracovat na nove apolikaci, ve ktere bych chtel poprve v
> zivote pouzit databaci FireBird ver. 1.5. Chtel bych se
> zeptat, zda i pro
> tuto verzi databaze jsou stale pouzitelne komponenty pro
> primy pristup k
> InterBase obsazene v Delphi 6, nebo zda byste mi doporucili
> nejake jine,
> nejlepe free (neni podminkou)
Osobne pouzivam http://www.ibobjects.com/ k plne spokojenosti,
sice neco stoji ale at mas prehled. :)
S pozdravem a dikem
=====================================
> Pavel Malinsky; malinsky(zv)pmcom(tec)cz <
=====================================
> GSM: 602 652 203 | ICQ: 322015967 <
=====================================
FireBird 1.5 a InterBase komponenty
[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 24.1.2006 19:42:47
Ahoj,
Jaroslav Uher napsal(a):
> FIBPlus (v D6P) pouzivame jiz 2 roky take k absolutni spokojenosti.
> Ale POZOR. Nemaji ekvivalent k TIBTable!
coz je IMHO jedine dobre, alespon nenavadi ke spatnym navykum.
> IBOjects maji vetsi nabidku komponent.
Coa mit _musi_. Teda, navim, jak ted, ale kdyz jsme je pred cca 2-3
roky zkouseli, tak s nimi nefungovali stadardni DataAware komponenty (ty
so "pasuji" na TDataSet). Tedy zadny TDBGrid, TDBEdit,... nic takove
neslo na IBO pripojit, museli se pouzivat IBO ridici prvky.
Ja vim, na tema DataAware komponent se tu lecjaky flam resil, ale to
nic nemeni na tom, ze leckomu dostacuji :-)
Pro seriozni praci doporucuju vyzkouset IBO i FIBPlus, pripadne i
dalsi (Zeos, UIB,...).
Peca
Kombinace cisel
[*] Lada <lada.xt(zv)volny(tec)cz> - 24.1.2006 20:08:52
Zdravim,
mam rekneme 10 cisel a soucet, ktery je souctem x z nich.
Tzn. potrebuju najit kombinaci x cisel z deseti, ktera se bude rovnat
souctu..
Poradi prosim nekdo algoritmus, kterym bych tuto ulohu resil?
Pokud by byl i zdrojak nejake fce, moc by mne to pomohlo.
Diky, Lada
FireBird 1.5 a InterBase komponenty
[*] Pavel Lavicka <konference(zv)zus(tec)cz> - 24.1.2006 19:42:46
Ahoj vsichni,
prave zacinam pracovat na nove apolikaci, ve ktere bych chtel poprve v
zivote pouzit databaci FireBird ver. 1.5. Chtel bych se zeptat, zda i pro
tuto verzi databaze jsou stale pouzitelne komponenty pro primy pristup k
InterBase obsazene v Delphi 6, nebo zda byste mi doporucili nejake jine,
nejlepe free (neni podminkou)
Za odpovedi predem dekuji
Pavel Lavicka
Priebezne zreobrazovanie formulara
[*] Zapletal Martin <zapletal(zv)inoma(tec)cz> - 24.1.2006 20:08:52
Application.ProcessMessages
Martin
> ako zabezpecit priebezne zreobrazovanie formulara
> pocas behu dlhsieho procesu aby bol pekne vykreslovany
> progressbar pripadne nejaky label na zobrazenie
> kontinualnosti priebehu operacie aj v pripade ze sa
> prepinam medzi viacerymi aplikaciami?
>
>
> skusam:
>
> 1. FormMain.update
> nerobi nic
>
> 2. iba Update
> sprava sa rovnako
>
> 3. FormMain.refresh
> funguje ale pocas priebehu uz niesom schopny hybat danym formularom
> a umiestnit ho na ine miesto obrazovky
>
> 4. FormMain.repaint
> funguje ako refresh
>
>
>
>Priebezne zreobrazovanie formulara
[*] Milan Tomes <delphi(zv)haida(tec)cz> - 24.1.2006 20:08:52
Umistenim dlouhotrvajiciho kodu do separatniho vlakna.
S pozdravem
Milan Tomes
Hlas napsal(a):
> ako zabezpecit priebezne zreobrazovanie formulara
> pocas behu dlhsieho procesu aby bol pekne vykreslovany
> progressbar pripadne nejaky label na zobrazenie
> kontinualnosti priebehu operacie aj v pripade ze sa
> prepinam medzi viacerymi aplikaciami?
> Fast Report a odezva aplikaci pri vytvareni sestav
[*] pilifs <pilifs(zv)seznam(tec)cz> - 24.1.2006 20:08:52
Zdravim ve spolek,
pouzivam FastReport 3 a primo v sestavach mam komponenty pro prisup k
datum (ADODatabse, ADOQuery). Pokud je vyber z DB ponekud delsi tak
dochazi k neprijemnemu zamrznuti aplikace. Prubeh zpracovavani sestavy
se objevuje az po dokonceni dotazu na DB. Lze toto nejak prostredky
FastReportu vyresit? Nepodarilo se mi teda nic najit, jedine ty dotazy
resit mimo sestavu (ve vlakne) a pak to na report teprve napojit. To se
mi, ale moc nelibi, chtel bych mit celou logiku sestavy v jednom miste.
Diky za rady
D5 Ent. WinXP, FastReport 3.0
Fast Report a odezva aplikaci pri vytvareni sestav
[*] Jan Sebelik <honza(zv)haes(tec)cz> - 24.1.2006 20:08:52
> pouzivam FastReport 3 a primo v sestavach mam komponenty pro prisup k
> datum (ADODatabse, ADOQuery). Pokud je vyber z DB ponekud delsi tak
> dochazi k neprijemnemu zamrznuti aplikace. Prubeh zpracovavani sestavy
> se objevuje az po dokonceni dotazu na DB. Lze toto nejak prostredky
> FastReportu vyresit? Nepodarilo se mi teda nic najit, jedine ty dotazy
> resit mimo sestavu (ve vlakne) a pak to na report teprve napojit. To se
> mi, ale moc nelibi, chtel bych mit celou logiku sestavy v jednom miste.
Nepouzivam FastReport, nevim, jak to mas sestaveny.
Taky ti do toho nechci kecat, kdyz nevim, o co presne jde.
Dovolim si nicmene nazor.
Nemyslim si ale, ze architektura, na ktere trvas, by nutne musela byt ta nejlepsi.
Podel meho soudu: Sestava = data + design
a)
Data muzes principialne ziskavat z nejruznejsich zdroju, nikoli vyhradne pres "select" do MSSQL nebo Access (ADO).
Muzes je dostat z jakekoli jine databaze pres jine komponenty.
Nebo v XML.
Taky je muzes pripadne nejak dopocitavat.
Taky je muzes zobrazovat jinak, nez pres sestavu - treba export do Excel.
b)
Design je oddelena zalezitost.
Tataz data lze zobrazovat rozdilnymi zpusoby.
Jsem proto toho nazoru, ze pokud bych programoval nejakej framework na sestavy (a delal jsem jich par), pak bych do casti "design" posilal hotova data jako libovolny DataSet. Tvuj problem s case potrebnym na sestaveni dat by pak vypadal jinak.
Ale promin, pokud jsem diky neznalosti tveho problemu nekde mimo.
Honza
====================================
= RNDr. Jan Sebelik - HAES
= Skolici a konzultacni stredisko pro vyvoj SW
= www.haes(tec)cz
= Vojtiskova 321
= 507 81 Lazne Belohrad
====================================
Kombinace cisel
[*] Petr Fiser <petr.fiser(zv)3jservis(tec)cz> - 24.1.2006 20:08:52
Kdysi davno jsem udelal toto a fungovalo to.
const
TEST = 5683;
var
Nums: array[0..22] of Word = (420, 440, 442, 454, 456, 470, 484, 512,
541, 566, 568, 572, 584, 584, 594, 616, 622, 668, 684, 822,
830, 1038, 1366); //4194303
function TForm1.FindNumArray(Nums: array of Word): Boolean;
var
S: String;
I, J, K, L: LongWord;
Max: Extended;
begin
Result := FALSE;
Max := Power(2, High(Nums));
for I := 1 to Round(Max) - 1 do begin
K := 0;
L := 1;
for J := 0 to High(Nums) - 1 do begin
if (I and L) <> 0 then K := K + Nums[J];
L := 2 * L;
end;
//... test na vysledek
if K = TEST then begin
Label1.Caption := IntToStr(K) + ' (' + S + ') ' + IntToStr(I);
L := 1;
S := '';
for J := 0 to High(Nums) - 1 do begin
if (I and L) <> 0 then S := S + Format('%d ,', [Nums[J]]);
L := 2 * L;
end;
Result := TRUE;
Exit;
end else
Label1.Caption := 'IntToStr(K)';
end;
end;
Petr Fiser
> Zdravim,
>
> mam rekneme 10 cisel a soucet, ktery je souctem x z nich.
> Tzn. potrebuju najit kombinaci x cisel z deseti, ktera se bude rovnat
> souctu..
> Diky, Lada
InputBox overload
[*] Jan Fiala <jan.fiala(zv)wo(tec)cz> - 24.1.2006 20:08:51
24.1.2006 Kalhous:
> Podle helpu existuji overload varianty InputBoxu pro zadani
> napriklad integer nebo double cisla. Jak donutim prekladac aby tyto
> overload pouzil a nehlasil nesouhlas typu parametru? Doufal jsem ze
> to pozna prave podle toho ze treti parametr neni string ale double. A ono ne a ne a ne.
> Z.Kalhous
Prekladac donutis tak, ze tam posles spravne parametry (viz help)
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
DateTimePicker - nastaveni formatu casu podle Long
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 24.1.2006 19:42:47
> No tohle resi nastaveni formatovani u jednoho DateTimePicker-u... Jenomze ja
> mam a v budoucnu klidne i muzu mit dalsi dost formularu, na kterych se podle
> potreb tato komponenta objevi.
> Puvodne jsem muj dotaz myslel tak, jestli byste mi nebyli schopni poradit
> zpusob, jak donutit DateTimePicker, aby si vzal nastaveni z promenne
> LongTimeFormat a ne z nastaveni systemu (resp. mistniho nastaveni prostredi
> uzivatele)
> To bych z kazdeho frame-u popr z kazdeho formulare nejakou rekurzi musel
> prochazet vsechny objekty, jestli nahodou nejsou typu DateTimePicker a u
> vsech menit vlastnost Format := LongTimeFormat
Ahoj,
zakladni problem je zrejme v tom, ze TDateTimePicker je prvek
obsazeny primo ve Windows a Delphi ho jen zapouzdruje. Zrejme se
tedy implicitne sam kouka primo do Win a VCL se mu nesnazi vnutit
format ze sve promenne - to jen jen muj odhad situace, nezkoumal
jsem.
Podobnych zalezitosti, kdy bys chtel neco zmenit najednou pro vsechny
instance dane komponenty - a nejde zdaleka jen o datetimepicker, uz
pravidelne pouzivam reseni zminene ve vedlejsim mailu.
Zjednodusene: Mam dva potomky TForm, rekneme
TUnivForm = class(TForm)
a TAppForm = class(TUnivForm)
a vsechny formulare aplikace se dedi od TAppForm. V TUnivForm
resim vychytavky, ktere jsou nezavisle na aplikaci - hodi se vzdy a
vsude. V TAppForm resim zalezitosti, ktere se rovnez tykaji vsech
formularu, ale souvisi jen s konkretni aplikaci a nejsou prenosne do jine
aplikace. Pro upravy komponent se pak pouzije cykl
for i := 0 to ComponentCount - 1 do
if Components[i] is TDatetimepicker then...
apod. Takto se elegantne da vyresit spousta ruznych nectnosti.
David Lebeda
FireBird 1.5 a InterBase komponenty
[*] Peter Ondras <konfery(zv)pse.sk> - 24.1.2006 19:42:47
Bezproblemov sa daju pouzivat komponenty IBX z Delphi. Nedoporucujem
pouzivat vsak IBTable. Problemy mozu nastat snad len pri komponentach zo
zalozky IBAdmin, tie ale pri FB 1.5 nie su potrebne pretoze ku firebirdu
je dodavany nastroj gfix ovladany z prikazoveho riadku a s nim sa daju
databazy kopirovat, zalohovat, obnovovat a komplexne spravovat.
> -----Original Message-----
> pouzit databaci FireBird ver. 1.5. Chtel bych se zeptat, zda i pro
> tuto verzi databaze jsou stale pouzitelne komponenty pro primy pristup
k
> InterBase obsazene v Delphi 6
Paradox a Microsoft Paradox Driver
[*] Hash <parizsky(zv)gmail(tec)com> - 24.1.2006 19:42:48
Jedna se o 5 let funkcni aplikaci, ktera za dobu sve funkcnosti vytvorila
par tisic tabulek. Jejich prevod do jine databaze by asi trval docela
dlouho. Hlavne zmena datoveho zdroje aplikace je z duvodu architektury a
velikosti aplikace rozhodne beh na dlouhou trat. Z financnich duvodu by bylo
lepsi rozchodit paradox na DVD nez uzpusobit aplikaci na SQL.
Vygooglil jsem info ze instalace BDE neni nutna...staci hodit par dll k
aplikaci a z HDD vse funguje, bohuzel po vypaleni hlasi chybu s nedostatkem
pameti...a to ma pravdepodobne co delat se zamykanim tabulek ( to jeste
pozdeji zkouknu )..
Kadopadne ten ODBC driver pro paradox bez bde proste nejede.:(
Ladap
>> Snazim se pouzit ODBC protoze tabulky i aplikace by mela byt na DVD
> >> samostatne spustitelna bez nutnosti cokoliv instalovat.
> >>
> >> Dik
> >> Ladap
>
> >nepouzijes klasicke SQL? Firebird nabizi Embded version, ktera jde (viz
> uz
> >nekolik navodu v milosti) bezproblemu provozovat z CD bez jakekoli
> instalace
>Jak poslat na server soubor pomoci SYNAPSE
[*] delphi(zv)kopr(tec)cz - 25.1.2006 11:10:03
Zdravim,
Po nekolika hodinovem vyzkumu se musim zeptat:
Chci pomoci Synapse poslat soubor na www server, neco jako obdoba
FtpPutFile.
V Synapse to nemohu najit.
Diky za pomoc Pavel ZIDEK
_____
I am using the free version of SPAMfighter for private users.
It has removed 1272 spam emails to date.
Paying users do not have this message in their emails.
Try SPAMfighter <http://www.spamfighter.com/Product_Info.asp?> for free
now!
Cislo disku
[*] Martin Burle <mburle2(zv)volny(tec)cz> - 25.1.2006 10:56:02
> Pochopil jsem to tak, ze klasicke "serove cislo", ktere se da zmenit
napriklad pri formatovani neni jedine cislo, ktere se da vycist a ze
existuje i nejake opravdu pevne hw cislo ?
Ano, krome serial volume label pro kazdou partition ma cely HDD i hw cislo.
Napr. v JCL jsou funkce na zjisteni...
MB
Cislo disku
[*] David Kraina <dkx(zv)seznam(tec)cz> - 25.1.2006 10:44:01
zcela jiste ano, otazkou je, jestli se da sw zjistit, popr. jestli to dokaze
zjistit driver disku.
Nevim o tom, ze by to ale slo, byla to spise mimotechnicka poznamka.> napriklad pri formatovani neni jedine cislo, ktere se da vycist a ze
> existuje i nejake opravdu pevne hw cislo ?
Cislo disku
[*] Ludek <konference(zv)sales(tec)cz> - 25.1.2006 10:09:59
From: "David Kraina" <dkx(zv)seznam(tec)cz>
> Neni cislo jako cislo ;)
> Ale moznost B - formatovani
Ahoj,
Pochopil jsem to tak, ze klasicke "serove cislo", ktere se da zmenit napriklad pri formatovani neni jedine cislo, ktere se da vycist a ze existuje i nejake opravdu pevne hw cislo ?
Ludek
Cislo disku
[*] David Kraina <dkx(zv)seznam(tec)cz> - 24.1.2006 21:23:00
Neni cislo jako cislo ;)
Ale moznost B - formatovani
> jestli cislo harddisku je zalezitost HW nastavena z vyroby,
> nebo jestli se generuje napr. pri formatovani disku s je tudiz touto
> cinnosti zamenitelne.
ADMIN: fiona.stapro.cz dela bordel
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 24.1.2006 21:49:02
Ahoj,
nejaky server fiona.stapro(tec)cz nam tu dela binec. Prosim prislusneho
cloveka, aby se mi ozval na muj e-mail (ne do konference) a nebo to
rovnou dal do poradku.
Dekuji,
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================
Lokalizace v Delphi 200X
[*] Michael Janecek <delphi(zv)astapra(tec)cz> - 25.1.2006 11:52:06
Ahoj,
Existuje v Delphi 200X nejaky regulerni lokalizacni nastroj? Presel
jsem z D6 a v predchozich projektech jsem lokalizaci nikdy neresil.
Diky za jakykoliv nakopnuti
Mike
D2006P, WXPPSP2
MSSQL a zmena hodnoty v triggeru
[*] IKOS - Martin Bursa <martin.bursa(zv)ikos(tec)cz> - 25.1.2006 12:22:08
Ahoj,
v MSSQL databazi potrebuji v triggeru zmenit vlozenou hodnotu urciteho
sloupce - napr.: z aplikace se vklada X a do databaze potrebuji za urcitych
podminek dostat X + 10. Nevite jak na to ?
Dik, Maca
Jak poslat na server soubor pomoci SYNAPSE
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 25.1.2006 12:48:10
> Chci pomoci Synapse poslat soubor na www server, neco jako obdoba
> FtpPutFile.
To hodne zalezi na tom jak na tom www serveru budes ten soubor
prijimat.
Pokud treba chces nasimulovat posilani souboru pomoci weboveho
formulare, pak se podivej na funkci HttpPostFile...
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.
msaccess a zabezpeceni
[*] Michael Janecek <delphi(zv)astapra(tec)cz> - 25.1.2006 11:52:06
Ahoj,
To asi dost dobre nejde - widle se sice budou bourit pokazde, kdyz se ten
soubor nekdo pokusi smazat ve chvili, kdyz v tom bude nekdo jinej, ale kdyz
to nikdo drzet nebude, samozrejme to smazat pude (ledaze by vsichni
uzivatele meli ten soubor jenom read-only, ale predpokladam, ze do ni budou
chtit taky ukladat, takze nic). Kdyz uz sme u tech prasecinek ... muzes
nechat nekde na serveru trcet aplikaci ktera sice nebude nic delat, ale furt
bude mit 1 aktivni kurzor do toho mdb :-) S tou nemoznosti uprav - zkus to
zaheslovat a predstirat, ze to u Accessu staci :-) heslo pak bude aut.
vyplnovat ta aplikace.
Dr.Bug
D2006P,WXPPSP2
----------------
Zdravim,
rad bych se zeptal jestli se da nejak zabezpecit soubor mdb (proti smazani)?
Popisu problem: Kompletni system hesel a uziv. uctu mam ve sve vlastni
aplikaci v delphi a nechtel bych aby se museli nastavovat prava uzivatelu ve
windows nebo v mdb souboru. Staci mi aby mdb byl na sitovem disku viditelny
- proto aby do nej mohl program pristupovat pred ADO a aby se nedal smazat.
Do mdb by mi pak stacilo jedno jmeno a heslo ktere budu pouzivat ve sve
aplikaci. Nechtel bych taky aby se dal mdb otevrit a editovat primo na
serveru - toto by melo jit jen z me aplikace.
Jedi Debug
[*] MaReK Penguin Olsavsky <orsm(zv)centrum(tec)cz> - 25.1.2006 14:42:19
Dobry den,
prosim Vas, znate nekdo odkaz na pouziti %SUBJ%. Toliko vim, ze je treba
u projektu zapnout vlozeni ladicich dat JCL, ale zatim nemam moc jasno o
pripojeni patricneho error dialogu a jeho nasledneho pouziti,
pravdepodobne bych potreboval timto dialogem "obalit" cely program, tj.
vcetne casti, ktera je hlavnim zdrojovym kodem programu (jestli to jde).
Co jsem nasel na internetu, jedna se o pomerne mocny nastroj, ale zatim
jsem nenasel rozumny zpusob, jak jej napojit na program...
Potrebuji odchytit co mi zpusobuje chybu (jvMemo komponenta tvrdi, ze
nema rodicovske okno, mozna ji nastavit hned na pocatku, ale opravdu
nevim kam, uz jsem zkousel sestupne vsechny moznosti, nenastavit to, pak
kam tato komponenta patri form, pagecontrol, tab, panel a groupbox),
bohuzel tato se mi objevuje po uzavreni (formclose) formulare a pri
krokovani (i pres F7) je dalsim krokem skok na 'end.' v hlavnim
projektovem souboru (abych upresnil terminologii, minim tim ten, kde
jsou jen uses a application.initform a application.createform...)
Dekuji za kazde posunuti spravnym smerem...
MO
--
- --
MaReK "Penguin" Olsavsky
PHP Voodoo
private mail: orsm(zv)centrum(tec)cz
private web: http://orsm.wz(tec)cz
ICQ#: 160 178 925; MSN: orsm(zv)centrum(tec)cz; Skype: Penguin_007
tel.: +420-603-519-650; +420-775-154-689 (775-1-LINUX)
Aplikace s virtualni klavesnici
[*] Franta Flinta <jarek2(zv)centrum(tec)cz> - 25.1.2006 14:54:20
Dobry den,
mam problem pri vytvareni aplikace s virtualni klavesnici. Komponenta
TWebBrowser nereaguje na akce, ktere simuluji stisk klavesy. Pokud
pouziju ten samy zpusob na "normalni" komponentu typu TEdit, tak neni
problem, nicmene TWebBrowser proste nereaguje.
Zkousel jsem pouzit knihovnu SndKey32 - funguje na TEdit, ale ne na
TWebBrowser.
Uvadim zde kod simulujici stisk klavesy 'a' a poslani na komponentu
TEdit - jmeno komponenty je eAdresa (coz funguje):
lHkl := GetKeyboardLayout(0);
lVirtKey := VkKeyScanEx('a', lHkl);
ldwOemKey := ((OemKeyScan(WORD('a')) and $FF) shl 16) or 1;
windows.PostMessage(eAdresa.handle, WM_KEYDOWN, WPARAM(lVirtKey),
ldwOemKey);
nicmene opravdu netusim jak udelat to same pro TWebBrowser. Mohl by me
nekdo prosim "nakopnout" spravnym smerem k reseni?
dekuji
Franta Flinta
Jedi Debug
[*] Ladislav Stary <stary(zv)ekodat(tec)cz> - 25.1.2006 15:06:21
Do projektu je potreba pridat formular ExceptDlg.pas, ktery najdes v
adresari, kam sis nainstaloval Jedi komponenty.
mam to v JVCL\jcl\examples\vcl\debugextension\dialog\ExceptDlg.pas
Pak je potreba jeste v menu Project zatrhnout Insert JCL debug data
Ladislav Stary
MaReK Penguin Olsavsky napsal(a):
> Dobry den,
>prosim Vas, znate nekdo odkaz na pouziti %SUBJ%. Toliko vim, ze je treba
>u projektu zapnout vlozeni ladicich dat JCL, ale zatim nemam moc jasno o
>pripojeni patricneho error dialogu a jeho nasledneho pouziti,
>pravdepodobne bych potreboval timto dialogem "obalit" cely program, tj.
>vcetne casti, ktera je hlavnim zdrojovym kodem programu (jestli to jde).
>Co jsem nasel na internetu, jedna se o pomerne mocny nastroj, ale zatim
>jsem nenasel rozumny zpusob, jak jej napojit na program...
> Potrebuji odchytit co mi zpusobuje chybu (jvMemo komponenta tvrdi, ze
>nema rodicovske okno, mozna ji nastavit hned na pocatku, ale opravdu
>nevim kam, uz jsem zkousel sestupne vsechny moznosti, nenastavit to, pak
>kam tato komponenta patri form, pagecontrol, tab, panel a groupbox),
>bohuzel tato se mi objevuje po uzavreni (formclose) formulare a pri
>krokovani (i pres F7) je dalsim krokem skok na 'end.' v hlavnim
>projektovem souboru (abych upresnil terminologii, minim tim ten, kde
>jsou jen uses a application.initform a application.createform...)
> Dekuji za kazde posunuti spravnym smerem...
> MO
>
>
Jedi Debug
[*] MaReK Penguin Olsavsky <orsm(zv)centrum(tec)cz> - 25.1.2006 15:54:25
Ladislav Stary napsal(a):
> Do projektu je potreba pridat formular ExceptDlg.pas, ktery najdes v
> adresari, kam sis nainstaloval Jedi komponenty.
>
> mam to v JVCL\jcl\examples\vcl\debugextension\dialog\ExceptDlg.pas
>
> Pak je potreba jeste v menu Project zatrhnout Insert JCL debug data
^^^ Tak koukam, ze jsem zkousel spravne a reseni, na ktere jsem narazil
bylo spravne, az na detail, ze moje chyba je timto procesem nezachycuje.
Aplikace pada s hlasenim "'prohlOdes' has no parent window" pri jejim
ukoncovani, kde prohlOdes je jvMemo, dokonce, kdyz pres F7/F8 krokuji,
tak k teto chybe se nedostanu. Aby to nebylo jednoduche, tak to memo
neni primo na formulari, ale form1 -> pagecontrol -> Tab -> panel (byly
potreba verikalni scrolly, nevejdou se tam ty data jinak :-() ->
groupbox -> a_teprve_zde_toto_memo. Nastavil bych jej v formCreate
metode, ale zatim jsem neprisel na to kam a jak...
Velmi dekuji
MaReK Olsavsky
--
- --
MaReK "Penguin" Olsavsky
PHP Voodoo
private mail: orsm(zv)centrum(tec)cz
private web: http://orsm.wz(tec)cz
ICQ#: 160 178 925; MSN: orsm(zv)centrum(tec)cz; Skype: Penguin_007
tel.: +420-603-519-650; +420-775-154-689 (775-1-LINUX)
Jedi Debug
[*] Petr Fiser <petr.fiser(zv)3jservis(tec)cz> - 25.1.2006 16:08:26
Jednou se mi stalo neco podobneho, je to uz davno, ale mam dojem ze to bylo
zpusobene tim, ze po zavreni formulare jsem se jeste snazil na ten prvek
pristupovat a neco v nem menit (nevedomne - delala to nejaka udalost).
Podivej se jestli nemas nejakou akci ktera se vola po zavreni formulare a
pouziva ten control.
Petr Fiser
> bohuzel tato se mi objevuje po uzavreni (formclose) formulare a pri
DateTimePicker - nastaveni formatu casu podle Long
[*] OnDraG <gebakonf(zv)centrum(tec)cz> - 25.1.2006 16:02:25
Podivej se sem:
http://www.swissdelphicenter.ch/en/showcode.php?id=355
Lebeda David napsal(a):
>> Pouzil jsem ve sve aplikaci komponentu DateTimePicker.
>> V *.dpr mam:
>> LongTimeFormat := 'hh:mm:ss';
>> abych se vyhnul problemum s ruznym nastavenim ruznych prostredi.
>
Ondra
msaccess a zabezpeceni
[*] Zbysek Hlinka <konference(zv)hlinka(tec)cz> - 25.1.2006 16:46:29
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Karel Vomacko
> Sent: Tuesday, January 24, 2006 11:38 AM
>
> rad bych se zeptal jestli se da nejak zabezpecit soubor mdb
> (proti smazani)? Popisu problem: Kompletni system hesel a
> uziv. uctu mam ve sve vlastni aplikaci v delphi a nechtel
> bych aby se museli nastavovat prava uzivatelu ve windows nebo
> v mdb souboru. Staci mi aby mdb byl na sitovem disku
> viditelny - proto aby do nej mohl program pristupovat pred
> ADO a aby se nedal smazat. Do mdb by mi pak stacilo jedno
> jmeno a heslo ktere budu pouzivat ve sve aplikaci. Nechtel
> bych taky aby se dal mdb otevrit a editovat primo na serveru
> - toto by melo jit jen z me aplikace.
Ja bych se zeptal z jine strany: Je Access nutnou a nezmenitelnou podminkou?
Pokud ne, proc nepouzijes nejakou SQL databazi? Zde totiz pracne resis
problemy, ktere pri spravnem pouziti SQL databaze vubec nenastanou.
Drzim se jednoho principu: Souborovou databazi vylucne na lokalni aplikace,
ktere nebezi sitove. Pokud to ma bezet na siti, pak se o horsi nez SQL
databazi vubec nebavim, a to ani se zakaznikem, ani zadavatelem.
S pozdravem
Zbysek Hlinka
E-mail: hlinka zavin. hlinka(tec)cz
Jedi Debug
[*] Petr Fiser <petr.fiser(zv)3jservis(tec)cz> - 25.1.2006 17:54:34
Tomu nerozumim "protoze jen jsem jej tam posadil, spustil formular pro
kontolu a opustil"
to jako to jvMemo?
A kdyz ho odstranis, tak to jede ok?
Nemu si to byt ActionManager staci treba Form.OnNeco a tam odkaz na prvek
Petr Fiser
> ^^^Jj, diky za tip, bude se to pekne blbe hledat, protoze jen jsem jej
> tam posadil, spustil formular pro kontolu a opustil... ActionManager
> nepou+AX4A7Q-v+AOE-m (neuvykl jsem mu). Je nejaky rozumny zpusob, jak
> odkrokovat
> kudy vsudy mi jeho ruseni jde?
Jedi Debug
[*] MaReK Penguin Olsavsky <orsm(zv)centrum(tec)cz> - 25.1.2006 17:34:32
Petr Fiser napsal(a):
> Jednou se mi stalo neco podobneho, je to uz davno, ale mam dojem ze to bylo
> zpusobene tim, ze po zavreni formulare jsem se jeste snazil na ten prvek
> pristupovat a neco v nem menit (nevedomne - delala to nejaka udalost).
> Podivej se jestli nemas nejakou akci ktera se vola po zavreni formulare a
> pouziva ten control.
^^^Jj, diky za tip, bude se to pekne blbe hledat, protoze jen jsem jej
tam posadil, spustil formular pro kontolu a opustil... ActionManager
nepou+AX4A7Q-v+AOE-m (neuvykl jsem mu). Je nejaky rozumny zpusob, jak odkrokovat
kudy vsudy mi jeho ruseni jde?
Dekuji moc
MO
Vyber radku tabulky pravym tlacitkem
[*] Petr Berek <sojokl(zv)seznam(tec)cz> - 25.1.2006 17:24:32
Zdravim,
potreboval bych vybrat radek tabulky, ale pri kliknuti pravym
tlacitkem mysi. Uz jsem zkousel v onMouseDown, nebo onMouseUp nastavit
button na levy, ale bez vysledku.
Potrebuju to udelat kvuli tomu, ze mam popupmenu a to mi reaguje na
prave tlacitko. A kdyz tam kliknu na nejakou polozku, tak potrebuju
provest akci prave jen s jednim radkem, kde bylo stiknute to prave
tlacitko, takze vyvolane popupmenu.
Muzete mi nekdo poradit?
Petr
Jedi Debug
[*] MaReK Penguin Olsavsky <orsm(zv)centrum(tec)cz> - 26.1.2006 08:45:36
Petr Fejfar napsal(a):
>
> Protoze jestli si to pamatuju, tak si to stezuje, ze nejake
> wincontrol nema parent window. Oni se ty handly
> totiz alokuji az po prepnuti na foreground.
>
> Jestli jo, tak se to da resit tak, ze
>
> # si alokaci handle vynutis volanim HandleNeeded
> pri konstrukci formulare
> # si testnes, jestli je HandleAllocated a kdyz ne, tak
> s tim prvekm nebudes operovat tj. nebudes ukladat
> jeho stav.
^^^Bingho, to bude ono, za chvili vyzkousim a kdyztak mailnu... Priznam
se, ze toto me fakt ani ve snu nenapadlo, hledal jsem porad, kde delam
chybu "ve viditelnem kodu"...
MO
--
- --
MaReK "Penguin" Olsavsky
PHP Voodoo
private mail: orsm(zv)centrum(tec)cz
private web: http://orsm.wz(tec)cz
ICQ#: 160 178 925; MSN: orsm(zv)centrum(tec)cz; Skype: Penguin_007
tel.: +420-603-519-650; +420-775-154-689 (775-1-LINUX)
Archiv
[*] Milos Jircik <m.jircik(zv)mjsoft(tec)cz> - 26.1.2006 08:17:33
Na http://www.delphi(tec)cz/hledani.asp
Milda.
-------
Kde najdu archiv konference?
Archiv
[*] Kalhous <kalhous(zv)eu(tec)cz> - 26.1.2006 07:51:32
Kde najdu archiv konference? Dik.
Z.Kalhous
Jedi Debug
[*] Petr Fejfar <development(zv)callnet(tec)cz> - 26.1.2006 07:21:29
MaReK Penguin Olsavsky wrote:
> Pole, kterych obsah si zde beru jsou standardni edity a neni s nimi
> problem. Nemate tip, jak vystopovat, ktera udalost se snazi do tohoto
> editacni prvku zapisovat, kdyz uz je tento prvek vlastne zrusen?
Hele, nemas nektery z tech prvku se kterymi operujes v OnClose
na "neviditelnem" tabu?
Nezmeni se ti chovani, kdyz pred zavrenim formulare projdes
vsechny Taby, aby se staly alespon jednou aktivni strankou
(chyba by nmela zmizet)?
###-
Protoze jestli si to pamatuju, tak si to stezuje, ze nejake
wincontrol nema parent window. Oni se ty handly
totiz alokuji az po prepnuti na foreground.
Jestli jo, tak se to da resit tak, ze
# si alokaci handle vynutis volanim HandleNeeded
pri konstrukci formulare
# si testnes, jestli je HandleAllocated a kdyz ne, tak
s tim prvekm nebudes operovat tj. nebudes ukladat
jeho stav.
HTH, pf
Jak poslat na server soubor pomoci SYNAPSE
[*] Petr Fejfar <development(zv)callnet(tec)cz> - 26.1.2006 07:11:28
delphi(zv)kopr(tec)cz wrote:
> HttpPostFile(URL, FieldName, FileName, Data, ResultData)
To by ti mohlo fungovat za predpokladu, ze si na strane serveru
naprogramujes
obsluhu toho post a ty tada si sam nekam ulozis.
Ale ty bys mel spis pouzit HTTP/1.1 a metodu PUT viz RFC 2616:
[...]
The fundamental difference between the POST and PUT requests is
reflected in the different meaning of the Request-URI. The URI in a
POST request identifies the resource that will handle the enclosed
entity. That resource might be a data-accepting process, a gateway to
some other protocol, or a separate entity that accepts annotations.
In contrast, the URI in a PUT request identifies the entity enclosed
with the request -- the user agent knows what URI is intended and the
server MUST NOT attempt to apply the request to some other resource.
[...]
My pouzivame ponekud zastaralou verzi Synapse a tam by to znamenalo
si vytvorit instanci THTTPSend a ten soubor odeslat metodou PUT
analogicky jako je to v metode HttpPostFile.
HTH, pf
Jedi Debug
[*] MaReK Penguin Olsavsky <orsm(zv)centrum(tec)cz> - 26.1.2006 07:07:28
Petr Fiser napsal(a):
> Tomu nerozumim "protoze jen jsem jej tam posadil, spustil formular pro
> kontolu a opustil"
> to jako to jvMemo?
> A kdyz ho odstranis, tak to jede ok?
> Nemu si to byt ActionManager staci treba Form.OnNeco a tam odkaz na prvek
>
Omlouvam se a upresnuji... Psal jsem trochu vyse, jak je aplikace
usporadana. Protoze jsem se s timto problemkem u jvMemo jiz setkal
(tenkrat jsem dal na formular standardni memo a bylo vyreseno, bohuzel,
ted mi usetri dost prace moznost nastavit omezeni na mnozstvi vlozeneho
textu a vzit pres pozn.text primo cely obsah), byl jsem opatrny a po
pridani teto komponenty na kyzene misto formulare jsem aplikaci zkusil
prelozit, spustit a opustit. Bohuzel, chyba se projevila okamzite.
Na hlavnim formulari aplikace mam nabalene pouze 2 events a to na
udalosti OnCreate a OnClose. Problem se tyka FormClose a ta jen uklada
posledni nastaveni do ini souboru:
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
var
nlIni : TIniFile;
begin
nlIni:= TIniFile.Create(GetCurrentDir + '\NakListy.ini');
try
nlIni.WriteString('data','idodescmr',odesIdCmr.Text);
nlIni.WriteString('data','idprijcmr',prijIdCmr.Text);
nlIni.WriteString('data','idodescim',odesIdCim.Text);
nlIni.WriteString('data','idprijcim',prijIdCim.Text);
nlIni.WriteInteger('program','lastpage',PageControl1.ActivePageIndex);
finally
nlIni.Free;
end;
if(isFullScreen=True) then begin
HTaskBar:=FindWindow('Shell_TrayWnd',nil);
SystemParametersInfo (97, Word (False), (zv)OldVal, 0);
EnableWindow(HTaskBar,True);
ShowWindow(HTaskbar,SW_SHOW);
end;
end;
Pole, kterych obsah si zde beru jsou standardni edity a neni s nimi problem.
Nemate tip, jak vystopovat, ktera udalost se snazi do tohoto editacni
prvku zapisovat, kdyz uz je tento prvek vlastne zrusen? Mohu to nechat
byt, protoze se mi to jinde, nez pri ukonceni aplikace pri soucasne
bezicich Delphi neprojevi (to jsem uz zkousel), ale je to dost neciste
reseni...
S pozdravem a velikymi diky
MaReK Olsavsky
--
- --
MaReK "Penguin" Olsavsky
PHP Voodoo
private mail: orsm(zv)centrum(tec)cz
private web: http://orsm.wz(tec)cz
ICQ#: 160 178 925; MSN: orsm(zv)centrum(tec)cz; Skype: Penguin_007
tel.: +420-603-519-650; +420-775-154-689 (775-1-LINUX)
Jak poslat na server soubor pomoci SYNAPSE
[*] delphi(zv)kopr(tec)cz - 26.1.2006 06:33:26
V demu jsem neco nasel, ale nepodarilo se mi to odeslat, pouze mi to psalo
nejake hlaseni do memo.
Co vlasne delam:
na lokalnim pocitaci naskenuji nejaky dokument, ktery prevedu do pdf a tento
soubor potrebhuji nakopirovat na web (dejme tomu ze na:
http://www.xyz(tec)cz/pdf)
var
URL, FieldName, FileName: string;
Data: TFileStream;
ResultData: TStrings;
begin
URL := 'http://www.xyz(tec)cz/pdf';
FieldName := 'zkouska';
FileName := 'c:\zkouska.pdf';
Data := TFileStream.Create(FileName, fmOpenRead or fmShareDenyWrite);
ResultData := Tstrings.Create;
If HttpPostFile(URL, FieldName, FileName, Data, ResultData)
Then OK...
Else noOK...;
End;
Kde zadam Host, Pass apod.
Diky za pomoc,
Nepotrebuji simulaci na localhost ale poslat cosi nekam na web.
Pavel ZIDEK
> Chci pomoci Synapse poslat soubor na www server, neco jako obdoba
> FtpPutFile.
Pokud treba chces nasimulovat posilani souboru pomoci weboveho
formulare, pak se podivej na funkci HttpPostFile...
----------------------------------------
I am using the free version of SPAMfighter for private users.
It has removed 1286 spam emails to date.
Paying users do not have this message in their emails.
Try www.SPAMfighter.com for free now!