Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
Zistenie pozicie stringu v treeview
[*] Tomas Hustava <tommyx(zv)zoznam.sk> - 8.5.2003 00:03:38
Zdravim konferenciu,
prosim vas, potrebujem poradit. Mam treeview naplneny adresarovou strukturou
nejakeho disku aj vratane suborov. Potrebujem ale napriklad zistit kompletnu
cestu napriklad k suboru AAA.TXT, ktory je niekde v strukture. Existuje nejaka
funkcia na to v treeview {alebo inde}, ktora mi vypise kompletnu cestu v tvre
napr. C:\DOKUMENTY\AAA.TXT ?
Dakujem!**********************************
TOMMY
http://tommyx.webpark.sk
mailto:tommyx(zv)zoznam.sk
**********************************
Jak nacist ikonu z RES
[*] Milo� Kastner - 7.5.2003 23:39:44
Pomoci Image Editoru Delphi. Otevru res, klepnu pravym tlacitkem
mysi, vyberu New/ Icon, pak otevru jinou ikonu nebo bitmapu a pres
clipboard dam do nove ikony v res.
Milos
P�vodn� zpr�va:
> From: "Milo� Kastner" <kastner(zv)stereo(tec)cz>
>> - Udelam si novy projekt (formular, jedno tlacitko) a zkompiluju to.
>> - Otevru .res, pridam dalsi ikonu, pojmenuju ji napr. Icon1
> A jak ji tam pridavas ?
> Petr.Jak nacist ikonu z RES
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 7.5.2003 23:35:08
From: "Milo� Kastner" <kastner(zv)stereo(tec)cz>
> Delam neco spatne, nebo jeste neco chybi?
Postup:
1. Novy projekt
2. Novy soubor Icons.rc (predpoklada se ze EARTH.ICO je v adresari projektu)
NEWICON ICON EARTH.ICO
3. Pridas Icons.rc do projektu
4.
Icon.Handle := LoadIcon(HInstance, 'NEWICON');
A je to.
Petr Vones
Jak nacist ikonu z RES
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 7.5.2003 23:49:14
From: "Milo� Kastner" <kastner(zv)stereo(tec)cz>
> Pomoci Image Editoru Delphi. Otevru res, klepnu pravym tlacitkem
Jeste me napadlo, davas to do noveho .RES nebo se jen snazis editovat ten co
vygeneruje IDE pro projekt ? Musis pouzit jiny res a pomoci {$R jmeno.res} jej
pridat do projektu.
Petr Vones
Jak nacist ikonu z RES
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 7.5.2003 23:18:47
From: "Milo� Kastner" <kastner(zv)stereo(tec)cz>
> - Udelam si novy projekt (formular, jedno tlacitko) a zkompiluju to.
> - Otevru .res, pridam dalsi ikonu, pojmenuju ji napr. Icon1
A jak ji tam pridavas ?
Petr.
Jak nacist ikonu z RES
[*] Milo� Kastner - 7.5.2003 23:12:33
Diky za radu, ale nejak se mi to nedari:
- Udelam si novy projekt (formular, jedno tlacitko) a zkompiluju to.
- Otevru .res, pridam dalsi ikonu, pojmenuju ji napr. Icon1
- Pridam obsluhu tlacitka Icon.Handle := LoadIcon(HInstance, 'Icon1');
- Kdyz to spustim a trasuju, tak v Icon.Handle mam 0 a ikona formulare
se nezmeni.
Jestlize necham ve funkci LoadIcon hodnotu 'MAINICON', tak uz je v
Icon.Handle nejake cislo ale zmena se taky neprojevi (pokud jsem
v res upravil vzhled ikony MAINICON).
Delam neco spatne, nebo jeste neco chybi?
Milos Kastner
kastner(zv)stereo(tec)cz
Puvodni zprava:
> From: "Milo� Kastner" <kastner(zv)stereo(tec)cz>
>> poradil byste mi nekdo jak nacist ikonu z resourses?
>> Potrebuji vymenit za behu ikonu formulare a chci ji mit ulozenou
>> v .RES, ne v .ICO.
> procedure TForm1.Button1Click(Sender: TObject);
> begin
> Icon.Handle := LoadIcon(HInstance, 'MAINICON');
> end;
> Petr Vones
Tisk obrazku Sinea
[*] Pavel Malinsky <malinsky(zv)pmcom(tec)cz> - 7.5.2003 22:28:08
> -----Original Message-----
> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Vaclav Krmela
> Sent: Wednesday, May 07, 2003 5:21 PM
>
> > Umi Sinea sahnout na disk pro ten obrazek?
>
> Ano, je to celkem jednoduche.
Skutecne! Chodi to pekne, jeste bych se chtel, prosim, zeptat,
zda jde pro objekt obrazku mozne urcit, aby se rozmer (konkretne mi
jde o vysku) ridil podle natazeneho obrazku. Obrazky mam jako detail
a vyska obrazku je ruzna a potreboval bych, aby se podle nej ridila
vyska celeho detailu. Snad jsem to popsal srozumitelne.
S pozdravem a dikem
=====================================
> Pavel Malinsky; malinsky(zv)pmcom(tec)cz <
=====================================
> GSM: 602 652 203 | ICQ: 322015967 <
=====================================
Pridani uzivatele do IB/FB
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 7.5.2003 19:20:59
Haj hou!
On 7 May 2003 at 11:08, Jan Naiser wrote:
> pokud pridam uzivatele do IB nebo FB, musim mu, patrne, nastavit prava
> k jednotlivym tabulkam a SP. Jak to lze programove provest?
jedine pres SQL prikaz GRANT (viz dokumentace).
> Je lepsi to nastavovat pres role? Jakym zpusobem se to dela?
Osobne bych role nepouzil, ale pokud se spokojite s faktem ze uzivatel muze v
dany okamzik pracovat pouze pod jedinou roli, tak lze role pouzit. Postup je
stejny, tzn. prikazem GRANT pridelit prava rli misto uzivatele, a pak prikazem
GRANT priradit roli uzivateli (vid dokumentace).
S pozdravem
Pavel Cisar
Navidenou na Prvni Evropske Firebird Konferenci - Kveten 2003,
Fulda, Nemecko
http://www.firebird-conference.com
Mobil: 724 281429
http://www.ibphoenix(tec)cz
Vse co potrebujete pro Firebird a InterBase
Jak pouzit v delphi DeviceIoControl
[*] delphipage(zv)volny(tec)cz - 07.5.2003 19:01:49
potreboval bych poradit, jak tohle(otaceni sat. paraboli pomoci
sat. karty v PC) rozchodit v delphi, s cim si nevim rady tak je
tucne.
Nevim si rady s tou casti kdy nactu z registru hodnotu
NetCfgInstanceId, protoze cecko nejak moc neovladam, tak nevim
moc co se stim dale deje. ---------------
Pro ty, kteri by radi nataceli sve motory programove, nyni uvedu
kratky popis. Nejvetsi cast kodu je ziskani hodnoty
NetCfgInstanceId pro SS2 (to je klic v registru, ktery ma napr
hodnotu {7E11F734-A291-4A8F-8C56-FEEBCA096D6A}). Zde je takova
mala ukazka.
HANDLE ghSKY=INVALID_HANDLE_VALUE;
HKEY hKey,hKeyNdi;
char szKey[64],szValue[64];
DWORD dwKey,dwValue,dwType,i;
if(RegOpenKeyEx(HKEY_LOCAL_MACHINE,"SYSTEM\\CurrentControlSet\\Control\\Class\\{4D36E972-E325-11CE-BFC1-08002bE10318}",0,KEY_READ,&hKey)
== ERROR_SUCCESS) {
for(i=0;dwKey=sizeof(szKey),RegEnumKeyEx(hKey,i,szKey,&dwKey,NULL,NULL,NULL,NULL)
== ERROR_SUCCESS;i++) {
lstrcat(szKey,"\\Ndi");
if(RegOpenKeyEx(hKey,szKey,0,KEY_READ,&hKeyNdi) == ERROR_SUCCESS)
{
dwValue=sizeof(szValue);
dwType=REG_SZ;
if(RegQueryValueEx(hKeyNdi,"Service",NULL,&dwType,szValue,&dwValue)
== ERROR_SUCCESS) {
if(!lstrcmpi(szValue,"SKYNET"))
{
szKey[dwKey]='\0';
RegCloseKey(hKeyNdi);
if(RegOpenKeyEx(hKey,szKey,0,KEY_READ,&hKeyNdi) == ERROR_SUCCESS)
{
dwValue=sizeof(szValue)-4;
dwType=REG_SZ;
lstrcpy(szValue,"\\\\.\\");
if(RegQueryValueEx(hKeyNdi,"NetCfgInstanceId",NULL,&dwType,szValue+4,&dwValue)
== ERROR_SUCCESS) {
ghSKY=CreateFile(szValue,GENERIC_READ,0,0,OPEN_EXISTING,0,0);
RegCloseKey(hKeyNdi);
break;
}
}
}
}
RegCloseKey(hKeyNdi);
}
}
RegCloseKey(hKey);
}
Pokud mate v ghSKY jinou hodnotu nez INVALID_HANDLE_VALUE mate
vyhrano.
if(ghSKY != INVALID_HANDLE_VALUE)
{
UCHAR gszCMD[32]="\xE0\x31\x68\x00" //otaceni motoru na vychod
A zde je vlastni zaslani DiSEqc prikazu:
DeviceIoControl(ghSKY,0x220000,gszCMD,4,NULL,0,NULL,NULL);
parametry pro DeviceIoControl jsou asi jasne
CloseHandle(ghSKY);
}
pak musi nasledovat ladeni tuneru v nejakem DVB programu
(ProgDVb,MyTheatre,...)
--
Ziskejte kvalitu, kterou si zaslouzite. Za minimalni mesicni
poplatek vam nabizime Antivir, Antispam nebo dalsi kapacitu pro
vas Mailbox. Vice na: http://sluzby.volny(tec)cz/product/mailpaid/
TCP/IP server na Linuxu
[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 07.5.2003 18:11:28
>vsechno je to o tom kolik klientu chces maximalne obslouzit a za
>jakou cenu. Pokud to budou radove tisice, klidne muze spojeni
>se serverem behat na TCP. Pokud tech klientu ma byt teoreticky vic
>pak zrejme bude problem postavit server, ktery tolik konexi utahne.
>Radsi nez stavet rozkladat zatez na desitky serveru bych presel
>na UDP, ktere obslouzi jedna masina (dalsi jen jako zalozni)
***server je uz z principu navrzen jako "decentralizovany" a proto je
vpodstate jedno kam se pripojis a data si vzdy najdou adresata - pokud
extistuje cesta. Servery si mezi sebou navazuji servisni spojeni po kterem
si predavaji data urcena pro klienty, ktere spravuji, nebo maji v DB.
>TCP spojeni zere jednak pamet (alokovane send/recv buffery per socket)
>a jednak vic CPU (vetsi rezie protokolu i vlastni uzivatelske
>obsluhy).
***diky tomu, ze jiz existuje klient, protokol a chybi jen server, bylo by
asi mnohem vice prace to portovat.
***nicmene diky za napday ohledne UDP
S pozdravem
Tomas Rosa
------------------------=[ pinknet on every screen]=-----------------------
Tomas Rosa
Tomas.Rosa(zv)PinkNet(tec)cz http://www.pnws.org
+420 602 860 704
PinkNet Web Server for Win32 - FREEWARE www.pnws.org
---------------------------------------------------------------------------
TCP/IP server na Linuxu
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 7.5.2003 17:42:22
uvodem:
vsechno je to o tom kolik klientu chces maximalne obslouzit a za
jakou cenu. Pokud to budou radove tisice, klidne muze spojeni
se serverem behat na TCP. Pokud tech klientu ma byt teoreticky vic
pak zrejme bude problem postavit server, ktery tolik konexi utahne.
Radsi nez stavet rozkladat zatez na desitky serveru bych presel
na UDP, ktere obslouzi jedna masina (dalsi jen jako zalozni)
TCP spojeni zere jednak pamet (alokovane send/recv buffery per socket)
a jednak vic CPU (vetsi rezie protokolu i vlastni uzivatelske
obsluhy).
> >tohle je uplne jinak:
> >1) i UDP za NATem zajisti tranaparentni prenos obema smery - jinak
by
> >byl NAT uplne k nicemu protoze by nefungovala takova zakladni vec
jako
> >jsou DNS dotazy. UDP se z tohohle pohledu chova uplne stejne jako
> >TCP - tedy: funguje vse co inicializuje spojeni z lokalni site
smerem
> >ven do Internetu.
>
> ***hm, vpohode - uz na me to teplo venku nejak leze...
>
> ...vim ze jsme meli vyhrady proti UDP - nicmene tato je spatna.
Spravne jsou:
>
> * neleze to pres SOCKS proxy, HTTP proxy
podle me kdyz uz neco podporuje SOCKS, pak to pravdepodobne
umi SOCKS v5, ktery UDP pro tyhle potreby v pohode prenese .
Vzdycky je mozne pouzit TCP zapouzdreni jako non-default alternativu
> * nezaruci mi to prenos (pokud se nepletu)
nezaruci - ale je mozne si udelat vlastni obsluhu tak, ze
to prenos zaruci (potvrzovani doruceni packetu a opakovani
ztracenych)
> * huze by se nad tim implementovalo SSL
to je mozne, ale da se pouzit nejaky kryptovaci protokol, ktery bude
umet kryptovat non-stream data nebo SSL donuti kryptovat
non-TCP stream
PS: nikdy jsem s SSL knihovnama nepracoval takze netusim jak to presne
chodi
> * prenos je postaven nad XML pakety - ty by se do UDP paketu (max.
512b
> pokud se nepletu) tezko skladaly
UDP packet ma max velikost 65535 (plus minus) bytu (zalezi na
platforme) - ale o to nejde (samozrejme je nesmyslne posilat tak velke
bloky - ty se rozfragmentuji na packety a je vetsi sance ze se nektery
ztrati). Ale neni velky problem udelat si vlastni nadstavbu zaruceneho
transferu stream dat nad UDP
> Pro UDP se rozhodujeme pro VoIP - ted je postaven na TCP/IP kvuli
jiz
> popisovanym tunelum - tim se spoji opravy kazdy s kazdym. Ale pro
hlas to
> neni to prave - museli jsme resit vlastni zahazovani paketu a pod.
>
Zdravi
D. Toman
Tisk obrazku Sinea
[*] Vaclav Krmela <krmela(zv)ustinadorlici(tec)cz> - 7.5.2003 17:21:22
> From: Pavel Malinsky
>
> nevite, prosim, nekdo zda je mozne pomoci
> gen. Sinea tisknout obrazky kdyz mam u kazdeho zaznamu
> tistene tabulky ulozeno fyzicke umisteni tohoto obrazku?
> Obrazek neni v databazi, ale na disku.
> Umi Sinea sahnout na disk pro ten obrazek?
Ano, je to celkem jednoduche.
- do predlohy se vlozi graficky prvek Obrazek
- do pole pro nazev souboru s obrazkem se vlozi
odkaz na databazovou polozku, napr #3,
nebo #NazevPoleObrazovehoSouboru
- ve vlastnostech obrazku se musi povolit zmena,
jinak by se tisknul stale stejny obrazek
To je vse.
Vaclav Krmela
FlashFiler - kucharka
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 7.5.2003 16:42:41
Puvodni zprava ze dne 7.5.2003:
> 1. ako prevadzkovat FF na lokale formou dbase (FoxPro) - bez nutnosti
> serveru - su s tym nejake problemy?
> 2. ako FF menezovat (struktura, udaje) na sposob IBExpert - existuje
> nejaky rozumny nastroj ?
> 3. ake komponenty najlepsie pouzit pre FF ?
> 4. ako zostrojit instalacku (InnoSetup) aby stacila jedna instalacia bez
> zasahu usera (DB+FF+APP) ?
> 5. su nejake zaludnosti, ktorym sa je treba vyhnut???
> 6. jednoducha moznost zmeny na sietovu aplikaciu (FF prip. FireBird)
> 7. mozno nejake doporucenia
Promin, vubec se nechci chovat neslusne. Ale kdyz si tak ty Tve otazky
ctu, tak bych Ti doporucil v prvni rade si FlashFiler nainstalovat. A
nevykladej mi prosim, ze uz jsi to nekdy videl nainstalovane, protoze
to bys takove otazky rozhodne nemohl vymyslet :-)
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================
Vyhledavani stringu podle masky
[*] Petr Hlo�ek <petr h(zv)mrp(tec)cz> - 7.5.2003 15:55:19
Dobry den,
nevite nahodou o nejake unite s funkcemi pro manipulaci se stringy?
Potreboval bych vyhledavani podle masky.
Treba misto cisla pouzit #, dvou cisel ##, misto pismena % atd.
Dekuji za kazdou radu.
Petr
TCP/IP server na Linuxu
[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 07.5.2003 15:49:28
>tohle je uplne jinak:
>1) i UDP za NATem zajisti tranaparentni prenos obema smery - jinak by
>byl NAT uplne k nicemu protoze by nefungovala takova zakladni vec jako
>jsou DNS dotazy. UDP se z tohohle pohledu chova uplne stejne jako
>TCP - tedy: funguje vse co inicializuje spojeni z lokalni site smerem
>ven do Internetu.
***hm, vpohode - uz na me to teplo venku nejak leze......vim ze jsme meli vyhrady proti UDP - nicmene tato je spatna. Spravne jsou:
* neleze to pres SOCKS proxy, HTTP proxy
* nezaruci mi to prenos (pokud se nepletu)
* huze by se nad tim implementovalo SSL
* prenos je postaven nad XML pakety - ty by se do UDP paketu (max. 512b
pokud se nepletu) tezko skladaly
Pro UDP se rozhodujeme pro VoIP - ted je postaven na TCP/IP kvuli jiz
popisovanym tunelum - tim se spoji opravy kazdy s kazdym. Ale pro hlas to
neni to prave - museli jsme resit vlastni zahazovani paketu a pod.>hlavne aby to umelo SOCKS - ne vsechny firemni firewally jsou NAT
>based,
>casto jde o aplikacni proxy servery (ktere vetsinou SOCKS umi)
***SOCKS je zaklad. HTTP je ale pro univerzitini site nutnosti - kolikrat
nic jineho nez web ve nepusti.
S pozdravem
Tomas Rosa
------------------------=[ pinknet on every screen]=-----------------------
Tomas Rosa
Tomas.Rosa(zv)PinkNet(tec)cz http://www.pnws.org
+420 602 860 704
PinkNet Web Server for Win32 - FREEWARE www.pnws.org
---------------------------------------------------------------------------
FlashFiler - kucharka
[*] Roland Turcan <rolo(zv)sedas.sk> - 07.5.2003 15:28:58
<<< 7. 5. 2003 15:28 - KALUS Jozef "jozef.kalus(zv)spordat.sk" >>>
KJ> Situacia: Aplikacia - Lokalna; D6Prof, Win9x,2k,XP; FlashFiler DB;
KJ> pristup 1 user; max 10 rel. tabuliek
-------------------------------------------
My answer:
----------
Neviem co to ma byt za soft, ale co tak pouzit FireBird Embedded SQL
server ?
--
Best regards, TRoland
Tisk obrazku Sinea
[*] Pavel Malinsky <malinsky(zv)pmcom(tec)cz> - 7.5.2003 15:02:51
Ahoj,
nevite, prosim, nekdo zda je mozne pomoci
gen. Sinea tisknout obrazky kdyz mam u kazdeho zaznamu
tistene tabulky ulozeno fyzicke umisteni tohoto obrazku?
Obrazek neni v databazi, ale na disku.
Umi Sinea sahnout na disk pro ten obrazek?
S pozdravem a dikem
=====================================
> Pavel Malinsky; malinsky(zv)pmcom(tec)cz <
=====================================
> GSM: 602 652 203 | ICQ: 322015967 <
=====================================
TCP/IP server na Linuxu
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 07.5.2003 15:01:20
> >samotny select() tusim neumi spracovavat neomezene mnozstvi
> >socketu (melo by snad jit zvysit predefinovanim jedne konstanty - ale
> >stale je to limit definovany pri kompilaci)
> ***hm, nikde nic nepopisovali - podivam se.
Je to konstanta FD_SETSIZE ... defaultne je to na 64.
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Synapse Delphi and Kylix TCP/IP Lib.
TCP/IP server na Linuxu
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 7.5.2003 14:50:44
>
> ***ne, zcela napripada v uvahu, protoze:
zalezi jen na poctu klientu. Obslouzit velke (opravdu velke) mnozstvi
klientu muze byt problem.
> a) jiz existuje protokol, ktery jsme vyvynuli (respektive upravili a
> rozsirili stavajici - jabber.com)
>
> b) tcp spojeni navaze klient k serveru - tedy proleze i pres veskere
> firewally, maskarady a NAT. UDP musi mit obousmernou "viditelnost" -
proto
> kuprikladu pro ICQ existuji i ruzne "moduly" kuprikladu do maskarady
na
> linuxu.
tohle je uplne jinak:
1) i UDP za NATem zajisti tranaparentni prenos obema smery - jinak by
byl NAT uplne k nicemu protoze by nefungovala takova zakladni vec jako
jsou DNS dotazy. UDP se z tohohle pohledu chova uplne stejne jako
TCP - tedy: funguje vse co inicializuje spojeni z lokalni site smerem
ven do Internetu.
NAT veme packet od klienta z lokalni site, zmeni adresu
odesilatele a zaroven zmeni i port odesilatele (puvodni hodnoty ulozi
do tabulky), pak packet posle do internetu. Server odpovi na adresu
v packetu (vnejsi adresa NATu) na port v packetu - NAT to prijme
zjisti, ze
v tabulce ma pro dany port (pripadne i IP) ulozenu lokalni adresu a
puvodni port, vymeni adresu a port prijemce packetu a posle do lokalni
site.
Cili pokud u UDP zarucim, ze prvni packet bezi z lokalni site smerem
do Internetu _NENI_ problem.
Problem vznika tehdy, kdyz krome hlavniho kontrolniho kanalu je treba
navazat jeste nejaky jiny, ktery ma jit ke klientovi za firewallem -
kdyz
uz mluvis o ICQ tak ve chvili kdy je treba
poslat message na jineho ICQ klienta (standardne se deje TCP spojenim
primo mezi temi klienty). Pak jsou treba ruzne patche/moduly do NAT
serveru, ktere toto umozni.
Ale opakuji tento problem nema co delat s tim zda je kontrolni spojeni
nad TCP nebo nad UDP
> V protokolu je dokonce i prenos dat pres firewaly - klient navaze
> nove spojeni na server, druhy klient take a server je propoji - tim
muze
> pranaset opradu kdokoliv kdo se dostane ven na internet. Dokonce je
v
> popisu protokolu i HTTP gateway pro klienta, aby mohl pres HTTP
proxy
> servery ven (ruzne univerzitni site).
hlavne aby to umelo SOCKS - ne vsechny firemni firewally jsou NAT
based,
casto jde o aplikacni proxy servery (ktere vetsinou SOCKS umi)
D. Toman
TCP/IP server na Linuxu
[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 07.5.2003 14:37:20
>samotny select() tusim neumi spracovavat neomezene mnozstvi
>socketu (melo by snad jit zvysit predefinovanim jedne konstanty - ale
>stale je to limit definovany pri kompilaci)
***hm, nikde nic nepopisovali - podivam se.>to by mohl byt prvni blud - pokud ma dojit na opravdu velka mnozstvi
>otevrenych spojeni (pripojenych klientu) pak je treba utyct od
>TCP protokolu a prejit na vlastni protokol nad UDP (cili stejne
>jako ICQ). TCP ma zbytecne velkou rezii (jak prenosovou tak
>hlavne na zdroje na serveru) a skutecne masove rozsireni klientu
>se da podle mne uridit jen na UDP (snizeni nakladu na server)
>
>UDP by take znacne zjednodusilo program na obsluhu spojeni od klientu
>(jeden thread, jeden socket,....)
***ne, zcela napripada v uvahu, protoze:
a) jiz existuje protokol, ktery jsme vyvynuli (respektive upravili a
rozsirili stavajici - jabber.com)
b) tcp spojeni navaze klient k serveru - tedy proleze i pres veskere
firewally, maskarady a NAT. UDP musi mit obousmernou "viditelnost" - proto
kuprikladu pro ICQ existuji i ruzne "moduly" kuprikladu do maskarady na
linuxu. V protokolu je dokonce i prenos dat pres firewaly - klient navaze
nove spojeni na server, druhy klient take a server je propoji - tim muze
pranaset opradu kdokoliv kdo se dostane ven na internet. Dokonce je v
popisu protokolu i HTTP gateway pro klienta, aby mohl pres HTTP proxy
servery ven (ruzne univerzitni site).
>urcite vetsina klientu "nic" nedela cili je nesmysl mit na kazdeho
>handle do databaze. Mel by stacit nejaky mensi pool threadu, ktere
>jsou
>pripraveny strachat se v databazi. Hlavne by databaze mela byt
>navrzena
>a realizovana tak aby reagovala rychle (cili zadna komplikovana
>databaze
>a rychla masina - pokud mozno jina nez na ktere bezi server
>obsluhujici
>spojeni (ale pro zacatek to je jedno)
***ale to navrhuji jiz od zacatku
S pozdravem
Tomas Rosa
------------------------=[ pinknet on every screen]=-----------------------
Tomas Rosa
Tomas.Rosa(zv)PinkNet(tec)cz http://www.pnws.org
+420 602 860 704
PinkNet Web Server for Win32 - FREEWARE www.pnws.org
---------------------------------------------------------------------------
Jak nacist ikonu z RES
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 7.5.2003 14:20:22
From: "Milo� Kastner" <kastner(zv)stereo(tec)cz>
> poradil byste mi nekdo jak nacist ikonu z resourses?
> Potrebuji vymenit za behu ikonu formulare a chci ji mit ulozenou
> v .RES, ne v .ICO.
procedure TForm1.Button1Click(Sender: TObject);
begin
Icon.Handle := LoadIcon(HInstance, 'MAINICON');
end;
Petr Vones
Jak nacist ikonu z RES
[*] ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> - 7.5.2003 14:20:35
Ny41LjIwMDMgTWlsb5ogS2FzdG5lcjoNCj4gQWhvaiwNCj4gcG9yYWRpbCBieXN0ZSBtaSBuZWtk
byBqYWsgbmFjaXN0IGlrb251IHogcmVzb3Vyc2VzPw0KPiBQb3RyZWJ1amkgdnltZW5pdCB6YSBi
ZWh1IGlrb251IGZvcm11bGFyZSBhIGNoY2kgamkgbWl0IHVsb3plbm91DQo+IHYgLlJFUywgbmUg
diAuSUNPLg0KDQpaa291c2VsIGpzaSBBUEkgZnVua2NpIExvYWRJY29uID8NCg0KDQotLSANCkph
biBGaWFsYQ0KbWFpbHRvOmphbi5maWFsYUB3by5jeg==FlashFiler - kucharka
[*] KALUS Jozef <jozef.kalus(zv)spordat.sk> - 7.5.2003 13:52:12
zdravim,
idem sa vrhnut na FF a potreboval by som sa vyhnut pociatocnym
problemom, preto ak bude mat niekto chvilku poprosil by som o odpovede
na moje otazocky, vopred dakujem.=20
Viem, ze asi kazda z tychto veci tu uz bolo rozdiskutovana, ale je to
neskutocne rozhadzane a asi by to dost dlho trvalo pokial by som to dal
dohromady.
------------------------------------------------------------------------=
--------------------------------
Situacia: Aplikacia - Lokalna; D6Prof, Win9x,2k,XP; FlashFiler DB;
pristup 1 user; max 10 rel. tabuliek
Otazky:
1. ako prevadzkovat FF na lokale formou dbase (FoxPro) - bez nutnosti
serveru - su s tym nejake problemy?
2. ako FF menezovat (struktura, udaje) na sposob IBExpert - existuje
nejaky rozumny nastroj ?
3. ake komponenty najlepsie pouzit pre FF ?
4. ako zostrojit instalacku (InnoSetup) aby stacila jedna instalacia =
bez
zasahu usera (DB+FF+APP) ?
5. su nejake zaludnosti, ktorym sa je treba vyhnut???
6. jednoducha moznost zmeny na sietovu aplikaciu (FF prip. FireBird)
7. mozno nejake doporucenia
Dakujem este raz vsetkym zainteresovanym a dufam ze to pomoze aj
ostatnym nasluchajucim v tejto konfere.
joka
---------------------------------------------
Delphi 6 Profesional, FireBird, Windows 2000
---------------------------------------------
Ing. Jozef Kalus=09
SOVA
=A5. =A9t=FAra 17/28
018 61 BELU=A9A
Mob.: 0905 459156
e-mail: equipment(zv)equipment.sk
jozef.kalus(zv)spordat.sk
Web: http://www.equipment.sk
Verze EXE
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 7.5.2003 14:09:15
From: "Rumcajs-konfera" <konfera(zv)rumcajs.com>
> Vim, ze se to tu uz resilo, ale v archivu sem to nenasel.... Jak prectu
> cislo verze programu?
uses
JclFileUtils;
procedure TForm1.Button2Click(Sender: TObject);
begin
ShowMessage( VersionFixedFileInfoString('kernel32.dll') );
end;
Petr Vones
FlashFiler - kucharka
[*] ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> - 7.5.2003 13:57:34
7.5.2003 KALUS Jozef:
> zdravim,
> idem sa vrhnut na FF a potreboval by som sa vyhnut pociatocnym
> problemom, preto ak bude mat niekto chvilku poprosil by som o odpovede
> na moje otazocky, vopred dakujem.
Zacni treba zde:
http://www.clexpert(tec)cz/devtip/
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
Jak nacist ikonu z RES
[*] Milo� Kastner - 7.5.2003 14:07:37
Ahoj,
poradil byste mi nekdo jak nacist ikonu z resourses?
Potrebuji vymenit za behu ikonu formulare a chci ji mit ulozenou
v .RES, ne v .ICO.
Diky
Milos Kastner
kastner(zv)stereo(tec)cz
Re[2]: DivX v D6
[*] Slafco <skippo(zv)matfyz.sk> - 7.5.2003 13:28:10
DF> bacha - divx neni xvid, mozna tam opravdu nemas nainstalovany xvid kodek.
DF> Najdes ho na internetu.
No programovo su ine, ale pokial viem tak oficialne by ti divx mal
prehrat xvid a naopak. Neoficialne divx prehra menej veci ako xvid :)
Ale mozem sa mylit...
Slavo
TCP/IP server na Linuxu
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 7.5.2003 13:09:14
> Jenze ted chci:
> a) zkusit neco noveho
jeste muzes pouzit non-blocking sockety. Je to sice nejslozitejsi na
programovani, ale ma to svoji krasu :-)
samotny select() tusim neumi spracovavat neomezene mnozstvi
socketu (melo by snad jit zvysit predefinovanim jedne konstanty - ale
stale je to limit definovany pri kompilaci)
> b) zpracovavat data do hloubky.
>
> > Pokud potrebujes data
> >zpracovavat v databazi, tak je pochopitelne blbost mit 1000 konexi
do
> >databaze, to je bez diskuze. V tvem pripade na to jdes velmi dobre.> Abych jen nechodil kolem horke kase:
> Server na IM proto potrebuje mnoho otevrenych spojeni, ale relativne
maly
> prenos dat
to by mohl byt prvni blud - pokud ma dojit na opravdu velka mnozstvi
otevrenych spojeni (pripojenych klientu) pak je treba utyct od
TCP protokolu a prejit na vlastni protokol nad UDP (cili stejne
jako ICQ). TCP ma zbytecne velkou rezii (jak prenosovou tak
hlavne na zdroje na serveru) a skutecne masove rozsireni klientu
se da podle mne uridit jen na UDP (snizeni nakladu na server)
UDP by take znacne zjednodusilo program na obsluhu spojeni od klientu
(jeden thread, jeden socket,....)
>- data jsou navic komprimovana zlibem a sifrovana pomoci SSL.
> Takze prenos opravdu maly.
>Ale diky tomu, ze 80% akci se provadi v DB, je
> treba aby server mel pro kazdeho klienta "pristup do DB". Proto jsem
> navrhoval ten thread pool s thready co zpracovavaji pozadavky od
lidi.
urcite vetsina klientu "nic" nedela cili je nesmysl mit na kazdeho
handle do databaze. Mel by stacit nejaky mensi pool threadu, ktere
jsou
pripraveny strachat se v databazi. Hlavne by databaze mela byt
navrzena
a realizovana tak aby reagovala rychle (cili zadna komplikovana
databaze
a rychla masina - pokud mozno jina nez na ktere bezi server
obsluhujici
spojeni (ale pro zacatek to je jedno)
D. Toman
TCP/IP server na Linuxu
[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 07.5.2003 12:31:51
>Nechci te nutit do zadneho reseni! Chtel jsem jen rict, ze odsuzovat
>mnoho threadu jen proto, ze je jich mnoho, neni vzdy moudre. O tom,
>jake reseni zvolit, mnohem vice rozhoduje zpusob dalsiho zpracovani
>dat, ne vlastni socketova komunikace.
***ano - naprosto souhlasim. Delal jsem jiz webovy server (www.pnws.org) a
tam mam co spojeni to thread - tam me to nevadi. Protoze otevru thread,
nasypu data a koncim. Pokud je KeepAlive, nasypu data zhruba 10x a pak
teprve ukoncim thread.
Jenze ted chci:
a) zkusit neco noveho
b) zpracovavat data do hloubky.
> Pokud potrebujes data
>zpracovavat v databazi, tak je pochopitelne blbost mit 1000 konexi do
>databaze, to je bez diskuze. V tvem pripade na to jdes velmi dobre.
Abych jen nechodil kolem horke kase:
Kdysi jsem se podilel na projektu InstatMessanging - ten projekt se asi
pred 2 lety prodal (nevyhradne) do zahranici (Danska). Ja bych jej chtel
ozivit, protoze si myslim ze obsahoval nekolik velmi zajimavych myslenek.
Ja osobne jsem byl autorem celeho klienta (bez nekterych modulu).
Server byl vsak napsan v C++ s pomoci CommonC++. Tenkrat jsme uz vedeli o
jeho slabych strankach a minimalne 2x za den spadnul. Novy server se vsak
nikdy nedokoncil. Oprava serveru je temer nemozna, protoze navic ani po
usilovnem snazeni se nedari slinkovat, nebot dnes jsou jiz novejsi verze
CommonC++ a to znamena velke updaty a puvodni programator je jiz vytizen
jinou praci.
Server na IM proto potrebuje mnoho otevrenych spojeni, ale relativne maly
prenos dat - data jsou navic komprimovana zlibem a sifrovana pomoci SSL.
Takze prenos opravdu maly. Ale diky tomu, ze 80% akci se provadi v DB, je
treba aby server mel pro kazdeho klienta "pristup do DB". Proto jsem
navrhoval ten thread pool s thready co zpracovavaji pozadavky od lidi.
Zaroven, pokud by se nekdo chtel pridat, dvere jsou otevreny - prosim na
muj soukromy mail.>Chces-li to nejak sofistikovaneji
>dale zpracovavat, musi se sahnout po jinem reseni. V tom nejsme nijak
>ve sporu. ;-)
;-)
S pozdravem
Tomas Rosa
------------------------=[ pinknet on every screen]=-----------------------
Tomas Rosa
Tomas.Rosa(zv)PinkNet(tec)cz http://www.pnws.org
+420 602 860 704
PinkNet Web Server for Win32 - FREEWARE www.pnws.org
---------------------------------------------------------------------------
DivX v D6
[*] Luk�cs Peter <Peter.Lukacs(zv)fst1.siemens(tec)cz> - 7.5.2003 12:44:19
To je mozne, ze xvid nen=ED divx, ale nedela to jen u tohoto videa. =
Jin=E9 video
pise podobnou hlasku, jen tam nen=ED xvid ale divx3. Kodeky mam, =
priinstaloval
jsem i dal=B9=ED, ale bez uspechu. Jaxem jiz psal, v jinych =
prehravacich video
prehraju bez =FAroblemu.
Zat=EDm zkousim pracovat s DSPack 2.3 z www.progdigy.com a vysledky =
jsou
prozatim velmi dobre :o)
> bacha - divx neni xvid, mozna tam opravdu nemas nainstalovany xvid =
kodek.
Najdes ho na internetu. S pozdravem Dalibor Falt=FDnek,=20
> ORGREZ, a. s. tel. +420 541 613 312 dalibor.faltynek(zv)orgrez(tec)cz
> >zobrazi pouze srafovane okno s napisem "Nelze najit dekomprimacni=20
> >modul vids:xvid. Video nebude k dispozici." Pritom ostatni =
prehravace=20
> >video
Je to resitelne pomoci ActiveX?
[*] Jakub Martinek <listbox(zv)vakmb(tec)cz> - 7.5.2003 12:40:22
> From: "Ing. Igor Vodi�ka" <vodicka(zv)sagit(tec)cz>
> > Mam na zaklade toho nekolik dotazu:
> > 1. Je mozne toto resit naprogramovanim ActiveX objektu,
> ktery si pripadne
> > zmenene bunky, vyextrahovane po SQL dotazu do tabulky nebo
> jine datove
> > struktury, zpracuje a kazdou bunku ulozi v patri�nem
> formatu, vhodnem pro
> > dany DTP program, na lokalni disk stanice?
> > 2. Pokud je mozne pouzit ActiveX, tak jaky typ bude lepsi:
> ActiveXControl
> > nebo ActiveXForm.
> > 3. Muzu se z ActiveX prihlasit k SQL databazi a pracovat s nejakou
> tabulkou?
> > Staci pouze cist.
> > 4. Ma nekdo na podobne tema nejaky zdroj informaci nebo priklad.
> Ahoj.
> Nemel by to byt problem. Pro obdobny system ActiveX pouzivam.
> Over si ale jak jste na tom s licencovanim SQL serveru. Vas system je
pravdepodobne 3 vrstvy a tim padem se k SQL
> serveru pripojuje pouze aplikacni server. Tak jak to popisujes, by se pak
pripojovala kazda stanice a to muze byt problem. Ja to resim
> tak, ze jsem si napsal TCP server se kterym komunikuji ponekud upravenym
FTP protokolem (jako zaklad jsem pouzil
> FTP server z ICS od F. Pietteho) ktery se pripojuje na SQL server a
klienstke ActiveX komponente predava pouze vysledek dotazu.
>
> Ludek
Licencne je u vetsiny komercnich serveru jedno jestli se klient pripojuje
primo ci zprostredkovane - lienci musite zakoupit stejne.
Jde spis o setreni prostredku serveru.
Za lepsi reseni povazuji pouziti webove sluzby ktera prijme data v obecnem
formatu(text,XML,...) a ty podle pozadavku zpracuje a preda.
Jakub Martinek
jmartinek(zv)vakmb(tec)cz
Verze EXE
[*] Ale� Va���ek�����"q��y�&���w�3 - 7.5.2003 12:26:25
Ahoj,
function GetFileVersion(const Value: string; var FMajorVersion, =
FMinorVersion, FReleaseVersion, FBuildVersion : String) : String; =
overload;
var
Size, Size2: DWord;
Pt, Pt2: Pointer;
FFileName : string;
begin
Result :=3D '';
FFileName :=3D Value;
If Not FileExists( FFileName) then Exit;
Size :=3D GetFileVersionInfoSize ( PChar( FFileName), Size2);
if Size <=3D 0 then Exit; { soubor zadaneho jmena =
sice
existuje, ale neobsahuje informace o verzi - skonci}
GetMem (Pt, Size);
try
GetFileVersionInfo (PChar ( FFileName), 0, Size, Pt);
VerQueryValue (Pt, '\', Pt2, Size2);
with TVSFixedFileInfo (Pt2^) do
begin
FMajorVersion :=3D IntToStr (HiWord (dwFileVersionMS));
FMinorVersion :=3D IntToStr (LoWord (dwFileVersionMS));
FReleaseVersion :=3D IntToStr (HiWord (dwFileVersionLS));
FBuildVersion :=3D IntToStr (LoWord (dwFileVersionLS));
Result :=3D Format('%s.%s.%s.%s', [IntToStr (HiWord =
(dwFileVersionMS)),
IntToStr (LoWord =
(dwFileVersionMS)),
IntToStr (HiWord =
(dwFileVersionLS)),
IntToStr (LoWord =
(dwFileVersionLS))]);
end;
finally
FreeMem (Pt);
end;
end;
Ales
> -----Original Message-----
> From: Rumcajs-konfera [mailto:konfera(zv)rumcajs.com]=20
>=20
> Jak prectu
> cislo verze programu?
Verze EXE
[*] Jiri Sedivec <jsedivec(zv)mail(tec)cz> - 7.5.2003 12:10:24
----- Original Message -----
Subject: Verze EXE
Function GetAppVersion(const FileName: AnsiString): String;
var dwHandle: THandle;
dwSize: DWORD;
lpData, lpData2: Pointer;
uiSize: UINT;
begin
Result := '';
dwSize := GetFileVersionInfoSize(PChar(FileName), dwSize);
if dwSize <> 0 then
begin
GetMem(lpData, dwSize);
if GetFileVersionInfo(PChar(FileName), dwHandle, dwSize, lpData) then
begin
uiSize := Sizeof(TVSFixedFileInfo);
VerQueryValue(lpData, '\', lpData2, uiSize);
with PVSFixedFileInfo(lpData2)^ do
Result := Format('%d.%d.%d.%d', [HiWord(dwProductVersionMS),
LoWord(dwProductVersionMS),HiWord(dwProductVersionLS),
LoWord(dwProductVersionLS)]);
end;
FreeMem(lpData, dwSize);
end;
End;
Verze EXE
[*] Rumcajs-konfera <konfera(zv)rumcajs(tec)com> - 7.5.2003 12:02:16
Servus ve spolek....=0D
Vim, ze se to tu uz resilo, ale v archivu sem to nenasel.... Jak prectu
cislo verze programu?=0D
=0D
Lukas "Rumcajs" Weiss=20
DivX v D6
[*] Dalibor Falt�nek <dalibor.faltynek(zv)orgrez(tec)cz> - 7.5.2003 12:06:41
> >zobrazi pouze srafovane okno s napisem "Nelze najit dekomprimacni modul
> >vids:xvid. Video nebude k dispozici." Pritom ostatni prehravace video
bacha - divx neni xvid, mozna tam opravdu nemas nainstalovany xvid kodek.
Najdes ho na internetu.
S pozdravem
Dalibor Falt�nek, ORGREZ, a. s.
tel. +420 541 613 312
dalibor.faltynek(zv)orgrez(tec)cz
TCP/IP server na Linuxu
[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 07.5.2003 12:17:01
>jakmile nekdo zvenci zkusi navazat spojeni,
>vytvori se co nejrychleji novy socket, na kterem se komunikuje (a nejspise
>i ten novy thread, ve
>kterem ta komunikace pobezi; jakmile je vymena dat ukoncena, thread se
>ukonci rovnez)
***jenze ja mam 1000 spojeni trvale otevrenych, takze proto jsem se pidil
po tom prikazu SELECT - ten asi resi toco potrebuji a nasel jsem priklady:
(sice v C, ale to je uplne jedno):
http://docsrv.caldera.com:8457/cgi-bin/info2html?(libc.info.gz)Server%2520Example
http://www.lowtek.com/sockets/select.html
S pozdravem
Tomas Rosa
------------------------=[ pinknet on every screen]=-----------------------
Tomas Rosa
Tomas.Rosa(zv)PinkNet(tec)cz http://www.pnws.org
+420 602 860 704
PinkNet Web Server for Win32 - FREEWARE www.pnws.org
---------------------------------------------------------------------------
Komponenty ala IntraWeb
[*] Pavel Poles <xCony(zv)seznam(tec)cz> - 7.5.2003 12:14:04
Zdravim,
nemate nekdo zkusenosti s nejakyma komponentama
s podobnou funkcnosti jako maji IntraWeb v Delphi 7?
Podminkou je aby fungovali pod Linuxem. IntraWeb to
sice nabizi, ale cenoveneni zrovna nejdostupnejsi.
Predem diky za vsechny tipy
Pavel Poles
IB SQL error
[*] Robert Poncak <delphi(zv)zvlauto.sk> - 7.5.2003 11:46:21
Nepouzivat TIBTable!
Data zapisovat bud priamo cez TIBQuery, alebo pomocou TIBDataSet.
Robo
----- Original Message -----
From: "Ing. Zden�k �ezn��ek" <reznicek(zv)pce(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, May 07, 2003 11:30 AM
Subject: IB SQL error
> Zdravim vsechny,
> Prevadim Paradoxovske tabulky do IB database. (Jednorazova akce.) Jedna z
> tabulek ma cca 350 tis. zaznamu (ostatni jsou podstatne mensi).
> Pouzivam k prevodu TTable pro pristup na Paradox a TIBTable pro pristup na
> IB.
> Do IB pridavam metodou Append a zapisuji pomoci Post. Komponenta
> TIBTransaction.Active=false.
> Zhruba v polovine (cca po 150 tis. Appendech) se aplikace zastavi a
napise:
>
> Dynamic SQL Error SQL error code=-502. Declared cursor altery exists.
> Proc to nejde ?
>
> Diky Zdenek Reznicek
>
>
>
IB SQL error
[*] Ing. Zden�k �ezn��ek - 7.5.2003 11:30:37
Zdravim vsechny,
Prevadim Paradoxovske tabulky do IB database. (Jednorazova akce.) Jedna z
tabulek ma cca 350 tis. zaznamu (ostatni jsou podstatne mensi).
Pouzivam k prevodu TTable pro pristup na Paradox a TIBTable pro pristup na
IB.
Do IB pridavam metodou Append a zapisuji pomoci Post. Komponenta
TIBTransaction.Active=false.
Zhruba v polovine (cca po 150 tis. Appendech) se aplikace zastavi a napise:
Dynamic SQL Error SQL error code=-502. Declared cursor altery exists.
Proc to nejde ?
Diky Zdenek Reznicek
odkaz bunky v Excelu
[*] Macko Martin <martin.macko(zv)m-pro(tec)cz> - 7.5.2003 11:25:00
> -----Original Message-----
> From: Dalibor Falt=FDnek [mailto:dalibor.faltynek(zv)orgrez(tec)cz]=20
> Sent: Wednesday, May 07, 2003 8:56 AM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: OT: odkaz bunky v Excelu
>=20
>=20
> Ahoj,
> je to sice trochu OT ale ne zase tak moc.
> Nekdy na nekterych pocitacich excel nazyva bunky pri=20
> zaskrtnutem policku styl odkazu R1C1 jako RxCy, nekdy jako=20
> WxKy, kde x,y jsou cisla radku a sloupcu. Pokud chci potom z=20
> delfi zapisovat do excelu do bunek odkazy, tak treba do
>=20
> cells[neco,neco]:=3D'"=3DR1C5"';
>=20
zkus si najit, treba na torry, komponentu TExcel (autor Tibor F. Liska) =
a v unite excels.pas hledej jak zjistuje RowMark a ColMark ...
Pridani uzivatele do IB/FB
[*] Jan Naiser <tua(zv)wo(tec)cz> - 7.5.2003 11:08:59
Preji pekny den,
(W2k, D6P)
pokud pridam uzivatele do IB nebo FB, musim mu, patrne, nastavit prava k
jednotlivym tabulkam a SP. Jak to lze programove provest? Je lepsi to
nastavovat pres role? Jakym zpusobem se to dela?
Diky, Honza.
TCP/IP server na Linuxu
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 07.5.2003 10:23:21
> ***o to, ze aplikace s 2000 thready, kde kazdy ceka az se nekdo uprdne
> neni asi optimalne navrzena... Je sice ryhle navrzena, ale dle meho
> nazoru ne dobre.
Zalezi na situaci. ;-)
> ***to je sice mozne, ale vezmu li v uvahu, ze thready mi nic navic
> neprinesou a praci ani neulehci - musim mit totiz pristup do DB (a 100
> konexi neni to prave orechove). Takze jsem uvazoval o tom, ze budu mit
> thread pool na zpracovavani pozadavku od klientu - v tomto poolu bude
> tak 1-5 threadu a kazdy bude mit svoji konexi do databaze. Pokud se
> nejaky klient probere a posle data, jeden z threadu, ktery zrovan bude
> mit cas se toho ujme a zpracuje to.
Nechci te nutit do zadneho reseni! Chtel jsem jen rict, ze odsuzovat
mnoho threadu jen proto, ze je jich mnoho, neni vzdy moudre. O tom,
jake reseni zvolit, mnohem vice rozhoduje zpusob dalsiho zpracovani
dat, ne vlastni socketova komunikace. Pokud potrebujes data
zpracovavat v databazi, tak je pochopitelne blbost mit 1000 konexi do
databaze, to je bez diskuze. V tvem pripade na to jdes velmi dobre.
To ale z puvodniho dotazu nevyplynulo, vedel jsem jen ze mas hodne
konexi, kde sem a tam pribehne nejaky ten bajtik. Na to o sobe nema
smysl se mordovat s nejakym resenim, na to bohate staci pohodlne a
rychle vytvorena hromada threadu. Chces-li to nejak sofistikovaneji
dale zpracovavat, musi se sahnout po jinem reseni. V tom nejsme nijak
ve sporu. ;-)
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Synapse Delphi and Kylix TCP/IP Lib.
Je to resitelne pomoci ActiveX?
[*] Ludek ZITA <konference(zv)sales(tec)cz> - 7.5.2003 09:37:00
----- Original Message -----
From: "Ing. Igor Vodi�ka" <vodicka(zv)sagit(tec)cz>
> Mam na zaklade toho nekolik dotazu:
> 1. Je mozne toto resit naprogramovanim ActiveX objektu, ktery si pripadne
> zmenene bunky, vyextrahovane po SQL dotazu do tabulky nebo jine datove
> struktury, zpracuje a kazdou bunku ulozi v patri�nem formatu, vhodnem pro
> dany DTP program, na lokalni disk stanice?
> 2. Pokud je mozne pouzit ActiveX, tak jaky typ bude lepsi: ActiveXControl
> nebo ActiveXForm.
> 3. Muzu se z ActiveX prihlasit k SQL databazi a pracovat s nejakou
tabulkou?
> Staci pouze cist.
> 4. Ma nekdo na podobne tema nejaky zdroj informaci nebo priklad.
>
> Programuji v D5 Ent. Pripadna ActiveX ma bezet na stanicich s Win98, W2K a
> WinXP.
> Predem diky za jakekoliv podnety.
Ahoj.
Nemel by to byt problem. Pro obdobny system ActiveX pouzivam.
Over si ale jak jste na tom s licencovanim SQL serveru.
Vas system je pravdepodobne 3 vrstvy a tim padem se k SQL serveru pripojuje
pouze aplikacni server. Tak jak to popisujes, by se pak pripojovala kazda
stanice a to muze byt problem. Ja to resim tak, ze jsem si napsal TCP server
se kterym komunikuji ponekud upravenym FTP protokolem (jako zaklad jsem
pouzil FTP server z ICS od F. Pietteho) ktery se pripojuje na SQL server a
klienstke ActiveX komponente predava pouze vysledek dotazu.
Ludek
dbgrid, ktory by dokazal locknut stlpce
[*] Ing. SKODA Peter <delphi(zv)korak.sk> - 7.5.2003 08:59:41
Dokazu to aj komponenty RxLib, komponente RxDbGrid, niekedy davno som to
pouzil. A zda sa mi ze rxlib je free.
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz] On
Behalf Of Vlko II.
Sent: Tuesday, May 06, 2003 8:59 PM
To: delphi-l(zv)clexpert(tec)cz
On Tue, 6 May 2003 20:21:58 +0200, ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> wrote:
> 6.5.2003 Vlko II.:
>> Chcel by som poradit nejaku free dbgrid komponentu, ktora by dokazala
>> locknut stlpce, take nieco ako robi
>> tjvdbgrid pri fixedcols;
>
> Pokud myslis, aby sloupce nesly editovat, tak to jde bez problemu
> udelat.
> Staci si je v ComumnsEditoru nadefinovat a nastavit jako ReadOnly
>
nie myslel som ich locknut proti pohybu, aby sa nehybali pri scrollovani
--
--------------
vlko_(zv)pobox.sk
OT: odkaz bunky v Excelu
[*] ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> - 7.5.2003 09:16:56
Ny41LjIwMDMgRGFsaWJvciBGYWx0/W5lazoNCj4gQWhvaiwNCj4gamUgdG8gc2ljZSB0cm9jaHUg
T1QgYWxlIG5lIHphc2UgdGFrIG1vYy4NCj4gTmVrZHkgbmEgbmVrdGVyeWNoIHBvY2l0YWNpY2gg
ZXhjZWwgbmF6eXZhIGJ1bmt5IHByaSB6YXNrcnRudXRlbSBwb2xpY2t1DQo+IHN0eWwgb2RrYXp1
IFIxQzEgamFrbyBSeEN5LCBuZWtkeSBqYWtvIFd4S3ksIGtkZSB4LHkganNvdSBjaXNsYSByYWRr
dSBhDQo+IHNsb3VwY3UuDQo+IFBva3VkIGNoY2kgcG90b20geiBkZWxmaSB6YXBpc292YXQgZG8g
ZXhjZWx1IGRvIGJ1bmVrIG9ka2F6eSwgdGFrIHRyZWJhIGRvDQoNCj4gY2VsbHNbbmVjbyxuZWNv
XTo9JyI9UjFDNSInOw0KDQo+IHRhayBwb2t1ZCBzZSB2IGtvbmtyZXRuaW0gZXhjZWx1IGJ1bmt5
IGptZW51amkgV0ssIGplIHByb2JsZW0gYSB2IHRhYnVsY2UgbmENCj4gcHJpc2x1c255Y2ggYnVu
a2FjaCBzZSBvYmpldmkgI05BWkVWLg0KPiBWaSBuZWtkbywgY28gcyB0aW0/DQoNCk5hc3Rhdml0
IHNpIHByb2dyYW1vdmUgc3R5bCBvZGthenUgamFreSBwb3RyZWJ1amVzLg0KUG9kaXZlaiBzZSBu
YSAuUmVmZXJlbmNlU3R5bGUgPSB4bFIxQzENCi0tIA0KSmFuIEZpYWxhDQptYWlsdG86amFuLmZp
YWxhQHdvLmN6
OT: odkaz bunky v Excelu
[*] Dalibor Falt�nek <dalibor.faltynek(zv)orgrez(tec)cz> - 7.5.2003 08:56:06
Ahoj,
je to sice trochu OT ale ne zase tak moc.
Nekdy na nekterych pocitacich excel nazyva bunky pri zaskrtnutem policku
styl odkazu R1C1 jako RxCy, nekdy jako WxKy, kde x,y jsou cisla radku a
sloupcu.
Pokud chci potom z delfi zapisovat do excelu do bunek odkazy, tak treba do
cells[neco,neco]:='"=R1C5"';
tak pokud se v konkretnim excelu bunky jmenuji WK, je problem a v tabulce na
prislusnych bunkach se objevi #NAZEV.
Vi nekdo, co s tim?
S pozdravem
Dalibor Falt�nek, ORGREZ, a. s.
tel. +420 541 613 312
dalibor.faltynek(zv)orgrez(tec)cz
TCP/IP server na Linuxu
[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 07.5.2003 09:14:40
>Ne.. teda nezkousel jsem to. kdysi, kdyz jsem se na FPC koukal, tak
>mi jeho objektova podpora prisla natolik... ehm.... prehistoricka, ze
>to bylo pro mne nepouzitelne. ;-( Mozna se uz polepsili, nevim...
***zatim co jsem v nem delal, tak proslo - ma nekde prepinac na zapnuti
podpory delphy syntaxe obektu. Jeste nejsem 100% rozhodnut jestli Kylix
(tedy jeho radkovy kompiler), nebo FPC
>No a? je uplne jedno kolik tam mas threadu, zalezi na tom, kolik z
>tech threadu v jednom case zrovna maka. jak jsi sam rikal, data
>prichazi jen obcas a neni jich mnoho. Takze drtiva vetsina threadu
>bude stejne stat a nic nedelat...
>
>Jak jsem tu nedavno psal, kdyz jsem se synapsi zvladl na XP1500+
>stroji provozovat 2000 tezce makajicich threadu Synapse (posilali
>data sem a tam jako o zivot...) a v tu chvili se na pocitaci dali
>normalne pracovat, tak o co jde?
***o to, ze aplikace s 2000 thready, kde kazdy ceka az se nekdo uprdne neni
asi optimalne navrzena... Je sice ryhle navrzena, ale dle meho nazoru ne
dobre. Zcela jiste musi exitovat nejaka rezie na obsluhu tolika threadu a
zcela jiste kazdy zabira nejake to misto v pameti. Take se to musi obvzlast
dobre odladovat ;-)
Pokud by kazda konexe mela tlacit maximum, pak asi thready jsou mnohem
lepsi, ale pokud se jedna o paketovy prenos dat, select mi umozni, aby
jadro zpracovavalo pakety nekolika thready. Navic muzu zajistit to, ze mam
treba nekolik threadu, ktere prijimaji prichozi data, jakmile obdrzi cely
XML paket, rozparsuji jej a pak teprve predaji ke zpracovani danemu modulu
- ten jiz dle predpokladane zateze bude mit vlastni prostredny (respektive
thready) na zpracovani.
>V tvem pripade, kdy cas od casu nejaky thread neco malo provede... o
>tom pocitac nebude ani vedet.
***to je sice mozne, ale vezmu li v uvahu, ze thready mi nic navic
neprinesou a praci ani neulehci - musim mit totiz pristup do DB (a 100
konexi neni to prave orechove). Takze jsem uvazoval o tom, ze budu mit
thread pool na zpracovavani pozadavku od klientu - v tomto poolu bude tak
1-5 threadu a kazdy bude mit svoji konexi do databaze. Pokud se nejaky
klient probere a posle data, jeden z threadu, ktery zrovan bude mit cas se
toho ujme a zpracuje to.
S pozdravem
Tomas Rosa
------------------------=[ pinknet on every screen]=-----------------------
Tomas Rosa
Tomas.Rosa(zv)PinkNet(tec)cz http://www.pnws.org
+420 602 860 704
PinkNet Web Server for Win32 - FREEWARE www.pnws.org
---------------------------------------------------------------------------
TCP/IP server na Linuxu
[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 7.5.2003 09:01:16
Lukas Gebauer dne 7 May 2003 v 8:28:
> > ***hm, predstava threadu pro kazdeho klienta je nepredstavitelna.
> > 1000 lidi beru jako prumer.
>
> No a? je uplne jedno kolik tam mas threadu, zalezi na tom, kolik z
> tech threadu v jednom case zrovna maka. jak jsi sam rikal, data
> prichazi jen obcas a neni jich mnoho. Takze drtiva vetsina threadu
> bude stejne stat a nic nedelat...
Nesledoval jsem tu diskuzi od zacatku prilis pozorne, ale proc by melo byt potreba 1000 threadu?
Domnival jsem se, ze staci jeden listening proces; jakmile nekdo zvenci zkusi navazat spojeni,
vytvori se co nejrychleji novy socket, na kterem se komunikuje (a nejspise i ten novy thread, ve
kterem ta komunikace pobezi; jakmile je vymena dat ukoncena, thread se ukonci rovnez), zatimco
hlavni thread opet pokracuje v poslouchani... Jestlize v puvodnim zadani bylo, ze "cas od casu se
vymeni par bajtu", melo by to takto fungovat, ne?
Karel Rys
DivX v D6
[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 07.5.2003 09:17:50
hledej na torry DivX, nebo hgdspack.zip
nebo se podivej primo na www.progdigy.com
>po dlouhe odmlce mam zase jeden problem: jak prehrat divx v Delphi? V
>konferenci kdysi davno kdosi psal, ze staci pouzivat bezny MP. Me se vsak
>zobrazi pouze srafovane okno s napisem "Nelze najit dekomprimacni modul
>vids:xvid. Video nebude k dispozici." Pritom ostatni prehravace video
>normalne prehraji (Win Media Player, Micro DVD a pod.) S pozdravem
Tomas Rosa
------------------------=[ pinknet on every screen]=-----------------------
Tomas Rosa
Tomas.Rosa(zv)PinkNet(tec)cz http://www.pnws.org
+420 602 860 704
PinkNet Web Server for Win32 - FREEWARE www.pnws.org
---------------------------------------------------------------------------
Je to resitelne pomoci ActiveX?
[*] Ing. Igor Vodi�ka <vodicka(zv)sagit(tec)cz> - 7.5.2003 08:24:04
Zdravim vsechny delfisty,
a predem se omlouvam za trochu delsi vysvetluj�c� text.
Mame ve firme vlastni redakcni system postaveny na internetu. Vsechny texty
jsou rozdeleny do jednotlivych bunek a ty ve formatu HTML (texty) jsou
ulozeny v SQL databazi (MS SQL) na firemnim www serveru. Texty v
jednotlivych bunkach se ruzne aktualizuji a zmeny se musi prenaset do DTP
programu, kde vznikne jejich tistena podoba.
Mam na zaklade toho nekolik dotazu:
1. Je mozne toto resit naprogramovanim ActiveX objektu, ktery si pripadne
zmenene bunky, vyextrahovane po SQL dotazu do tabulky nebo jine datove
struktury, zpracuje a kazdou bunku ulozi v patri�nem formatu, vhodnem pro
dany DTP program, na lokalni disk stanice?
2. Pokud je mozne pouzit ActiveX, tak jaky typ bude lepsi: ActiveXControl
nebo ActiveXForm.
3. Muzu se z ActiveX prihlasit k SQL databazi a pracovat s nejakou tabulkou?
Staci pouze cist.
4. Ma nekdo na podobne tema nejaky zdroj informaci nebo priklad.
Programuji v D5 Ent. Pripadna ActiveX ma bezet na stanicich s Win98, W2K a
WinXP.
Predem diky za jakekoliv podnety.
Ing. Igor Vodicka
informacni systemy
Nakladatelstvi Sagit
Tel.: 59 6786 001
HTTP://www.sagit(tec)cz/
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.476 / Virov� b�ze: 273 - datum vyd�n�: 24.4.2003
TCP/IP server na Linuxu
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 07.5.2003 08:28:49
> >Na tohle chodim od lesa. Pouzijes-li Synapsi (ktera ti bude chodit
> >jako pod windows tak i pod linuxem!),
> ***bezi i pod FPC (FreePascal)?
Ne.. teda nezkousel jsem to. kdysi, kdyz jsem se na FPC koukal, tak
mi jeho objektova podpora prisla natolik... ehm.... prehistoricka, ze
to bylo pro mne nepouzitelne. ;-( Mozna se uz polepsili, nevim...
> ***hm, predstava threadu pro kazdeho klienta je nepredstavitelna. 1000
> lidi beru jako prumer.
No a? je uplne jedno kolik tam mas threadu, zalezi na tom, kolik z
tech threadu v jednom case zrovna maka. jak jsi sam rikal, data
prichazi jen obcas a neni jich mnoho. Takze drtiva vetsina threadu
bude stejne stat a nic nedelat...
Jak jsem tu nedavno psal, kdyz jsem se synapsi zvladl na XP1500+
stroji provozovat 2000 tezce makajicich threadu Synapse (posilali
data sem a tam jako o zivot...) a v tu chvili se na pocitaci dali
normalne pracovat, tak o co jde?
V tvem pripade, kdy cas od casu nejaky thread neco malo provede... o
tom pocitac nebude ani vedet.
> >Nicmene chces-li to prat primo na socketovem API, pak se pod windows
> >podivej na funkci Select.
> ***juknu se po nem... ...nejaky priklad na select by nebyl?
kdejaka uicebnice na sockety to urcite bude obsahovat... jinak se
take koukni na MSDN.. a na linuxu do MANu. Z toho to das urcite
dohromady. ;-) Chces-li priklad, tak se muzes juknout do Synapse, do
Indy...
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Synapse Delphi and Kylix TCP/IP Lib.
DivX v D6
[*] Luk�cs Peter <Peter.Lukacs(zv)fst1.siemens(tec)cz> - 7.5.2003 07:34:51
Zdravim Delfini,
po dlouhe odmlce mam zase jeden problem: jak prehrat divx v Delphi? V
konferenci kdysi davno kdosi psal, ze staci pouzivat bezny MP. Me se vsak
zobrazi pouze srafovane okno s napisem "Nelze najit dekomprimacni modul
vids:xvid. Video nebude k dispozici." Pritom ostatni prehravace video
normalne prehraji (Win Media Player, Micro DVD a pod.)
Konfigurace P4/2,4 256MB 64MBATI4xAGP Win XP, D6, Nimo DivX Codec.
Za nejake infos predem moc diky.
Peta
dbgrid, ktory by dokazal locknut stlpce
[*] Vlko II. <vlko(zv)zilina(tec)net> - 06.5.2003 20:58:50
On Tue, 6 May 2003 20:21:58 +0200, ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> wrote:
> 6.5.2003 Vlko II.:
>> Chcel by som poradit nejaku free dbgrid komponentu, ktora by dokazala
>> locknut stlpce, take nieco ako robi
>> tjvdbgrid pri fixedcols;
>
> Pokud myslis, aby sloupce nesly editovat, tak to jde bez problemu
> udelat.
> Staci si je v ComumnsEditoru nadefinovat a nastavit jako ReadOnly
>
nie myslel som ich locknut proti pohybu, aby sa nehybali pri scrollovani
--
--------------
vlko_(zv)pobox.sk
TCP/IP server na Linuxu
[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 06.5.2003 21:02:26
>
>Na tohle chodim od lesa. Pouzijes-li Synapsi (ktera ti bude chodit
>jako pod windows tak i pod linuxem!),
***bezi i pod FPC (FreePascal)?
>tak tam proste zadas pozadavek
>na cteni a timeout. V tu chvili se ti ten thread, ze ktereho to
>volas, uspi... a bude probuzen az kdyz ty pozadovana data prijdou,
>nebo kdyz vyprsel timeout.
>
>S timto postupem pak nedela sebemensi problem pustit treba i tech
>tisic threadu. Skutecnost, ze ti obcas prcihazi nejaka data mi jen
>nahrava do karet, protoze pak ti bude vetsinu casu thread vesele
>spat. (a neni pak velky pocet threadu sebemensi problem!)
***hm, predstava threadu pro kazdeho klienta je nepredstavitelna. 1000 lidi
beru jako prumer.
>Nicmene chces-li to prat primo na socketovem API, pak se pod windows
>podivej na funkci Select.
***juknu se po nem... ...nejaky priklad na select by nebyl?>Muj SynSock.pas je nahrada za Winsock unitu s tim, ze funguje i v
>Kylixu, protoze v sobe skryva veskere odlisnosti mezi Linuxem a
>windows. (co se tyce socketu...)
***ja uz jsem si to jednou zazil a sve sokety mam preportovane pro Delphi,
Kylix i FPC.
Na Kylixu je pro mne problem licence a na nakup Prof. verze Delphi i Kylixu
nemam :(
S pozdravem
Tomas Rosa
------------------------=[ pinknet on every screen]=-----------------------
Tomas Rosa
Tomas.Rosa(zv)PinkNet(tec)cz http://www.pnws.org
+420 602 860 704
PinkNet Web Server for Win32 - FREEWARE www.pnws.org
---------------------------------------------------------------------------
Hypertextove odskoky na zaznamy databaze
[*] Miroslav Vav��n <mirun(zv)forcom(tec)cz> - 6.5.2003 20:39:08
----- Original Message -----
From: "Altius Research" <jkolomaznikova(zv)centrum(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, May 06, 2003 4:39 PM
Subject: Hypertextove odskoky na zaznamy databaze
> Jak udelat hypertetxove odskoky (hyperlinky) z textu v memo poli
> databazove tabulky v zobrazeneho pres DBRichEdit, aby odkazovaly na
> jiny zaznam
> v tabulce? Musi to podporovat pouzita databaze, nebo je to zalezitost
> sp�se Delphi, resp. komponenty
> pro zobrazen� obsahu memo polo�ek (DBRichEdit)?
>
Musis si to samozrejme udelat sam. Ale mam dojem, ze k tomu nebude stacit
DBRichEdit, ale pouzil bych treba RxDBRichEdit, ktera ma udalost OnURLClick.
Pak tam musis ty hyperlinky dostat jako URL (vymyslet si nejaky system) a po
kliknuti to parsovat a skocit na spravny zaznam. Takhle by to mohlo byt
nejjednodussi.
S pozdravem
Mirun
Neplatny popisovac okna
[*] Jan Naiser <tua(zv)wo(tec)cz> - 6.5.2003 20:44:46
Preji pekny den,
(W2k, D6P)
pokud pouziju funkci, kde je thread, pri ukonceni programu se mi objevi
vyjimka Neplatny popisovac okna. Z threadu se posilaji zpravy pomoci
PostMessage. Ze by chyba byla nekde tady?
Diky, Honza.
dbgrid, ktory by dokazal locknut stlpce
[*] Vlko II. <vlko(zv)zilina(tec)net> - 06.5.2003 20:15:10
Chcel by som poradit nejaku free dbgrid komponentu, ktora by dokazala
locknut stlpce, take nieco ako robi
tjvdbgrid pri fixedcols;
--
--------------
vlko_(zv)pobox.sk
dbgrid, ktory by dokazal locknut stlpce
[*] ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> - 6.5.2003 20:21:58
6.5.2003 Vlko II.:
> Chcel by som poradit nejaku free dbgrid komponentu, ktora by dokazala
> locknut stlpce, take nieco ako robi
> tjvdbgrid pri fixedcols;
Pokud myslis, aby sloupce nesly editovat, tak to jde bez problemu
udelat.
Staci si je v ComumnsEditoru nadefinovat a nastavit jako ReadOnly
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
Databaze MDB a "skryte" tabulky
[*] Erik Salaj <info(zv)winsoft.sk> - 06.5.2003 11:41:44
> diky za radu, ale zkus si prosim jeste jednou precist muj dotaz, nebot
> uvadim, ze pres ADO s tim problemy nemam, jenze potrebuju upravit
strukturu
> toho MDB a primo v Accessu nevidim tabulky (ktere naopak vidim pres ADO) a
> jak jsem take uvadel, konverze na vyssi access (2000, XP) mi to
nevyresila -
> stale nevidim zadnou tabulku.
aha, sorry. Skus si nastavit v Accesse, zobrazovanie Hidden (a pripadne
aj System) objektov (pomocou menu Tools/View/Hidden objects)
Erik
Struktura souboru DBX OE
[*] Ludek ZITA <konference(zv)sales(tec)cz> - 6.5.2003 12:20:07
----- Original Message -----
From: "Jan Naiser" <tua(zv)wo(tec)cz>
> a podle ceho vytahnout jenom zpravu bez hlavicky. Jediny, na co jsem
prisel
> je, ze po hlavicce je 2x CRLF, tedy #13#10. Ale nevim, zda se na to muzu
> spolehnout. Jak jinak v tech 512 bytovych blocich zpravy najdu pozici, kde
> zacina zprava nebo kde prectu velikost hlavicky?
Ahoj.
Mozna ze jsem mimo, ale to co mas je IMHO zdrojovy tvar MIME mailu, ktery
(vzetne priloh, kodovani diakritiky a pod.) muzes dekodovat napr. pomoci
Synapse, nebo cehokoliv jineho. Proste stejne jako bys to dostal z pop3
serveru.
Ludek
Kresleni implicitne zadanych krivek
[*] Plisek Jan Ing. <Plisek(zv)spse(tec)cz> - 6.5.2003 16:55:23
Vazeni,
pro praci jednoho ze svych studentu bych potreboval algoritmus na
kresleni implicitne zadanych krivek, napr. x^2 + y^2 = 9. Nevite,
prosim, o necem?
ing. Jan Plisek e-mail: plisek(zv)spse(tec)cz
SPSE a VOS tel. +420 466 614 788
Karla IV. 13 fax. +420 466 614 763
531 69 PARDUBICE http://www.spse(tec)cz
Czech Republic
Kresleni implicitne zadanych krivek
[*] Petr Brant <brant(zv)dcomm(tec)cz> - 6.5.2003 16:58:15
Zrovna placam ve volnych chvilich takovy programek (bude to freeware), =
ktery
umozni kresleni krivek zadanych polarni rovnici (tento priklad se na to
idealne hodi stejne jako vsechny kuzelosecky, konchoidy a podobne =
zrudnosti)
nebo parametricky. Muzu poslat zatim nehotovou verzi, pokud to =
potrebujes
nutne.=20
RNDr. Petr Brant [brant(zv)dcomm(tec)cz]=20
http://web.redbox(tec)cz/petr.brant
D&COMM s.r.o.
Korunova=E8n=ED 6
Praha 7
tel. +420724007234
pro praci jednoho ze svych studentu bych potreboval algoritmus na=20
kresleni implicitne zadanych krivek, napr. x^2 + y^2 =3D 9. Nevite,=20
prosim, o necem?
Hypertextove odskoky na zaznamy databaze
[*] Altius Research <jkolomaznikova(zv)centrum(tec)cz> - 06.5.2003 16:39:54
Jak udelat hypertetxove odskoky (hyperlinky) z textu v memo poli
databazove tabulky v zobrazeneho pres DBRichEdit, aby odkazovaly na
jiny zaznam
v tabulce? Musi to podporovat pouzita databaze, nebo je to zalezitost
sp�se Delphi, resp. komponenty
pro zobrazen� obsahu memo polo�ek (DBRichEdit)?
Diky,
JK
Altius Research
--------------------
Na nas trh prichazi Volkswagen Touran, ktery je vice nez jen rodinny vuz ...
http://user.centrum(tec)cz/redir.php?url=http://vw.multimedia(tec)cz/clanky/clanek1.php
TCP/IP server na Linuxu
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 06.5.2003 15:56:21
> chtel bych se zeptat jak lze lepe udelat tcp/ip server na linuxu.
> Resil
> jsem jiz server ve windows a udelal jsemvzdy hlavni thread ktery
> naslouchal a pro kazde akceptovane spojeni vytvoril novy thread ktery
> toto spojeni obslouzil. Protoze se jednalo o www serer, slo to -
> spojeni se vzy obslouzilo a pak se ukoncilo.
>
> Nyni ale potrebuji server kde bude radove tisice klientu, kteri
> maji jen
> velmi maly prenos - radove bajty za minutu a jen narazove. Proto bych
> se chtel zeptat jak se toto resi - vim ze to jde, ale uz nevim jak :(
>
> Predstavuji si nejaky prikaz, ktery ceka az se na nekterem z much
> soketu
> neco stane a pak vypadne s cislem tohoto soketu - zbytek uz dokazu
> obslouzit, ale nevim jak cekat az se neco stane na jednom z 1000
> soketu :(
Na tohle chodim od lesa. Pouzijes-li Synapsi (ktera ti bude chodit
jako pod windows tak i pod linuxem!), tak tam proste zadas pozadavek
na cteni a timeout. V tu chvili se ti ten thread, ze ktereho to
volas, uspi... a bude probuzen az kdyz ty pozadovana data prijdou,
nebo kdyz vyprsel timeout.
S timto postupem pak nedela sebemensi problem pustit treba i tech
tisic threadu. Skutecnost, ze ti obcas prcihazi nejaka data mi jen
nahrava do karet, protoze pak ti bude vetsinu casu thread vesele
spat. (a neni pak velky pocet threadu sebemensi problem!)
Nicmene chces-li to prat primo na socketovem API, pak se pod windows
podivej na funkci Select.
Kazdiopadne, pokud chces programovat multiplatformove v socketovem
api, tak doporucuji pouzit alespon unitu synsock.pas ze Synapse. Vtip
je v tom, ze socketove api pod windows i linuxem ma jiste odlisnosti!
Winsock a Libc nejsou scela stejne! Nektere funkce se jmenuji jinak,
nektere konstanty jsou jine!
Muj SynSock.pas je nahrada za Winsock unitu s tim, ze funguje i v
Kylixu, protoze v sobe skryva veskere odlisnosti mezi Linuxem a
windows. (co se tyce socketu...)
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Synapse Delphi and Kylix TCP/IP Lib.
DBLookupCombo
[*] Ing. David Vod�ansk� <d.vodnansky(zv)seznam(tec)cz> - 06.5.2003 15:53:54
Pomerne presny odhad - databaze je IB6 a skutecne jedu pres IBX.
Vyzkousim ten FetchAll, to ze nejsou dotazena data by me tedy vubec
nenapadlo. Jde o ciselnikove tabulky do 15-20 zaznamu, takze rychlost
asi nebude problem. Kazdopadne diky
> Asi mas databazi Firebird a jedes pres IBX. Pri rozbaleni comba jsou =
v nem videt
> pouze ty zaznamy, ktere byly jiz dotazeny na klienta, coz pri prvnim =
otevreni tabulky
> je jeden (prvni) zaznam a jak listujes, dotahuji se dalsi (a pri pris=
tim rozbaleni je
> proto vidis).
>
> V danem pripade je potreba po otevreni datasetu zavolat FetchAll. Pri=
velkem
> mnozstvi dat to ale muze nejakou dobu trvat.
______________________________________________________________________
Reklama:
Na n=E1=B9 trh p=F8ich=E1z=ED Volkswagen Touran, o n=ECm=BE se =F8=EDk=E1=
, =BEe je v=EDce ne=BE jen rodinn=FD v=F9z. A u=BE dnes si ho m=F9=BEet=
e objednat i vy ve v=B9ech autosalonech Volkswagen!http://vw.multimedia=
(tec)cz/clanky/clanek1.php
DBLookupCombo
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 06.5.2003 15:24:41
> Zdravim,
> uvedena komponenta se mi chova (Delphi 6) ponekud problematicky -
> nekdy se po rozbaleni listu ukaze jen jedna polozka s miniaturnimi
> sipkami, listovat a vybirat jde pak v pohode, ale neni videt vic
> polozek.
Asi mas databazi Firebird a jedes pres IBX. Pri rozbaleni comba jsou v nem videt
pouze ty zaznamy, ktere byly jiz dotazeny na klienta, coz pri prvnim otevreni tabulky
je jeden (prvni) zaznam a jak listujes, dotahuji se dalsi (a pri pristim rozbaleni je
proto vidis).
V danem pripade je potreba po otevreni datasetu zavolat FetchAll. Pri velkem
mnozstvi dat to ale muze nejakou dobu trvat.
David Lebeda
DBLookupCombo
[*] Roman Konecny <rkonecny(zv)datis(tec)cz> - 6.5.2003 15:08:44
Ahoj,
me pomohlo pridat FetchAll
Roman
----- Original Message -----
Zdravim,
uvedena komponenta se mi chova (Delphi 6) ponekud problematicky -
nekdy se po rozbaleni listu ukaze jen jedna polozka s miniaturnimi
sipkami, listovat a vybirat jde pak v pohode, ale neni videt vic
polozek. Chova se to takhle docela nahodne - nektera komba to
udelaji, pri dalsim spusteni uz ne, pri prenosu na jiny pocitac a OS
se to chova stejne.
Nevite nekdo co by se s tim dalo
delat?
______________________________________________________________________
Reklama:
U� V�s to m�n�n� c�d��ek v aut� nebav�? 10 hodin hudby v MP3 na jednom CD.
Autor�dio Sony CDX-MP40 za 7990 K�.
http://ad2.seznam(tec)cz/redir.cgi?instance=46464%26url=http://www.sony-mobile.c
z
DBLookupCombo
[*] Peter Turcan <peter.turcan(zv)centrum.sk> - 6.5.2003 14:24:39
IDV> uvedena komponenta se mi chova (Delphi 6) ponekud problematicky -
IDV> nekdy se po rozbaleni listu ukaze jen jedna polozka s miniaturnimi
IDV> sipkami, listovat a vybirat jde pak v pohode, ale neni videt vic
IDV> polozek. Chova se to takhle docela nahodne - nektera komba to
IDV> udelaji, pri dalsim spusteni uz ne, pri prenosu na jiny pocitac a OS
IDV> se to chova stejne.
mas nainstalovany UdatePack pre delphi6?
Peter
TCP/IP server na Linuxu
[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 06.5.2003 14:23:46
Zdravim,
chtel bych se zeptat jak lze lepe udelat tcp/ip server na linuxu. Resil
jsem jiz server ve windows a udelal jsemvzdy hlavni thread ktery naslouchal
a pro kazde akceptovane spojeni vytvoril novy thread ktery toto spojeni
obslouzil. Protoze se jednalo o www serer, slo to - spojeni se vzy
obslouzilo a pak se ukoncilo.
Nyni ale potrebuji server kde bude radove tisice klientu, kteri maji jen
velmi maly prenos - radove bajty za minutu a jen narazove. Proto bych se
chtel zeptat jak se toto resi - vim ze to jde, ale uz nevim jak :(
Predstavuji si nejaky prikaz, ktery ceka az se na nekterem z much soketu
neco stane a pak vypadne s cislem tohoto soketu - zbytek uz dokazu
obslouzit, ale nevim jak cekat az se neco stane na jednom z 1000 soketu :(
Predem diky!
ps: beru i reseni pro wokna - chci psat multiplatformni aplikaci
S pozdravem
Tomas Rosa
------------------------=[ pinknet on every screen]=-----------------------
Tomas Rosa
Tomas.Rosa(zv)PinkNet(tec)cz http://www.pnws.org
+420 602 860 704
PinkNet Web Server for Win32 - FREEWARE www.pnws.org
---------------------------------------------------------------------------
DBLookupCombo
[*] Ing. David Vod�ansk� <d.vodnansky(zv)seznam(tec)cz> - 06.5.2003 14:07:13
Zdravim,
uvedena komponenta se mi chova (Delphi 6) ponekud problematicky -
nekdy se po rozbaleni listu ukaze jen jedna polozka s miniaturnimi
sipkami, listovat a vybirat jde pak v pohode, ale neni videt vic
polozek. Chova se to takhle docela nahodne - nektera komba to
udelaji, pri dalsim spusteni uz ne, pri prenosu na jiny pocitac a OS
se to chova stejne.
Nevite nekdo co by se s tim dalo
delat?
______________________________________________________________________
Reklama:
U=BE V=E1s to m=ECn=ECn=ED c=E9d=E9=E8ek v aut=EC nebav=ED? 10 hodin hu=
dby v MP3 na jednom CD. Autor=E1dio Sony CDX-MP40 za 7990 K=E8.
http://ad2.seznam(tec)cz/redir.cgi?instance=3D46464%26url=3Dhttp://www.sony=
-mobile(tec)cz
Active-X komponenta
[*] Radek Hemelik <radek(zv)hemelik(tec)cz> - 6.5.2003 12:30:48
TO mne take zajima, konkretne prime zakomponovani WindowsMedia do=
apliakce
(myslim pro zive prenosy po netu, standardni komponenta umi jen
prehrat
soubory, ale streaming nezna).
Radek Hemelik, radek(zv)hemelik(tec)cz dne 06.05.2003 HitRadio Amerika=
Tel.:
+420 608
12 10 10 (R. Hemelik)
Tel.: +420 777 166 777 (studio Radio Amerika)
e-mail: studio(zv)hitradio(tec)cz http://www.xcz(tec)cz - ..tudy vede=
cesta...
http://www.hitradio(tec)cz - Surfujte s hudbou..!?
http://www.digisoft(tec)cz http://radek.hemelik(tec)cz
Dne Tue, 6 May 2003 08:13:20 +0200, Michal Kuncl napsal(a):
#Prosim vas, vite nekdo jak zaregistrovat do systemu active-x
komponenty?
#Uvital bych nejaky kod, pokud mozno bez pouziti regsvr32.exe
#
#diky spider
#
#
#
#
#http://www.XCZ(tec)cz - Novy internetovy portal. Novy zpusob=
komunikace
a zabavy.
--
http://www.xcz(tec)cz - Tudy vede cesta
http://www.XCZ(tec)cz - Novy internetovy portal. Novy zpusob komunikace a zabavy.
Active-X komponenta
[*] ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> - 6.5.2003 12:53:00
6.5.2003 Radek Hemelik:
> TO mne take zajima, konkretne prime zakomponovani WindowsMedia do
> apliakce (myslim pro zive prenosy po netu, standardni komponenta umi
> jen prehrat soubory, ale streaming nezna).
Komponenty, ktere jsou v systemu nepotrebujes registrovat. Staci si v
Project / ImportTypeLibrary naimportovat komponentu a Delphi ti
vytvori jak komponentu samotnou, tak i hlavickovy soubor
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
TCP
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 06.5.2003 12:44:37
> mam server ke kteremu se pripojuji klienti, ted bych chtel udelat neco
> jako hovor v Carbon Copy - zatim to delam tak ze na servru otevru
> dalsi port pro poslouchani ktery poslu clientovy, neda se to udelat
> nejak vhodneni (pozor nejde mi jen o ten hovor budou i jine spojeni)
> neco jako zduplikovani socketu
Musis si proste vytvorit nove TCP spojeni. Jinou cestu nevidim.
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Synapse Delphi and Kylix TCP/IP Lib.
Pretypovanie v DLL
[*] Radek KALA <Kala(zv)BetaControl(tec)cz> - 06.5.2003 12:45:10
Jednou jsem to taky potreboval a musel jsem v DLL pretypovavat
ne as ale TObject(xx)
pak to funguje, ale musis vzdy pri prekladu exe prelozit i dll. To
kdyvyse zmenili ty objekty. pokud se jedna o objekty z vcl tak vzdy
kdyz zmenis verzi delphi, nebo nainstalujes service pack.
V kazdem pripade to nedoporucuji delat. Je s tim vice problemu nez
uzitku.
> Mam vytvoreny program v delphi 6. Vyuzivam v nom jeden algoritmus,
> ktory som presunul do DLL a zprogramu ho volam.
>
> V algoritme mam viacero objektov a potrebujem ich pretypovat.
> Ked som mal alg. v programe vsetko bolo OK. Akonahle som ho dal do DLL
> tak vypisuje "Invalid type cast" v com je problem ?
>
> Svafko
> 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
OT: Filtrovani mailu
[*] Radek Hemelik <radek(zv)hemelik(tec)cz> - 6.5.2003 12:29:16
Tuhle sluzbu pripravuje portal http://www.xcz(tec)cz k volnemu=
spusteni.
Az to bude
spustene, najdes to na portalu mezi sluzbami (hledej sluzbu
MailList), kde to
bude jedna z funkcni. Samo se to jednou za hodinu pripoji a dle
navolenych
pravidel to provede promazani spamu. Navic se to uci, takze bude=
mozne pouzit
sdilenou meziuzivatelskou databazi schvalenou adminem, takze se
odchyti i to,
co si nezadas a co je uplne jesny spam.
Radek Hemelik, radek(zv)hemelik(tec)cz dne 06.05.2003 HitRadio Amerika=
Tel.:
+420 608
12 10 10 (R. Hemelik)
Tel.: +420 777 166 777 (studio Radio Amerika)
e-mail: studio(zv)hitradio(tec)cz http://www.xcz(tec)cz - ..tudy vede=
cesta...
http://www.hitradio(tec)cz - Surfujte s hudbou..!?
http://www.digisoft(tec)cz http://radek.hemelik(tec)cz
Dne Mon, 05 May 2003 10:07:55 +0200, Radek KALA napsal(a):
#Ahoj.
#Posledni dobou mam ve sve schrance na volny(tec)cz stale vice spamu=
ze
zahranici.
#Bohuzel jejich anti spam mo cnezabral. Nevite nekdo o nejakem=
SW
nejlepe free.
#Ktery bych si nechal bezet nekde na pevne lince ( mam samozrejme=
kde
) a ktery
#by treba automaticky kazkou hodinu prolezl schranku a podle=
nejakych
pravidel
#to promazal ?
#
#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
#
#
#
#
#http://www.XCZ(tec)cz - Novy internetovy portal. Novy zpusob=
komunikace
a zabavy.
--
http://www.xcz(tec)cz - Tudy vede cesta
http://www.XCZ(tec)cz - Novy internetovy portal. Novy zpusob komunikace a zabavy.
Pretypovanie v DLL
[*] Ondrej Kelle <O.Kelle(zv)digitalpublishing.de> - 6.5.2003 12:18:27
> Mam vytvoreny program v delphi 6. Vyuzivam v nom jeden
> algoritmus, ktory som
> presunul do DLL a zprogramu ho volam.
>
> V algoritme mam viacero objektov a potrebujem ich pretypovat.
> Ked som mal alg. v programe vsetko bolo OK. Akonahle som ho
> dal do DLL tak
> vypisuje "Invalid type cast" v com je problem ?
TMyObject z DLL je ina trieda ako TMyObject z hlavnej aplikacie. (DLL
obsahuje svoju vlastnu kopiu VCL.)
Preto pri pretypovavani operatorom 'as' dostanes EInvalidCast.
Da sa to riesit pouzitim runtime package namiesto DLL alebo to mozes obist
pretypovanim "natvrdo": TMyObject(Obj).
HTH
TOndrej
Pretypovanie v DLL
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 6.5.2003 12:06:12
From: "Ing.Slavom�r Hutyra" <hutyra(zv)promys.sk>
> V algoritme mam viacero objektov a potrebujem ich pretypovat.
> Ked som mal alg. v programe vsetko bolo OK. Akonahle som ho dal do DLL tak
> vypisuje "Invalid type cast" v com je problem ?
Do DLL nemuzes predavat objekty, pouzij runtime balicky.
Petr Vones
Pretypovanie v DLL
[*] Ing.Slavom�r Hutyra <hutyra(zv)promys.sk> - 6.5.2003 11:14:01
Mam vytvoreny program v delphi 6. Vyuzivam v nom jeden algoritmus, ktory som
presunul do DLL a zprogramu ho volam.
V algoritme mam viacero objektov a potrebujem ich pretypovat.
Ked som mal alg. v programe vsetko bolo OK. Akonahle som ho dal do DLL tak
vypisuje "Invalid type cast" v com je problem ? Svafko
Nakup komponent
[*] Ale� Hruban <ales hruban(zv)alisys(tec)cz> - 6.5.2003 10:47:23
Nevite nekdo, kde nebo pres koho se daji zakoupit komponenty IBObjects a
jine pro Firebird ?
Ales
optimalni rozvrzeni vrcholu na siti
[*] Vaclav Riha - Soft Consult <vaclav_riha(zv)softconsult(tec)cz> - 6.5.2003 07:01:46
Vzhledem k malemu poctu mest je nejlepsi a nejrychlejsi provest simulaci
pro vsechny body. (spocitat tkm pro vsechny mozne lokality) Zvladne to i
Exel.
S pozdravem Vaclav Riha
-----Puvodni zprava-----
Od: redshoe.geo(zv)centrum(tec)cz [SMTP:redshoe.geo(zv)centrum(tec)cz]
Odeslano: 5. kvetna 2003 18:19
Komu: delphi-l(zv)clexpert(tec)cz
Predmet: optimalni rozvrzeni vrcholu na siti
Ahoj, resim problem %subj%.
Pro upresneni, mam nekolik mest ve kterych se nalezaji sberna mista
srotu (se zhruba stejnymi kapacitami k pojmuti srotu]. Potrebuji
najit ta mesta, do kterych bude z hlediska tunokilometru
nejoptimajnejsi umistit recyklacni centra. Potrebuji najit nekde
popsany algoritmus (spravny!), prosim, poradte. Kamil
--------------------
Na nas trh prichazi Volkswagen Touran, ktery je vice nez jen rodinny vuz
...
http://user.centrum(tec)cz/redir.php?url=http://vw.multimedia(tec)cz/clanky/clan
ek1.php
Active-X komponenta - vyreseno
[*] Michal Kuncl <spider_x(zv)quick(tec)cz> - 6.5.2003 09:33:58
Velice dekuji, moc to pomohlo :-)
Spider
----- Original Message -----
From: "Libor Junek, KSH-Data" <junek(zv)ksh-data(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, May 06, 2003 9:19 AM
Subject: Re: Active-X komponenta
> Tohle se da pouzit na registraci i na odregistrovani.
> Libor
>
> function RegisterLibrary(RegisterDll: Boolean; const FileName: String):
> Boolean;
> type
> TRegProc = function : HResult; stdcall;
> const
> SLoadFail = 'Chyba pri nacitani knihovny "%s"';
> SCantFindProc = '%s procedura nebyla nalezena v knihovne "%s"';
> SRegFail = 'Chyba pri spousteni procedury %s v knihovne "%s"';
>
> RegProcName = 'DllRegisterServer';
> UnRegProcName = 'DllUnregisterServer';
> var
> hLib: THandle;
> RegProc: TRegProc;
> ProcName: String;
> begin
> Result := False;
> if RegisterDll then
> ProcName := RegProcName
> else
> ProcName := UnRegProcName;
> hLib := LoadLibrary(PChar(FileName));
> if hLib = 0 then
> raise Exception.CreateFmt(SLoadFail, [FileName]);
> try
> (zv)RegProc := GetProcAddress(hLib, PChar(ProcName));
> if (zv)RegProc = nil then
> raise Exception.CreateFmt(SCantFindProc, [ProcName, FileName]);
> if RegProc <> 0 then
> raise Exception.CreateFmt(SRegFail, [ProcName, FileName]);
> Result := True;
> finally
> FreeLibrary(hLib);
> end;
> end;
>
> From: "Michal Kuncl" <spider_x(zv)quick(tec)cz>
> Sent: Tuesday, May 06, 2003 8:13 AM
>
>
> > Prosim vas, vite nekdo jak zaregistrovat do systemu active-x komponenty?
> > Uvital bych nejaky kod, pokud mozno bez pouziti regsvr32.exe
> >
> > spider
>
>
>
Form s Parent na MDIChild Formu
[*] Miroslav Evjak <me.delphi(zv)seznam(tec)cz> - 6.5.2003 09:52:15
Ahoj,
vytvarim za behu formular (NewFrm) dynamicky na zalozce PageControl jineho
formulare (MainFrm), ktery je fsMDIChild.
<CODE>
ThisForm := TNewFrm.CreateWithPars(DestTag, FromTag, Application);
ThisForm.FormStyle := fsNormal;
ThisForm.BorderStyle := bsNone;
ThisForm.Parent := MainFrm.PageControl.ActivePage;
ThisForm.Align := alClient;
</CODE>
Vsechno funguje, ale behem vytvareni probiha vsemoze vykreslovani a
problikavani podle toho v ktere fazi vytvareni se NewFrm nachazi.
Neda se nejak osetrit, aby se NewFrm zobrazil, az kdyz je vytvoreny a na
svem miste, kde ma byt ?
NewFrm.Visible := false mne neprojde, protoze je zrejme MDIChild po
vlastnikovi.
Dik za rady.
Ing.Miroslav Evj�k
D6P, W2K
mailto:miroslav.evjak(zv)seznam(tec)cz
http://www.sweb(tec)cz/miroslav.evjak/
ICQ:313884739
+420 607 875748
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.476 / Virov� b�ze: 273 - datum vyd�n�: 24.04.2003
Active-X komponenta
[*] Libor Junek, KSH-Data <junek(zv)ksh-data(tec)cz> - 6.5.2003 09:19:54
Tohle se da pouzit na registraci i na odregistrovani.
Libor
function RegisterLibrary(RegisterDll: Boolean; const FileName: String):
Boolean;
type
TRegProc = function : HResult; stdcall;
const
SLoadFail = 'Chyba pri nacitani knihovny "%s"';
SCantFindProc = '%s procedura nebyla nalezena v knihovne "%s"';
SRegFail = 'Chyba pri spousteni procedury %s v knihovne "%s"';
RegProcName = 'DllRegisterServer';
UnRegProcName = 'DllUnregisterServer';
var
hLib: THandle;
RegProc: TRegProc;
ProcName: String;
begin
Result := False;
if RegisterDll then
ProcName := RegProcName
else
ProcName := UnRegProcName;
hLib := LoadLibrary(PChar(FileName));
if hLib = 0 then
raise Exception.CreateFmt(SLoadFail, [FileName]);
try
(zv)RegProc := GetProcAddress(hLib, PChar(ProcName));
if (zv)RegProc = nil then
raise Exception.CreateFmt(SCantFindProc, [ProcName, FileName]);
if RegProc <> 0 then
raise Exception.CreateFmt(SRegFail, [ProcName, FileName]);
Result := True;
finally
FreeLibrary(hLib);
end;
end;
From: "Michal Kuncl" <spider_x(zv)quick(tec)cz>
Sent: Tuesday, May 06, 2003 8:13 AM
> Prosim vas, vite nekdo jak zaregistrovat do systemu active-x komponenty?
> Uvital bych nejaky kod, pokud mozno bez pouziti regsvr32.exe
>
> spider
Databaze MDB a "skryte" tabulky
[*] Petr Langer <langer(zv)xdom(tec)cz> - 6.5.2003 08:59:07
Ahoj,
diky za radu, ale zkus si prosim jeste jednou precist muj dotaz, nebot
uvadim, ze pres ADO s tim problemy nemam, jenze potrebuju upravit strukturu
toho MDB a primo v Accessu nevidim tabulky (ktere naopak vidim pres ADO) a
jak jsem take uvadel, konverze na vyssi access (2000, XP) mi to nevyresila -
stale nevidim zadnou tabulku.
Diky za snahu,
Petr Langer
----- Original Message -----
From: "Erik Salaj" <info(zv)winsoft.sk>
> > dostal jsem .MDB databazi a potrebuju do ni udelat nejake upravy.
Bohuzel,
> > kdyz ji otevru v Accessu (2000 i XP), tak mi to maximalne rekne, ze je
to
> ve
> > starem formatu a i kdyz ji otevru bez konverze jen pro cteni a nebo ji
dam
> i
> > prevest, nezobrazi se mi zadne tabulky. Pokud pristoupim pres ADO, a dam
> > Connection.GetTableNames, tak nactu jak jmena tabulek, tak i dale pres
> > Connection.GetFieldNames sloupce vcetne jejich typu. Jenze tak zase
> neudelam
> > upravy. Netusite nekdo v cem by mohla byt zrada.
>
> zrejme ide o starsiu Access databazu (Access 97 a skor).
> Ak je to Access 97 db, tak to otvoris v ADO pomocou
> s Microsoft.Jet.OLEDB.3.51 OLE DB providera (mohol
> by byt v niektorom starsom MDAC baliku
> na http://www.microsoft.com/data). Alebo si to upgradni
> na Access 2000 format a pouzivaj novy format.
>
> Erik
Active-X komponenta
[*] tondrej(zv)t-online.de (TOndrej) - 6.5.2003 08:51:41
> Prosim vas, vite nekdo jak zaregistrovat do systemu active-x
> komponenty? Uvital bych nejaky kod, pokud mozno bez pouziti
> regsvr32.exe
Ten kod najdes v Demos\ActiveX\tregsvr.dpr.
HTH
TOndrej
MemProofu chybi RegCloseKey?
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 06.5.2003 08:26:31
> v nasledujicim bloku kodu mi MemProof vypise error: "RegOpenKeyEx
> opens the specified registry key. The returned key must be closed with
> RegCloseKey when no longer needed." Je chyba na me strane nebo se
> jedna o spatne vyhodnoceni (na 2xOpenKey 1xCloseKey)? Diky.
>
> procedure ReadProfileList;
> begin
> with TRegistry.Create do
> try
> RootKey:=HKEY_CURRENT_USER;
> if not OpenKeyReadOnly('SOFTWARE\Microsoft\Windows Messaging
> Subsystem\Profiles') then
> OpenKeyReadOnly('SOFTWARE\Microsoft\Windows
> NT\CurrentVersion\Windows Messaging Subsystem\Profiles');
> GetKeyNames(MainForm.CB_Profile.Items);
> CloseKey;
> finally
> Free;
> end;
> end;
>
V prikladu v helpu ke CloseKey (mam D5) se OpenKey rovnez testuje v ifu, ale za
nim je CloseKey jiz ve finally, tj. zrejme se ma zavolat i v pripade, ze OpenKey
selze. Je to jen namet k blizsimu prozkoumani, s TRegistry nemam moc zkusenosti.
David Lebeda
Active-X komponenta
[*] Michal Kuncl <spider_x(zv)quick(tec)cz> - 6.5.2003 08:13:20
Prosim vas, vite nekdo jak zaregistrovat do systemu active-x komponenty?
Uvital bych nejaky kod, pokud mozno bez pouziti regsvr32.exe
diky
spider
optimalni rozvrzeni vrcholu na siti
[*] Ty�lic Ji�� - 6.5.2003 06:25:01
Kdysi jsem psal nejaky zapocet na toto tema, bohuzel uz asi nemam =
zdrojaky, ale zkus najit odkazy na tema: Diskretni matematika, alokacni =
ulohy, Anton Kotzig.
Taky by se asi neco naslo na webu Univerzity Palackeho v Olomouci, jsou =
tam prace studentu...
Jirka
-----Original Message-----
From: redshoe.geo(zv)centrum(tec)cz [mailto:redshoe.geo(zv)centrum(tec)cz]=20
Sent: Monday, May 05, 2003 6:19 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: optimalni rozvrzeni vrcholu na siti
Ahoj, resim problem %subj%.=20
Pro upresneni, mam nekolik mest ve kterych se nalezaji sberna mista=20
srotu (se zhruba stejnymi kapacitami k pojmuti srotu]. Potrebuji=20
najit ta mesta, do kterych bude z hlediska tunokilometru=20
nejoptimajnejsi umistit recyklacni centra. Potrebuji najit nekde=20
popsany algoritmus (spravny!), prosim, poradte. Kamil
--------------------
Na nas trh prichazi Volkswagen Touran, ktery je vice nez jen rodinny vuz =
... =
http://user.centrum(tec)cz/redir.php?url=3Dhttp://vw.multimedia(tec)cz/clanky/cla=
nek1.php=20
=20
Nizka rychlost KADAO
[*] Erik Salaj <info(zv)winsoft.sk> - 05.5.2003 22:53:38
> Delal jsem aplikaci, ktera vyuziva komponety KADAO. Problem je v tom, ze
> ulozeni zaznamu do tabulky trva moc dlouho. Kdyz stejnou strukturu tabulky
> ulozim do csv formatu a ten importuju v MS Accessu tak je to mnohem
> rychlejsi. Ulozeni asi milionu zaznamu mi trva 15 minut oproti 2 minutam
> importu.
> Aplikoval jsem vsechny doporuceni pro zvyseni rychlosti napsane v
napovede.
> Ukladani se sice vyrazne zrychlilo, ale 15-ti minut jsem dosahl az po tech
> optimalizacich.
>
> Nemuze mi nekdo poradit jak se rychlosti vice priblizit k tomu MS Accessu?
> Nejake nastaveni nebo jine komponenty?
>
> Mam D7. Zkousel jsem napr. ADO komponenty, ale ty jsou jeste pomalejsi.
skus ADO s Microsoft.Jet.OLEDB.4.0 providerom (databaza musi byt
pre Access 2000) a s DirectTable command type. Urcite zrychlenie je mozne
este dosiahnut v Adonise pomocou recordset bindingu, ktory umoznuje obist
konverzie poloziek na Variant typ.
Pokial by to bolo stale pomale, tak mozes kludne vytvorit ten csv subor
a priamo z programu ho jednym SQL prikazom skopirovat ci uz pomocou
DAO alebo ADO (pozri http://www.winsoft.sk/adofaq.htm#Q3.8)
do Access tabulky. To asi bude najrychlejsie riesenie.
Erik
Databaze MDB a "skryte" tabulky
[*] Erik Salaj <info(zv)winsoft.sk> - 05.5.2003 22:56:39
> dostal jsem .MDB databazi a potrebuju do ni udelat nejake upravy. Bohuzel,
> kdyz ji otevru v Accessu (2000 i XP), tak mi to maximalne rekne, ze je to
ve
> starem formatu a i kdyz ji otevru bez konverze jen pro cteni a nebo ji dam
i
> prevest, nezobrazi se mi zadne tabulky. Pokud pristoupim pres ADO, a dam
> Connection.GetTableNames, tak nactu jak jmena tabulek, tak i dale pres
> Connection.GetFieldNames sloupce vcetne jejich typu. Jenze tak zase
neudelam
> upravy. Netusite nekdo v cem by mohla byt zrada.
zrejme ide o starsiu Access databazu (Access 97 a skor).
Ak je to Access 97 db, tak to otvoris v ADO pomocou
s Microsoft.Jet.OLEDB.3.51 OLE DB providera (mohol
by byt v niektorom starsom MDAC baliku
na http://www.microsoft.com/data). Alebo si to upgradni
na Access 2000 format a pouzivaj novy format.
Erik
MemProofu chybi RegCloseKey?
[*] Milan Cizek <cizek.milan(zv)seznam(tec)cz> - 5.5.2003 22:05:11
Ahoj,
v nasledujicim bloku kodu mi MemProof vypise error: "RegOpenKeyEx opens
the specified registry key. The returned key must be closed with
RegCloseKey when no longer needed." Je chyba na me strane nebo se jedna
o spatne vyhodnoceni (na 2xOpenKey 1xCloseKey)? Diky.
procedure ReadProfileList;
begin
with TRegistry.Create do
try
RootKey:=HKEY_CURRENT_USER;
if not OpenKeyReadOnly('SOFTWARE\Microsoft\Windows Messaging
Subsystem\Profiles') then
OpenKeyReadOnly('SOFTWARE\Microsoft\Windows
NT\CurrentVersion\Windows Messaging Subsystem\Profiles');
GetKeyNames(MainForm.CB_Profile.Items);
CloseKey;
finally
Free;
end;
end;
S pozdravem Milan Cizek, amatersky programator, D7 Ent
Win2k (SP3) a WinXP, cizek.milan(zv)seznam(tec)cz, ICQ: 59826637
nazvy souboru ve zprave ctene pres MAPI
[*] Milan Cizek <cizek.milan(zv)seznam(tec)cz> - 5.5.2003 21:48:28
Ahoj,
> > mam takovy problem se ziskanim nazvu souboru ze struktury
> > PMapiFileDesc. Zadrhel je v tom, ze jsou vsechny nazvy ve
> starem tvaru
> > 8.3, zkracene na tvar s ~. Daji se nejak ziskat
> plnohodnotne (dlouhe)
> > nazvy?
>
> Jaky je to presne klient ? Prilohy se obvykle ukladaji do
> nejakeho temp adresare pri nacteni zpravy.
Odzkouseno na MS Outlook 2000 a XP. V obou pripadech mas pravdu, cesta
ukazuje na temp, kde uz je puvodni nazev souboru zkraceny. Napadlo me,
jestli to neni samotnou kopirovaci funkci (MoveFileEx, nyni uz
CopyFile), orizle to je ale uz v samotne PMapiFileDesc. Ta cesta samotna
(pred) problem neni (napr. PathGetLongName z JCL), na postup dopatrani
se k plnemu jmenu jsem ale neprisel. :( Je nejaka dalsi moznost?
> > Je nekde k prozkoumani toto doporuceni (obecne), jedna se primo o
> > standard?
>
> Jiste, jedna se o API a je v MSDN:
>
http://msdn.microsoft.com/library/en-us/mapi/html/_mapi1book_simple_mapi
.asp
Diky
S pozdravem Milan Cizek, amatersky programator, D7 Ent
Win2k (SP3) a WinXP, cizek.milan(zv)seznam(tec)cz, ICQ: 59826637
optimalni rozvrzeni vrcholu na siti
[*] <redshoe.geo(zv)centrum(tec)cz> - 05.5.2003 18:18:49
Ahoj, resim problem %subj%.
Pro upresneni, mam nekolik mest ve kterych se nalezaji sberna mista
srotu (se zhruba stejnymi kapacitami k pojmuti srotu]. Potrebuji
najit ta mesta, do kterych bude z hlediska tunokilometru
nejoptimajnejsi umistit recyklacni centra. Potrebuji najit nekde
popsany algoritmus (spravny!), prosim, poradte. Kamil
--------------------
Na nas trh prichazi Volkswagen Touran, ktery je vice nez jen rodinny vuz ...
http://user.centrum(tec)cz/redir.php?url=http://vw.multimedia(tec)cz/clanky/clanek1.php
Databaze MDB a "skryte" tabulky
[*] Pavel Hlub�k <hlubik(zv)dashofer(tec)cz> - 5.5.2003 17:07:35
Jak se dostat k tem tabulkam primo nevim, ale pokud primarne potrebujes
jen data z te databaze a dostanes se ke jmenum vsech tabulek zkus
nasledujici kod primo v accessu.
DoCmd.TransferDatabase acExport, "Microsoft Access", "c:\nova_db.mdb",
acTable, "Tabulka", "Tabulka", False, False
Ja to samozrejme zkusil s korektnim souborem.
Pavel Hlubik
hlubik(zv)dashofer(tec)cz
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Petr Langer
> Sent: Monday, May 05, 2003 3:29 PM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: OT: Databaze MDB a "skryte" tabulky
>
>
> Ahojte,
> dostal jsem .MDB databazi a potrebuju do ni udelat nejake
> upravy. Bohuzel, kdyz ji otevru v Accessu (2000 i XP), tak mi
> to maximalne rekne, ze je to ve starem formatu a i kdyz ji
> otevru bez konverze jen pro cteni a nebo ji dam i prevest,
> nezobrazi se mi zadne tabulky. Pokud pristoupim pres ADO, a
> dam Connection.GetTableNames, tak nactu jak jmena tabulek,
> tak i dale pres Connection.GetFieldNames sloupce vcetne
> jejich typu. Jenze tak zase neudelam upravy. Netusite nekdo v
> cem by mohla byt zrada.
>
> Diky za kazdy tip,
> Petr Langer
>
>
>
>
Re[2]: Dedicnost a balicky
[*] Martin Radvansky <delphicz(zv)stereo(tec)cz> - 5.5.2003 16:18:42
LJKD> Nepomuze kdyz nad zdedenym formularem kliknes na menu a das "Revert to
LJKD> inherited"?
No prave nepomuze, ono se to cele tvari, ze je vsechno vporadku. Tedy
klidne mohu doplnit na potomkovi dalsi polozky menu a ty se mi jiz
spravne objevi. Proste nektere polozky z predka ignoruje.
Samozrejmosti je smazani vsech dcu, bpl, dcp souboru pred kompilaci
--
S pozdravem,
Martin Radvansky
Dedicnost a balicky
[*] Libor Junek, KSH-Data <junek(zv)ksh-data(tec)cz> - 5.5.2003 15:49:39
Nepomuze kdyz nad zdedenym formularem kliknes na menu a das "Revert to
inherited"?
Libor
From: "Martin Radvansky" <delphicz(zv)stereo(tec)cz>
Sent: Monday, May 05, 2003 3:38 PM
> mam problemek s takovou drobnosti v MDI projektu s balicky.
> Mam predka vsech MDI oken, ktery ma na sobe mimo jine i popupmenu.
> V predkovi davam do toho popup menu nekolik spolecnych polozek. Tento
> predek je ve spolecnem balicku.
>
> V dalsim balicku mam formular a pokud v potomkovi zavolam metodu popup
toho popupmenu tak se mi z
> 3 polozek zobrazi jen 1 a to ta posledni v poradi.
> Pokud v predkovi doplnim dalsi 2 polozky menu jednu na zacatek a jednu
> na konec tak se mi zobrazi jen 3 polozky a to ta nova ze zacatku,
> dalsi 2 to vynecha, a zbytek zobrazi dobre.
>
> Martin Radvansky
Dedicnost a balicky
[*] Martin Radvansky <delphicz(zv)stereo(tec)cz> - 5.5.2003 15:38:35
Dobry den,
mam problemek s takovou drobnosti v MDI projektu s balicky.
Mam predka vsech MDI oken, ktery ma na sobe mimo jine i popupmenu.
V predkovi davam do toho popup menu nekolik spolecnych polozek. Tento
predek je ve spolecnem balicku.
V dalsim balicku mam formular a pokud v potomkovi zavolam metodu popup toho popupmenu tak se mi z
3 polozek zobrazi jen 1 a to ta posledni v poradi.
Pokud v predkovi doplnim dalsi 2 polozky menu jednu na zacatek a jednu
na konec tak se mi zobrazi jen 3 polozky a to ta nova ze zacatku,
dalsi 2 to vynecha, a zbytek zobrazi dobre.
Tusite nekdo, zda jsou nejake problemy s dedicnosti a balicky? (predpokladam ze
je to zpusobeno tim, protoze pokud udelam testovaci aplikaci bez
balicku tak to funguje spravne)
D7Pro,WXP Pro SP1
--
S pozdravem,
Martin Radvansky
OT: Databaze MDB a "skryte" tabulky
[*] Petr Langer <langer(zv)xdom(tec)cz> - 5.5.2003 15:28:59
Ahojte,
dostal jsem .MDB databazi a potrebuju do ni udelat nejake upravy. Bohuzel,
kdyz ji otevru v Accessu (2000 i XP), tak mi to maximalne rekne, ze je to ve
starem formatu a i kdyz ji otevru bez konverze jen pro cteni a nebo ji dam i
prevest, nezobrazi se mi zadne tabulky. Pokud pristoupim pres ADO, a dam
Connection.GetTableNames, tak nactu jak jmena tabulek, tak i dale pres
Connection.GetFieldNames sloupce vcetne jejich typu. Jenze tak zase neudelam
upravy. Netusite nekdo v cem by mohla byt zrada.
Diky za kazdy tip,
Petr Langer
nazvy souboru ve zprave ctene pres MAPI
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 5.5.2003 15:17:40
From: "Petr Brant" <brant(zv)dcomm(tec)cz>
> mam takovy problem se ziskanim nazvu souboru ze struktury PMapiFileDesc.
> Zadrhel je v tom, ze jsou vsechny nazvy ve starem tvaru 8.3, zkracene na
> tvar s ~. Daji se nejak ziskat plnohodnotne (dlouhe) nazvy?
Jaky je to presne klient ? Prilohy se obvykle ukladaji do nejakeho temp
adresare pri nacteni zpravy.
> Je nekde k prozkoumani toto doporuceni (obecne), jedna se primo o standard?
Jiste, jedna se o API a je v MSDN:
http://msdn.microsoft.com/library/en-us/mapi/html/_mapi1book_simple_mapi.asp
Petr Vones
Adonis, setrideni datasetu na strane klienta
[*] Lstiburek Pavel <Lstiburek(zv)ceb(tec)cz> - 5.5.2003 15:25:01
Uz jsem na to prisel, property TADODataDataSet.Sort. Nejak me matlo, ze v
navrhovem modu tam byl Combobox, a na zadani cehokoliv to rvalo a tak jsem
myslel, ze tam muze byt pouze index.
V RT je vse OK.
Pavel
> Je mozno nejak setridit dataset komponent Adonis na strane
> klienta, jako to
> jde u AdoExpresu pomoci IndexName ?
>
> Pavel
>
Struktura souboru DBX OE
[*] Jan Naiser <tua(zv)wo(tec)cz> - 5.5.2003 14:56:03
> Me dost pomohl
> tenhle soubor.
> http://www.djpate.freeserve.co.uk/oexpress2.zip
Tohle je opravdu celkem dobre udelany. Jenom nejak nemuzu prijit na to, jak
a podle ceho vytahnout jenom zpravu bez hlavicky. Jediny, na co jsem prisel
je, ze po hlavicce je 2x CRLF, tedy #13#10. Ale nevim, zda se na to muzu
spolehnout. Jak jinak v tech 512 bytovych blocich zpravy najdu pozici, kde
zacina zprava nebo kde prectu velikost hlavicky?
Diky, Honza.
Jak vytvorit sloupec TdxDBGridMemoColumn v dxDBGri
[*] Ji�� Semler <jsemler(zv)stbk.mcs(tec)cz> - 05.5.2003 14:58:13
Uz jsem to nasel. Chyba byla tady:
MemoCol:= TdxDBGridMemoColumn
(dxDBGridAllTab.CreateColumnEx(TdxDBGridMEMOColumn,dxDBGridAllTab));
> potrebuji vytvorit v dxDBGridu sloupec editujici MemoField za behu
> aplikace. Pokud tento sloupec vytvorim v prostredi Delphi ( D6 Pro),
> tak je vsechno OK a zobrazi se mi data obsazena v Memo poli. Pokud
> totez vytvorim za behu aplikace tak mi to spadne na AV.
>
> MemoCol:= TdxDBGridMemoColumn
> (dxDBGridAllTab.CreateColumnEx(TdxDBGridExtLookupColumn,dxDBGridAllTab));
>
> Jiri Semler
>
>
>nazvy souboru ve zprave ctene pres MAPI
[*] Petr Brant <brant(zv)dcomm(tec)cz> - 5.5.2003 15:01:06
Ahoj,
mam takovy problem se ziskanim nazvu souboru ze struktury =
PMapiFileDesc.
Zadrhel je v tom, ze jsou vsechny nazvy ve starem tvaru 8.3, zkracene =
na
tvar s ~. Daji se nejak ziskat plnohodnotne (dlouhe) nazvy?
Myslim, ze uz P.Vones uz odepisoval v tom smyslu, ze zalezi na =
klientske
implementaci MAPI rozhrani. Je nekde k prozkoumani toto doporuceni =
(obecne),
jedna se primo o standard? Diky
RNDr. Petr Brant [brant(zv)dcomm(tec)cz]=20
http://web.redbox(tec)cz/petr.brant
D&COMM s.r.o.
Korunova=E8n=ED 6
Praha 7
tel. +420724007234
Adonis, setrideni datasetu na strane klienta
[*] Lstiburek Pavel <Lstiburek(zv)ceb(tec)cz> - 5.5.2003 14:34:29
Je mozno nejak setridit dataset komponent Adonis na strane klienta, jako to
jde u AdoExpresu pomoci IndexName ?
Pavel
WORD - SaveAsHTML
[*] Pavel Hlub�k <hlubik(zv)dashofer(tec)cz> - 5.5.2003 13:15:46
Zkus tohle (odzkouseno na D6, Windows XP, MS Office XP):
a) otevreni dokumentu:
var
w:OleVariant; //globalni promena
procedure TForm1.Button1Click(Sender: TObject);
begin
w:=CreateOleObject('Word.Application');
w.Visible:=False; // MS Word neni videt.
w.documents.open('test.doc');
BringToFront;
end;
b) SaveAs html
procedure TForm1.Button2Click(Sender: TObject);
begin
w.ActiveDocument.SaveAs('test.html',8);
w.quit;
w:=Unassigned;
end;
Pavel Hlubik
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Bohac Frantisek
> Sent: Monday, May 05, 2003 11:41 AM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: WORD - SaveAsHTML
>
>
> Preji hezky den,
>
> nevite prosim nekdo, jak ulozit (s pomoci OLE) soubor Wordu na HTML?
>
> A kdyby se Word nemusel otevrit (otevrel by se pouze na
> pozadi), tak by to bylo take dobre.
>
> Vrele diky za odpoved, pokud nekdo budete vedet, jak na to.
>
> S pozdravem
>
> Frantisek Bohac
>
>
>
Nizka rychlost KADAO
[*] Jiri Bily <bily78(zv)tiscali(tec)cz> - 5.5.2003 12:57:11
----- Original Message -----
From: "Petr Langer" <langer(zv)xdom(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, May 05, 2003 12:13 PM
Subject: Re: Nizka rychlost KADAO
> nemuze to souviset s transakcema? Ten import z csv dle meho pouziva na
> vsechno jednu transakci, kdezto pri tvem importu delas pro kazdy jeden
radek
> jednu transakci. Bohuzel neznam Access ani KADAO, takze nevim jak to
> pripadne nastavit, pouze spekuluju. Dalsi moznost je zrusit indexy,
Trasakci pouizivam pouze jednu. Indexy pri ukladani dat neexistujou.
Aplikace dela to, ze ziska a ulozi nejake mnozstvi dat, ulozi je do databaze
a az pak se vytvari indexy. Vlastne jeden index existuje. Primarni
autoincrement.
Jirka
Budoucnost Delphi se (mozna) jmenuje Octane
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 5.5.2003 13:31:43
From: "Slavek Rydval" <konference(zv)rydval(tec)cz>
> *****A jeste bych doplnil uvedenou vetu (a uvedl na pravou miru subject), ze
> budoucnost Delphistu se nejmenuje Octane, ale Visual Studio .NET 2003, ktere
> na cesky trh oficialne dojde 24. dubna, tedy za tyden.
Ted jiz asi definitevne ano, po te co se objevilo tohle. Ty ceny jsou opravdu
velmi velmi lakave: http://www.eweek.com/article2/0,3959,1053559,00.asp
"Borland C#Builder will come in Architect, Enterprise, Professional and
Personal versions and will cost $2,499, $1,799, $999 and $69, respectively."
Petr Vones
TCP
[*] Ladislav Fitz <ladislav.fitz(zv)kodytek(tec)cz> - 5.5.2003 12:51:10
jo a zapomel sem pouzivam Synapsi
TCP
[*] Ladislav Fitz <ladislav.fitz(zv)kodytek(tec)cz> - 5.5.2003 12:49:04
Dobry den
mam server ke kteremu se pripojuji klienti, ted bych chtel udelat neco jako
hovor v Carbon Copy - zatim to delam tak ze na servru otevru dalsi port pro
poslouchani ktery poslu clientovy, neda se to udelat nejak vhodneni (pozor
nejde mi jen o ten hovor budou i jine spojeni) neco jako zduplikovani
socketu
Re2: OT: Filtrovani mailu
[*] Radek KALA <Kala(zv)BetaControl(tec)cz> - 05.5.2003 12:48:44
To je pekny, ale pokud jsem to dobre pochopil, tak to funguje jako
nejaka proxy pro maily. To nepotrebuji. Na to mam i jine prostredky,
Ja potrebuji aby to bezelo nekde na pevne lince a mazalo nesmyslny
maily. A ja az se pripojim z domu modemem, nebo pres GSM tak at
uz tam mam jen to co chci.
Diky
> Doplnim dalsi:
> http://popfile.sourceforge.net/
>
> Petr Langer
>
> >
> > Podivej se t=F8eba na free SpamPal
> > www.spampal.org.uk
> >
> > --
> > Jan Fiala
> 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
WORD - SaveAsHTML
[*] Pavel Gazda <pavel_gazda(zv)dataint(tec)cz> - 5.5.2003 12:46:34
> nevite prosim nekdo, jak ulozit (s pomoci OLE) soubor Wordu na HTML?
>
FFormat := wdFormatHTML;
( Dokument.) SaveAs(FName,FFormat);
> A kdyby se Word nemusel otevrit (otevrel by se pouze na pozadi), tak by to
> bylo take dobre.
>
( Aplikace.) visible := false;
Pavel
placeny amater
OT: Filtrovani mailu
[*] Petr Langer <langer(zv)xdom(tec)cz> - 5.5.2003 12:06:50
Doplnim dalsi:
http://popfile.sourceforge.net/
Petr Langer
>
> Podivej se t�eba na free SpamPal
> www.spampal.org.uk
>
> --
> Jan Fiala
Jak vytvorit sloupec TdxDBGridMemoColumn v dxDBGri
[*] Ji�� Semler <jsemler(zv)stbk.mcs(tec)cz> - 05.5.2003 12:03:29
Dobry den,
potrebuji vytvorit v dxDBGridu sloupec editujici MemoField za behu
aplikace. Pokud tento sloupec vytvorim v prostredi Delphi ( D6 Pro),
tak je vsechno OK a zobrazi se mi data obsazena v Memo poli. Pokud totez
vytvorim za behu aplikace tak mi to spadne na AV.
var MemoCol:TdxDBGridMemoColumn;
if
((Field.DataType=ftBlob)and(pos('TEXT',UpperCase(Field.FieldName))>0))
or(Field.DataType=ftMemo) then
begin
MemoCol:= TdxDBGridMemoColumn
(dxDBGridAllTab.CreateColumnEx(TdxDBGridExtLookupColumn,dxDBGridAllTab));
//*****************
MemoCol.MaxDisplayLength:=255; // Hodnotu jsem opsal z Object
Inspectora
//*****************
MemoCol.FieldName:=Field.FieldName;
MemoCol.Caption:=Field.DisplayLabel;
MemoCol.WantReturns:=True;
MemoCol.WordWrap:=True;
MemoCol.Width:=MemoCol.Width+dxDBGridAllTab.DefaultRowHeight;
MemoCol.Visible:=True;
end;
Pokud vyznaceny radek vyhodim zobrazi mi v Gridu pouze "[BLOB]"
Pokud ho tam necham pak to pri dxDBGrid.EndUpdate zkonci na AV.
Jede to na Win Me, D6 Pro, FB.
Jak tedy mam vytvorit sloupec editujici Memo pole v dxDBGrid za behu
aplikace? V gridu se zobrazuji ruzne tabulky (vybirane z TreeView) s
ruznou strukturou.
Jiri Semler
Nizka rychlost KADAO
[*] Petr Langer <langer(zv)xdom(tec)cz> - 5.5.2003 12:13:50
Ahoj,
nemuze to souviset s transakcema? Ten import z csv dle meho pouziva na
vsechno jednu transakci, kdezto pri tvem importu delas pro kazdy jeden radek
jednu transakci. Bohuzel neznam Access ani KADAO, takze nevim jak to
pripadne nastavit, pouze spekuluju. Dalsi moznost je zrusit indexy,
naimportovat a vytvorit je znova (coz se pri importu asi taky deje...).
HTH
Pegtr Langer
----- Original Message -----
From: "Ji�� B�l�" <bily78(zv)tiscali(tec)cz>
Subject: Nizka rychlost KADAO
> Zdravim vsechny.
>
> Nemuze mi nekdo poradit jak se rychlosti vice priblizit k tomu MS Accessu?
> Nejake nastaveni nebo jine komponenty?
>
> Jirka
WORD - SaveAsHTML
[*] Bohac Frantisek <bohacf(zv)vnol(tec)cz> - 5.5.2003 11:40:54
Preji hezky den,
nevite prosim nekdo, jak ulozit (s pomoci OLE) soubor Wordu na HTML?
A kdyby se Word nemusel otevrit (otevrel by se pouze na pozadi), tak by to
bylo take dobre.
Vrele diky za odpoved, pokud nekdo budete vedet, jak na to.
S pozdravem
Frantisek Bohac
FB zaachazeni
[*] Skopalik Slavomir <skopalik(zv)hlubocky.del(tec)cz> - 5.5.2003 10:40:47
ad 1 - FB je siren pod mutaci GPL, muzes jej kopirovat jak chces
ad 2 - Pokud jsi zacatecnik, tak FB NEKONFIGURUJ, bude fungovat mnohem lepe
DB je nejvhonejsi vytvorit pomoci skriptu pres isql.
Priklad:
CREATE DATABASE "c:\test.gdb" USER "sysdba" PASSWORD "masterkey";
CREATE TABLE t( a INTEGER);
CREATE INDEX test ON t(a);
ad 3 - Z Delphi napriklad pres IBX
ad 4 - O to se postara IBX, ty jen napises SQL jako prosty text. Predpokladaji se znalosti prace
s SQL a TDataSetem.
ad 5 - www.ibphoenix.com
Slavek
Mam mozna trivialni dotazy:
Jak vlastne zachazet s FB?
1) Stazeni FB - prava pri kopirovani na uzivatelske stanice atd
2)KonfiguraceFB, pristupy do FB
3) Pripojeni k FB
4) Odesilani SQL dotazu a format, v jakem
se vraci.
Byl bych rad, pokud byste dal nekdo i odkaz na nejaky web, kde je
treba
priklad.Struktura souboru DBX OE
[*] Jan Naiser <tua(zv)wo(tec)cz> - 5.5.2003 10:32:33
> Me dost pomohl
> tenhle soubor.
>
> http://www.djpate.freeserve.co.uk/oexpress2.zip
>
> Posli to prosim i do konference, at si to muzou stahnout i ostatni. Dik.
>
> Petr Jarkovsy
OT: Filtrovani mailu
[*] ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> - 5.5.2003 10:46:55
NS41LjIwMDMgUmFkZWsgS0FMQToNCj4gQWhvai4NCj4gUG9zbGVkbmkgZG9ib3UgbWFtIHZlIHN2
ZSBzY2hyYW5jZSBuYSB2b2xueS5jeiBzdGFsZSB2aWNlIHNwYW11DQo+IHplIHphaHJhbmljaS4g
Qm9odXplbCBqZWppY2ggYW50aSBzcGFtIG1vIGNuZXphYnJhbC4gTmV2aXRlIG5la2RvIG8NCj4g
bmVqYWtlbSBTVyBuZWpsZXBlIGZyZWUuIEt0ZXJ5IGJ5Y2ggc2kgbmVjaGFsIGJlemV0IG5la2Rl
IG5hDQo+IHBldm5lIGxpbmNlICggbWFtIHNhbW96cmVqbWUga2RlICkgYSBrdGVyeSBieSB0cmVi
YSBhdXRvbWF0aWNreQ0KPiBrYXprb3UgaG9kaW51IHByb2xlemwgc2NocmFua3UgYSBwb2RsZSBu
ZWpha3ljaCBwcmF2aWRlbCB0bw0KPiBwcm9tYXphbCA/DQoNClBvZGl2ZWogc2UgdPhlYmEgbmEg
ZnJlZSBTcGFtUGFsDQp3d3cuc3BhbXBhbC5vcmcudWsNCg0KLS0gDQpKYW4gRmlhbGENCm1haWx0
bzpqYW4uZmlhbGFAd28uY3o=Nizka rychlost KADAO
[*] Ji�� B�l����n)r���� � - 5.5.2003 10:28:07
Zdravim vsechny.
Delal jsem aplikaci, ktera vyuziva komponety KADAO. Problem je v tom, ze
ulozeni zaznamu do tabulky trva moc dlouho. Kdyz stejnou strukturu tabulky
ulozim do csv formatu a ten importuju v MS Accessu tak je to mnohem
rychlejsi. Ulozeni asi milionu zaznamu mi trva 15 minut oproti 2 minutam
importu.
Aplikoval jsem vsechny doporuceni pro zvyseni rychlosti napsane v napovede.
Ukladani se sice vyrazne zrychlilo, ale 15-ti minut jsem dosahl az po tech
optimalizacich.
Nemuze mi nekdo poradit jak se rychlosti vice priblizit k tomu MS Accessu?
Nejake nastaveni nebo jine komponenty?
Mam D7. Zkousel jsem napr. ADO komponenty, ale ty jsou jeste pomalejsi.
Jirka
OT: scrollbox vs. zoom
[*] Tom� Fajman��������ڎf����{� - 5.5.2003 10:14:46
Cauky. nevite nekdo prosim jak udelat nejaky zoomovani a tisk veci co mam v
scrooll boxu?Struktura souboru DBX OE
[*] Jan Naiser <tua(zv)wo(tec)cz> - 5.5.2003 10:07:59
> Na www.wotsit.org som nasiel jeden popis (a priklad v C++), ktory zatial
> vyzera, ze funguje.
> P.S. Tiez skusas tu ulohu od Joe 'Wizard'-a? ;-)
Diky, kouknu na to.
To neznam, ale nasel jsem neco na http://oedbx.Aroh.de/ a tam se nemuzu
dopatrat... Potrebuju vyextrahovat maily z jine slozky OE nez je Dorucena
posta. Z te to umim pomoci SMAPI, ale SMAPI nedokaze prepnout na jinou
slozku, tak to zkousim pres primy pristup.
Honza.
OT: Filtrovani mailu
[*] Radek KALA <Kala(zv)BetaControl(tec)cz> - 05.5.2003 10:07:55
Ahoj.
Posledni dobou mam ve sve schrance na volny(tec)cz stale vice spamu
ze zahranici. Bohuzel jejich anti spam mo cnezabral. Nevite nekdo o
nejakem SW nejlepe free. Ktery bych si nechal bezet nekde na
pevne lince ( mam samozrejme kde ) a ktery by treba automaticky
kazkou hodinu prolezl schranku a podle nejakych pravidel to
promazal ?
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
DOtaz na NET DIR
[*] Ale� Hruban <ales hruban(zv)alisys(tec)cz> - 5.5.2003 10:09:09
> Na podnikove urovni by asi bylo nejlepsi poslechnout tu=20
> hnusnou, nechutnou hrabeci radu, kterou v teto konferenci=20
> paradoxisti obvykle dostavaji: prejit na Interbase.
>=20
> Tento postup by se z podnikoveho hlediska urcite do budoucna vyplatil.
>=20
> S pozdravem
>=20
> Bohuslav =A9vancara, prom. mat.
Vse co rikas je pravda. Druha pravda je, ze ne vsechny aplikace pochazi =
z me
dilny (spise prave ta nosna cast) a treti pravda je, ze snahu to =
prehodit na
SQL jiz mam delsi dobu, ale taky se musi najit ochota to zaplatit (coz =
je
problem pokud vse funguje jak ma, tak neni duvod, ze :-))) ). Dalsi veci =
je,
ze je to pomerne rozsahla agenda s mnoha vazbami a tak to prehrnout za
plneho provozu taky neni jen tak, pak je tam par veci, napr. duplikace =
dat,
ktere bych jiz resil jinak, tenkrat se to preklapelo z jineho systemu a
musela byt bohuzel zachovana zpetna kompatibilita. Proto se tam par =
buhuzel
klicovych veci muselo resit z hlediska optimalniho datoveho modelu dost
neoptimalne. :-)) Ale to je zivot.=20
Ales Hruban
Struktura souboru DBX OE
[*] Ondrej Kelle <O.Kelle(zv)digitalpublishing.de> - 5.5.2003 09:50:05
> nemate nekdo popis struktury souboru DBX pro OE? Nebo nejaky
> odkaz na inetu.
> Neco se mi podarilo najit, ale je to v C++ a nejak mi to nechodi.
Na www.wotsit.org som nasiel jeden popis (a priklad v C++), ktory zatial
vyzera, ze funguje.
P.S. Tiez skusas tu ulohu od Joe 'Wizard'-a? ;-)
HTH
TOndrej
zarovnat text v Editu
[*] J�n Harman <harman(zv)volny(tec)cz> - 5.5.2003 09:43:16
Ahoj po dlouhem vikendu,
Muzu zarovnat text v Editu vertikalne na stred?
Honza
DOtaz na NET DIR
[*] Bohuslav Svancara <bsv(zv)softprojekt(tec)cz> - 5.5.2003 09:36:13
> Proto bych rad nosne aplikace oddelil od tech mene
> dulezitych, alespon tim, ze by mely vlastni NET soubor.
Tady si netroufam moc radit. Je otazka, jestli po tom Paradoxu nechces vic,
nez je schopen splnit.
Na podnikove urovni by asi bylo nejlepsi poslechnout tu hnusnou, nechutnou
hrabeci radu, kterou v teto konferenci paradoxisti obvykle dostavaji: prejit
na Interbase.
Myslim, ze:
- do stavajicich aplikaci se bude muset sahnout (nastavovani NetDir, PrivDir
apod.)
- bude se muset peclive testovat, jak se nove programy chovaji
- proces odstranovani tohoto problemu tedy spolkne urcite programatorske
kapacity
- odstranenim jednoho problemu vzniknou urcite nejake problemy nove
Nebylo by lepsi tyto veci nedelat (protoze stejne nemaji perspektivu),
koupit IBObjects a programatorske kapacity radsi venovat na prevod aplikaci
na Interbase/FireBird? Zacit treba s temi mene dulezitymi aplikacemi a na
nich se to naucit? (Tim se zaroven odstrani kolize s temi dulezitymi.)
Tento postup by se z podnikoveho hlediska urcite do budoucna vyplatil.
S pozdravem
Bohuslav �vancara, prom. mat.
svancara(zv)softprojekt(tec)cz
Monitoring zmen zaznamu v IB/FB
[*] Peter Turcan <peter.turcan(zv)centrum.sk> - 5.5.2003 09:32:12
Ahoj Jan,
JN> Jedna se mi o evidenci, kdo kdy smazal, zmenil, pridal... zaznam v jake
JN> tabulce...
JN> Pokud to nekdo resil a domnivam se, ze ano, podelte se, prosim, o
JN> zkusenosti. :-)
Taketo veci sa najjednoduchsie sleduju cez triggre.
Ak to chces mat bez trigrov, tak by si musel mat napr. jednu proceduru
v aplikacii na update db a tu volat odvsadial. Ta by zabezpecila okrem
toho co ma aj ulozenie udajov o tom, co, kto menil (a kedy).
Peter
Struktura souboru DBX OE
[*] Jan Naiser <tua(zv)wo(tec)cz> - 5.5.2003 09:19:12
Preji pekny den,
nemate nekdo popis struktury souboru DBX pro OE? Nebo nejaky odkaz na inetu.
Neco se mi podarilo najit, ale je to v C++ a nejak mi to nechodi.
Diky, Honza.
Monitoring zmen zaznamu v IB/FB
[*] Jan Naiser <tua(zv)wo(tec)cz> - 5.5.2003 09:25:00
Preji pekny den,
potreboval bych monitorovat akce jednotlivych uzivatelu ve FB. Ma FB primo
nejakou funkci na evidovani zmen DB nebo si to musim vytvorit sam pomoci SP
a trigeru? Da se nejakym zpusobem ze SP zapisovat do klasickeho souboru nebo
musim vse resit pres tabulky?
Jedna se mi o evidenci, kdo kdy smazal, zmenil, pridal... zaznam v jake
tabulce...
Pokud to nekdo resil a domnivam se, ze ano, podelte se, prosim, o
zkusenosti. :-)
Diky, Honza.
Jak zasednout tlacitko v zahlavi okna
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 05.5.2003 08:41:28
> jak zasednu tlacitka pro minimalizaci a maximalizaci v zahlavi okna?
>
> Umim zasednou krizek pomoci:
>
> EnableMenuItem(GetSystemMenu(Handle, LongBool(State)), SC_CLOSE,
> MF_BYCOMMAND or MF_GRAYED);
Ahoj,
nastaveni property formu BorderIcons nestaci?
David Lebeda
DBgrid
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 05.5.2003 08:28:37
> existuje nejaka komponenta DBGrid, ktora ma moznost triedenia stlpcov,
> ked kliknem na hlavicku stlpca? Mam Turbopower orpheus, ale ta sa mi
> zda pomala..
Podle meho nazoru to na zcela obecne urovni a libovolne databazi
neni mozne efektivne udelat:
1) U SQL databazi prichazi v uvahu 2 moznosti realizace - bud
zmena SQL dotazu, coz, bude-li provadet automat, muze vest ke
snizeni vykonu napr. v pripade selektu z ulozene procedury, kde jiz
je nejaky order by apod. - je IMHO lepsi si SQL dotaz upravit sam,
nebo druha moznost - tridit data jen na klientovi, coz ale znamena,
ze nejprve bude potreba vsechna data na klienta dopravit a to zase
muze trvat dlouho.
2) U souborovych databazi muze prichazet v uvahu krome
klasickeho pretrideni i zmena indexu, ale to opet asi nelze
automatizovat.
Funkcnost trideni kliknutim na titulek sloupce pouzivam, ale delam
to s pomoci klasickeho dbgridu a rucniho sestaveni SQL dotazu.
David Lebeda
tuhnuti D3
[*] Du�ek Karel <dusek(zv)mudk(tec)cz> - 5.5.2003 07:54:17
Tyto a podobne problemy jsem mel taky. Pak me zde v konf. Bylo =
doporuceno zmenit OS. Ted jedu na XP a vse je OK.
Karel Dusek
-----Original Message-----
From: =A9imek Pavel - KVS [mailto:p.simek(zv)icsvscr(tec)cz]=20
Sent: Monday, May 05, 2003 7:38 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: tuhnuti D3
Zdravim,
mam D3 a Win98 SECZ. Vlastni aplikace s pripojenymi 3-mi COMy, ktere =
komunikuji s UPS, LCD displejem, GSM modemem. Soucasti je par databazi =
pro zaznam SMSek a dalsich stavu I/O a UPS. Problem - v D3 pisi program =
a ten zkompiluji "F9". Prg bezi a je vse OK. V aplikaci ukoncim prg a v =
D3 edituji. Pokud ale dam nekde v prg zastaveni a krokuji, nemohu jiz =
ukoncit D3. Program resetuji v D3, D3 vypadaji normalne ale pokud =
spustim kompilaci, tak neprobehne a zahlasi chybu na Project1.exe. Ten =
ani po ukonceni D3 nejde smazat, jako by byl stale otevreny, ale v =
seznamu bezicich prg (Ctrl+Alt+Del) neni. Pomuze jedine restart celeho =
PC. Co s tim?
Kejchal
tuhnuti D3
[*] �imek Pavel - KVS <p.simek(zv)icsvscr(tec)cz> - 5.5.2003 07:37:51
Zdravim,
mam D3 a Win98 SECZ. Vlastni aplikace s pripojenymi 3-mi COMy, ktere
komunikuji s UPS, LCD displejem, GSM modemem. Soucasti je par databazi pro
zaznam SMSek a dalsich stavu I/O a UPS.
Problem - v D3 pisi program a ten zkompiluji "F9". Prg bezi a je vse OK. V
aplikaci ukoncim prg a v D3 edituji. Pokud ale dam nekde v prg zastaveni a
krokuji, nemohu jiz ukoncit D3. Program resetuji v D3, D3 vypadaji normalne
ale pokud spustim kompilaci, tak neprobehne a zahlasi chybu na Project1.exe.
Ten ani po ukonceni D3 nejde smazat, jako by byl stale otevreny, ale v
seznamu bezicich prg (Ctrl+Alt+Del) neni. Pomuze jedine restart celeho PC.
Co s tim?
Kejchal
Negace hodnoty v update SQL
[*] Ing. Pavel �ilinec����)b����ȧ~�� - 5.5.2003 06:57:41
Nevim, jestli to bude fungovat tady, ale na MSSQL bych napsal
update TAB1
set Pol1= case when Pol1 = 1 then 0 else 1 end
where ...
Nev�m, jak je na paradoxu vyj�d�en Boolean.
--------
ing. Pavel Zilinec
MailTo:zilinec(zv)email(tec)cz
Prog-Soft s.r.o. Plzen
Informacni system pro vyrobce
a distributory napoju
JN> Preji pekny den,
JN> potreboval bych v tabulce znegovat hodnotu pomoci SQL, ale zatim jsem
JN> neprisel na to jak a zda je to vubec mozne.
JN> Jde o tabulku paradoxu a polozku boolean. Potrebuji neco jako: update TAB1
JN> set Pol1=not Pol1 where... tedy, aby se True zmenilo na False a False na
JN> True. Uvedeny zapis samozrejme nefunguje. Nenapada vas, jak to udelat? V IB
JN> bych to asi resil pomoci SP, ale v PX...?
JN> Za rady diky, Honza.
Vzdalenost textu od scrollbaru
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 5.5.2003 02:41:44
From: "abyssinians(tec)cz" <abyssinian(zv)centrum(tec)cz>
> Co je ale neprijemne, ze text zasahuje az tesne ke scrollbaru.
> Nevypada to moc dobre.
> Neda se nejak nastavit okraj mezi pravym krajem textu a scrollbarem?
procedure TForm1.Button1Click(Sender: TObject);
var
R: TRect;
begin
SendMessage(RichEdit1.Handle, EM_GETRECT, 0, Integer((zv)R));
Dec(R.Right, 10);
SendMessage(RichEdit1.Handle, EM_SETRECT, 0, Integer((zv)R));
RichEdit1.Lines.LoadFromFile('unit1.pas');
end;
Petr Vones
Regularni vyrazy
[*] ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> - 4.5.2003 20:27:42
NC41LjIwMDMgTWlyb3NsYXYgVGxhcOFrOg0KPiBaZHJhdmltLA0KPiBwb3RyZWJvdmFsIGJ5Y2gg
cG9yYWRpdCBvaGxlZG5lIHJlZ3VsYXJuaWNoIHZ5cmF6dS4gU25hZCBhbmkgbmUgc2VzdGF2ZW5p
bSwNCj4gYWxlIHNwaXMgcG91eml0aW0gdiBEZWxwaGkuIEtvbmtyZXRuZSBwb3RyZWJ1anUgeiB1
cmNpdGVobyB0ZXh0dSB2eWtvdXNhdA0KPiB0ZXh0IG9kcG92aWRhamljaSByZWd1bGFybmltdSB2
eXJhenUsIGFsZSB0ZW50byB0ZXh0IHNlIHRhbSB2eXNreXR1amUNCj4gbmVrb2xpa3JhdCAocG90
cmVidWppIHZzZWNobnkgdnlza3l0eSkuDQo+IFBva3VkIGJ5c3RlIG1lbCBuZWtkbyBuZWpha2Ug
emt1c2Vub3N0aSBuZWJvIGNhc3RpIGtvZHUsIG1vYyBieSBtaSB0bw0KPiBwb21vaGxvLg0KDQpE
b3BvcnVjdWppIHNlIHBvZGl2YXQgbmENCmh0dHA6Ly9hbnNvLmRhLnJ1LyBuZWJvIGh0dHA6Ly9h
bnNvLnZpcnR1YWxhdmUubmV0Lw0KSmUgdGFtIGltcGxlbWVudGFjZSByZWcuIHZ5cmF6dSwgdmNl
dG5lIGRlbWEsIGt0ZXJlIHVrYXp1amUsIGNvDQpwb3RyZWJ1amVzICsgdmVsbWkgZG9icmUgcG9w
c2FueSBoZWxwLg0KDQotLSANCkphbiBGaWFsYQ0KbWFpbHRvOmphbi5maWFsYUB3by5jeg==
MAPI a pristup ke slozkam
[*] Jan Naiser <tua(zv)wo(tec)cz> - 4.5.2003 17:40:17
> > pokousim se cist programove maily z OE pres JclMapi. Vse chodi, ale
porad
> > jsem jen ve slozce Dorucena posta. Da se nejak nacist i jina slozka? At
uz
>
> Pomoci MAPI ano, ovsem ne pres Simple MAPI. Unit JclMapi je pouze Simple
MAPI.
A jak to pres MAPI provedu? Priklad v helpu k MAPI se mi nepodarilo
rozchodit. Pri CreateOleObject('MAPI.Session') to na me krici - Nespravny
retezec tridy. Coz bude asi tim, ze OE nema OLE. Jak tedy pres MAPI?
Potrebuju se prepnout do mne zname slozky, projit maily a vyextrahovat je do
souboru a potom s nimi dal pracovat.
Diky, Honza.
MAPI a pristup ke slozkam
[*] Vymazal Milan <vymazal.milan(zv)seznam(tec)cz> - 4.5.2003 17:35:04
Cau Jan,
Sunday, May 4, 2003, 4:31:55 PM, you wrote:
> Preji pekny den,
> pokousim se cist programove maily z OE pres JclMapi. Vse chodi, ale porad
> jsem jen ve slozce Dorucena posta. Da se nejak nacist i jina slozka? At uz
> podslozka Dorucene posty nebo jina slozka z Lokalnich slozek.
Pokud se nepletu tak pomoci MAPI to nejde..
> Diky, Honza.
S pozdravem
Milan Vymazal
Vzdalenost textu od scrollbaru
[*] abyssinians(tec)cz <abyssinian(zv)centrum(tec)cz> - 04.5.2003 17:27:37
Pouzivam DBRichEdit a v pripade, ze mnozstvi textu je vetsi nez okno
teto komponenty, zobrazi se automaticky vertikalni scrollbar pro
rolovani textu.
Co je ale neprijemne, ze text zasahuje az tesne ke scrollbaru.
Nevypada to moc dobre.
Neda se nejak nastavit okraj mezi pravym krajem textu a scrollbarem?
A. Goetz
--------------------
Na nas trh prichazi Volkswagen Touran, ktery je vice nez jen rodinny vuz ...
http://user.centrum(tec)cz/redir.php?url=http://vw.multimedia(tec)cz/clanky/clanek1.php
MAPI a pristup ke slozkam
[*] Jan Naiser <tua(zv)wo(tec)cz> - 4.5.2003 16:31:55
Preji pekny den,
pokousim se cist programove maily z OE pres JclMapi. Vse chodi, ale porad
jsem jen ve slozce Dorucena posta. Da se nejak nacist i jina slozka? At uz
podslozka Dorucene posty nebo jina slozka z Lokalnich slozek.
Diky, Honza.
Jsou MAPI funkce thread-safe?
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 4.5.2003 16:43:10
From: "Milan Cizek" <cizek.milan(zv)seznam(tec)cz>
> je mozne volat jednotlive MAPI funkce ze samostatneho threadu (metody
> execute)? Diky.
MAPI funkce by byt mely, u Simple MAPI bych to ale nepredpokladal protoze
nekteri vyrobci jsou natolik neschopni, ze neimplementuji spravne ani techto
par jednoduchych funkci.
Petr Vones
email do "odstranene" pres SimpleMapi
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 4.5.2003 16:45:26
From: "Milan Cizek" <cizek.milan(zv)seznam(tec)cz>
> je mozne presunout precteny email do slozky odstranene posty pomoci
> SimpleMapi? Prisel jsem jen na MapiDeleteMail, ktery mi ho odstrani
Ne. Nicmene se muze implementace u ruznych klientu lisit, takze to nektery
muze jen presunout do Deleted Items.
Petr Vones
MAPI a pristup ke slozkam
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 4.5.2003 16:40:49
From: "Jan Naiser" <tua(zv)wo(tec)cz>
> pokousim se cist programove maily z OE pres JclMapi. Vse chodi, ale porad
> jsem jen ve slozce Dorucena posta. Da se nejak nacist i jina slozka? At uz
Pomoci MAPI ano, ovsem ne pres Simple MAPI. Unit JclMapi je pouze Simple MAPI.
Petr Vones
Regularni vyrazy
[*] Miroslav Tlap�k <M.Tlapak(zv)sh.cvut(tec)cz> - 4.5.2003 16:32:44
Zdravim,
potreboval bych poradit ohledne regularnich vyrazu. Snad ani ne sestavenim,
ale spis pouzitim v Delphi. Konkretne potrebuju z urciteho textu vykousat
text odpovidajici regularnimu vyrazu, ale tento text se tam vyskytuje
nekolikrat (potrebuji vsechny vyskyty).
Pokud byste mel nekdo nejake zkusenosti nebo casti kodu, moc by mi to
pomohlo.
Diky moc
Tlapka
NOvell a Delphi
[*] Jiri Kratochvil <jiri.kratochvil(zv)webzin(tec)cz> - 4.5.2003 14:13:51
> nemate nekdo prosimvas Novell SDK pro Delphi ? schazi mi nektere unity
> calsrv32 calfse32 atd. Stahl jsem ndk ale to onebosahuje vsechny unity
> co jsou potreba.
Mam - posilam soukromym mailem.
Doufam, ze je to to, co potrebujes, ja na timhle vyvijim.
Jiri Kratochvil
----------------------------
Sprava siti a vyvoj aplikaci na zakazku
Tel: 724 115 559
WWW: http://www.sousnet.net ,
http://kratochvil.sousnet.net
Email: jiri.kratochvil(zv)sousnet.net
Porovnanie struktury suborov Firebird
[*] Pavel Malinsky <spiderland(zv)iol(tec)cz> - 4.5.2003 12:15:50
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
>
> existuje nejaky nastroj pomocou ktoreho je mozne porovnat struktury
> dvoch databazovych suborov Firebird (*.fdb) resp. Interbase a
Ahoj,
pouzivam treba Database Comparer, ktery najdes zde:
www.clevercomponents.com a existuje i jako plugin do
IBExperta, ktery je zde http://www.ibexpert.com/download/PlugIns/ .
S pozdravem a dikem
=====================================
> Pavel Malinsky; spiderland(zv)iol(tec)cz <
=====================================
GSM: 602 652 203
NOvell a Delphi
[*] tondrej(zv)t-online.de (TOndrej) - 4.5.2003 11:59:46
> nemate nekdo prosimvas Novell SDK pro Delphi ?
Nemam.
> schazi mi nektere unity calsrv32 calfse32 atd. Stahl jsem
> ndk ale to onebosahuje vsechny unity co jsou potreba.
Nic o tom neviem, ale podla nasledovneho linku asi potrebujes del32sdk:
http://developer.novell.com/support/sample/tids/del32sdk/del32sdk.htm
HTH
TOndrej
Porovnanie struktury suborov Firebird
[*] radeq <radeq(zv)centrum.sk> - 04.5.2003 11:50:59
Zdravim Vas,
existuje nejaky nastroj pomocou ktoreho je mozne porovnat struktury
dvoch databazovych suborov Firebird (*.fdb) resp. Interbase a
nasledne zmeny struktury v novsom automaticky aplikovat na starsi
subor. Taka synchronizacia struktur.
Z praxe:
Malo by to sluzit ako upgrade databaz, ked vznikne novsia verzia
produktu.
Dakujem.
--
S pozdravem,
radeq
radeq(zv)centrum.sk
NOvell a Delphi
[*] Vymazal Milan <vymazal.milan(zv)seznam(tec)cz> - 4.5.2003 11:44:39
Zdravim
nemate nekdo prosimvas Novell SDK pro Delphi ? schazi mi nektere unity
calsrv32 calfse32 atd. Stahl jsem ndk ale to onebosahuje vsechny unity
co jsou potreba.
--
Best regards,
Milan Vymazal
Delphi 7 Enterprise, Windows 2000 SP3 Proff, IE 6.0sp1 with all sp
Instalace fbudf.dll nebo ib_udf.dll
[*] tondrej(zv)t-online.de (TOndrej) - 4.5.2003 10:55:00
> Po instalaci FB 1.5 jsem v adresari UDF nasel dve knihovny. Nikde
> jsem ale nenasel nejaky script, ktery by mi funkce nainstaloval.
Ja mam ib_udf.sql v podadresari Examples\UDF\
HTH
TOndrej