Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
Osobni slozky - MS Outlook
[*] Milan Schembera <milan(zv)missoftware(tec)cz> - 30.10.2001 22:09:23
Zdravim,
nezkouseli ste nekdo nekdy programove (z D5) sahat do "Outlook Dnes" v MS
Outlooku 2000 ? Nikde jsem nenasel zadnou dokumentaci a chtel bych si tam
zobrazit (krome toho, co tam uz standardne je) neco svyho dalsiho .
Ma nekdo link nebo priklad nebo podobne ?
S pozdravem a pranim hezkeho dne
Milan Schembera
MISSOFTWARE Lanskroun
hot-line 0608/944444
tel. 0467/521555, 0467/520141
http://www.missoftware(tec)cz
mailto:info(zv)missoftware(tec)cz
Zobrazovanie PCX a prehravanie VOC (WAV)
[*] Jaroslav Popluhar <delphi1(zv)acc.sk> - 30.10.2001 22:21:31
Potreboval by som komponenety alebo kniznice na %subj%.
VOC - 8bitovy samplovany zvuk, stary format od Creative Labs
Vie niekto poradit, kde zacat, ale FREE?
Jaro
---
Odch�dzaj�ca spr�va neobsahuje v�rusy.
Skontrolovan� antiv�rusov�m syst�mom AVG (http://www.grisoft(tec)cz).
Verzia: 6.0.286 / V�rusov� datab�za: 152 - d�tum vydania: 9. 10. 2001
Unit - proc?
[*] Petr <DelphiForum(zv)seznam(tec)cz> - 31.10.2001 05:39:58
Pokud by jsi svuj priklad upravil asi takto :
Unit MyMessage; // obsahuje jen jednu funkci
uses .....
Interace
Function DefMessageDlg(......): integer // z 1001 tipu
implementation
Function DefMessageDlg(......): integer // z 1001 tipu
begin
......
end;
tak to musi jit.
Petr Jurik, Spravce site, programator
COMET System s.r.o.
1.Maje 1220
756 61 Roznov pod Radhostem
tel. 0651/653990
fax. 0651/653993
http://www.cometsystem(tec)cz
ICQ# : 119119215
> Hello, muze mi nekdo vysvetlit proc?
>
> Udelal sem si
> Unit MyMessage; // obsahuje jen jednu funkci
> uses .....
>
> Interace
> Type
> ***** Neco=class(...)
> Function DefMessageDlg(......): integer // z 1001 tipu
>
> implementation
> Function DefMessageDlg(......): integer // z 1001 tipu
> begin
> ......
> end;
>
> proc tam musi byt ta deklarace class ? nerozumim tomu, stejne ji nanic
> nepotrebuji. Ale bez ni mi to neprelozi.
>
> e-mail : valentapat(zv)volny(tec)cz
> ICQ: 54152896
>
>
>
> OT: DOS keyboard pod Win2000
[*] Jaroslav Popluhar <delphi1(zv)acc.sk> - 31.10.2001 06:01:21
Zdravim vsetkych,
pokial pouzivate este stale DOS programy pod Win2000,
iste ste si vsimli, ze po ich spusteni je implicitne zvolena
lokalna klavesnica (CZ/SK).
US = Ctrl-Alt-F1
CZ/SK = Ctrl-Alt-F2
Ako mozem dosiahnut, aby:
a) nebol pre DOS app ziadny MS-DOS keyb. driver aktivny
b) DOS app. startovala s US klavesnicou ako default
Dik, za pomoc.
Jaro
---
Odch�dzaj�ca spr�va neobsahuje v�rusy.
Skontrolovan� antiv�rusov�m syst�mom AVG (http://www.grisoft(tec)cz).
Verzia: 6.0.286 / V�rusov� datab�za: 152 - d�tum vydania: 9. 10. 2001
---
Odch�dzaj�ca spr�va neobsahuje v�rusy.
Skontrolovan� antiv�rusov�m syst�mom AVG (http://www.grisoft(tec)cz).
Verzia: 6.0.286 / V�rusov� datab�za: 152 - d�tum vydania: 10. 10. 2001
Jak dostat aplikaci do popredi?
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 31.10.2001 06:04:58
Musis si v aplikaci nadefinovat reakci na zpravu a z te instance,
kterou zkousis spustit a kde testujes, zda jiz jina instance bezi
zpravu odesilas bezici instanci.
Ta zareaguje na zpravu a provede Application.Restore, popr.
Application.BringToFront.
Tohle spolehlive chodi na vsech verzich Windows
------
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
30.10.2001 L. Filip:
> Toto jsem jiz zkousel, ale se stejnm efektem.
>> Skus z druhej instancie poslat tej prvej svoju spravu (WM_USER + xx) a v
>> prvej instancii pri jej prijati pouzit Application.Restore;
>> Application.BringToFront; tieto metody obsahuju volania spominanych API +
>> este cosi navyse, co Ti tam mozno chyba. Neskusal som to.
>>
>> HTH
>> TOndrej
OT: DOS keyboard pod Win2000
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 31.10.2001 07:06:55
DOS aplikaci staruj v davkou, do ktere pridas pred vlastni aplikaci
mode con cp select=437
kb16 US
------
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
31.10.2001 Jaroslav Popluhar:
> Zdravim vsetkych,
> pokial pouzivate este stale DOS programy pod Win2000,
> iste ste si vsimli, ze po ich spusteni je implicitne zvolena
> lokalna klavesnica (CZ/SK).
> US = Ctrl-Alt-F1
> CZ/SK = Ctrl-Alt-F2
> Ako mozem dosiahnut, aby:
> a) nebol pre DOS app ziadny MS-DOS keyb. driver aktivny
> b) DOS app. startovala s US klavesnicou ako default
> Dik, za pomoc.
> Jaro
> ---
> Odch�dzaj�ca spr�va neobsahuje v�rusy.
> Skontrolovan� antiv�rusov�m syst�mom AVG (http://www.grisoft(tec)cz).
> Verzia: 6.0.286 / V�rusov� datab�za: 152 - d�tum vydania: 9. 10. 2001
> ---
> Odch�dzaj�ca spr�va neobsahuje v�rusy.
> Skontrolovan� antiv�rusov�m syst�mom AVG (http://www.grisoft(tec)cz).
> Verzia: 6.0.286 / V�rusov� datab�za: 152 - d�tum vydania: 10. 10. 2001
Unit - proc?
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 31.10.2001 07:07:38
> Unit MyMessage; // obsahuje jen jednu funkci
> uses .....
>
> Interace
> Type
> ***** Neco=class(...)
> Function DefMessageDlg(......): integer // z 1001 tipu
>
> implementation
> Function DefMessageDlg(......): integer // z 1001 tipu
> begin
> ......
> end;
>
> proc tam musi byt ta deklarace class ? nerozumim tomu, stejne ji
> nanic nepotrebuji. Ale bez ni mi to neprelozi.
>
No - neni nekde v implementation zapomenute {$R *.dfm}? Ale to
asi nebude ono. V tom pripade bude potreba konkretneji popsat, co
znamena, ze to neprelozi. Protoze unity poskytujici jen funkce
nejsou problem, v tom musi byt neco jineho.
David Lebeda
OT: service pod WIN NT40
[*] Commanche <komurka(zv)myto(tec)cz> - 31.10.2001 07:19:24
Zdravim,
mam program (hotovy) a potreboval bych aby mi bezel jako service.
Nevim jak to udelat (pokud to vubec jde).
Diky za radu
Commanche
DOS keyboard pod Win2000
[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 31.10.2001 07:37:47
a ja se prida a doplnim dotaz:
> Ako mozem dosiahnut, aby:
> a) nebol pre DOS app ziadny MS-DOS keyb. driver aktivny.
> b) DOS app. startovala s US klavesnicou ako default.
c) DOS okno pouzivalo stejny rozlozeni jako wokna.
protoze, kdyz pisu v delfach, potom potrebuju neco udelat ve fandu, tak
mam hromadu preklepu a desne me to zpomaluje. ve FARu (console aplikace)
mi normalne wokeni rozlozeni funguje, ale v dos aplikacich uz ne (asi ze
bezi pod command.com-em, ci co).
dekuji Petr Palicka aka PeC(zv)
CU onTheFutureOfMatrix
MatriX.CyberSpace.Cz
wwW.nYx.Cz
/~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
|[smtp:petr.palicka(zv)atlas(tec)cz]|
|[smtp:peca(zv)email(tec)cz] |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~/
----------------------------------------
Zprava neobsahuje viry, kontrolu provedl
mocny antivirovy nastroj FDISK + MKFS
TIdTime z Indy a proxy
[*] Robert Plz�k <rpvp(zv)vagnerplast(tec)cz> - 31.10.2001 07:45:25
Zdrav�m,
nev�te nekdo, jak presvedcit TIdTime z Indy komponent aby to dokazalo jit
prez proxy (login, password a port)?
Robert Plzak
ICQ: 71733706
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.292 / Virov� b�ze: 157 - datum vyd�n�: 26.10.2001
OT: DOS keyboard pod Win2000
[*] Karel Horky <horky.karel(zv)quick(tec)cz> - 31.10.2001 08:01:18
Ahoj, tyto prikazy dopln do bataku, kterym aplikaci spoustis. Blizsi
info k "mode" je v Helpu k W2k:
mode con cp select=437
kb16 us
------
S pozdravem Karel Horky
horky.karel(zv)quick(tec)cz
IB6.0.1, IBX 4.42, W2K/SP1, D5Ent.
===== Puvodni zprava =====
Napsal Jaroslav Popluhar, <mailto:delphi1(zv)acc.sk>
> Ako mozem dosiahnut, aby:
> a) nebol pre DOS app ziadny MS-DOS keyb. driver aktivny
> b) DOS app. startovala s US klavesnicou ako default
Ini ve stringlistu
[*] Martin Dietl <dietl(zv)4use(tec)cz> - 31.10.2001 08:02:33
>A to je soucast D5 (promin blbou otazku :-) )?
Jiste, ale sorry za zmateni nazvu. Spravne je to TMemIniFile, unit Inifiles.
Objekt ma metody na cteni polozek vsech typu.
Pak je jeste TIniFile, ale ten pracuje primo se souborem. Na rozsahlejsi INI
je lepsi ten prvni, protoze prohledavani INI je sekvencni.TIdTime z Indy a proxy
[*] Gebauer Lukas <gebylist(zv)mlp(tec)cz> - 31.10.2001 08:04:27
> nev�te nekdo, jak presvedcit TIdTime z Indy komponent aby to dokazalo
> jit prez proxy (login, password a port)?
Neni lepsi sahnout po presnejsim protokolu NTP ci SNTP? Pokud
by sis na to vybral implementaci ze Synapse, tak ta ma kompletni
podporu SOCKS5 proxy. (tedy i na UDP protokol...) ;-)
-- Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
WEB: http://www.ararat(tec)cz/synapse - Synapse Delphi and Kylix TCP/IP Library
Jak zjistit pozice kurzoru na plose
[*] Pavel ZIDEK <delphi(zv)kopr(tec)cz> - 31.10.2001 08:53:36
Zdravim,
jak hledam (1001 tipy, seznam konference), nikde nic.
Potrebuji zjistit pozici kurzoru na plose, resp. na Formu, Editu... v
souradnicich plochy.
Diky Pavel
----- KOPR software -----
Pavel ZIDEK
http://www.kopr(tec)cz, kopr(zv)kopr(tec)cz, delphi(zv)kopr(tec)cz
Programovy stisk klavesy
[*] David Hrbac <hrbac.conf(zv)seznam(tec)cz> - 31.10.2001 09:01:26
Ahoj,
projdi to Spyem nebo WinSight32 a najdi si handle toho okna a posleze a pak
mu poslel jenom sendmessage o stisku klavesy ctrl+q.
David
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of David Kraina
Sent: Tuesday, October 30, 2001 9:16 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Programovy stisk klavesy
Nazdar, mam dlouhodoby problem - potrebuji mit vlastni program na pozadi,
ktery mi v urcitych casov�ch intervalech bude simulovat stisk CTRL+Q. Chci
aby muj program oklamal aplikaci na popredi a podal ji hlasku byla stisknuta
klavesa. Na to je prikaz keybEvent, ktery ale umi stiskout klavesu pouze
jednu (nebo v�c, jak ?). Budu vdecny za jakoukoliv odpoved, je to velmi
prioritni. Diky.
service pod WIN NT40
[*] David Hrbac <hrbac.conf(zv)seznam(tec)cz> - 31.10.2001 09:02:19
Ahoj,
tak to tak jednoduse nejde, musel bys to prapsat, aby to bylo systemove, ale
jestli chces jednoduche reseni, tak ResKitu je utilitka srvany a ta umi
spoustet programy jako service.
David
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
> Behalf Of Commanche
> Sent: Wednesday, October 31, 2001 7:19 AM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: OT: service pod WIN NT40
>
>
> Zdravim,
> mam program (hotovy) a potreboval bych aby mi bezel jako service.
> Nevim jak to udelat (pokud to vubec jde).
>
> Diky za radu
>
> Commanche
>Jak zjistit pozice kurzoru na plose
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 31.10.2001 09:21:48
Mouse.CursorPos
Pak funkce ClientToScreen a ScreenToKlient
------
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
31.10.2001 Pavel ZIDEK:
> Zdravim,
> jak hledam (1001 tipy, seznam konference), nikde nic.
> Potrebuji zjistit pozici kurzoru na plose, resp. na Formu, Editu... v
> souradnicich plochy.Jak zjistit pozice kurzoru na plose
[*] Ladislav Fitz <ladislav.fitz(zv)kodytek(tec)cz> - 31.10.2001 09:24:02
> Potrebuji zjistit pozici kurzoru na plose
Mouse.CursorPos
Jak zjistit pozice kurzoru na plose
[*] Ing. Jarom�r Sola� <solar(zv)magion(tec)cz> - 31.10.2001 09:27:01
> Zdravim,
> jak hledam (1001 tipy, seznam konference), nikde nic.
> Potrebuji zjistit pozici kurzoru na plose, resp. na Formu, Editu... v
> souradnicich plochy.
z WinAPI helpu:
The GetCursorPos function retrieves the cursor's position, in screen
coordinates.
The ScreenToClient function converts the screen coordinates of a specified
point on the screen to client coordinates.
S pozdravem
Ing. Jaromir Solar (jaromir.solar(zv)magion(tec)cz)
Magion system a.s. (http://www.magion(tec)cz)
tel./fax :0657/614 289
Jak zjistit pozice kurzoru na plose
[*] Ondrej Kelle <O.Kelle(zv)digitalpublishing.de> - 31.10.2001 09:31:33
> Potrebuji zjistit pozici kurzoru na plose, resp. na Formu, Editu... v
> souradnicich plochy.
Mozes pouzit Mouse.CursorPos.
Ak uz poznas poziciu kurzora v suradniciach nejakej kontrolky (napr. pri
OnMouseMove apod.), potom mozes pouzit ClientToScreen na prepocitanie do
suradnic obrazovky.
HTH
TOndrej
Programovy stisk klavesy
[*] Ondrej Kelle <O.Kelle(zv)digitalpublishing.de> - 31.10.2001 09:39:45
> Nazdar, mam dlouhodoby problem - potrebuji mit
> vlastni program na pozadi, ktery mi v urcitych
> casov�ch intervalech bude simulovat stisk
> CTRL+Q. Chci aby muj program oklamal aplikaci
> na popredi a podal ji hlasku byla stisknuta
> klavesa. Na to je prikaz keybEvent, ktery ale
> umi stiskout klavesu pouze jednu (nebo v�c,
> jak ?). Budu vdecny za jakoukoliv odpoved, je
> to velmi prioritni. Diky.
Skus unitu sndkey32.pas na Delphi CD, je tam funkcia SendKeys
HTH
TOndrej
Zdroje HTML z TWebBrowser
[*] Karel Kral <kralkonf(zv)purus(tec)cz> - 31.10.2001 09:39:52
D�ky za zdroj informaci. Vypada to velmi slibne. Vubec mne nenapadlo, ze
by ze mne mohl nekdo HTML parsovat (a ze je to nic moc prace).
> a neni jednodusi vyuzit uz parsovani HTML ktere provadi TWebBrowser ? Rozhrani
> je na toto pomerne bohate. Vice tady (http://www.euromind.com/iedelphi) a v
> MSDN - IHTMLDocument2 interface atd.
>
> Petr Vones
--
______________________________________________________
Karel Kral, informatik
Purus, s.r.o., Cezavy 627, 664 56 Blucina, CZ
Tel: 05/47235000, 0602/552432, Fax: 05/47231203
E-Mail: mailto:kral(zv)purus(tec)cz, WWW: http://www.purus(tec)cz
______________________________________________________
service pod WIN NT40
[*] Commanche <komurka(zv)myto(tec)cz> - 31.10.2001 09:58:45
Problem je, ze k tomu programku neni zdrojak...
Ta utilitka by mi stacila, kde ji sezenu, pls.
Commanche
(mailto:milos(zv)komurka(tec)cz)
>Ahoj,
>tak to tak jednoduse nejde, musel bys to prapsat, aby to bylo
>systemove, ale
>jestli chces jednoduche reseni, tak ResKitu je utilitka srvany a ta umi
>spoustet programy jako service.
>David
Jak zamenit sloupce a radky?
[*] ing. Pavel Zilinec <zilinec(zv)email(tec)cz> - 31.10.2001 10:14:42
Nevim, jestli to dobre chapu, ale asi chces neco takoveho:
select d.popissloupce, t.Hodnota, t.RadekTabulky
from Tabulka t
left outer join Description d on d.TableName = 'Tabulka' and d.ColName = 'Hodnota'
where (podminka pro omezeni toho radku v konkretni tabulce)
Jen jsi nenapsal, jak si predstavujes, ze se to bude volat. Ted je to vlastne postavene napevno
pro tabulku Tabulka. Pokud to budes chtit mit variabilni pres parametry, budes muset delat dynamicke dotazy
nebo to rovnou poskladat v delphi a volat pres TQuery
------
ing. Pavel Zilinec
mailto:zilinec(zv)email(tec)cz
30.10.2001 borkovec(zv)email(tec)cz:
> Vazeni,
> byl bych velice vdecen za radu, pripadne i za naznak reseni v nasledujicim: mam tabulku DESCRIPTIONS, ve ktere je seznam vsech tabulek a jejich sloupcu v databazi. (Struktura: id, tablename,
> colname, popissloupce). Chci naplnit dvousloupcovy grid, kde v prvnim sloupci je seznam vsech popisu sloupcu tabulek (hodnoty sloupce popissloupce v DESCRIPTIONS) a ve druhem jejich hodnoty z
> odpovidajici, skutecne tabulky - samozrejme pro jednu konkretni polozku te skutecne tabulky. Oba sloupce by mela asi vracet SP s parametrem, ktery identifikuje radek ze skutecne tabulky. prostredi
> MSSQL2000.
> P.S. neco takoveho
> select DESCRIPTION.popissloupce, TABULKA.(hodnota toho sloupce) from ....
ADO a MS SQL - INDEXY
[*] Erik Salaj <winsoft(zv)stonline.sk> - 31.10.2001 10:23:49
> mam MS SQL 7.0 a tabulku do ktere pristupuji ADOTable nebo ADODataSet vzdy
> kdyz vsak nastiv jmeno indexu objevi se hlaska "Objek nebo
zprostredkovatel
> nemohou tuto operaci provest".
> Nevite nekdo kde by mohla byt chyba?
SQL server si sam rozhoduje ake indexy pouzije.
Erik
kodovani - Excel
[*] jsramek(zv)kodys(tec)cz - 31.10.2001 10:32:36
Ahoj,
mam soubor excelu, ktery mam propojeny pres ODBC. Data ulozena v
tabulce excelu maji takovyto charakter. Prvni atribut tabulky je napriklad v
cestine, druhy v rustine. Kdyz si ta data zobrazim v aplikaci, tak texty v
rustine jsou nahrazeny znaky "?" a texty v cestine jsou OK. Je zde asi
problem s kodovou strankou.
Dik za rady,
Jakub.Kylix a terminalove aplikace
[*] Tomas Grepl <delphi(zv)kapsw(tec)cz> - 31.10.2001 10:46:27
Rad bych se zeptal, zda je mozne pomoci Kylixu jednoduse vytvaret
terminalove aplikace, cili aplikace bezici v textovem rezimu (bez potreby
grafickeho prostredi) ?
Pokud ano, tak bych rad vedel, jestli existuji nejake knihovny pro praci s
vystupem na terimaly (podporujici funkce podobne napr. WriteConsoleXXX,
ScrollConsoleScreenBuffer, FillConsoleOutputXXX v konzolovych aplikacich ve
Windows) a pro podporu vstupu z klavesnice a mysi.
Existuji nekde mista na webu, kde by se teto problematice nekdo venoval ?
Tomas
service pod WIN NT40
[*] Ales Radikovsky <radik(zv)allstar(tec)cz> - 31.10.2001 11:10:51
> Zdravim,
> mam program (hotovy) a potreboval bych aby mi bezel jako service.
> Nevim jak to udelat (pokud to vubec jde).
Zkus http://www.firedaemon.com/
Ales
AccessDB, SQL a viacriadkovy text
[*] Pavol Stolc <pstolc(zv)sc.sknet.sk> - 31.10.2001 11:39:53
Zapisujem data do Access databazy pomocou SQL prikazu "Insert...". Tabulka
obsahuje pole Remark typu Memo do ktoreho potrebujem zapisat viacriadkovy
text.
Bohuzial neviem ako to napisat, aby vlozeny text bol aj zobrazeny vo
viacerych riadkoch. Uvediem priklad:
Insert Into Table (ID,Name,Remark) Values (1,"Nazov","1.riadok<CO DAM
SEM?>2.riadok")
Zapisovanie dat pomocou SQL prikazov je podmienkou. Poradi niekto?
Dik, Pavol Stolc
pstolc(zv)sc.sknet.sk
Jak zjistit pozice kurzoru na plose
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 31.10.2001 12:18:29
On 31 Oct 2001 at 8:53, Pavel ZIDEK wrote:
> Zdravim,
> jak hledam (1001 tipy, seznam konference), nikde nic.
> Potrebuji zjistit pozici kurzoru na plose, resp. na Formu, Editu... v
> souradnicich plochy. Diky Pavel
Zkus radeji help a funkci GetCursorPos.
S pozdravem
Zbysek Hlinka
Phone: 0603 551 282
AccessDB, SQL a viacriadkovy text
[*] Delphi Michal.Michal <delphi-konference(zv)bcpraha(tec)com> - 31.10.2001 12:20:57
Ahoj,
ja bych tam dal vbCrLf (nebo-li Chr(13)+Chr(10) )
Michal
> Zapisujem data do Access databazy pomocou SQL prikazu "Insert...".
Tabulka
> obsahuje pole Remark typu Memo do ktoreho potrebujem zapisat
viacriadkovy
> text.
>
> Bohuzial neviem ako to napisat, aby vlozeny text bol aj zobrazeny vo
> viacerych riadkoch. Uvediem priklad:
>
> Insert Into Table (ID,Name,Remark) Values (1,"Nazov","1.riadok<CO DAM
> SEM?>2.riadok")
>
> Zapisovanie dat pomocou SQL prikazov je podmienkou. Poradi niekto?
>
> Dik, Pavol Stolc
> pstolc(zv)sc.sknet.sk
>
>
OT:DLL a Pascal
[*] Zden�k Sv�en - 31.10.2001 12:45:52
Ahoj lidickove, obzvlaste vy, kdoz jeste stale chcete/musite pouzivat
pascal.
Tim, ze uz spise pracuji v Delphi nez v Pascalu, tak ztracim orientaci v
tom, co si muzu v Pascalu dovolit a co ne.
Kdyz svuj program z Turbo Pascalu provozuju pod windows, mam moznost
pouzivat DLL napsane treba v delphi? Lze nejak volat API funkce?
Neexistuje nekde nejaka konference pro Pascal pametniky?
Diky za odpoved.
Zdenek S.Modalni formular v Kylixu
[*] Radim Kunz <privat(zv)casestudio(tec)com> - 31.10.2001 12:46:53
Ahoj,
zjitil jsem, ze pokud zavru modalni formular v
Kylixu, nevyvola se ani OnClose ani OnCloseQuery.
Coz je pro me dost velky problem, nemuzu osetret
nektere veci, OnDestroy uz je pozde.
Delam nekde chybu ?
A jeste, jak zakazat minimalizaci modalniho formulare ?
Zakazal jsem mu minimalizacni tlactiko, ale to tam furt je.
Radim
Kylix a terminalove aplikace
[*] Gebauer Lukas <gebylist(zv)mlp(tec)cz> - 31.10.2001 13:19:35
> Rad bych se zeptal, zda je mozne pomoci Kylixu jednoduse vytvaret
> terminalove aplikace, cili aplikace bezici v textovem rezimu (bez
> potreby grafickeho prostredi) ?
To se dela uplne stejne jako konzolove aplikace v delphi...
> Pokud ano, tak bych rad vedel, jestli existuji nejake knihovny pro
> praci s vystupem na terimaly (podporujici funkce podobne napr.
> WriteConsoleXXX, ScrollConsoleScreenBuffer, FillConsoleOutputXXX v
> konzolovych aplikacich ve Windows) a pro podporu vstupu z klavesnice a
> mysi.
netusim... ;-/ Ja si zatim vystacil s Writeln. ;-)
-- Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Synapse Delphi and Kylix TCP/IP Lib.corba
[*] cis <cis(zv)atlas(tec)cz> - 31.10.2001 13:25:04
Hi,
zkousel nekdo udelat nejaky projekt s corbou v D6 . Zkousel jsem priklady i
vlastni projekt, ale bohuzel jsem neuspel pri prekladu (chzbi mu nejake
unity) a u prikladu to prelozi ale hlasi mi to ze chzbi dll. V instalace
jsem nastavil visibroker 4. Nevite kde je zakopany pes?
Diky
alda
Zapis do registru
[*] Jan Dvorak <dvorak(zv)szu(tec)cz> - 31.10.2001 13:29:17
Prosim opet o pomoc zacatecnikovi. Zapisuji do registru timto postupem
var Reg: TRegistry;
const key = '\Software\HPS';
begin
Reg:= TRegistry.Create;
try
Reg.Access:= KEY_ALL_ACCESS;
Reg.RootKey:= HKEY_LOCAL_MACHINE;
if not Reg.OpenKey(Key,False) then
begin
Reg.CreateKey(Key);
Reg.Access:= KEY_ALL_ACCESS; // to jsem pridal ze zoufalstvi
Reg.WriteDate('Installed', Date);
............
finally
Reg.CloseKey;
Reg.Free;
end;
Slozka se vytvori, ale pri pokusu o zapis na posledni radce me to skonci na
vyjimce ERegistryException.
Vcera mi to fugovalo (W98, D5S), dnes je to neprustrelne. Poradi nekdo?
Dekuji predem Ing. Jan Dvorak
Nastaveni pristupu v DCOM na Win 2000
[*] Jind�ich Nikodem <nikodem(zv)kh-kinetic(tec)cz> - 31.10.2001 13:57:43
Dobr� den,
v nastaven� DCOM (dcomcnfg.exe) jsem u v�choz�ho nastaven� v ��sti v�choz�
konfigura�n� pr�va odebral v#echny u�ivatele v�etn� administr�tora.
Chci p�idat nov� u�ivatele, ale syst�m mi ohl�s� odm�tnut� p��stupu. Jsem
p�ihl�#en jako administrator.
Nevite jak to lze obej�t, tak abych mohl znovu p�idat administratora a
ostatn� u�ivatele?
Pou��v�m Windows 2000 Server.
P�edem d�kuji
Jind�ich Nikodem
nikodem(zv)kh-kinetic(tec)cz
Jak zamenit sloupce a radky?
[*] borkovec(zv)email(tec)cz - 31.10.2001 14:08:11
TEMER ONO, ALE:
- realizovat hodnotu sloupce by asi mela funkce
- pak by volani z aplikace (cili naplneni vysledneho gridu ci pohledu) vypadalo takto:
select DESCRIPTION.popissloupce, FCE(DESCRIPTION.tabulka, DESCRIPTION.sloupec) FROM
DESCRIPTION where DESCRIPTION.tabulka = konkretni jmeno tabulky
- funkce FCE vr�t� aktu�ln� hodnotu sloupce z tabulky).
- ale i tak diky, snad uz se k tomu blizim.
Skvela vec je sysname (jako dat. typ)
--- P�vodn� zpr�va ---
Od: "ing. Pavel Zilinec" <zilinec(zv)email(tec)cz>
Datum: 31.10.2001 10:38:06
Nevim, jestli to dobre chapu, ale asi chces neco takoveho:
select d.popissloupce, t.Hodnota, t.RadekTabulky
from Tabulka t
left outer join Description d on d.TableName = 'Tabulka' and d.ColName = 'Hodnota'
where (podminka pro omezeni toho radku v konkretni tabulce)
Jen jsi nenapsal, jak si predstavujes, ze se to bude volat. Ted je to vlastne postavene napevno
pro tabulku Tabulka. Pokud to budes chtit mit variabilni pres parametry, budes muset delat dynamicke dotazy
nebo to rovnou poskladat v delphi a volat pres TQuery
------
ing. Pavel Zilinec
mailto:zilinec(zv)email(tec)cz
30.10.2001 borkovec(zv)email(tec)cz:
> Vazeni,
> byl bych velice vdecen za radu, pripadne i za naznak reseni v nasledujicim: mam tabulku DESCRIPTIONS, ve ktere je seznam vsech tabulek a jejich sloupcu v databazi. (Struktura: id, tablename,
> colname, popissloupce). Chci naplnit dvousloupcovy grid, kde v prvnim sloupci je seznam vsech popisu sloupcu tabulek (hodnoty sloupce popissloupce v DESCRIPTIONS) a ve druhem jejich hodnoty z
> odpovidajici, skutecne tabulky - samozrejme pro jednu konkretni polozku te skutecne tabulky. Oba sloupce by mela asi vracet SP s parametrem, ktery identifikuje radek ze skutecne tabulky. prostredi
> MSSQL2000.
> P.S. neco takoveho
> select DESCRIPTION.popissloupce, TABULKA.(hodnota toho sloupce) from ....
---
Nokia Game je tady. Jsi pripraven?
Zaregistruj se na http://www.nokiagame.com/
IDispatch
[*] Petr Mohapl <p.mohapl(zv)nemstbk(tec)cz> - 31.10.2001 14:12:16
Ahoj,
podle meho IDispatch je zakladni typ pro dual interface (pristup jak pres
late binding, tak pres early binding - tedy pouziti TLB). V kazdem pripade
by ti mel fungovat typ Variant. Info najdes v helpu k Variant, Automation
objects nebo Dispatch interface.
Petr
----- Original Message -----
From: "Peter Surovy" <psurovy(zv)uevora.pt>Kylix a terminalove aplikace
[*] Radek Cervinka <radek.cervinka(zv)centrum(tec)cz> - 31.10.2001 14:17:36
Ahoj,
pro rychle operace je tam knihovna ncurses a freepascal ma k ni importni
knihovnu
http://www.freepascal.org/cgi-bin/cvsweb/fpc/packages/ncurses/
Radek
> Rad bych se zeptal, zda je mozne pomoci Kylixu jednoduse vytvaret
> terminalove aplikace, cili aplikace bezici v textovem rezimu (bez
> potreby grafickeho prostredi) ?
To se dela uplne stejne jako konzolove aplikace v delphi...
> Pokud ano, tak bych rad vedel, jestli existuji nejake knihovny pro
> praci s vystupem na terimaly (podporujici funkce podobne napr.
> WriteConsoleXXX, ScrollConsoleScreenBuffer, FillConsoleOutputXXX v
> konzolovych aplikacich ve Windows) a pro podporu vstupu z klavesnice a
> mysi.Kylix a terminalove aplikace
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 31.10.2001 14:41:40
Haj hou!
On 31 Oct 2001, at 10:46, Tomas Grepl wrote:
> Rad bych se zeptal, zda je mozne pomoci Kylixu jednoduse vytvaret
> terminalove aplikace, cili aplikace bezici v textovem rezimu (bez potreby
> grafickeho prostredi) ?
Samozrejme, stejne jako v Delphi. Viz menu New->Console
Application
> Pokud ano, tak bych rad vedel, jestli existuji nejake knihovny pro praci s
> vystupem na terimaly (podporujici funkce podobne napr. WriteConsoleXXX,
> ScrollConsoleScreenBuffer, FillConsoleOutputXXX v konzolovych aplikacich ve
> Windows) a pro podporu vstupu z klavesnice a mysi.
Podivej se na knihovnu ncurses. AFAIK v Kylixu nejsou prelozene
hlavicky (ale treba se pletu, ja je nehledal :), ale v ng jsem zachytil,
ze je nekdo prelozil. Zkus zadat do googlu +Kylix +ncurses a
uvidis.
> Existuji nekde mista na webu, kde by se teto problematice nekdo venoval ?
To je takova trivialita, ze pochybuji. Ale zkus zadat do googlu
+Kylix (+console nebo +ncurses nebo +daemon) a uvidis. Neco se
urcite najde :)
S pozdravem
Pavel Cisar
Mobil: 0724 281429
http://www.ibphoenix(tec)cz
Vse co potrebujete pro Firebird a InterBase
Modalni formular v Kylixu
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 31.10.2001 14:44:08
Haj hou!
On 31 Oct 2001, at 12:46, Radim Kunz wrote:
> zjitil jsem, ze pokud zavru modalni formular v
> Kylixu, nevyvola se ani OnClose ani OnCloseQuery.
> Coz je pro me dost velky problem, nemuzu osetret
> nektere veci, OnDestroy uz je pozde.
> Delam nekde chybu ?
Pokud to nefunguje, tak je to chyba. Zkuste dat do googlu +Kylix
+OnClose, zda se s tim nesetkal uz nekdo jiny.
> A jeste, jak zakazat minimalizaci modalniho formulare ?
> Zakazal jsem mu minimalizacni tlactiko, ale to tam furt je.
Tohle je vec windows manageru a neda se moc ovlivnit. Nektere
WM vam dovoli tlacitka ovlivnit, jine nikoliv.
S pozdravem
Pavel Cisar
Mobil: 0724 281429
http://www.ibphoenix(tec)cz
Vse co potrebujete pro Firebird a InterBase
OT: Poradte mi s Excelem
[*] Hurricane <hurricane(zv)quick(tec)cz> - 31.10.2001 14:55:20
Zdravim
Mam v Excelu 2K dvojrozmernou tabulku i s ciselnym popisem radku a sloupcu
(tento radek a sloupec nejsou soucasti dat). Dale mam dve jine bunky, ve
kterych muzou byt pouze jedna z popisku rady respektive ve druhe bunce
popisek sloupce. A na zaklade zadani hodnot do techto dvou bunek potrebuji
ziskat treti hodnotu, ktera se nachazi prave v te tabulce na souradnicich
zadanych dvema vstupnimi bunkami. Doufam, ze jsem se jasne a pochopitelne
vyjadril. Poradte plz, docela to specha.
Diky.
Hurricane
OT Matrox G550
[*] Hurricane <hurricane(zv)quick(tec)cz> - 31.10.2001 14:58:21
Zdravim
Odkdy existuje redukce z DVI-I na SVGA 15???? Spis se podivej po jinych
verzich tehle karty. Pochybuju, ze nevyrabej 2x15PIN.
Hurricane
----- Original Message -----
Je tam obrovska spousta redukci. Takze lze zapojit i dva klasicke monitory.
S pozdravem
Mirek Drejcek
*********** REPLY SEPARATOR ***********
>opet se omlouvam za dotaz na dva monitory, ale Matrox zacal prodavat Matrox
>Millenium G550.
>Malem jsem tu kartu koupil, ale narazil jsem na problem. Tato karta ma dva
>ruzne konektory D-sub15 pin a DVI-I, a to na klasicky monitor a na plochy
OT: Poradte mi s Excelem
[*] Kralik Michal <xkrali07(zv)stud.fee.vutbr(tec)cz> - 31.10.2001 15:15:14
Podivej se na napovedu k funkci INDEX. Jestli si dobre vzpominam, tak se
tam urcujecislo radku, sloupce a oblast a vysledkem je hodnota v bunce na
dane pozici.
M.Kralik
On Wed, 31 Oct 2001, Hurricane wrote:
> popisek sloupce. A na zaklade zadani hodnot do techto dvou bunek potrebuji
> ziskat treti hodnotu, ktera se nachazi prave v te tabulce na souradnicich
> zadanych dvema vstupnimi bunkami. Doufam, ze jsem se jasne a pochopitelne
> vyjadril. Poradte plz, docela to specha.
>
> Diky.
> Hurricane
>
DOS keyboard pod Win2000
[*] Hurricane <hurricane(zv)quick(tec)cz> - 31.10.2001 15:16:00
Zdravim
> mam hromadu preklepu a desne me to zpomaluje. ve FARu (console aplikace)
> mi normalne wokeni rozlozeni funguje, ale v dos aplikacich uz ne (asi ze
> bezi pod command.com-em, ci co).
Presne tak. FAR je Win32 PE aplikace jako kazdy jiny okenni program, kdezto
PCFand je DOSovy. To spolu nema vubec nic spolecnyho.
> c) DOS okno pouzivalo stejny rozlozeni jako wokna.
To asi tezko, jelikoz DOS (i konzole) pouziva jako cestinu CP-852, kdezto
windowsy maji CP-1152. Musel bys to sjednotit na jeden CP. Jak na to ale
netusim, jelikoz o CP-1152 pod DOSem jsem jeste neslysel. Takhle je to u
W9x, ted si matne vzpominam, nema nahodou W2K CP-1152 i v konzoli? O W2K
jsem jenom cetl. Takze abych sem nezanasel nejake bludy.
Hurricane
Poradi polozek v QRep
[*] Zaplik <zaplik(zv)volny(tec)cz> - 31.10.2001 15:35:30
Pratele, zajimalo by mne, v jakem poradi jsou obsluhovany udalosti OnPrint
treba u QRLabelu.
Mam sestavu s vetsim mnozstvim polozek.U prvni si v udalosti OnPrint naplnim
nejakou promennou daty. Tato data chci u dalsi polozky v OnPrint nacist(mezi
tim probehne nejaky vypocet). Potiz je v tom, ze OnPrint druhe polozky se
provede drive, nez prvni a cely vypocet vlastne neprobehne. Nevite nahodou
jak to poskladat?
Zaplik
zaplik(zv)volny(tec)cz
transfer dat z FOXPRO do MSSQL 7
[*] <kuchar(zv)unicodesys(tec)cz> - 31.10.2001 15:46:35
caute
pomoci komponenty BATCHMOVE prevadim nanecisto data z foxky do MSSQL, radove
se jedna o nekolik desitektisic tabulek, problem je ale vtom, ze vzdy v
neuricitych intervalech dochazi k zhrouceni programu s chybovou hlaskou ze
na adrese xxx v knihovne IDAPI32.DLL doslo k chybe, nevite co s tim, pro
uplnost prikladam cas kodu
----------------------------------------------------------------------------
-------------
inc(cislotabulky);
if cislotabulky>10 then begin if batchmove1<>nil then batchmove1.free;
batchmove1:=tbatchmove.Create(self);
batchmove1.Name:='batchmove1';
batchmove1.AbortOnKeyViol:=true;
batchmove1.AbortOnProblem:=true;
batchmove1.Destination:=table2;
batchmove1.Mode:=batcopy;
batchmove1.Source:=table1;
batchmove1.Transliterate:=true;
cislotabulky:=0;
end;
batchmove1.Execute;
----------------------------------------------------------------------------
-------------
vysvetleni : kdyz pouziji tenhle kod zjistil jsem ze to vydrzi
pretransformovat o neco vic tabulek nez kdyz menim jenom
batchmove1.Destination, batchmove1.Source ale tenhle zapis se mi ani trosku
nelibi, dik za vsechny rady
Drawing to TColumnTitle
[*] Roland Turcan <rolo(zv)sedas.sk> - 31.10.2001 15:54:15
Zdravim!
Ako namalujem na TCOlumnTitle, chcem tam dostat oznacenie ako je momentalne
zoradeny (ACS,DESC).
Dakujem
S pozdravom
Roland Turcan - amatersky programator
D5Pro, Firebird 1.0, IBX4.62, Win2000Pro/CZ, Win98CZSE
Zakaz zmeny sirky TColumn - pokus II
[*] Roland Turcan <rolo(zv)sedas.sk> - 31.10.2001 15:56:46
Zdravim!
Ako by som zakazal zvacsovanie TColumn, ale potrebujem aby sa dali
prehadzovat tak ako pri Option:=dgColumnResize.
Dakujem
S pozdravom
Roland Turcan - amatersky programator
D5Pro, Firebird 1.0, IBX4.62, Win2000Pro/CZ, Win98CZSE
Poradi polozek v QRep
[*] Lstiburek Pavel <Lstiburek(zv)ceb(tec)cz> - 31.10.2001 16:08:05
Ahoj,
lepsi bude pouzit udalost BeforPrint na prislusnem bandu, zde je zajisteno,
ze probehne jako prvni pred onprint komponent.
Pavel
> Pratele, zajimalo by mne, v jakem poradi jsou obsluhovany
> udalosti OnPrint
> treba u QRLabelu.
> Mam sestavu s vetsim mnozstvim polozek.U prvni si v udalosti
> OnPrint naplnim
> nejakou promennou daty. Tato data chci u dalsi polozky v
> OnPrint nacist(mezi
> tim probehne nejaky vypocet). Potiz je v tom, ze OnPrint
> druhe polozky se
> provede drive, nez prvni a cely vypocet vlastne neprobehne.
> Nevite nahodou
> jak to poskladat?
>
> Zaplik
> zaplik(zv)volny(tec)cz
>
> OT Matrox G550
[*] "Mirek Drej�ek" <drejcek(zv)schkocr(tec)cz> - 31.10.2001 17:12:39
Netvrdim, ze tomu nejak rozumim, ale na jedne strance (svethardware(tec)cz) byla recenze dotycne karty a pod jednim obrazkem napsano toto: Obr. 4 � Redukce DVI � VGA 15 pin.
Tak nevim komu mam verit.
Mirek Drejcek
*********** REPLY SEPARATOR ***********
On 31.10.2001 at 14:58 Hurricane wrote:
>Zdravim
>
>Odkdy existuje redukce z DVI-I na SVGA 15???? Spis se podivej po jinych
>verzich tehle karty. Pochybuju, ze nevyrabej 2x15PIN.
>
>Hurricane
>
>----- Original Message -----
>
>Je tam obrovska spousta redukci. Takze lze zapojit i dva klasicke monitory.
>S pozdravem
>Mirek Drejcek
>
>*********** REPLY SEPARATOR ***********
>
>>opet se omlouvam za dotaz na dva monitory, ale Matrox zacal prodavat Matrox
>>Millenium G550.
>>Malem jsem tu kartu koupil, ale narazil jsem na problem. Tato karta ma dva
>>ruzne konektory D-sub15 pin a DVI-I, a to na klasicky monitor a na plochy
Nastaveni pristupu v DCOM na Win 2000
[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 31.10.2001 18:50:19
Nastaveni defaultnich prav DCOMu jsou v ceste
HKLM\SOFTWARE\Microsoft\Ole jako binarni
data pod jmenem DefaultLaunchPermission a
DefaultAccessPermission.
Nastaveni prav k jednotlivym DCOM serverum jsou
v ceste HKCR\AppID\{prislusne clsid}opet jako
binarni data, tentokrat pod jmenem LaunchPermission
a AccessPermission.
Tipnul bych si ze binarni data maji v obou pripadech
stejnou strukturu (jsou to v podstate jenom SIDy),
takze by snad mohlo stacit nastavit si je v nekterem
ze serveru a zkopirovat do vetve s defaulty pod
jmenem s predponou Default.
HTH
Martin Schayna
----- Original Message -----
From: "Jind�ich Nikodem" <nikodem(zv)kh-kinetic(tec)cz>> v nastaven� DCOM (dcomcnfg.exe) jsem u v�choz�ho nastaven� v ��sti v�choz�
> konfigura�n� pr�va odebral v#echny u�ivatele v�etn� administr�tora.
> Chci p�idat nov� u�ivatele, ale syst�m mi ohl�s� odm�tnut� p��stupu. Jsem
> p�ihl�#en jako administrator.
> Nevite jak to lze obej�t, tak abych mohl znovu p�idat administratora a
> ostatn� u�ivatele?
> Pou��v�m Windows 2000 Server.
Advanced Delphi Developer's Guide to ADO
[*] 3D-imenision <3dimension(zv)seznam(tec)cz> - 31.10.2001 19:23:39
Chtel jsem zeptat zda nemate s touto knihou zkusenosti a zda nevite kde bych
ji u nas koupil. Borland sro jsme uz zkousel.
Ovladani hlasitosti u MediaPlayeru
[*] Martin #d�rsk� <zdary(zv)seznam(tec)cz> - 31.10.2001 20:38:37
Potrebuju ovladat hlasitost u prehravani hudby, ale nechci ovlivnit
ostatni Mediaplayery na formulari, takze waveOutSetVolume nevyhovje.
Pisu to v Deplphi 6
Dik za radu
Zdary(zv)Seznam.Cz
______________________________________________________________________
Hledani lidi a jejich e-mailu: http://www.lide(tec)cz
Modalni formular v Kylixu
[*] HTK Pro s.r.o. <delphi(zv)htkpro(tec)cz> - 31.10.2001 20:49:04
>zjitil jsem, ze pokud zavru modalni formular v
>Kylixu, nevyvola se ani OnClose ani OnCloseQuery.
>Coz je pro me dost velky problem, nemuzu osetret
>nektere veci, OnDestroy uz je pozde.
>Delam nekde chybu ?
Dobry den,
chybu dela Borland, udalost se skutecne nevola a navic jsou v CLX dalsi
chyby tykajici se modalnich formularu (a pak samozrejme desitky dalsich chyb
kvuli kterym je CLX respektive Kylix prozatim tak trochu nepouzitelny pro
ostre nasazeni u zakazniku). Zakladni oprava uvedeneho problemu je na
http://freeclx.sourceforge.net.
Lze take a je to mozna v nekterych pripadech vhodnejsi prepsat si celou
obsluhu udalosti QEventType_Close v metode EventFilter, tak jsme to udelali
v nasem specifickem pripade my.
S pozdravem
Jan Kadlecek
HTK Pro s.r.o.
www.htkpro(tec)cz
www.dev-shop(tec)cz
>
>A jeste, jak zakazat minimalizaci modalniho formulare ?
>Zakazal jsem mu minimalizacni tlactiko, ale to tam furt je.
>
>Radim
>
>
>OT Matrox G550
[*] Alex AC <alexoft(zv)razdva(tec)cz> - 31.10.2001 21:53:56
Vcera koupena G550, bulk, baleni obsahuje kartu s DVI a HD-15 konektory, CD, a redukci z DVI na HD-15 (analog VGA). Mam pripojene dva anolog monitory. Chodi. Viz www.matrox.com.
Alex
ac(zv)wo(tec)cz > Odkdy existuje redukce z DVI-I na SVGA 15???? Spis se podivej po jinych
> verzich tehle karty. Pochybuju, ze nevyrabej 2x15PIN.
>
>
> >opet se omlouvam za dotaz na dva monitory, ale Matrox zacal prodavat Matrox
> >Millenium G550.
> >Malem jsem tu kartu koupil, ale narazil jsem na problem. Tato karta ma dva
> >ruzne konektory D-sub15 pin a DVI-I, a to na klasicky monitor a na plochy
OT Matrox G550
[*] Hurricane <hurricane(zv)quick(tec)cz> - 31.10.2001 22:02:11
Zdravim
Teoreticky to samotrejme mozne je, nicmene by to bylo vcelku slozite a
drahe. Vzdyt DVI-I je ciste digitalni a SVGA-15 je analog. Ten externi
prevodnik by musel mit vlastni napajeni. To se spis na tu kartu strkaji
dalsi male karticky s ruznymy konektory, ne?
Howgh, stejnak o tom moc nevim.
Hurricane
----- Original Message -----
Netvrdim, ze tomu nejak rozumim, ale na jedne strance (svethardware(tec)cz) byla
recenze dotycne karty a pod jednim obrazkem napsano toto: Obr. 4 � Redukce
DVI � VGA 15 pin.
Tak nevim komu mam verit.OT: Re: DOS keyboard pod Win2000
[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 31.10.2001 22:23:18
31.10.2001 Hurricane:
>> c) DOS okno pouzivalo stejny rozlozeni jako wokna.
> To asi tezko, jelikoz DOS (i konzole) pouziva jako cestinu CP-852, kdezto
> windowsy maji CP-1152. Musel bys to sjednotit na jeden CP. Jak na to ale
> netusim, jelikoz o CP-1152 pod DOSem jsem jeste neslysel. Takhle je to u
> W9x, ted si matne vzpominam, nema nahodou W2K CP-1152 i v konzoli? O W2K
> jsem jenom cetl. Takze abych sem nezanasel nejake bludy.
CP-1152 ? Nechtel jsi rict spise 1250 ?
Problem je v rozlozeni klavesnice. Tam je bordel i v tom, kdyz si das
QWERTY a QWERTZ (o programatorske ani nemluvim). Klavesy s AltGr maji
uplne jiny vyznam.
------
Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
Zdroje HTML z TWebBrowser
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 31.10.2001 23:30:46
From: "Karel Kral" <kralkonf(zv)purus(tec)cz>
> D�ky za zdroj informaci. Vypada to velmi slibne. Vubec mne nenapadlo, ze
> by ze mne mohl nekdo HTML parsovat (a ze je to nic moc prace).
Ahoj,
jeden prakticky priklad pouziti TWebBrowseru v aplikaci najdes tady:
http://codecentral.borland.com/codecentral/ccweb.exe/listing?id=15754
a tady je diskuze venovana otazkam kolem jeho pouziti:
http://groups.yahoo.com/group/delphi-webbrowser
Petr Vones
Ovladani hlasitosti u MediaPlayeru
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 31.10.2001 23:32:44
From: "Martin �d�rsk�" <zdary(zv)seznam(tec)cz>
> Potrebuju ovladat hlasitost u prehravani hudby, ale nechci ovlivnit ostatni
> Mediaplayery na formulari, takze waveOutSetVolume nevyhovje.
Ahoj,
u MediaPlayeru vlozeneho jako ActiveX control ve tve aplikaci ?
Petr Vones
Advanced Delphi Developer's Guide to ADO
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 31.10.2001 23:53:41
From: "3D-imenision" <3dimension(zv)seznam(tec)cz>
> Chtel jsem zeptat zda nemate s touto knihou zkusenosti a zda nevite kde bych
> ji u nas koupil. Borland sro jsme uz zkousel.
Ahoj,
pochybuju ze neco takoveho u nas sezenes. Objednej si to pres Amazon apod,
obvykle to i s postovym vyjde levnejsi nez kdyby si to kupoval tady v obchode.
V nouzi muzes zkusit: http://www.starman.net
Petr Vones
Mate radi dotazniky ?
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 1.10.2001 01:07:10
Pokud ano, tak tady jeden takovy je:
http://community.borland.com/article/0,1410,27959,00.html
Petr Vones
Jak zjistit pozice kurzoru na plose
[*] Pavel ZIDEK <delphi(zv)kopr(tec)cz> - 1.10.2001 01:26:50
Asi vypadam, ze neumim cist help, ale doopravdy si nevim rady.
- GetCursorPos function mi dada pokazde jinou pozici
- Mouse.CursorPos plati pro mys
Potrebuji zjistit, kde se na plose nachazi NE kurzor musi, ale kde se
nachazi kursor, ktery OVLADAM klavesnici.
Snad to nekdo umi, ja si uz nevim rady. Vypocitavat kde je kursor, kde prave
edituji je nad meli lidske sily.
Diky Pavel
>
> > jak hledam (1001 tipy, seznam konference), nikde nic.
> > Potrebuji zjistit pozici kurzoru na plose, resp. na Formu, Editu... v
> > souradnicich plochy.
>
> z WinAPI helpu:
> The GetCursorPos function retrieves the cursor's position, in screen
> coordinates.
> The ScreenToClient function converts the screen coordinates of a specified
> point on the screen to client coordinates.
>
Jak zjistit pozice kurzoru na plose
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 1.10.2001 01:37:14
From: "Pavel ZIDEK" <delphi(zv)kopr(tec)cz>
> Potrebuji zjistit, kde se na plose nachazi NE kurzor musi, ale kde se
> nachazi kursor, ktery OVLADAM klavesnici.
Ahoj,
to pak neni kurzor ale caret. Podivej se na funkci GetCaretPos.
Petr Vones
Zakaz zmeny sirky TColumn - pokus II
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 1.10.2001 02:02:33
From: "Roland Turcan" <rolo(zv)sedas.sk>
> Ako by som zakazal zvacsovanie TColumn, ale potrebujem aby sa dali
> prehadzovat tak ako pri Option:=dgColumnResize.
Ahoj,
procedure TForm1.FormCreate(Sender: TObject);
begin
with TDrawGrid(DBGrid1) do
Options := Options - [goColSizing];
end;
Petr Vones
Jak zjistit pozice kurzoru na plose
[*] Pavel ZIDEK <delphi(zv)kopr(tec)cz> - 1.10.2001 02:20:41
Ahoj,
funkci GetCaretPos jsem nasel pro TCustomRightEdit. Ja to potrebuji ale pro
TEdit a TLabeledEdit. Musi ksakru neco existovat.
Diky za pomoc
Pavel ZIDEK
> > Potrebuji zjistit, kde se na plose nachazi NE kurzor musi, ale kde se
> > nachazi kursor, ktery OVLADAM klavesnici.
>
> to pak neni kurzor ale caret. Podivej se na funkci GetCaretPos.
>
> Petr Vones
>Jak zjistit pozice kurzoru na plose
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 1.10.2001 02:26:29
From: "Pavel ZIDEK" <delphi(zv)kopr(tec)cz>
> funkci GetCaretPos jsem nasel pro TCustomRightEdit.
Ahoj,
to neni funkce ale metoda tridy.
> Ja to potrebuji ale pro TEdit a TLabeledEdit. Musi ksakru neco existovat.
Podivej se na API funkci GetCaretPos.
Petr Vones
Jak zjistit pozice kurzoru na plose (2)
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 1.10.2001 02:30:21
From: "Pavel ZIDEK" <delphi(zv)kopr(tec)cz>
> Ja to potrebuji ale pro TEdit a TLabeledEdit. Musi ksakru neco existovat.
Ahoj,
u TEdit je to ve VCL take TCustomEdit.SelStart, pokud je to ono.
Petr Vones
Jak zjistit pozice kurzoru na plose
[*] Pavel ZIDEK <delphi(zv)kopr(tec)cz> - 1.10.2001 03:14:32
Uz to studuji,
takze mne ceka predelat komponentu, no aspon mam zase co delat, snad to do
rana vyresim, diky za namet. Zkusim to udelat obdobne jako u
TCustomRichEdit.GetCaretPos
Diky Pavel ZIDEK
> > funkci GetCaretPos jsem nasel pro TCustomRightEdit.
>
> to neni funkce ale metoda tridy.
>
> > Ja to potrebuji ale pro TEdit a TLabeledEdit. Musi ksakru neco
existovat.
>
> Podivej se na API funkci GetCaretPos.
>
> Petr Vones
Poradi polozek v QRep
[*] Michal Michal <delphi-konference(zv)bcpraha(tec)com> - 1.10.2001 05:30:35
Ahoj,
Ja bych se pridal do diskuze. Vite nekdo v jakem poradi se vyhodnocuji
udalosti (stacilo by na jednotlivych Bandech). Ja napr. potreboval mit
hlavicku sloupcu u SubDetailu na kazde nove strance. Tak jsem to nejak
zaonacil, aby se mi to tisklo, ale s hruzou jsem zjistil, ze na 2.
strance se mi pro prvni radek toho SubDetalu vyvolali udalosti drive nez
treba PageFooter pro stranku 1. a PageHeader pro stranku 2.
Otazka proto zni: Je mozne rici, ze udalosti daneho reportu budou v
nejakem pevnem poradi?
Dekuji
Michal
----- Original Message -----
From: "Lstiburek Pavel" <Lstiburek(zv)ceb(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, October 31, 2001 4:08 PM
Subject: RE: Poradi polozek v QRep
> Ahoj,
> lepsi bude pouzit udalost BeforPrint na prislusnem bandu, zde je
zajisteno,
> ze probehne jako prvni pred onprint komponent.
>
> Pavel
>
> > Pratele, zajimalo by mne, v jakem poradi jsou obsluhovany
> > udalosti OnPrint
> > treba u QRLabelu.
> > Mam sestavu s vetsim mnozstvim polozek.U prvni si v udalosti
> > OnPrint naplnim
> > nejakou promennou daty. Tato data chci u dalsi polozky v
> > OnPrint nacist(mezi
> > tim probehne nejaky vypocet). Potiz je v tom, ze OnPrint
> > druhe polozky se
> > provede drive, nez prvni a cely vypocet vlastne neprobehne.
> > Nevite nahodou
> > jak to poskladat?
> >
> > Zaplik
> > zaplik(zv)volny(tec)cz
> >
> >
Jak zjistit pozice kurzoru na plose
[*] Pavel ZIDEK <delphi(zv)kopr(tec)cz> - 1.10.2001 06:58:40
Po nekolika hodinach jsem zjistil, ze
GetCaretPos pro TEdit nelze jen tak lehce naprogramovat.
Zbyva mi jedinna moznost, a to vypocitat pozici
Pozice.X := Form1.Left + ????.Left + Edit1.Left;
ale ????.Left nevim z ceho se sklada.
Tak tedy potrebuji zjistit, na jakych objektech se nachazi muj TEdit,
napr. TEdit je na TScollBox1, a ten zas na TForm1. Jak zjistim na cem lezi
moje komponenta
Diky Pavel ZIDEK
> takze mne ceka predelat komponentu, no aspon mam zase co delat, snad to do
> rana vyresim, diky za namet. Zkusim to udelat obdobne jako u
> TCustomRichEdit.GetCaretPos
>
>
> > > funkci GetCaretPos jsem nasel pro TCustomRightEdit.
> >
> > to neni funkce ale metoda tridy.
> >
> > > Ja to potrebuji ale pro TEdit a TLabeledEdit. Musi ksakru neco
> existovat.
> >
> > Podivej se na API funkci GetCaretPos.
> >
> > Petr Vones
ZJEDNODUSENI Jak zamenit sloupce a radky?
[*] borkovec(zv)email(tec)cz - 1.10.2001 06:59:09
V podstate jde o toto:
selectem vybrat jeden radek tabulky a prevest ho na tabulku, kde v prvnim sloupci jsou jmena sloupcu a ve druhem jejich hodnoty. A je to.
---
Nokia Game je tady. Jsi pripraven?
Zaregistruj se na http://www.nokiagame.com/
Jak zjistit pozice kurzoru na plose
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 1.10.2001 07:25:36
> Tak tedy potrebuji zjistit, na jakych objektech se nachazi muj TEdit,
> napr. TEdit je na TScollBox1, a ten zas na TForm1. Jak zjistim na cem
> lezi moje komponenta
>
A neslo by to pomoci Parent? Pak jeho Parent atd., az dojdes na
form.
David Lebeda
Drawing to TColumnTitle
[*] Jiri Wendl, KSH-Data <wendl(zv)ksh-data(tec)cz> - 1.10.2001 08:08:15
> Ako namalujem na TCOlumnTitle, chcem tam dostat oznacenie ako je momentalne
> zoradeny (ACS,DESC).
Ahoj
Musis si prepsat DrawCell a vykreslit to tam rucne.
Musis ovsem vedet jak to je serazeny.
Preji hodne zdaru
Jirka
IB: Readcommitted nebo snapshot
[*] Jiri Wendl, KSH-Data <wendl(zv)ksh-data(tec)cz> - 1.10.2001 08:33:18
[P��loha v souboru: Ji�� Wendl.vcf]
Ahoj vsem
Mohli by jste mi poradit, ktere nastaveni transakce je vhodnejsi? viz Subj.
Predem diky za pomoc
Jirka
Osobni slozky - MS Outlook
[*] Jan Krizek <krizek(zv)vitasw(tec)cz> - 1.10.2001 08:35:31
Tomu MS rika Dashboard (jestli se nemylim) a jako priklad necht ti treba
poslouzi http://office.microsoft.com/downloads/2000/msnbcO2k.aspx, kde
se ti do teto stranky priradi zpravodajstvi MSNBC.
Jedna se o nahrazeni jinou HTML strankou, ktera mimo jine komunikuje s
rozhranim Outlooku, tedy zobrazuje ty stavajici veci ve sve reziji.
Honza +
> Zdravim,
>
> nezkouseli ste nekdo nekdy programove (z D5) sahat do
> "Outlook Dnes" v MS
> Outlooku 2000 ? Nikde jsem nenasel zadnou dokumentaci a chtel
> bych si tam
> zobrazit (krome toho, co tam uz standardne je) neco svyho dalsiho .
> ZEOS komponenty obecny dotaz
[*] Vladimir Michl <vladimir.michl(zv)hlubocky.del(tec)cz> - 1.10.2001 09:21:32
On Fri, 26 Oct 2001, Roman wrote:
> >ahoj,
> >uz jsem o ZEOS komponentach slysel nekolikrat a mam je i nekde doma na
> >vyzkouseni (zatim nebyl cas ;). mam tedy nekolik dotazu:
> >1/ cena a licence, tedy kde za kolik a jak s distribuci zakaznikum
> >(komercni, nekomercni, open aplikace).
>
> GNU GPL
Jenom takova poznamecka. Pokud je to komponenta a budete ji pouzivat ve
svem programu, pak by nejspise ten program mel take byt pod GPL, jinak se
pravdepodobne dostanete do sporu s GPL.
Pokud by ale ta komponenta byla pod LGPL (Lesser (po staru Library) GPL),
tak byste ji mohl pouzivat i v neGPL kodu.
Vlada Michl
-----------------------------------------
Vladim�r Michl <Vladimir.Michl(zv)hlubocky.del(tec)cz>
Del a.s.
Stroj�rensk� 38
���r nad S�zavou
pobo�ka Olomouck� 355
Hlubo�ky-Mari�nsk� #dol�
tel: 068/5353548
Jak zjistit pozice kurzoru na plose
[*] Pavel ZIDEK <delphi(zv)kopr(tec)cz> - 1.10.2001 09:37:42
Jak to myslis, udelej jakysi priklad jak zpetne zjistis na cem je dana
komponenta. Reseni by to bylo, ale nevim jak na to
Pavel
> > Tak tedy potrebuji zjistit, na jakych objektech se nachazi muj TEdit,
> > napr. TEdit je na TScollBox1, a ten zas na TForm1. Jak zjistim na cem
> > lezi moje komponenta
> >
>
> A neslo by to pomoci Parent? Pak jeho Parent atd., az dojdes na
> form.
>
> David Lebeda
Jak zjistit pozice kurzoru na plose
[*] Ota Maly <ota.maly(zv)volny(tec)cz> - 1.10.2001 09:56:11
Ahoj,
if MujEdit.Parent.Name = 'MujForm' then (Lezim na konkretni instanci jmenem
MujForm)
nebo treba
if MujEdit.Parent is TForm then (lezim na nejake instanci TForm nebo jeho
potomku)
Samozrejme muzes pouzit MujEdit.Parent.Parent.Parent.... ale musis je
postupne testovat na <>nil.
(Doufam, ze to je spravne, pisu to z hlavy :-)
Ota Maly
>
>
> Jak to myslis, udelej jakysi priklad jak zpetne zjistis na cem je dana
> komponenta. Reseni by to bylo, ale nevim jak na to
> Pavel
>
>
Komponenta
[*] Radek Janu� FSG <janus(zv)foresta(tec)cz> - 1.10.2001 10:09:29
Ahoj potreboval bych poradit ,
mam vlastni jednoduchou komponentu.Tato komponenta umi ve vybranem
StringGridu vytvorit ComboBox, ktery ma nastaveneho Parenta na ten
StringGrid.Chel bych odchytit event Onchange na tomto Comboboxu
ale nefunguje to (ComboBoxxxx.OnChange:=nejaka funkce;).Vse je prelozeno v
poradku bez chyb ale na
OnChange Comba to nereaguje.Stejne tak jsem pochodil s OnClick. K memu udivu
vsak OnEnter, OnExit ComboBoxu funguji bez problemu. Nesetkal jste se
nekdo s podobnou veci ?
Diky za radu Radek Janus Foresta SG a.s.Vsetin
Jak zjistit pozice kurzoru na plose
[*] Bohdan Voska <bohdan(zv)softok(tec)cz> - 1.10.2001 10:09:41
Ahoj,
na zjisteni formulare, bych radsi pouzil funkci GetParentForm.
Bohdan Voska
bohdan(zv)softok(tec)cz
> Ahoj,
>
>
> Samozrejme muzes pouzit MujEdit.Parent.Parent.Parent.... ale musis je
> postupne testovat na <>nil.
IB a zmeny struktury
[*] Radek KALA <Kala(zv)Atlas(tec)cz> - 1.10.2001 10:23:07
Ahoj, mam takovej dotaz
odladil jsem si nove funkce programu a ted jsem chtel dohrat
potrebne tabulky do ostre databaze.
Delam to za provozu, aspon jsem si myslel, ze se nemuze nic
stat, kdyz je to nova tabulka a nikam nema vazby,
vytvoril jsem novej ciselnik a definoval primary key,
pak jsem vytvoril novou tabulku a jeji primary key
no a nakonec jsem chtel vytvorit foreign key do toho ciselniku a
nelze protoze ho pry nekdo pouziva. To je ale blbost, nema kdo.
I kdyz se odpojim a znovu pripojim tak to neprojde. Musi se odpojit
uplne vsichni. pakarna. Nevite nekdo ma to nejake reseni?
Diky
S pozdravem Radek KALA
BetaControl, s.r.o.
Cerneho 58/60, 635 00
tlf. : + 420 5 4622 3491
fax : + 420 5 4622 3470
GSM : + 420 603 85 75 15
IB a zmeny struktury
[*] Tomas =?iso-8859-2?Q?Michal=EDk?= <michalik(zv)proca(tec)cz> - 01.10.2001 10:31:15
Ahoj,
pri tvorbe foreign key je bohuzel nutne byt jedinym pripojenym k
databazi (pocet pripojeni = 1). Kdysi davno si nekdo ulehcil praci a
zavedl tam takoveto omezeni :-(
Tom
Radek KALA wrote:
>
> vytvoril jsem novej ciselnik a definoval primary key,
> pak jsem vytvoril novou tabulku a jeji primary key
> no a nakonec jsem chtel vytvorit foreign key do toho ciselniku a
> nelze protoze ho pry nekdo pouziva. To je ale blbost, nema kdo.
> I kdyz se odpojim a znovu pripojim tak to neprojde. Musi se odpojit
> uplne vsichni. pakarna. Nevite nekdo ma to nejake reseni?
=================================
Tomas Michalik
ProCA, s. r. o.
V Luzich 818, Praha 4
Czech Republic
e-mail: michalik(zv)proca(tec)cz
tel: +420 2 67283446
IB: Readcommitted nebo snapshot
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 1.10.2001 10:32:53
From: "Jiri Wendl, KSH-Data" <wendl(zv)ksh-data(tec)cz>
To: "Konference DELPHI" <delphi-l(zv)clexpert(tec)cz>
Subject: IB: Readcommitted nebo snapshot
Date sent: Thu, 1 Nov 2001 08:33:18 +0100
Send reply to: delphi-l(zv)clexpert(tec)cz
> Mohli by jste mi poradit, ktere nastaveni transakce je vhodnejsi? viz
> Subj.
>
Ahoj,
mne pripada nejprirozenejsi pro beznou praci Read Commited. U
transakce snapshot plati, ze behem trvani teto transakce nevidi
pripadne selecty/updaty/delety provadene v ramci teto transakce
zadne zmeny, ktere byly commitovany jinou transakci, zatimco u
read commited transakce v kazdem selectu/updatu/deletu mas
prustupne vse, co do te doby nekdo commitoval. Zalezi na tom, co
delas, nejde snad ani tak o to, jestli je jedno horsi nebo lepsi.
David Lebeda
IB: Readcommitted nebo snapshot
[*] Tomas =?iso-8859-2?Q?Michal=EDk?= <michalik(zv)proca(tec)cz> - 01.10.2001 10:35:48
Ahoj,
ve zkratce: read commited pro normalni praci s daty, snapshot pro
deletrvajici procesy, kdy je dulezite, aby po celou dobu trvani mela
databaze stejnou podobu, jako pri startu onoho procesu (reporty atd.)
Tom
"Jiri Wendl, KSH-Data" wrote:
>
> Ahoj vsem
>
> Mohli by jste mi poradit, ktere nastaveni transakce je vhodnejsi? viz Subj.
>
> Predem diky za pomoc
>
> Jirka
=================================
Tomas Michalik
ProCA, s. r. o.
V Luzich 818, Praha 4
Czech Republic
e-mail: michalik(zv)proca(tec)cz
tel: +420 2 67283446
Jak zjistit pozice kurzoru na plose
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 1.10.2001 10:37:43
> Jak to myslis, udelej jakysi priklad jak zpetne zjistis na cem je dana
> komponenta. Reseni by to bylo, ale nevim jak na to Pavel
>
>
> > > Tak tedy potrebuji zjistit, na jakych objektech se nachazi muj
> > > TEdit, napr. TEdit je na TScollBox1, a ten zas na TForm1. Jak
> > > zjistim na cem lezi moje komponenta
> > >
> >
> > A neslo by to pomoci Parent? Pak jeho Parent atd., az dojdes na
> > form.
> >
> > David Lebeda
>
var
c: TComponent;
c := Edit1;
while c.Parent <> nil do
c := c.Parent;
//po skonceni cyklu je v c komponenta bez rodice, coz bude asi
form.
Ber to jako namet, co jsem mel na mysli, pisu to z hlavy a mozna
tento kod v teto podobe nebude fungovat, mozna to bude chtit
nejake pretypovani...nevim, je to proste jen naznak reseni.
David Lebeda
Sirka textu v TextOut
[*] Ji�� Kratochv�l����*��J�##!�)?���o� - 1.10.2001 10:42:07
-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1
DDV,
snazim se nejak elegantne vyresit nasledujici
problem:
Pomoci TCanvas.TextOut vypisuji nejaky retezec.
Ja bych potreboval, aby nezavidle na delce textu
retezec neprekrocil danou sirku. (Aby se vypsalo napr misto
"DlouhyText" jen "Dlou...")
Vim, ze je to dost konkretni pripad, a za asi do
konference nepatri, ale nemohu prijit na nejake
kloudne reseni ...
Diky vsem za pripadne odpovedi.
Jirka K.
-----BEGIN PGP SIGNATURE-----
Version: PGPfreeware 7.0.3 for non-commercial use <http://www.pgp.com>
iQA/AwUBO+EY6WH3x0A/dynEEQKcnwCg65whVWijNmWerh7iUmm2p2+8WrAAoKH1
EAGoXGWl8modPSCgvpNy2B0/
=LZHp
-----END PGP SIGNATURE-----
Komponenta
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 1.10.2001 10:43:50
> Ahoj potreboval bych poradit ,
> mam vlastni jednoduchou komponentu.Tato komponenta umi ve vybranem
> StringGridu vytvorit ComboBox, ktery ma nastaveneho Parenta na ten
> StringGrid.Chel bych odchytit event Onchange na tomto Comboboxu ale
> nefunguje to (ComboBoxxxx.OnChange:=nejaka funkce;).Vse je prelozeno v
> poradku bez chyb ale na OnChange Comba to nereaguje.Stejne tak jsem
> pochodil s OnClick. K memu udivu vsak OnEnter, OnExit ComboBoxu
> funguji bez problemu. Nesetkal jste se nekdo s podobnou veci ?
>
Mozna budu mimo, ale treba ne. Neni to tim, ze v komponente
mas obsluhu OnChange Comboboxu nejakou a pri vnejsim pouziti
teto komponenty znovu prirazujes OnChange? Pak by mohlo
pomoci nejprve tam volat inherited nebo uvnitr komponenty na
OnChange nic neveset a misto toho prekryt tu funkci v predkovi, ze
ktere je OnChange volano.
Je to jen napad, inspirace z problemu, ktery jsem resil
nedavno, nevim, zda jde o totez.
David Lebeda
Minimalni velikost komponenty
[*] Ji�� Kratochv�l����*��J�##!�)?���o� - 1.10.2001 10:46:00
-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1
DDV,
ted me napadla jeste jedna vec:
jde nejak specifikovat minimalni velikost komponenty?
S pozdravem JK
-----BEGIN PGP SIGNATURE-----
Version: PGPfreeware 7.0.3 for non-commercial use <http://www.pgp.com>
iQA/AwUBO+EZyWH3x0A/dynEEQIrIACfVlE5mF3xyWRU2Ka2ivNyTs0Qs10AoOI2
0f7U1GfDbScGd9Q1s/c13oye
=++8m
-----END PGP SIGNATURE-----
Constant expresion expected
[*] Jarda Jirava <listuj(zv)centrum(tec)cz> - 01.10.2001 11:53:29
Zdravim,
mam mensi problem s prelozenim aplikace.
Jedna se o maly program pro zpracovani nestrukturovanych dat.
Ale bohuzel mi nejde prelozit a konci s chybou Constant expresion
expected.
v kodu je
procedure ZpracujRadku(Radek: string; Zacni: integer; var Pozice:
integer)
var
Data: TStringList;
S: string;
begin
S := Copy(Radek,Zacni,Length(Radek));
case Pozice of
1:
Data := TStringList.Create();
Data.Add(S); // sem ukazuje compiler na chybu
FPos := FList.Add(Data);
Pozice := 2;
2:
Data := TStringList(FList.Items[FPos]);
Data.Add(S); // sem ukazuje compiler na chybu
end;
end;
pouze hruby nastin procedury, poradite co tam muze byt spatne?
D5Prof, W2000
Diky
Jarda
*****************
Jarda Jirava
(zv)
LiStuj
listuj(zv)centrum(tec)cz
^^^^^^^^^^^^^^^^^
SW development
^^^^^^^^^^^^^^^^^
*****************
Nokia Game je tady. Jsi pripraven?Zaregistruj se na http://user.centrum(tec)cz/redir.php?url=http://www.nokiagame.com
Sirka textu v TextOut
[*] Zden�k Sv�en - 1.10.2001 12:07:23
Delam to tak, ze si zjistim delku textu:
DelkaTextu:=Canvas.TextWidth('text')
pak zjsitim delku tri tecek: DelkaTecek:=Canvas.TextWidth('...')
Kdyz je DelkaTextu > PotrebnaSirka
tak odeberu z textu jedno pismenko a testuju, jestli
DelkaZkracenehoTextu+DelkaTecek <=PotrebnaSirka
V pripade, ze je podminka splnena, tak pak
Canvas.TextOut(ZkracenyText+'...')
a je zaruceno, ze se to vejde do pozadovane sirky.
Mozna je to zbytecne komplikovane. Jestli existuje jednodussi zpusob, rad se
priucim.
Bye.
Z.S.
> -----BEGIN PGP SIGNED MESSAGE-----
> Hash: SHA1
>
> DDV,
> snazim se nejak elegantne vyresit nasledujici
> problem:
>
> Pomoci TCanvas.TextOut vypisuji nejaky retezec.
> Ja bych potreboval, aby nezavidle na delce textu
> retezec neprekrocil danou sirku. (Aby se vypsalo napr misto
> "DlouhyText" jen "Dlou...")
>
> Vim, ze je to dost konkretni pripad, a za asi do
> konference nepatri, ale nemohu prijit na nejake
> kloudne reseni ...
>
> Diky vsem za pripadne odpovedi.
> Jirka K.
>
> -----BEGIN PGP SIGNATURE-----
> Version: PGPfreeware 7.0.3 for non-commercial use <http://www.pgp.com>
>
> iQA/AwUBO+EY6WH3x0A/dynEEQKcnwCg65whVWijNmWerh7iUmm2p2+8WrAAoKH1
> EAGoXGWl8modPSCgvpNy2B0/
> =LZHp
> -----END PGP SIGNATURE-----
>
>
>Constant expresion expected
[*] Blazek Jaroslav <Jaroslav.Blazek(zv)access-it(tec)cz> - 01.10.2001 12:12:26
Data := TStringList.Create();
Volani funkci, respektive tady je to konstruktor, takhle se volaji funkce v C
ma to byt
Data:=TStringList.Create;
Bc. Jaroslav Blazek
Access-IT Ceska Lipa
jaroslav.blazek(zv)access-it(tec)cz
www.access-it(tec)cz
+420605/813644
>>> listuj(zv)centrum(tec)cz 1.11.01 11:53 >>>
Zdravim,
mam mensi problem s prelozenim aplikace.
Jedna se o maly program pro zpracovani nestrukturovanych dat.
Ale bohuzel mi nejde prelozit a konci s chybou Constant expresion
expected.
v kodu je
procedure ZpracujRadku(Radek: string; Zacni: integer; var Pozice:
integer)
var
Data: TStringList;
S: string;
begin
S := Copy(Radek,Zacni,Length(Radek));
case Pozice of
1:
Data := TStringList.Create();
Data.Add(S); // sem ukazuje compiler na chybu
FPos := FList.Add(Data);
Pozice := 2;
2:
Data := TStringList(FList.Items[FPos]);
Data.Add(S); // sem ukazuje compiler na chybu
end;
end;
pouze hruby nastin procedury, poradite co tam muze byt spatne?
D5Prof, W2000
Diky
Jarda
*****************
Jarda Jirava
(zv)
LiStuj
listuj(zv)centrum(tec)cz
^^^^^^^^^^^^^^^^^
SW development
^^^^^^^^^^^^^^^^^
*****************
Nokia Game je tady. Jsi pripraven?Zaregistruj se na http://user.centrum(tec)cz/redir.php?url=http://www.nokiagame.com
Minimalni velikost komponenty
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 1.10.2001 12:13:42
From: "Ji�� Kratochv�l" <jiri.kratochvil(zv)webzin(tec)cz>
> ted me napadla jeste jedna vec:
> jde nejak specifikovat minimalni velikost komponenty?
Ahoj,
TControl.ConstrainedResize nebo TControl.Constraints
Petr Vones
Constant expresion expected
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 1.10.2001 12:18:56
From: "Jarda Jirava" <listuj(zv)centrum(tec)cz>
> procedure ZpracujRadku(Radek: string; Zacni: integer; var Pozice:
^ tady by melo byt jeste const
> integer)
> var
> Data: TStringList;
> S: string;
> begin
> S := Copy(Radek,Zacni,Length(Radek));
> case Pozice of
> 1:
begin
> Data := TStringList.Create();
^^ to tu nema co delat
> Data.Add(S); // sem ukazuje compiler na chybu
> FPos := FList.Add(Data);
> Pozice := 2;
end;
> 2:
begin
> Data := TStringList(FList.Items[FPos]);
> Data.Add(S); // sem ukazuje compiler na chybu
end;
> end;
> end;
Petr Vones
Constant expresion expected
[*] Blazek Jaroslav <Jaroslav.Blazek(zv)access-it(tec)cz> - 01.10.2001 12:20:15
Jo jeste sorry nevsiml jsem si te druhe hlasky
Konstruktor tridy TStringList nema zadne parametry....
Bc. Jaroslav Blazek
Access-IT Ceska Lipa
jaroslav.blazek(zv)access-it(tec)cz
www.access-it(tec)cz
+420605/813644
>>> listuj(zv)centrum(tec)cz 1.11.01 11:53 >>>
Zdravim,
mam mensi problem s prelozenim aplikace.
Jedna se o maly program pro zpracovani nestrukturovanych dat.
Ale bohuzel mi nejde prelozit a konci s chybou Constant expresion
expected.
v kodu je
procedure ZpracujRadku(Radek: string; Zacni: integer; var Pozice:
integer)
var
Data: TStringList;
S: string;
begin
S := Copy(Radek,Zacni,Length(Radek));
case Pozice of
1:
Data := TStringList.Create();
Data.Add(S); // sem ukazuje compiler na chybu
FPos := FList.Add(Data);
Pozice := 2;
2:
Data := TStringList(FList.Items[FPos]);
Data.Add(S); // sem ukazuje compiler na chybu
end;
end;
pouze hruby nastin procedury, poradite co tam muze byt spatne?
D5Prof, W2000
Diky
Jarda
*****************
Jarda Jirava
(zv)
LiStuj
listuj(zv)centrum(tec)cz
^^^^^^^^^^^^^^^^^
SW development
^^^^^^^^^^^^^^^^^
*****************
Nokia Game je tady. Jsi pripraven?Zaregistruj se na http://user.centrum(tec)cz/redir.php?url=http://www.nokiagame.com
Sirka textu v TextOut
[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 1.10.2001 12:21:36
Mam pocit ze TextOut (nebo nejaka jeho Ex varianta) umoznuje
zadat rect a flag, tusim neco jako Elipsis a tecky se tam udalaji
samy.
Martin Schayna
----- Original Message -----
From: "Ji�� Kratochv�l" <jiri.kratochvil(zv)webzin(tec)cz>> Pomoci TCanvas.TextOut vypisuji nejaky retezec.
> Ja bych potreboval, aby nezavidle na delce textu
> retezec neprekrocil danou sirku. (Aby se vypsalo napr misto
> "DlouhyText" jen "Dlou...")
Constant expresion expected
[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 1.10.2001 12:22:58
Ve variantach prikazu case ti chybi begin a end.
Martin Schayna
----- Original Message -----
From: "Jarda Jirava" <listuj(zv)centrum(tec)cz>
> S := Copy(Radek,Zacni,Length(Radek));
> case Pozice of
> 1:
> Data := TStringList.Create();
> Data.Add(S); // sem ukazuje compiler na chybu
> FPos := FList.Add(Data);
> Pozice := 2;
> 2:
> Data := TStringList(FList.Items[FPos]);
> Data.Add(S); // sem ukazuje compiler na chybu
> end;
Constant expresion expected
[*] CERMAK <CERMAK(zv)procom(tec)cz> - 1.10.2001 12:25:43
AHOJ
Chyby ti begin end v Case. viz kod. Jaromir Cermak
-----Original Message-----
From: Jarda Jirava [mailto:listuj(zv)centrum(tec)cz]
Zdravim,
mam mensi problem s prelozenim aplikace.
Jedna se o maly program pro zpracovani nestrukturovanych dat.
Ale bohuzel mi nejde prelozit a konci s chybou Constant expresion
expected.
v kodu je
procedure ZpracujRadku(Radek: string; Zacni: integer; var Pozice:
integer)
var
Data: TStringList;
S: string;
begin
S := Copy(Radek,Zacni,Length(Radek));
case Pozice of
1:begin //tu musi byt
Data := TStringList.Create();
Data.Add(S); // sem ukazuje compiler na chybu
FPos := FList.Add(Data);
Pozice := 2;
end; //tu musi byt
2:begin //tu musi byt
Data := TStringList(FList.Items[FPos]);
Data.Add(S); // sem ukazuje compiler na chybu
end; //tu musi byt
end;
end;Constant expresion expected
[*] Milan Tome� <Milan.Tomes(zv)haida(tec)cz> - 1.10.2001 12:29:23
Chtel bych se zeptat proc tam tyto zavorky nemaji byt. Ja jsem zil (a pracoval)
v domneni, ze je to uplne jedno (a praxe mi ukazala, ze to jedno skutecne je)
S pozdravem
Milan Tome#
Vedouc� v�vojov�ho t�mu Windows
Softwarehouse HAiDA s.r.o.
Nov� Bor
tel: 0424/722291, 0424/222284
email: Milan.Tomes(zv)haida(tec)cz
> > Data := TStringList.Create();
> ^^ to tu nema co delat
>
> Petr Vones
IB: Readcommitted nebo snapshot
[*] Jiri Wendl, KSH-Data <wendl(zv)ksh-data(tec)cz> - 1.10.2001 12:32:09
> mne pripada nejprirozenejsi pro beznou praci Read Commited. U
> transakce snapshot plati, ze behem trvani teto transakce nevidi
Ahoj
Ja osobne pouzivam taky read commited, ale pro jistotu jsem
se zeptal. Doufal jsem ze mi nekdo nerekne ze read commited je na prd
a nejlepsi je pouzivat snapshot.
Vsem diky
Jirka
Constant expresion expected
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 1.10.2001 12:38:26
From: "Milan Tome#" <Milan.Tomes(zv)haida(tec)cz>
> Chtel bych se zeptat proc tam tyto zavorky nemaji byt. Ja jsem zil (a
> pracoval) v domneni, ze je to uplne jedno (a praxe mi ukazala, ze to jedno
> skutecne je)
Ahoj,
z hlediska funkce (tedy ze se to prelozi) to jedno je. Ovsem neodpovida to
prilis standartum v Object Pascalu a je IMHO dobre dodrzovat urcitou
konzistenci v zapisu kodu.
Petr Vones
FB1 subselect vs join
[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 1.10.2001 12:46:10
ahoj,
narazil jsem na zajimavou vec. nasel jsem dotaz, kde byla hodnota z
ciselniku udelana jako poddotaz. tak jsem to prepsal v domeni, ze join
bude rychlejsi a cistsi reseni. jestli cistsi nevim, ale je to
pomalejsi. je jasne, ze cilem programatora je, mimo jine, psat rychly a
efektivni kod. takze me zajima, jakou to ma logiku, proc to tak je.
proste bych to chtel chovani SQL (konkretne FB1) pochopit do hlouky a
rozumet si s nim. mozna za to muze zmateny optimalizator, mozna
implementace, mozna je to zcela zrejem a pitvam se v blobostech.
kazdopadne jsem se chtel zeptat spis na nazor ostatnich a nejlepe, kdymi
mi nekdo vysvetlil proc se to tak chova. jinak je mi to burt a klidne
budu psat pro hodnoty z ciselniku subselecty misto joinu, ale prijde mi
to takovy prez ruku.
dotazy:
1/ s poddotazem:
select
A.RC, O.PJM, O.ADR, A.ADatum, A.Serie, A.ACislo,
A.AKS, A.CDil, A.JDil, A.Pozn,
(select NKC from CisAkcie where A.Serie=CisAkcie.Serie) as NKC,
S.ASpravce
from
Akcie A
left join Osoby O on O.RC = A.RC
left join Spravce S on A.Serie = S.Serie and A.ACislo = S.ACislo and
A.RC = S.RC
order by
A.Serie, A.ACislo
PLAN (CISAKCIE INDEX (RDB$PRIMARY17))
PLAN SORT (JOIN (JOIN (A NATURAL,O INDEX (RDB$PRIMARY1)),S INDEX
(SPRAVCE_RC_SERIE_ACISLO)))
2/ s joinem:
select
A.RC, O.PJM, O.ADR, A.ADatum, A.Serie, A.ACislo,
A.AKS, A.CDil, A.JDil, A.Pozn, CA.NKC, S.ASpravce
from
Akcie A
left join Osoby O on O.RC = A.RC
left join Spravce S on A.Serie = S.Serie and A.ACislo = S.ACislo and
A.RC = S.RC
left join CisAkcie CA on A.Serie = CA.Serie
order by
A.Serie, A.ACislo
PLAN SORT (JOIN (JOIN (JOIN (A NATURAL,O INDEX (RDB$PRIMARY1)),S INDEX
(SPRAVCE_RC_SERIE_ACISLO)),CA INDEX (RDB$PRIMARY17)))
dekuji Petr Palicka aka PeC(zv)
CU onTheFutureOfMatrix
MatriX.CyberSpace.Cz
wwW.nYx.Cz
/~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
|[smtp:petr.palicka(zv)atlas(tec)cz]|
|[smtp:peca(zv)email(tec)cz] |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~/
----------------------------------------
Zprava neobsahuje viry, kontrolu provedl
mocny antivirovy nastroj FDISK + MKFS
Modalni formular v Kylixu
[*] Radim Kunz <privat(zv)casestudio(tec)com> - 1.10.2001 12:51:04
>zjitil jsem, ze pokud zavru modalni formular v
>Kylixu, nevyvola se ani OnClose ani OnCloseQuery.
>Coz je pro me dost velky problem, nemuzu osetret
>nektere veci, OnDestroy uz je pozde.
>Delam nekde chybu ?
Dobry den,
chybu dela Borland, udalost se skutecne nevola a navic jsou v CLX dalsi
chyby tykajici se modalnich formularu (a pak samozrejme desitky dalsich chyb
kvuli kterym je CLX respektive Kylix prozatim tak trochu nepouzitelny pro
ostre nasazeni u zakazniku). Zakladni oprava uvedeneho problemu je na
http://freeclx.sourceforge.net.
Lze take a je to mozna v nekterych pripadech vhodnejsi prepsat si celou
obsluhu udalosti QEventType_Close v metode EventFilter, tak jsme to udelali
v nasem specifickem pripade my.
S pozdravem
Jan Kadlecek
-------------------
Nasel jsem ten patch na sourceforge, ale nejak mi nepasoval do
soucasnych zdrojaku. Vypada to jako patch na jiny patch.
Nebo je nejaky rozdil mezi FreeCLX a CLX z Kylixu Open ?
Nakonec jsem to opravil. A nasel jsem jim tam jeste jednu
chybicku, kterou asi neopravili. Asi bude nejlepsi pockat
na Kylix 2 SP1.
Radim
C++ kod v Delphi
[*] Blazek Jaroslav <Jaroslav.Blazek(zv)access-it(tec)cz> - 01.10.2001 12:51:28
Nevite nekdo jakym zpusobem by se dal do zdrojaku vlozit C++ zdrojak
Neco jako kdyz se vklada asm
Nebo to jde jen pres {$L 'myfile.obj'} - a jak potom pristupovat k metodam a promennym (jestli to vubec jde)
proti ........ pascalu nic nemam, ale jsem Ceckar a osud tomu chtel jinak, bych musel programovat v ...... pascalu.
Bc. Jaroslav Blazek
Access-IT Ceska Lipa
jaroslav.blazek(zv)access-it(tec)cz
www.access-it(tec)cz
+420605/813644
Constant expresion expected
[*] Filip Skalka <delphi(zv)atlascon(tec)cz> - 1.10.2001 12:55:01
Take by to slo: Drawtext s parametry DT_MODIFYSTRING a DT_END_ELLIPSIS.
Filip Skalka
----- Original Message -----
From: Jarda Jirava <listuj(zv)centrum(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, November 01, 2001 11:53 AM
Subject: Constant expresion expected
> Zdravim,
>
> mam mensi problem s prelozenim aplikace.
>
> Jedna se o maly program pro zpracovani nestrukturovanych dat.
> Ale bohuzel mi nejde prelozit a konci s chybou Constant expresion
> expected.
>
> v kodu je
> procedure ZpracujRadku(Radek: string; Zacni: integer; var Pozice:
> integer)
> var
> Data: TStringList;
> S: string;
> begin
> S := Copy(Radek,Zacni,Length(Radek));
> case Pozice of
> 1:
> Data := TStringList.Create();
> Data.Add(S); // sem ukazuje compiler na chybu
> FPos := FList.Add(Data);
> Pozice := 2;
> 2:
> Data := TStringList(FList.Items[FPos]);
> Data.Add(S); // sem ukazuje compiler na chybu
> end;
> end;
>
> pouze hruby nastin procedury, poradite co tam muze byt spatne?
>
> D5Prof, W2000
>
>
> Diky
> Jarda
>
>
> *****************
> Jarda Jirava
> (zv)
> LiStuj
> listuj(zv)centrum(tec)cz
> ^^^^^^^^^^^^^^^^^
> SW development
> ^^^^^^^^^^^^^^^^^
> *****************
>
> Nokia Game je tady. Jsi pripraven?Zaregistruj se na http://user.centrum(tec)cz/redir.php?url=http://www.nokiagame.com
>
>
>
>
>
Constant expresion expected
[*] Ben, Martin (CAP, GCF) <Martin.Ben(zv)gecapital(tec)com> - 1.10.2001 13:09:47
BINGO ! A ja si s tim narne lamal hlavu. No jo, jak to tak vypada, tak jsem
pro stromy nevidel les.
Neznam sice cely kod, ale jedna vec se mi podivna:
pokud se procedura vola s parametrem Pozice=2 TStringList se nevytvari, ale
rovnou pouziva ?
Martin Ben
> -----Puvodni zprava-----
> Od: Martin Schayna [mailto:mschayna(zv)aktis(tec)cz]
>
> Ve variantach prikazu case ti chybi begin a end.
>
> Martin Schayna
>
> ----- Original Message -----
> From: "Jarda Jirava" <listuj(zv)centrum(tec)cz>
> > S := Copy(Radek,Zacni,Length(Radek));
> > case Pozice of
> > 1:
> > Data := TStringList.Create();
> > Data.Add(S); // sem ukazuje compiler na chybu
> > FPos := FList.Add(Data);
> > Pozice := 2;
> > 2:
> > Data := TStringList(FList.Items[FPos]);
> > Data.Add(S); // sem ukazuje compiler na chybu
> > end;
>
> VYRESENO: Sirka textu v TextOut
[*] Ji�� Kratochv�l����*��J�##!�)?���o� - 1.10.2001 13:10:34
Diky za Vase podnety.
Mezi jinymi reakcemi mi prisla i tato, ktera je
podle me "nejchytrejsi" ...
Jirka
----- Original Message -----
From: "Ales Vasicek" <vasicek(zv)ecommerce(tec)cz>
To: <jiri.kratochvil(zv)webzin(tec)cz>
Sent: Thursday, November 01, 2001 10:59 AM
Subject: RE: Sirka textu v TextOut
Napsal jsem si na to fci:
function TAVDBGrid.MinimizeText(const S : String; Canvas : TCanvas;
Width : Integer; Align : TAlignment) : String;
var TW : Integer;
begin
TW := Canvas.TextWidth(S);
if TW > Width
then begin
case Align
of taLeftJustify, taCenter : begin
Result := Copy(S, 1,
Round((Width / Canvas.TextWidth('.'))) + 2);
repeat
SetLength(Result,
Length(Result) - 1);
TW := Canvas.TextWidth(Result
+ '...');
until (TW <= Width) or (Result =
''); Result := Result + '...';
end;
else begin
Result := Copy(S, Length(S) - Round((Width /
Canvas.TextWidth('.'))) + 2, Length(S));
repeat
Result := Copy(Result, 2, Length(Result));
TW := Canvas.TextWidth(Result + '...');
until (TW <= Width) or (Result = ''); Result := '...' + Result;
end;
end;
end
else Result := S;
end;
Pouziti:
Form1.Canvas.TextOut('Nejaky text', Form1.Canvas, 100, taLeftJustify);
Ales
String v recordu
[*] Jan Sebel�k <honza(zv)haes(tec)cz> - 1.10.2001 13:18:39
> Odes�latel: Ka.Kewasa <kewasa(zv)quick(tec)cz>
> Potrebuji dat do packed recordu retezec delsi jak 255 znaku. jak se to da
> udelat, abych k tomu pak pristupoval nejak lidsky???
Nevim, jestli ti rozumim:
Potrebujes dat retezec primo do recordu, tedy
record
retezec : ShortString
end;
a ne pres pointer
record
retezec: String;
end;
Tak to nejde.
Musis udelat treba
record
retezec : array [0..1000] of char;
end;
a pracovat s tim jako s typem PChar s vyuzitim prislusnych funkci (StrPCopy atd.)
Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 569 (0776 347735)
=========================================
Databaze na webu a update davkou
[*] Lud�k ZITA <konference(zv)sales(tec)cz> - 1.10.2001 13:20:17
----- Original Message -----
From: "FAIT Ji��, ml." <fait(zv)jakl(tec)cz>
Tuto davku potrebuji poslat na web (MSSQL, ASP) a potrebuji aby se touto
davkou databaze na webu aktualizovala.
Nejlepe aby web sam zareagoval na doslou davku, aktualizaoval databazi a
davku odstranil nebo presunul nekam jinam.
Ahoj.
Co si ty davky posilat e-mailem na vyhrazenou adresu a tu periodicky vybirat
a zpracovavat.
Ludek
C++ kod v Delphi
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 1.10.2001 13:24:22
>Nevite nekdo jakym zpusobem by se dal do zdrojaku vlozit C++ zdrojak
napriklad takhle:
..
..
(*
nejaky kod v CCku
*)
...
...
:-)))
>Neco jako kdyz se vklada asm
>Nebo to jde jen pres {$L 'myfile.obj'}
protoze Delphi kompilovat CCkovy zdrojak neumi nezbyva nez vlozit
(prilinkovat) binarni kod prelozeny necim jinym
>- a jak potom pristupovat k metodam a promennym (jestli to vubec jde)
inspiraci mohou byt RTL zdrojaky k delphi systemovym knihovnam - tam
jsou taky vkladane object fily. Jinak stejne jako pri programovani v
Ccku plati - kdyz nevim tak zkusim vzit do ruky manual...
D. Toman
C++ kod v Delphi
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 1.10.2001 13:25:55
From: "Blazek Jaroslav" <Jaroslav.Blazek(zv)access-it(tec)cz>
> Nevite nekdo jakym zpusobem by se dal do zdrojaku vlozit C++ zdrojak
> Neco jako kdyz se vklada asm Nebo to jde jen pres {$L 'myfile.obj'} - a jak
> potom pristupovat k metodam a promennym (jestli to vubec jde)
Ahoj,
radsi se o to nepokousej, budes s tim vic problemu nez uzitku.
Petr Vones
DOS keyboard pod Win2000
[*] Lud�k ZITA <konference(zv)sales(tec)cz> - 1.10.2001 13:26:02
----- Original Message -----
From: "Petr Palicka" <petr.palicka(zv)atlas(tec)cz>
c) DOS okno pouzivalo stejny rozlozeni jako wokna.
Ahoj.
Na http://www.sales(tec)cz/download/ najdes free balik dosovske cestiny od
R.Karrafy, ktery krom jineho ma vlastni editor rozlozeni klavesnice a
znakovych sad.
Skvele se da prepinat za behu treba z davky a na PC pak bez problemu muzou
spolu zit DOSovske programy v Kamenicich a Latin najednou.
Pod W9x/W2000 funguje bez problemu WinNT jsem nezkousel.
Ludek
Readcommitted nebo snapshot
[*] Jan Sebel�k <honza(zv)haes(tec)cz> - 1.10.2001 13:26:38
Odes�latel: Jiri Wendl, KSH-Data <wendl(zv)ksh-data(tec)cz>
Mohli by jste mi poradit, ktere nastaveni transakce je vhodnejsi? viz Subj.
Zalezi na okolnostech - proto tam ty ruzne typy transakci jsou.
ReadCommited
vidi data, ktera nekdo jiny zapsal a udelal Commit
SnapShot
vidi "foto snimek" databaze, porizeny v okamziku StartTransaction,
takze nevidi zadne zmeny, ktere nastaly potom.
Klasicky pripad:
Tisknu tabulku uctu s jejich aktualnimi stavy.
Behem tisku nekdo prevedl penize z jednoho uctu (ktery jsem uz vytiskl) na jiny (ktery jsem jeste nevytiskl).
Pokud bude transakce ReadCommited, bude sestava nekorektni.
Pri SnapShot bude korektni.
Jiny priklad:
IB umi delat backup za plneho provozu.
Backup je pritom vzdy korektni.
Proc? Urcite pouziva SnapShot transakci.
Jiny priklad:
Pouziju TIBDataSet.Refresh;
Pokud je transakce SnapShot, zadne zmeny neuvidim.
Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 569 (0776 347735)
=========================================
OT:DLL a Pascal
[*] Jan Sebel�k <honza(zv)haes(tec)cz> - 1.10.2001 13:36:22
> Odes�latel: Zden�k Sv��en <dkonf(zv)seznam(tec)cz>
> Ahoj lidickove, obzvlaste vy, kdoz jeste stale chcete/musite pouzivat
> pascal.
> Tim, ze uz spise pracuji v Delphi nez v Pascalu, tak ztracim orientaci v
> tom, co si muzu v Pascalu dovolit a co ne.
Delphi JE Pascal.
Akorat ObjectPascal misto TurboPascal nebo BorlandPascal.
Na to mnozi uplne zapominaji a predstavuji si, ze aplikaci proste "naklikaji" :-)
> Kdyz svuj program z Turbo Pascalu provozuju pod windows, mam moznost
> pouzivat DLL napsane treba v delphi? Lze nejak volat API funkce?
> Neexistuje nekde nejaka konference pro Pascal pametniky?
Je to aspon TurboPascal for Windows?
Tady bude asi nejvetsi problem 16bit x 32bit.
V Delphi (unit Windows) mam (skoro) kompletni interface na API Windows.
Konferenci o Delphi povazuji soucasne za konferenci o (Object) Pascalu.
Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 569 (0776 347735)
=========================================FB nebo BDE
[*] Jan Sebel�k <honza(zv)haes(tec)cz> - 1.10.2001 13:52:39
> Odes�latel: Jaroslav Uher <moravia(zv)mbox.vol(tec)cz>
> S IBDataSet jsem si dnes hral. Je to presne jak pises. HROZNE
> POMALE. Az jsem zasnul.
To by me zajimalo, proc by mel byt TIBDataSet pomaly...
Pokud se podivame, jak je to implementovano, pak pro kazdou akci (select, insert, update, delete, refresh) je tam uvnitr jedna instance TIBSQL, pres kterou to jede.
A TIBSQL je to nejrychlejsi, jak muzeme k datum pristupovat.
Vysvetlenim by mohlo byt, ze se nacita prilis "velky" select, to pak urcite jo...
Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 569 (0776 347735)
=========================================Constant expresion expected
[*] Milan Tome� <Milan.Tomes(zv)haida(tec)cz> - 1.10.2001 13:55:28
> From: "Milan Tome#" <Milan.Tomes(zv)haida(tec)cz>
> > Chtel bych se zeptat proc tam tyto zavorky nemaji byt. Ja jsem zil (a
> > pracoval) v domneni, ze je to uplne jedno (a praxe mi ukazala, ze to jedno
> > skutecne je)
>
> Ahoj,
>
> z hlediska funkce (tedy ze se to prelozi) to jedno je. Ovsem neodpovida to
> prilis standartum v Object Pascalu a je IMHO dobre dodrzovat urcitou
> konzistenci v zapisu kodu.
>
> Petr Vones
No dobre, ale z hlediska citelnosti kodu si myslim, ze je lepsi pouzivat zapis
se zavorkami, nebot potom je okamzite patrne, jestli volam metodu objektu nebo
se dotazuji na hodnotu property.
Napr.:
Test := MyjObjekt.NOR;
A co je to NOR ? Metoda nebo vlastnost ?
S pozdravem
Milan Tome#
Vedouc� v�vojov�ho t�mu Windows
Softwarehouse HAiDA s.r.o.
Nov� Bor
tel: 0424/722291, 0424/222284
email: Milan.Tomes(zv)haida(tec)cz
Sirka textu v TextOut
[*] Ales Vasicek <vasicek(zv)ecommerce(tec)cz> - 1.10.2001 14:08:55
Ahoj,
jo jo, ted se na to divam, jedna se o flag DT_END_ELLIPSIS v API fci
DrawText.
Ales
> -----Original Message-----
> From: Martin Schayna [mailto:mschayna(zv)aktis(tec)cz]
>
> Mam pocit ze TextOut (nebo nejaka jeho Ex varianta) umoznuje
> zadat rect a flag, tusim neco jako Elipsis a tecky se tam
> udalaji samy.
>
> Martin Schayna
Constant expresion expected
[*] Blazek Jaroslav <Jaroslav.Blazek(zv)access-it(tec)cz> - 01.10.2001 14:10:22
Ok uznavam....ja jsem byl zase v domeni ze v pascalu to tak musi byt.....
Jde opravdu o to begin end;
Po dlouhy dobe jsem se opet vratil k ..... pascalu a je to ....... co budu vypravet...
V C by to zase takhle muselo byt - metoda(); takhle by to neslo - metoda;
Proto asi to domeni.....
Bc. Jaroslav Blazek
Access-IT Ceska Lipa
jaroslav.blazek(zv)access-it(tec)cz
www.access-it(tec)cz
+420605/813644
>>> Milan.Tomes(zv)haida(tec)cz 1.11.01 12:29 >>>
Chtel bych se zeptat proc tam tyto zavorky nemaji byt. Ja jsem zil (a pracoval)
v domneni, ze je to uplne jedno (a praxe mi ukazala, ze to jedno skutecne je)
S pozdravem
Milan Tome#
Vedouc� v�vojov�ho t�mu Windows
Softwarehouse HAiDA s.r.o.
Nov� Bor
tel: 0424/722291, 0424/222284
email: Milan.Tomes(zv)haida(tec)cz
> > Data := TStringList.Create();
> ^^ to tu nema co delat
>
> Petr Vones
C++ v Delphi
[*] Blazek Jaroslav <Jaroslav.Blazek(zv)access-it(tec)cz> - 01.10.2001 14:16:51
Tak jeste jednou, nejak to tam nedorazilo....
Nevite nekdo jakym zpusobem by se dal do zdrojaku vlozit C++ zdrojak
Neco jako kdyz se vklada asm
Nebo to jde jen pres {$L 'myfile.obj'} - a jak potom pristupovat k metodam a promennym (jestli to vubec jde)
Bc. Jaroslav Blazek
Access-IT Ceska Lipa
jaroslav.blazek(zv)access-it(tec)cz
www.access-it(tec)cz
+420605/813644
FB1 subselect vs join
[*] Slavomir Skopalik <skopalik(zv)hlubocky.del(tec)cz> - 1.10.2001 14:17:28
Jeste bych zkusil pouzit normalni join (presneji inner join), jakou bude mit rychlost.
Jinak subselekty jsou nejjednodussi zpusob, jak optimizer presvedcit aby delal veci presne
jak ja chci.
On totiz defaultne vytvari kartezke souciny a nekdy se muze stat, ze pocet zaznamu uvnitr
joinu je velmi velky a omezi se az pomoci where (nebo heaving).
Subselect, ktery jsi napsal nelze provest rychleji, nebot je to singleton selekt podle
unikatniho indexu PK (pokud jsem dobre cetl).
Slavek
>
> narazil jsem na zajimavou vec. nasel jsem dotaz, kde byla hodnota z
> ciselniku udelana jako poddotaz. tak jsem to prepsal v domeni, ze join
> bude rychlejsi a cistsi reseni. jestli cistsi nevim, ale je to
> pomalejsi. je jasne, ze cilem programatora je, mimo jine, psat rychly a
> efektivni kod. takze me zajima, jakou to ma logiku, proc to tak je.
> proste bych to chtel chovani SQL (konkretne FB1) pochopit do hlouky a
> rozumet si s nim. mozna za to muze zmateny optimalizator, mozna
> implementace, mozna je to zcela zrejem a pitvam se v blobostech.
> kazdopadne jsem se chtel zeptat spis na nazor ostatnich a nejlepe, kdymi
> mi nekdo vysvetlil proc se to tak chova. jinak je mi to burt a klidne
> budu psat pro hodnoty z ciselniku subselecty misto joinu, ale prijde mi
> to takovy prez ruku.Sirka textu v TextOut
[*] Filip Skalka <delphi(zv)atlascon(tec)cz> - 1.10.2001 14:18:11
(Predtim jsem to do spatne sekce, tak to zkousim znovu).
Take by to slo takto s Drawtext a nastavit u Format DT_MODIFYSTRING a DT_END_ELLIPSIS.
Filip Skalka
----- Original Message -----
From: Ji�� Kratochv�l <jiri.kratochvil(zv)webzin(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, November 01, 2001 10:42 AM
Subject: Sirka textu v TextOut
> -----BEGIN PGP SIGNED MESSAGE-----
> Hash: SHA1
>
> DDV,
> snazim se nejak elegantne vyresit nasledujici
> problem:
>
> Pomoci TCanvas.TextOut vypisuji nejaky retezec.
> Ja bych potreboval, aby nezavidle na delce textu
> retezec neprekrocil danou sirku. (Aby se vypsalo napr misto
> "DlouhyText" jen "Dlou...")
>
> Vim, ze je to dost konkretni pripad, a za asi do
> konference nepatri, ale nemohu prijit na nejake
> kloudne reseni ...
>
> Diky vsem za pripadne odpovedi.
> Jirka K.
>
> -----BEGIN PGP SIGNATURE-----
> Version: PGPfreeware 7.0.3 for non-commercial use <http://www.pgp.com>
>
> iQA/AwUBO+EY6WH3x0A/dynEEQKcnwCg65whVWijNmWerh7iUmm2p2+8WrAAoKH1
> EAGoXGWl8modPSCgvpNy2B0/
> =LZHp
> -----END PGP SIGNATURE-----
>
>
transfer dat z FOXPRO do MSSQL 7
[*] <kuchar(zv)unicodesys(tec)cz> - 1.10.2001 15:10:03
caute
nejak mi ta otazka tady zapadla prachem, tak to skousim znova :
pomoci komponenty BATCHMOVE prevadim nanecisto data z foxky do MSSQL, radove
se jedna o nekolik desitektisic tabulek, problem je ale vtom, ze vzdy v
neuricitych intervalech dochazi k zhrouceni programu s chybovou hlaskou ze
na adrese xxx v knihovne IDAPI32.DLL doslo k chybe, nevite co s tim, pro
uplnost prikladam cas kodu
----------------------------------------------------------------------------
-------------
inc(cislotabulky);
if cislotabulky>10 then begin if batchmove1<>nil then batchmove1.free;
batchmove1:=tbatchmove.Create(self);
batchmove1.Name:='batchmove1';
batchmove1.AbortOnKeyViol:=true;
batchmove1.AbortOnProblem:=true;
batchmove1.Destination:=table2;
batchmove1.Mode:=batcopy;
batchmove1.Source:=table1;
batchmove1.Transliterate:=true;
cislotabulky:=0;
end;
batchmove1.Execute;
----------------------------------------------------------------------------
-------------
vysvetleni : kdyz pouziji tenhle kod zjistil jsem ze to vydrzi
pretransformovat o neco vic tabulek nez kdyz menim jenom
batchmove1.Destination, batchmove1.Source ale tenhle zapis se mi ani trosku
nelibi, dik za vsechny rady
----------------------------------------------------------------------------
-------------
Ing. J�n Kuch�r, PhD.
Unicode Systems s.r.o.
Rusk� 14, T�eb�� 674 01
mobil : 0605469102
e-mail: kuchar(zv)unicodesys(tec)cz
transfer dat z FOXPRO do MSSQL 7
[*] Milan Schembera <milan(zv)missoftware(tec)cz> - 1.10.2001 15:18:39
Jenom hypoteticky: Proc to delat programove, kdyz to MSSQL umi naimportovat
samo pomoci DTS ?
S pozdravem a pranim hezkeho dne
Milan Schembera
MISSOFTWARE Lanskroun
hot-line 0608/944444
tel. 0467/521555, 0467/520141
http://www.missoftware(tec)cz
mailto:info(zv)missoftware(tec)cz
> -----P�vodn� zpr�va-----
> Od: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]za
> u�ivatele kuchar(zv)unicodesys(tec)cz
> Odesl�no: 1. listopadu 2001 15:10
> Komu: Delphi
> P�edm�t: transfer dat z FOXPRO do MSSQL 7
>
>
> caute
>
> nejak mi ta otazka tady zapadla prachem, tak to skousim znova :
> pomoci komponenty BATCHMOVE prevadim nanecisto data z foxky
> do MSSQL, radove
> se jedna o nekolik desitektisic tabulek, problem je ale vtom,
> ze vzdy v
> neuricitych intervalech dochazi k zhrouceni programu s
> chybovou hlaskou ze
> na adrese xxx v knihovne IDAPI32.DLL doslo k chybe, nevite co
> s tim, pro
> uplnost prikladam cas kodu
> --------------------------------------------------------------
> --------------
> -------------
> inc(cislotabulky);
> if cislotabulky>10 then begin if batchmove1<>nil then batchmove1.free;
>
> batchmove1:=tbatchmove.Create(self);
>
> batchmove1.Name:='batchmove1';
>
> batchmove1.AbortOnKeyViol:=true;
>
> batchmove1.AbortOnProblem:=true;
>
> batchmove1.Destination:=table2;
> batchmove1.Mode:=batcopy;
> batchmove1.Source:=table1;
>
> batchmove1.Transliterate:=true;
> cislotabulky:=0;
> end;
> batchmove1.Execute;
> --------------------------------------------------------------
> --------------
> -------------
> vysvetleni : kdyz pouziji tenhle kod zjistil jsem ze to vydrzi
> pretransformovat o neco vic tabulek nez kdyz menim jenom
> batchmove1.Destination, batchmove1.Source ale tenhle zapis se
> mi ani trosku
> nelibi, dik za vsechny rady
>
> --------------------------------------------------------------
> --------------
> -------------
> Ing. J�n Kuch�r, PhD.
> Unicode Systems s.r.o.
> Rusk� 14, T�eb�� 674 01
> mobil : 0605469102
> e-mail: kuchar(zv)unicodesys(tec)cz
transfer dat z FOXPRO do MSSQL 7
[*] <kuchar(zv)unicodesys(tec)cz> - 1.10.2001 16:17:47
rekneme ze to nejde pres DTS protoze ty tabulky mi prichazeji postupne po
cely den, tyden,mesic...atd. z jednotlivych pracovist, musim v nich opravit
neuplne zaznamy a prevest je do MSSQL
> Jenom hypoteticky: Proc to delat programove, kdyz to MSSQL umi
naimportovat
> samo pomoci DTS ?
>
> S pozdravem a pranim hezkeho dne
>
> Milan Schembera
> MISSOFTWARE Lanskroun
>
> hot-line 0608/944444
> tel. 0467/521555, 0467/520141
> http://www.missoftware(tec)cz
> mailto:info(zv)missoftware(tec)cz
>
> > -----P�vodn� zpr�va-----
> > Od: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]za
> > u�ivatele kuchar(zv)unicodesys(tec)cz
> > Odesl�no: 1. listopadu 2001 15:10
> > Komu: Delphi
> > P�edm�t: transfer dat z FOXPRO do MSSQL 7
> >
> >
> > caute
> >
> > nejak mi ta otazka tady zapadla prachem, tak to skousim znova :
> > pomoci komponenty BATCHMOVE prevadim nanecisto data z foxky
> > do MSSQL, radove
> > se jedna o nekolik desitektisic tabulek, problem je ale vtom,
> > ze vzdy v
> > neuricitych intervalech dochazi k zhrouceni programu s
> > chybovou hlaskou ze
> > na adrese xxx v knihovne IDAPI32.DLL doslo k chybe, nevite co
> > s tim, pro
> > uplnost prikladam cas kodu
> > --------------------------------------------------------------
> > --------------
> > -------------
> > inc(cislotabulky);
> > if cislotabulky>10 then begin if batchmove1<>nil then batchmove1.free;
> >
> > batchmove1:=tbatchmove.Create(self);
> >
> > batchmove1.Name:='batchmove1';
> >
> > batchmove1.AbortOnKeyViol:=true;
> >
> > batchmove1.AbortOnProblem:=true;
> >
> > batchmove1.Destination:=table2;
> > batchmove1.Mode:=batcopy;
> > batchmove1.Source:=table1;
> >
> > batchmove1.Transliterate:=true;
> > cislotabulky:=0;
> > end;
> > batchmove1.Execute;
> > --------------------------------------------------------------
> > --------------
> > -------------
> > vysvetleni : kdyz pouziji tenhle kod zjistil jsem ze to vydrzi
> > pretransformovat o neco vic tabulek nez kdyz menim jenom
> > batchmove1.Destination, batchmove1.Source ale tenhle zapis se
> > mi ani trosku
> > nelibi, dik za vsechny rady
> >
> > --------------------------------------------------------------
> > --------------
> > -------------
> > Ing. J�n Kuch�r, PhD.
> > Unicode Systems s.r.o.
> > Rusk� 14, T�eb�� 674 01
> > mobil : 0605469102
> > e-mail: kuchar(zv)unicodesys(tec)cz
>
>
>TStringGrid + select row
[*] Martin Bab�k <M.Babik(zv)mus(tec)cz> - 01.10.2001 16:43:19
Zdravim,
jak spolehlive a jednoduse vybarvit cely radek v nemz je urcita bunka
selected? NT4/D5. Diky
M&B
TStringGrid + zarovnani
[*] Martin Bab�k <M.Babik(zv)mus(tec)cz> - 01.10.2001 17:14:09
Zdravim,
nevite nekdo proc vzdy prvni editovatelna bunka pri prvnim vykresleni
gridu, nebo posledni vyselectovana bunka po opusteni TStringGridu,
zustava zarovnana doleva, kdy tesne pred opustenim fce OnDrawCell jsem
text zarovnal na stred, nebo doprava? A hlavne jak se toho zbavit? Celou
dobu co krokuji OnDrawCell je vse v poradku a po vykresleni posledni
bunky a opusteni fce OnDrawCell se text presune doleva. Diky.
M&B
OT: Poradte mi s Excelem
[*] Hurricane <hurricane(zv)quick(tec)cz> - 1.10.2001 17:58:43
Zdarvim
Diky, to je presne co potrebuju, az na jednu malickost. Do tehle funkce se
zadavaji cisla radku v celych cislech (1,2,3,..) od 1 az do poctu tech radku
(sloupcu). Jenze ja to mam pojmenovany desetinymi cisly, a to on nechape. Ja
mam na listu dve bunky (to jsou ty hodnoty X a Y), ktere maji rozbalovaci
seznam hodnot (ala ComboBox). Jinymy slovy potrebuju Index toho ComboBoxu.
Je to udelane pomoci Data|Overeni|Seznam hodnot, takze to neni VB ovladaci
prvek, tam by to asi nejak slo.
Diky
Hurricane
----- Original Message -----
From: "Kralik Michal" <xkrali07(zv)stud.fee.vutbr(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, October 31, 2001 3:15 PM
Subject: Re: OT: Poradte mi s Excelem
> Podivej se na napovedu k funkci INDEX. Jestli si dobre vzpominam, tak se
> tam urcujecislo radku, sloupce a oblast a vysledkem je hodnota v bunce na
> dane pozici.
> M.Kralik
>
> On Wed, 31 Oct 2001, Hurricane wrote:
>
> > popisek sloupce. A na zaklade zadani hodnot do techto dvou bunek
potrebuji
> > ziskat treti hodnotu, ktera se nachazi prave v te tabulce na
souradnicich
> > zadanych dvema vstupnimi bunkami. Doufam, ze jsem se jasne a
pochopitelne
> > vyjadril. Poradte plz, docela to specha.
> >
> > Diky.
> > Hurricane
> >
>
>Poradte mi s Excelem
[*] JIM Design <jim.design(zv)iol(tec)cz> - 1.10.2001 19:32:03
Ahoj,
No nevim jestli to presne chapu, ale beru to tak ze potrebujes podle
urcitych souradnic (ktere z toho excelu ziskas) alokovat a precist bunku z
jine tabulky toho excelu.
V tom pripade doporucuju pouzit TExcelWorkbook otevrit v nem ten XLS -
priklad tady urcite najdes, a pouzit .Cells[x,y].
Nebo stahnout nejakou ekvivalentni komponentu z torry
M.Jirman
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Hurricane
Zdravim
Mam v Excelu 2K dvojrozmernou tabulku i s ciselnym popisem radku a sloupcu
(tento radek a sloupec nejsou soucasti dat). Dale mam dve jine bunky, ve
kterych muzou byt pouze jedna z popisku rady respektive ve druhe bunce
popisek sloupce. A na zaklade zadani hodnot do techto dvou bunek potrebuji
ziskat treti hodnotu, ktera se nachazi prave v te tabulce na souradnicich
zadanych dvema vstupnimi bunkami. Doufam, ze jsem se jasne a pochopitelne
vyjadril. Poradte plz, docela to specha.
Diky.
Hurricane
Poradi polozek v QRep
[*] JIM Design <jim.design(zv)iol(tec)cz> - 1.10.2001 19:32:01
Ahoj,
Je to sice uz nejaky cas co jsem v QuickReportu delal ale OnPrint bych k
temto ucelum prilis nepouzival, vse me chodilo bez problemu pokud jsem
nejake obecne promenne plnil v OnBeforePrint, QRBand typu Detail plnil
cyklem v procedure OnNeedData a OnAfterPrint pouzival na nejake uvolnovani.
M.Jirman
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Michal Michal
Ahoj,
Ja bych se pridal do diskuze. Vite nekdo v jakem poradi se vyhodnocuji
udalosti (stacilo by na jednotlivych Bandech). Ja napr. potreboval mit
hlavicku sloupcu u SubDetailu na kazde nove strance. Tak jsem to nejak
zaonacil, aby se mi to tisklo, ale s hruzou jsem zjistil, ze na 2.
strance se mi pro prvni radek toho SubDetalu vyvolali udalosti drive nez
treba PageFooter pro stranku 1. a PageHeader pro stranku 2.
Otazka proto zni: Je mozne rici, ze udalosti daneho reportu budou v
nejakem pevnem poradi?
Dekuji
Michal
ZJEDNODUSENI Jak zamenit sloupce a radky?
[*] JIM Design <jim.design(zv)iol(tec)cz> - 1.10.2001 19:32:08
Ahoj,
Adodataset1.SqlText:='SELECT * from tabulka';
Adodataset1.Open;
for i:=1 to adodataset1.FieldCount-1 do
begin
Adodataset1.Fields[i].FieldName--jmeno sloupce; // tady prostudovat CREATE
v SQL a sestavit string vytvarejici tabulku se jmeny sloupcu, rovnez
sestavit INSERT kterej tam do prvniho radku hodi ty jmena sloupcu
end;
M.Jirman
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of borkovec(zv)email(tec)cz
V podstate jde o toto:
selectem vybrat jeden radek tabulky a prevest ho na tabulku, kde v prvnim
sloupci jsou jmena sloupcu a ve druhem jejich hodnoty. A je to.
transfer dat z FOXPRO do MSSQL 7
[*] JIM Design <jim.design(zv)iol(tec)cz> - 1.10.2001 19:32:05
Ahoj,
desitek tisic tabulek???
Ja bych to zkusil pres ADO, napsal jsem na neco podobneho prevodnik pomerne
rychle.
M.Jirman
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of kuchar(zv)unicodesys(tec)cz
Sent: Thursday, November 01, 2001 3:10 PM
To: Delphi
Subject: transfer dat z FOXPRO do MSSQL 7
caute
nejak mi ta otazka tady zapadla prachem, tak to skousim znova :
pomoci komponenty BATCHMOVE prevadim nanecisto data z foxky do MSSQL, radove
se jedna o nekolik desitektisic tabulek, problem je ale vtom, ze vzdy v
neuricitych intervalech dochazi k zhrouceni programu s chybovou hlaskou ze
na adrese xxx v knihovne IDAPI32.DLL doslo k chybe, nevite co s tim, pro
uplnost prikladam cas kodu
----------------------------------------------------------------------------
-------------
inc(cislotabulky);
if cislotabulky>10 then begin if batchmove1<>nil then batchmove1.free;
batchmove1:=tbatchmove.Create(self);
batchmove1.Name:='batchmove1';
batchmove1.AbortOnKeyViol:=true;
batchmove1.AbortOnProblem:=true;
batchmove1.Destination:=table2;
batchmove1.Mode:=batcopy;
batchmove1.Source:=table1;
batchmove1.Transliterate:=true;
cislotabulky:=0;
end;
batchmove1.Execute;
----------------------------------------------------------------------------
-------------
vysvetleni : kdyz pouziji tenhle kod zjistil jsem ze to vydrzi
pretransformovat o neco vic tabulek nez kdyz menim jenom
batchmove1.Destination, batchmove1.Source ale tenhle zapis se mi ani trosku
nelibi, dik za vsechny rady
----------------------------------------------------------------------------
-------------
Ing. J�n Kuch�r, PhD.
Unicode Systems s.r.o.
Rusk� 14, T�eb�� 674 01
mobil : 0605469102
e-mail: kuchar(zv)unicodesys(tec)cz
transfer dat z FOXPRO do MSSQL 7
[*] Milan Schembera <milan(zv)missoftware(tec)cz> - 1.10.2001 20:23:24
OK, v tom pripade tomu rozumim. Sam osobne davam prednost tomu si takovehle
akce naprogramovat sam nez se spolehat na neco uz implementovaneho nebo
produkty tretich stran, do kterych nikdy na 100% nevidim.
Navic jsem opustil davno TBatchMove, protoze nema zadne udalosti typu
OnProgress nebo tak podobne a takovehle veci resim "davkovym zpracovanim" -
ctenim dat pomoci sql dotazu (TQuery apod.) po davce 20 az 50 zaznamu (to je
treba zmerit, jak to vychazi nejlepe rychlostne) a naslednym ukladanim do
cilove tabulky nebo db. ...
Ale netvrdim, ze je to univerzalni reseni, opravdu vzdy zalezi na situaci.
S pozdravem a pranim hezkeho dne
Milan Schembera
MISSOFTWARE Lanskroun
hot-line 0608/944444
tel. 0467/521555, 0467/520141
http://www.missoftware(tec)cz
mailto:info(zv)missoftware(tec)cz
> -----P�vodn� zpr�va-----
> Od: kuchar(zv)unicodesys(tec)cz
>
> rekneme ze to nejde pres DTS protoze ty tabulky mi prichazeji
> postupne po
> cely den, tyden,mesic...atd. z jednotlivych pracovist, musim
> v nich opravit
> neuplne zaznamy a prevest je do MSSQL
Sirka Form.Caption-u
[*] Miroslav Novosad <mirnov(zv)atlas(tec)cz> - 1.10.2001 21:23:59
Ahoj,
chtel bych se zeptat, jestli je nejaky jednoduchy zpusob, jak zjistit
sirku Captionu, resp. pro Caption, u Formu (v pixelech).
Predstavoval bych si neco na zpusob
Sirka := GetWidthInPixels (Form.Handle, Caption)...
Zatim jsem jen zjistil, jak se k tomu dopocitat pres udaje od
GetWindowsMetrics, coz prijde trochu krkolomne.
A taky moc nevim, jak dostat sirku vlastniho textu, kdyz nemam Canvas
toho Captionu. Nebo je nejaka fukce pro sirku textu danym fontem.
Diky za pripadny tip
Miroslav Novosad
mirnov(zv)atlas(tec)cz
Constant expresion expected
[*] Erik Salaj <winsoft(zv)stonline.sk> - 2.10.2001 00:03:26
> No dobre, ale z hlediska citelnosti kodu si myslim, ze je lepsi pouzivat
zapis
> se zavorkami, nebot potom je okamzite patrne, jestli volam metodu objektu
nebo
> se dotazuji na hodnotu property.
Z hladiska udrzby softwaru je vyhodnejsie nepouzivat zatvorky.
Potom ked zmenit property alebo premennu na funkciu a naopak
nemusis prepisovat kod. Inac, je to jedna zo zasad jazyka Eiffel.
> Napr.:
>
> Test := MyjObjekt.NOR;
>
> A co je to NOR ? Metoda nebo vlastnost ?
Pre pouzivatela (klienta) je to jedno, ci je to
metoda alebo vlastnost/premenna (nepotrebuje
vediet ako je to implementovane).
Erik
Sdileni slozek pod WinNT
[*] Petr Voborn�k <vobornik(zv)ssakhk(tec)cz> - 2.10.2001 02:51:59
Jakou funkci lze nasdilet slozku pod WinNT (2000, XP) a pripadne k tomuto
sdileni pridat uzivatele guest?
Pod Win9x mi to funguje, ale pod Win2000 to nejdrive chtelo knihovnu
SvrApi.dll a kdyz sem ji nahral do systemu, tak program stejne nesle ani
spustit a hlasilo to, ze v Kernelu neni funkce ConvertToGlobalHandle :(
Petr Voborn�k
vobornik(zv)mikmik(tec)cz
ICQ: #23132120
http://www.mikmik(tec)cz
VYRESENO: Sirka textu v TextOut
[*] Pavel ZIDEK <delphi(zv)kopr(tec)cz> - 2.10.2001 03:17:34
Nazdar,
do funkce bych jeste dopsal:
Canvas.Font.Style := [];
TW := Canvas.TextWidth(S);
protoze nekde jinde si nastavis pismo na Bold a sirka se ti bude spatne
prepocitavat
Pavel
> Mezi jinymi reakcemi mi prisla i tato, ktera je
> podle me "nejchytrejsi" ...
>
> Napsal jsem si na to fci:
>
> function TAVDBGrid.MinimizeText(const S : String; Canvas : TCanvas;
> Width : Integer; Align : TAlignment) : String;
> var TW : Integer;
> begin
> TW := Canvas.TextWidth(S);
>
> if TW > Width
> then begin
> case Align
> of taLeftJustify, taCenter : begin
> Result := Copy(S, 1,
> Round((Width / Canvas.TextWidth('.'))) + 2);
>
> repeat
> SetLength(Result,
> Length(Result) - 1);
> TW := Canvas.TextWidth(Result
> + '...');
> until (TW <= Width) or (Result =
> '');
>
> Result := Result + '...';
> end;
>
> else begin
> Result := Copy(S, Length(S) - Round((Width /
> Canvas.TextWidth('.'))) + 2, Length(S));
>
> repeat
> Result := Copy(Result, 2, Length(Result));
> TW := Canvas.TextWidth(Result + '...');
> until (TW <= Width) or (Result = '');
>
> Result := '...' + Result;
> end;
> end;
> end
> else Result := S;
> end;
>
> Pouziti:
>
> Form1.Canvas.TextOut('Nejaky text', Form1.Canvas, 100, taLeftJustify);
>
>
> Ales
>ZJEDNODUSENI Jak zamenit sloupce a radky?
[*] borkovec(zv)email(tec)cz - 2.10.2001 07:21:23
Hm, ale jinak to jako reseni moc nevypada, coz?
Daji se naplnit dva sloupce gridu ruznymi zdroji? To by mohlo byt alespon castecne reseni
--- P�vodn� zpr�va ---
Od: "JIM Design" <jim.design(zv)iol(tec)cz>
Datum: 01.11.2001 22:25:04
Ahoj,
Adodataset1.SqlText:='SELECT * from tabulka';
Adodataset1.Open;
for i:=1 to adodataset1.FieldCount-1 do
begin
Adodataset1.Fields[i].FieldName--jmeno sloupce; // tady prostudovat CREATE
v SQL a sestavit string vytvarejici tabulku se jmeny sloupcu, rovnez
sestavit INSERT kterej tam do prvniho radku hodi ty jmena sloupcu
end;
M.Jirman
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of borkovec(zv)email(tec)cz
V podstate jde o toto:
selectem vybrat jeden radek tabulky a prevest ho na tabulku, kde v prvnim
sloupci jsou jmena sloupcu a ve druhem jejich hodnoty. A je to.
---
Nokia Game je tady. Jsi pripraven?
Zaregistruj se na http://www.nokiagame.com/
Komponenta
[*] Radek Janus FSG <janus(zv)foresta(tec)cz> - 2.10.2001 07:35:06
ne bohuzel ti to neni, ono je to trochu slozitejsi ja sem se snazil tu
otazku co nejvic zjednodusit.
Konkretne tato komtponenta mi na StringGrid na jeho prvni radek v kazdem
sloupci da Combobox.tyto jednotlive Comboboxy se ukladaji do TList pres
ktery potom s nima pracuji - bude to slouzit jako filtr
Stringgridu(podobne je to v Excelu) no a na tyto jednotlive Komba potrebuju
odchytit event Onchange.
fFilterSource je TStringList,
ListFilterCombos je TList
ListFilterCombos.Add(TComboBox.create(Self));
TComboBox(ListFilterCombos[ColumnCount]).left:=fFilterSource.CellRect(StrToI
nt(fFields[ColumnCount]),0).Left;
TComboBox(ListFilterCombos[ColumnCount]).height:=fFilterSource.Height;
TComboBox(ListFilterCombos[ColumnCount]).top:=0;
TComboBox(ListFilterCombos[ColumnCount]).width:=fFilterSource.ColWidths[StrT
oInt(fFields[ColumnCount])];
TComboBox(ListFilterCombos[ColumnCount]).Parent:=fFilterSource;
TComboBox(ListFilterCombos[ColumnCount]).Style:=csDropDownList;
TComboBox(ListFilterCombos[ColumnCount]).OnChange:=ZpracujFiltr;
----- Original Message -----
From: "Lebeda David" <david.lebeda(zv)comarr(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, November 01, 2001 10:43 AM
Subject: Re: Komponenta
> > Ahoj potreboval bych poradit ,
> > mam vlastni jednoduchou komponentu.Tato komponenta umi ve vybranem
> > StringGridu vytvorit ComboBox, ktery ma nastaveneho Parenta na ten
> > StringGrid.Chel bych odchytit event Onchange na tomto Comboboxu ale
> > nefunguje to (ComboBoxxxx.OnChange:=nejaka funkce;).Vse je prelozeno v
> > poradku bez chyb ale na OnChange Comba to nereaguje.Stejne tak jsem
> > pochodil s OnClick. K memu udivu vsak OnEnter, OnExit ComboBoxu
> > funguji bez problemu. Nesetkal jste se nekdo s podobnou veci ?
> >
>
> Mozna budu mimo, ale treba ne. Neni to tim, ze v komponente
> mas obsluhu OnChange Comboboxu nejakou a pri vnejsim pouziti
> teto komponenty znovu prirazujes OnChange? Pak by mohlo
> pomoci nejprve tam volat inherited nebo uvnitr komponenty na
> OnChange nic neveset a misto toho prekryt tu funkci v predkovi, ze
> ktere je OnChange volano.
>
> Je to jen napad, inspirace z problemu, ktery jsem resil
> nedavno, nevim, zda jde o totez.
>
> David Lebeda
transfer dat z FOXPRO do MSSQL 7
[*] Mephisto <mephisto(zv)akvila(tec)cz> - 2.10.2001 07:36:44
Neni lepsi pouzit IBExperta ten se umi pres BDE napojit na databaze. Sice to
bude asi pomalejsi ale pro jednorazovy ucel to naprosto dostacuje. Mimo jine
ma virtualni nahledy na vsechny tabulky a fieldy takze neni treba nic
programovat parkrat se klikne mysi a je to.
OK, v tom pripade tomu rozumim. Sam osobne davam prednost tomu si takovehle
akce naprogramovat sam nez se spolehat na neco uz implementovaneho nebo
produkty tretich stran, do kterych nikdy na 100% nevidim.
Navic jsem opustil davno TBatchMove, protoze nema zadne udalosti typu
OnProgress nebo tak podobne a takovehle veci resim "davkovym zpracovanim" -
ctenim dat pomoci sql dotazu (TQuery apod.) po davce 20 az 50 zaznamu (to je
treba zmerit, jak to vychazi nejlepe rychlostne) a naslednym ukladanim do
cilove tabulky nebo db. ...
Ale netvrdim, ze je to univerzalni reseni, opravdu vzdy zalezi na situaci.
S pozdravem a pranim hezkeho dne
Milan Schembera
MISSOFTWARE Lanskroun
hot-line 0608/944444
tel. 0467/521555, 0467/520141
http://www.missoftware(tec)cz
mailto:info(zv)missoftware(tec)cz
> -----P�vodn� zpr�va-----
> Od: kuchar(zv)unicodesys(tec)cz
>
> rekneme ze to nejde pres DTS protoze ty tabulky mi prichazeji
> postupne po
> cely den, tyden,mesic...atd. z jednotlivych pracovist, musim
> v nich opravit
> neuplne zaznamy a prevest je do MSSQL
---
Odchozi zprava neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.293 / Virov� b�ze: 158 - datum vyd�n�: 29.10.2001
Ako na InterBase cez WWW
[*] Lasevic, Martin <MLasevic(zv)ratiopharm(tec)cz> - 2.10.2001 08:21:57
Ahoj, zkousel jsem PHP4 na IB 6.0 a chodi to jan na Win32, tak na Linuxu.
PHP4 m� standardn� modul pro nativni pristup k IB
======================================
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
> -----Original Message-----
> From: Jaroslav Popluhar [mailto:delphi1(zv)acc.sk]
> Subject: Ako na InterBase cez WWW
>
> Napada ma pouzitie PHP pod IIS - vraj existuje nejaky plug-in?
> S pristupom do IB. Ako pristupuje PHP4 k IB (na Win32 a prip.
> na Linuxe).
> Pripadne Java - aplet, servlet...transfer dat z FOXPRO do MSSQL 7
[*] <kuchar(zv)unicodesys(tec)cz> - 2.10.2001 08:24:22
skusil jsem jak IBExperta tak i ADO, nejedna se vicemene o jednorazovou
zalezitost, tento muj prevodnik musi bezet permanentne na pozadi a jak
IBExperta tak i ADO to s rychlosti oproti BDE ve velkem prohraly ( hlavne
ADO ), ale nevybocujme a zustanme u toho ze je to kvuli rychlosti a kvuli
kvantu jinych veci udelano pres BDE a pomoci BATCHMOVE ( ta komponenta tam
musi zustat ) a prave kvuli ( mozna, ale v kazdem pripade mi to hlasi chybu
u BATCHMOVE.EXECUTE ) teto komponente mi hlasi chybu v IDAPI32.DLL
> Neni lepsi pouzit IBExperta ten se umi pres BDE napojit na databaze. Sice
to
> bude asi pomalejsi ale pro jednorazovy ucel to naprosto dostacuje. Mimo
jine
> ma virtualni nahledy na vsechny tabulky a fieldy takze neni treba nic
> programovat parkrat se klikne mysi a je to.
>
> OK, v tom pripade tomu rozumim. Sam osobne davam prednost tomu si
takovehle
> akce naprogramovat sam nez se spolehat na neco uz implementovaneho nebo
> produkty tretich stran, do kterych nikdy na 100% nevidim.
> Navic jsem opustil davno TBatchMove, protoze nema zadne udalosti typu
> OnProgress nebo tak podobne a takovehle veci resim "davkovym
zpracovanim" -
> ctenim dat pomoci sql dotazu (TQuery apod.) po davce 20 az 50 zaznamu (to
je
> treba zmerit, jak to vychazi nejlepe rychlostne) a naslednym ukladanim do
> cilove tabulky nebo db. ...
> Ale netvrdim, ze je to univerzalni reseni, opravdu vzdy zalezi na situaci.
>
> S pozdravem a pranim hezkeho dne
>
> Milan Schembera
> MISSOFTWARE Lanskroun
>
> hot-line 0608/944444
> tel. 0467/521555, 0467/520141
> http://www.missoftware(tec)cz
> mailto:info(zv)missoftware(tec)cz
>
> > -----P�vodn� zpr�va-----
> > Od: kuchar(zv)unicodesys(tec)cz
>
> >
> > rekneme ze to nejde pres DTS protoze ty tabulky mi prichazeji
> > postupne po
> > cely den, tyden,mesic...atd. z jednotlivych pracovist, musim
> > v nich opravit
> > neuplne zaznamy a prevest je do MSSQL
>
>
>
> ---
> Odchozi zprava neobsahuje viry.
> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.293 / Virov� b�ze: 158 - datum vyd�n�: 29.10.2001
>
>
>Komponenta
[*] Kakacka Pavol <kakacka(zv)proca(tec)cz> - 2.10.2001 08:28:44
Podla toho co tu pises to musi fungovat, skus sa ale pozriet na to ci si tu
metodu "OnChange = ZpracujFiltr;" niekde inde v kodu neprebijes niecim
inym, ci vsetky Comba po vytvoreni a pred tou vyvolavanou zmenou maju ten
event assignovany a ci je to prave metodou ZpracujFiltr.
btw: Efektivnejsi a prehladnejsi kod dosiahnes ked nebudes pouzivat
konstrukciu typu "TComboBox(ListFilterCombos[ColumnCount]).Style" ale das si
ten ComboBox do premennej ;-)
Kakacka Pavol
KasiX(zv)atlas(tec)cz
From: "Radek Janus FSG" <janus(zv)foresta(tec)cz>
> ne bohuzel ti to neni, ono je to trochu slozitejsi ja sem se snazil tu
> otazku co nejvic zjednodusit.
> Konkretne tato komtponenta mi na StringGrid na jeho prvni radek v
kazdem
> sloupci da Combobox.tyto jednotlive Comboboxy se ukladaji do TList
pres
> ktery potom s nima pracuji - bude to slouzit jako filtr
> Stringgridu(podobne je to v Excelu) no a na tyto jednotlive Komba
potrebuju
> odchytit event Onchange.
>
> fFilterSource je TStringList,
> ListFilterCombos je TList
>
> ListFilterCombos.Add(TComboBox.create(Self));
>
>
TComboBox(ListFilterCombos[ColumnCount]).left:=fFilterSource.CellRect(StrToI
> nt(fFields[ColumnCount]),0).Left;
>
> TComboBox(ListFilterCombos[ColumnCount]).height:=fFilterSource.Height;
> TComboBox(ListFilterCombos[ColumnCount]).top:=0;
>
>
TComboBox(ListFilterCombos[ColumnCount]).width:=fFilterSource.ColWidths[StrT
> oInt(fFields[ColumnCount])];
> TComboBox(ListFilterCombos[ColumnCount]).Parent:=fFilterSource;
> TComboBox(ListFilterCombos[ColumnCount]).Style:=csDropDownList;
> TComboBox(ListFilterCombos[ColumnCount]).OnChange:=ZpracujFiltr;
dll pro PHP
[*] EFG developer <developer(zv)efg(tec)cz> - 2.10.2001 09:13:25
Zdravim, nevite nekdo jak napsat dll extension pro PHP?
potrebuju si do PHP pridat nektere svoje funkce a rad bych to nasal v
delphi.
D5, W2k, IIS, MSSQL
Dekuji
Petr Sikola
OLE server spusten z aplikace nebo primo
[*] Bednar��k Dalibor <dalibor(zv)torola(tec)cz> - 2.10.2001 09:18:06
Ahoj, jak zjistim z aplikace typu OLE server, ze byla spustena z nejake jine
aplikace, nebo byla spustena primo.
Jde mi o to, ze bych chtel nejak osterit tu ANGLICKOU hlasku, ktera se
objevuje kdyz chci OLE server zavrit
a klientska aplikace jeste existuje.
(D5Prof)
OLE server spusten z aplikace nebo primo
[*] Ond�ej Male�ek <ondrej.malecek(zv)radom-cz(tec)cz> - 2.10.2001 10:05:39
Mel by byt spusten s parametrem -embedding. Pokud pouzivas automation
podporu v Delphi tak taky ComServer.StartMode. Pro tvuj pripad by asi bylo
lepsi kotrolovat pocet referenci na tvuj objekt, ne ?
Ondrej
----- Original Message -----
> Ahoj, jak zjistim z aplikace typu OLE server, ze byla spustena z nejake
jine
> aplikace, nebo byla spustena primo.
>
> Jde mi o to, ze bych chtel nejak osterit tu ANGLICKOU hlasku, ktera se
> objevuje kdyz chci OLE server zavrit
> a klientska aplikace jeste existuje.
>
> (D5Prof)
>
>
dll pro PHP
[*] jtomecek <jtomecek(zv)dezadata(tec)cz> - 2.10.2001 10:21:14
Mohli by mi nekdo, prosim, poradit, jak bych mohl
nastavit vsem souborum atribut "skryty"? (Procedure,
funkce)
Dekuji
OT: DOS keyboard pod Win2000
[*] Lud�k ZITA <konference(zv)sales(tec)cz> - 2.10.2001 11:05:11
----- Original Message -----
From: "Jan Fiala" <jan.fiala(zv)iol(tec)cz>>
> Problem je v rozlozeni klavesnice. Tam je bordel i v tom, kdyz si das
> QWERTY a QWERTZ (o programatorske ani nemluvim). Klavesy s AltGr maji
> uplne jiny vyznam.
>
Zdravim,
Jen na okraj, zajimalo by mne, proc vyrobci klavesnic nedokazali nikdy
vyrobit opravdu CESKOU klavesnici, kde by byly popsany znaky s AltGR
(Alt-V, Alt-Q, Alt-W, ....). Dokonce ani prelepky nikdo nevyrabi.
Jedine co jsem videl (a pouzivam to) jsou klavesnice dodavane k HP Vectra.
Ludek
Pole komponent
[*] Dalibor Falt�nek <dalibor.faltynek(zv)orgrez(tec)cz> - 2.10.2001 11:38:01
Ahoj pratele,
neexistuje v delphi 5 c/s moznost vytvorit pole napr. editboxu na formulari
v dobe navrhu? Neco takoveho jako ve visual basicu, ze zkopiruji na
formulari prvek a umistim, a prostredi se mne zepta, jestli z techto prvku
nechci vytvorit pole prvku. Pak se totiz na ne pekne muzu odkazovat v
cyklech jako napr:
(zapis ve VB )
for i=1 to 10
edit1(10).text = i
next i
V delfi sice muzu pristupovat na vsechny prvky pomoci components, ale
samozrejme vsechny pro me zajimave prvky maji index, ktery asi nemuzu
ovlivnit, leda bych uz pri umistovani na formular striktne dodrzel jejich
posloupnost.
Snad jsem se vyjadril chopopitelne.
Zdravim vas a dik za pripadne odpovedi (i nelichotive).
dalibor.faltynek(zv)orgrez(tec)cz
Pole komponent
[*] ing. Pavel Zilinec <zilinec(zv)email(tec)cz> - 2.10.2001 11:55:13
Asi bych to udelal tak, ze bych takove skupine pridelil Tag a pak bych
to v prochazeni Components testoval podle toho Tagu.
------
ing. Pavel Zilinec
mailto:zilinec(zv)email(tec)cz
2.11.2001 Dalibor Falt�nek:
> Ahoj pratele,
> neexistuje v delphi 5 c/s moznost vytvorit pole napr. editboxu na formulari
> v dobe navrhu? Neco takoveho jako ve visual basicu, ze zkopiruji na
> formulari prvek a umistim, a prostredi se mne zepta, jestli z techto prvku
> nechci vytvorit pole prvku. Pak se totiz na ne pekne muzu odkazovat v
> cyklech jako napr:
> (zapis ve VB )
> for i=1 to 10
> edit1(10).text = i
> next i
> V delfi sice muzu pristupovat na vsechny prvky pomoci components, ale
> samozrejme vsechny pro me zajimave prvky maji index, ktery asi nemuzu
> ovlivnit, leda bych uz pri umistovani na formular striktne dodrzel jejich
> posloupnost.