Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
Odeslani stisku klaves z app - vyreseno
[*] Frantisek Mlcoch <frantisek.mlcoch(zv)vsb(tec)cz> - 21.3.2005 12:36:59
Tak kdyby to nekdo nekdy potreboval:
ActivateKeyboardLayout(GetKeyboardLayout(GetWindowThreadProcessId(GetForegro
undWindow())), 0);
Tento prikaz si zjisti jaky KbLayout ma aktivni okno (na poredi) a podle
toho nastavi i KbLayout me aplikace. Diky Tomu se odeslane stisky klaves
mapuji spravne.
F.
Odeslani stisku klaves z app
[*] konference(zv)sales(tec)cz - 21.3.2005 09:24:42
On Behalf Of Frantisek Mlcoch
> Napadlo me, ze by stacilo rozpoznat jakou klavesnici ma
> aktivni okno ve win
> a nastavit svemu programu stejnou.
Ahoj,
Zkusil bych nejdriv nastavit aktivni tu aplikaci (je to soucasti SendKey) a
pak bych se mrknul na GetLocaleInfo,Screen.DefaultKbLayout atd.
Takhle napriklad zjistuji ktere z podporovanych jazyku klavesnice jsiu
nainstalovany :
procedure TMainFak.InitialLanguage;
var
CurLang: array[0..2] of Char;
FirstLang, TempLang: string[2];
begin
ActivateKeyboardLayout(Screen.DefaultKbLayout, 0);
GetLocaleInfo(LOWORD(GetKeyboardLayout(0)), LOCALE_SENGLANGUAGE, CurLang,
2);
FirstLang := CurLang;
TempLang := FirstLang;
repeat
if (TempLang = 'Cz') then
begin
MainFak.AcLangCz.Visible := True;
end;
if (TempLang = 'Gr') then
begin
MainFak.AcLangGr.Visible := True;
end;
if (TempLang = 'En') then
begin
MainFak.AcLangEn.Visible := True;
end;
if (TempLang = 'Ru') then
begin
MainFak.AcLangRu.Visible := True;
end;
ActivateKeyboardLayout(HKL_NEXT, 0);
GetLocaleInfo(LOWORD(GetKeyboardLayout(0)), LOCALE_SENGLANGUAGE,
CurLang, 2);
TempLang := CurLang;
until FirstLang = TempLang;
end;
Ludek
Zjisteni pozice tray ikony
[*] Karel Kral <kralkonf(zv)purusmeda(tec)cz> - 21.3.2005 09:14:40
Ja jsem narazil u JCL - myslim, ze objekt se jmenuje JclBaloonHintWindow
(jsem si jisty jen ze je tam ten baloon) - na poznamky o tom, jak je to
mimoradne tezke zjistit. Pokud mas JCL nainstalovane, zkus ti to tam
najit. Nebo to bylo v news v konferenci JCL? Ja ted fakt nevim.
Petr Fejfar napsal(a):
> Ahoj vespolek,
>
>
> nema nekdo kod pro Delphi, kterym se da zjistit pozice
> (souradnice na obrazovce) tray ikony?
>
> Zda se, ze jedina cesta jak ji ziskat je popsana tady:
> http://www.codeproject.com/shell/ctrayiconposition.asp?msg=999295
> ovsem je to v C++. Takze kdyby nekdo vedel o portu do Delphi,
> byl bych mu zauzlovan.
--
______________________________________________________
Karel Kral, reditel IT / IT manager
PURUS-MEDA, s.r.o., Palackeho 174, 621 00 Brno, CZ
E-Mail: kral(zv)purusmeda(tec)cz
______________________________________________________
object <> class
[*] Karel Kral <kralkonf(zv)purusmeda(tec)cz> - 21.3.2005 09:10:39
Ja jsem si pri prechodu myslel, ze object pujde pouzit kvuli
kompatibilite - ale je to zcela k nicemu. Object se v podstate tvari
jako stary pascalsky objekt jen pro zpetnou kompatibilitu. Pokud si
pamatuji, nezna direktivy override atd.
Po par dnech zkoumani jsem to vzdal a radeji prepsal stare zdrojaky na
pouziti class. Pokud si pamatuju, hledal jsem v helpu.
Radomir Ludva napsal(a):
> Kdysy davno kdyz jsem koukal zvedave do Dolephi tak jsem dumal nad
> rozdilem mezi typem object a class. Prechazel jsem z Turbo Pascalu v 5.5
> ale stejne jsem pak v Delphi nic "neklohnil". Ted kdyz jsem nahodou
> objevil tuto konferenci, tak se zkusim zeptat. Jaky je rozdil mezi typy
> object a class?
> Radmi
>
> type
> Objekt = object
> end;
>
> Trida = class
> end;
>
>
>
>
>
>
>
--
______________________________________________________
Karel Kral, reditel IT / IT manager
PURUS-MEDA, s.r.o., Palackeho 174, 621 00 Brno, CZ
E-Mail: kral(zv)purusmeda(tec)cz
______________________________________________________
Odeslani stisku klaves z app
[*] Frantisek Mlcoch <frantisek.mlcoch(zv)vsb(tec)cz> - 21.3.2005 09:00:37
Napadlo me, ze by stacilo rozpoznat jakou klavesnici ma aktivni okno ve win
a nastavit svemu programu stejnou.
Jenze nevim jak to udelat, kdyby nekdo vedel, budu vdecny za kazdy napad.
F.
Zjisteni pozice tray ikony
[*] Petr Fejfar <development(zv)callnet(tec)cz> - 20.3.2005 23:07:55
Ahoj vespolek,
nema nekdo kod pro Delphi, kterym se da zjistit pozice
(souradnice na obrazovce) tray ikony?
Zda se, ze jedina cesta jak ji ziskat je popsana tady:
http://www.codeproject.com/shell/ctrayiconposition.asp?msg=999295
ovsem je to v C++. Takze kdyby nekdo vedel o portu do Delphi,
byl bych mu zauzlovan.
Diky, pf
Odeslani stisku klaves z app
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 20.3.2005 21:43:49
Puvodni zprava ze dne 20.3.2005:
> Moje aplikace data prijata ze serioveho portu vysila jako stisk
> klaves, jenze ho vysila v kodovani klavesnice, ktera je ve win.
> nastavena jako default pri spusteni aplikace, pripadne ji prepnul
> (pomoci Alt + Shift). Jenze, kdyz ma cilova aplikace zvolenou jinou
> klavesnici, tak prijme uplne jine znaky, nez jake moje apilkace do
> systemu vyslala.
Neresil jsem to, takze netusim, jestli neni nejake elegantnejsi reseni
(urcite ano). Ale co me napadlo ted - ve Windows se da nastavit nejen
kombinace pro prepinani klaves, ale take kombinace pro prepnuti na
urcenou klavesnici. Takze donutit uzivatele nastavit danou kombinaci
na treba ceskou klavesnici a pak ji pouzivat. Otazkou je, ze pak zase
treba nekdo bude rvat, ze mu to nekdo prepnul pod rukou :-)
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================
Odeslani stisku klaves z app
[*] Frantisek Mlcoch <frantisek.mlcoch(zv)vsb(tec)cz> - 20.3.2005 21:17:47
Pro odeslani stisku klavesy pouzivam unit Senkey. Jenze jsem narazil na
problem s prepinanim klavesnice.
Moje aplikace data prijata ze serioveho portu vysila jako stisk klaves,
jenze ho vysila v kodovani klavesnice, ktera je ve win. nastavena jako
default pri spusteni aplikace, pripadne ji prepnul (pomoci Alt + Shift).
Jenze, kdyz ma cilova aplikace zvolenou jinou klavesnici, tak prijme uplne
jine znaky, nez jake moje apilkace do systemu vyslala.
WinXp si totiz pamatuje pro kazdou aplikaci zvlast, zvolenou klavesnici a
tim padem, pak dochazi k chybnemu mapovani virtualniho kodu klavesnice
(funkce vkKeyScan pouzita v tom unitu).
Vi nekdo jak tento problem vyresit nebo obejit???
Diky F.
object <> class
[*] Radomir Ludva <radomir.ludva(zv)seznam(tec)cz> - 20.3.2005 19:39:40
Kdysy davno kdyz jsem koukal zvedave do Dolephi tak jsem dumal nad
rozdilem mezi typem object a class. Prechazel jsem z Turbo Pascalu v 5.5
ale stejne jsem pak v Delphi nic "neklohnil". Ted kdyz jsem nahodou
objevil tuto konferenci, tak se zkusim zeptat. Jaky je rozdil mezi typy
object a class?
Radmi
type
Objekt = object
end;
Trida = class
end;Aktualni radek v datasetu
[*] Jiri Virt <virt(zv)volny(tec)cz> - 20.3.2005 19:25:39
pres bookMark (GotoBookMark,GetBoorMark) by to neslo?
Jirka Virt
Aktualni radek v datasetu
[*] Karel Pecinka <k.pecinka(zv)seznam(tec)cz> - 20.3.2005 18:11:33
Zdravim,
mam docela trivialni dotaz - jak zjistim, na kolikatem radku v
kbmMemtable jsem najety? Potrebuju spravnou hodnotu i v pripade, ze mam
na tabulce pouzit filtr. RecNo vrati puvodni pozici, jeste pred filtrem.
Muzu na to jit i pres DBGrid pokud by to bylo resitelne aspon tak.
Dokaze nekdo poradit?
Karel
prevod java source -> delphi source
[*] bleak vm <bleak(zv)mvesely(tec)com> - 20.3.2005 16:43:27
takze vysledek nepouzitelny. Pokud nekdo znate nastroj pro prevod
zdrojaku v Jave do Delphi, napiste prosim.
Zdrojaky v Jave jsou jenom cykly a jedna trida, zadne speciality.
Bohuzel mi nektere syntakticke kontrukce v Jave nic nerikaji.
Co muze napr. byt tohle?
d: = x - x(p, r);
d:integer
x:integer
p:array of integer
r:array of integer
bleak
OT: Nabidka knih, casopisu a vytisku zdarma
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 19.3.2005 19:49:40
Vazeni pratele,
delal jsem debordelizaci vseho kolem Delphi a nasel jsem spousty knih,
casopisu a vytisku, ktere jiz nepotrebuji. Je mi lito to vyhodit a
proto to nabizim zcela zdarma, pouze za uhradu nakladu s dopravou
(postovne, balne). Vsechno jsem rozdelil do 4 baliku se stejnym nebo
podobnym obsahem, jejich podrobny popis s informacemi najdete tady:
http://www.clexpert(tec)cz/zdarma.aspx
Pripadni zajemci necht se hlasi vyhradne na muj e-mail
clexpert(zv)clexpert(tec)cz, rozhodne ne do konference.
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================
prevod java source -> delphi source
[*] bleak vm <bleak(zv)mvesely(tec)com> - 19.3.2005 16:03:25
objevil jsem BabelConvertor a podstrcil mu zdrojaky z javy.
Vyprodukovalo to kod v delphi.
Ted se v tom zkusim pohrabat.
bleak
OT: prevod java source -> delphi source
[*] bleak vm <bleak(zv)mvesely(tec)com> - 19.3.2005 15:41:23
zdravim,
mam nejaky zdrojovy kod v jave a potreboval bych to preklopit do delphi.
Existuje nejaky konvertor?
Nasel jsem toto: http://home.pacifier.com/~mmead/jni/delphi/javadpr/
<http://home.pacifier.com/%7Emmead/jni/delphi/javadpr/>
ale nedari se mi to spustit - Error loading JavaVM. Mam instalovany JRE.
bleak
Jak zapsat XML? SOS
[*] Petr Fejfar <development(zv)callnet(tec)cz> - 19.3.2005 13:09:13
> V Delphi 6 a vyssim je pomerne slusna abstrakce XML parseru, viz
> interface IXMLDocument (ono je to zaroven jako komponenta
> TXMLDocument ale tak to nepouzivej).
V Delphi 7 a vyssim existuje wizard pro XML data binding, ktery umi z .DTD
nebo .XSD souboru vygenerovat unit s pascalskymi tridami tak, ze pro
elementy
vytvori tridy jejichz properties odpovidaji atributum atd.
Tim te v podstate zbavi nutnosti prochazet strom po uzlech.
Ma to sice radu omezeni a nekdy se musi po vygenerovani jeste rucne neco
upravovat
(napr. pri pouziti name spacu), ale pokud umis (A)BNF, tak by ti sestaveni
.DTD souboru nemelo cinit problemy a podle mych zkusenosti to usetri dost
casu,
zejmena kdyz se ten XML format jeste bude menit
(kod ktery s temi tridami operuje neni tak citlivy na zmenu formatu
jako pri primem prochazeni stromu).
HTH, pf
Nstaveni Delphi
[*] Petr Vones <konference(zv)petrvones(tec)net> - 19.3.2005 11:43:04
From: "In g. Zdenek Reznicek" <reznicek(zv)pce(tec)cz>
> omylem jsem si nekde v D6 nastavil, aby se mi pri vytvoreni nove aplikace
> (File -> New -> application nebo pri spusteni D6)
> automaticky spustil QuickReportWizard.
> To samozrejne nechci. Nevite nekdo, kde se to odstrani ?
Patrne v Tools | Object Repository
Petr Vones
Nstaveni Delphi
[*] In g. Zdenek Reznicek <reznicek(zv)pce(tec)cz> - 19.3.2005 11:35:04
Zdravim,
omylem jsem si nekde v D6 nastavil, aby se mi pri vytvoreni nove aplikace
(File -> New -> application nebo pri spusteni D6)
automaticky spustil QuickReportWizard.
To samozrejne nechci. Nevite nekdo, kde se to odstrani ?
Dik
Zdenek
Paradox s pocitaci W98 a WXP a Cannot access direc
[*] Jan Novak <delfin4(zv)volny(tec)cz> - 19.3.2005 11:25:03
> Tam kde to nefunguje se pocitace (asi 30 s aplikaci pracuje jen 9)
> hlasi do domeny, ale data jsou ulozena na klasickem PC s W98.
Jestli to nebude ten znamy bug site microsoft: Pokud je server Win9x a
klient NT/W2k/XP, tak si klient spatne updatuje, t.j. vubec neupdatuje
velikost souboru. Kdyz maji 2 klienti otevreny sdileny soubor a jeden
z nich prida neco za jeho konec, ten druhy klient, pokud je na NT, se
to nedozvi a pri pokusu cist ty data dostane chybu 'pokus o cteni za
eof', i kdyz nekde na zacatku souboru vidi, ze ten prvni tam zmenil
pocet 'zaznamu' na zacatku souboru.
Reseni je ve smisene siti w9x/nt nepouzivat jako servera w9x, i kdyz
se presunutim dat na NT vsecko strasne zpomali. Nebo opravit programy
tak, aby pri teto chybe udelali close/open a zkusili zopakovat
predchozi zapis/cteni.
Akorat nevim, jak by se to mohlo promitnout do 'cannot access
directory', ale u BDE je vsechno mozne. Kdykoliv se vyskytne jakykoliv
problem s BDE, je vzdycky efektivnejsi smerovat usili na prechod na
neco jineho, nez se pokouset kuryrovat BDE.TFloatField v kbmMemTable
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 19.3.2005 07:52:45
> do memory tabulky z dotazu. Na nacteni pouzivam prikaz
>
> mt.LoadFromDataSet(Query, [mtcpoProperties, mtcpoStructure]);
>
> Vse funguje krasne az na pripad, ze v dotazu pouziju sloupec typu Float
> - je zobrazen jako bez desetinych mist. Kdyz si vypisu
> Field[i].ClassName, vrati mi to TBCDField.
Ahoj,
mozna bych zacal tim, ze bych se podival, jaky typ pole je v Query,
ktera prijala vysledky dotazu. Pokud tam bude spravne a do kbm se
chybne prevezme, verim, ze dokazes ve zdrojaku ke kbm najit, co se
deje. Ja s tim jinak zkusenost nemam, ale ve zdrojakach kbm uz jsem
neco hledal a celkem to slo... Mas nejakou dostatecne aktualni verzi
kbm?
David Lebeda
Tisk do sloupcu ve FastReportu
[*] Karel Pecinka <k.pecinka(zv)seznam(tec)cz> - 19.3.2005 01:12:15
Cau,
jak se da ve FastReportu 3 nastavit, aby pri tisku do vice sloupcu
nejdrive tisk probihal po radcich a pak teprve po sloupcich? Standardne
se nejdrive potiskne 1. sloupec, pak se pokracuje ve druhem atd.
Diky Karel
TFloatField v kbmMemTable
[*] Karel Pecinka <k.pecinka(zv)seznam(tec)cz> - 19.3.2005 00:48:13
Zdar,
pouzivam kbmMemTable a nacitam data z SQL. Data nacitam dynamicky, tzn.
dopredu nevim, co tam bude za sloupce. Proto potrebuji prevzit strukturu
do memory tabulky z dotazu. Na nacteni pouzivam prikaz
mt.LoadFromDataSet(Query, [mtcpoProperties, mtcpoStructure]);
Vse funguje krasne az na pripad, ze v dotazu pouziju sloupec typu Float
- je zobrazen jako bez desetinych mist. Kdyz si vypisu
Field[i].ClassName, vrati mi to TBCDField.
Co mam delat, abych mohl univerzalne pouzit LoadFromDataSet a dostal
desetinna mista?
Diky Karel, D5, kbmMemTable 5.00 beta.OCX a tlacitka
[*] konference(zv)sales(tec)cz - 18.3.2005 19:49:53
Zdravim,
Implementuji ocx knihovnu pomoci TOleContainer.
Vse vypada OK ovsem na prvku je ovladaci tlacitko, ktere nereaguje na
kliknuti.
Pri pouziti z VB to ale funguje.
Kde muze byt chyba.
Predem dik.
Ludek
Synapse - problem s pripojeni v lokalni siti
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 18.3.2005 18:53:48
> Zdravim a dekuji za pomoc, odpovedi v textu.
> Jeste predesilam, ze na SMTP server zprava pravdepodobne vubec nedoputuje
> - zkousel jsem i zachycovat odpovedi v metode ReadResult a zadna odpuoved
> z SMTP serveru neprisla. Na serveru v logu taky nic.
Neprisla, tedy vyprsel timeout pri cekani na odpoved? Neprisla odpoved na
jaky SMTP prikaz? Zkus se odkrokovat vnitrkem funkce sendTo a zjisti v
jake fazi nedojde k ocekavane odpovedi. Bez toho se fakt nehnem dal.
Kazdopadne, pokud tomu dobre rozumim... z pocitacu na nekterem subnetu to
ze vsecho funguje, a na jinem subnetu to jen ze Synapse nefunguje?
To velmi pravdepodobne vypada na problem konfigurace serveru, kteremu se
z nekterych IP adres neco nelibi. (treba z nekterych IP adres snese EHLO
a z jinych nikoliv...). Synapse je v obou pripadech stejna a neni v ni
nic co by zaviselo na konkretni podobe lokalni IP adresy. To vypada na
vrtoch serveru.
Nejlepsi ze vseho by bylo, kdyby sis nainstaloval treba Ethereal (je to
free!) a zachytil tim vsechnu sitovou komunikaci pri nepovedenem pokusu.
Pokud bys z toho nebyl moudry, staci vysledek ulozit do souboru a on tomu
uz nekdo bude rozumnet. (Treba ja, kdyz mi to posles na soukromy mail...)
;-)
Pokud podobnym zpusobem dokazes zachytit i fungujici komunikaci outlooku,
je mnohem snazsi odhalit co se tomu serveru zrovna nelibi!
Obecne plati, ze packetovy sniffer je zakladni nastroj debugovani
veskerych problemu se sitovou komunikaci. Nedovedu si predstavit
profesionala tvorici sitove aplikace bez tohoto nastroje. Jen tak totiz
muzes videt to, co se na dratech skutecne deje! To je dobra rada pro
vsechny...
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
WEB: http://www.ararat(tec)cz/synapse - Synapse Delphi and Kylix TCP/IP
Library
Synapse - problem s pripojeni v lokalni siti
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 18.3.2005 17:53:44
On Friday, March 18, 2005 5:03 PM [GMT+1=CET],
zmo <zmo(zv)volny(tec)cz> wrote:
> Zdravim,
>
>> Je mozne, ze ten SMTP server byl psan a laden prave s OE. Synapse
>> muze posilat zpravy ponekud jinak. Muze stacit treba EHLO na
>> zacatku, ktere OE nepouziva a server, ktery jej neceka se nezachova
>> podle RFC a ukonci spojeni (misto hlaseni chyby).
>>
>
> jeste jednou upozornuji, ze SMTP server bez problemu prijme a
> zpracuje
> zpravy z adres aaa.bbb.8x.yyy - z interni site na ktere tento server
> sedi. Zpravy z adres aaa.bbb.4x.yyy k nemu vubec nedorazi (podle
> vsech rozumnych symptomu), takze bych spise hadal, ze je zachyti
> nejaky router.
jenze ten by mel zachytit i zpravy z toho OE (pokud sly ze stejneho
PC) - tedy pokud budeme predpokladat ze zdroj problemu je jeden z
tech, ktere se vyskytuji casteji nez jednou za sto let. Pokud ne pak
sazim na sveho oblibence - vadna sitova karta ci jiny aktivni prvek,
ktery propusti prakticky vsechny packety a jen ty, ktere obsahuji
nejakou konkretni sekvenci dat ne. I tohle jsem jiz nekolikrat zazil
(vadna sitovka ci driver - po vymene za jiny typ problemy zmizely). To
se pak opravdu spatne hleda a bez sniffer spatne dokazuje...
D. Toman
Synapse - problem s pripojeni v lokalni siti
[*] zmo <zmo(zv)volny(tec)cz> - 18.3.2005 17:03:40
Zdravim,
> Je mozne, ze ten SMTP server byl psan a laden prave s OE. Synapse muze
> posilat zpravy ponekud jinak. Muze stacit treba EHLO na zacatku, ktere
> OE nepouziva a server, ktery jej neceka se nezachova podle RFC a
> ukonci spojeni (misto hlaseni chyby).
>
jeste jednou upozornuji, ze SMTP server bez problemu prijme a zpracuje
zpravy z adres aaa.bbb.8x.yyy - z interni site na ktere tento server sedi.
Zpravy z adres aaa.bbb.4x.yyy k nemu vubec nedorazi (podle vsech rozumnych
symptomu), takze bych spise hadal, ze je zachyti nejaky router.
S pozdravem (Regards)
Zdenek Moravec moravec(zv)digitech(tec)cz
Synapse - problem s pripojeni v lokalni siti
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 18.3.2005 16:57:40
DD,
>
> jedna se o velmi jednoduchy SMTP server (je to jenom SMTP receiver
> pro jinou aplikaci - preposilani SMS)
>
netusim jak duveryhodny je ten server a jak podrobny je jeho log (ve
kterem spojeni nemelo byt zachyceno). Pokud nedojde ani k rozebehnuti
SMTP seance pak
- mohlo dojit k nejake sitove chybe a connect ci nasledny
read()/write() selhal. Pripadne chybove kody TCP/IP stacku by bylo
vhodne videt. Tyto chyby muze mit krome spatne nastavenych IP adres,
portu atd na svedomi nejaky firewall apod.
- mohl SMTP server nenak zazmatkovat a chovat se nestandardne.
Napriklad ukoncit spojeni bez hlaseni chyby a zapomnel o tom napsat i
do vlastniho logu. Takove stavy by bylo vhodne na strane klienta
zalogovat
kvuli resenim podobnych situaci je potreba aby programator byl ponekud
paranoidni - aplikace by mela mit nejaky vlastni log (nebo alespon
moznost prepnuti do nejakeho modu, kdy jej bude vytvaret), ktery
vsechny nestandardni stavy zapise. Pak mas vetsi sanci, ze ziskas
informace pro reseni problemu.
Je mozne, ze ten SMTP server byl psan a laden prave s OE. Synapse muze
posilat zpravy ponekud jinak. Muze stacit treba EHLO na zacatku, ktere
OE nepouziva a server, ktery jej neceka se nezachova podle RFC a
ukonci spojeni (misto hlaseni chyby).
D. Toman
Synapse - problem s pripojeni v lokalni siti
[*] zmo <zmo(zv)volny(tec)cz> - 18.3.2005 16:33:38
Zdravim a dekuji za pomoc, odpovedi v textu.
Jeste predesilam, ze na SMTP server zprava pravdepodobne vubec nedoputuje -
zkousel jsem i zachycovat odpovedi v metode ReadResult a zadna odpuoved z
SMTP serveru neprisla. Na serveru v logu taky nic.
> - Ten outlook opravdu odesila maily pres SMTO protokol? Tusim, ze v
> nekterych sitich to tak nebyva!
>
ano, je to tak nastaveno
> - Pokud pouziva SMTP, nepouziva tam nejakou autorizaci? V takovem pripade
> pouzij SendToEx a pridej autorizacni udaje.
ten SMTP server nevyzaduje autorizaci
> - SMTP servery mivaji nastaveni, ve kterem se rika ktere IP adresy jsou
> povazovany za lokalni sit. takovy server pak uplatnuje jine bezpecnostni
> politiky pro zname lokalni IP adresy a jinou politiku pro ostatni IP
> adresy. Tyto politiky se take lisi podle cilove adresy odesilaneho
> emailu! Toto muze byt na postovnim serveru nastaveno spatne!
jedna se o velmi jednoduchy SMTP server (je to jenom SMTP receiver pro jinou
aplikaci - preposilani SMS)
> - Jak vyplyva z vyse uvedeneho odstavce... kdyz jsi to zkousel z toho
> outlooku, zkousel jsi to posilat na uplne stejnou cilovou e-mail adresu
> jako ze synapse?
ty adresy byly uplne stejne
> - nektere postovni servery maji ruzne bezpecnostni vychytavky, jako ze
> treba kdyz se z nejake IP adresy pripojujes casteji nez X-krat za
> sekundu, tak te na nejakou dobu bude ignorovat. Nedoslo k nejake
> takovehle situaci?
ne, jednalo se pouze o jednu zpravu (zatim)
S pozdravem
Zdenek Moravec zmo(zv)volny(tec)cz
Synapse - problem s pripojeni v lokalni siti
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 18.3.2005 16:05:35
> bohuzel nejsem spravce dane site, ani nemam moznost provadet v ni pokusy.
> Jsem pouze dodavatelem programu a tezko se mi vysvetluje, ze problem je v
> siti, kdyz Outlook Express zpravu protlaci a muj program s pouzitim
> Synapse ne. Spise by me zajimalo, jestli nema nekdo zkusenosti s tim, jak
> komunikaci pomoci Synapse nastavit (treba i nestandardne mimo smtpsend
> unit), aby zpravu protlacila, pripadne co delam spatne - zprava je
> odeslana nejjednodussi moznou formou pomoci procedury SendTo prikazu.
V tomto pripade se zprava odesila tim nejjednodusil moznym zpusobem
pomoci zcela standardniho SMTP protokolu. Mam tyto napady:
- Ten outlook opravdu odesila maily pres SMTO protokol? Tusim, ze v
nekterych sitich to tak nebyva!
- Pokud pouziva SMTP, nepouziva tam nejakou autorizaci? V takovem pripade
pouzij SendToEx a pridej autorizacni udaje.
- SMTP servery mivaji nastaveni, ve kterem se rika ktere IP adresy jsou
povazovany za lokalni sit. takovy server pak uplatnuje jine bezpecnostni
politiky pro zname lokalni IP adresy a jinou politiku pro ostatni IP
adresy. Tyto politiky se take lisi podle cilove adresy odesilaneho
emailu! Toto muze byt na postovnim serveru nastaveno spatne!
- Jak vyplyva z vyse uvedeneho odstavce... kdyz jsi to zkousel z toho
outlooku, zkousel jsi to posilat na uplne stejnou cilovou e-mail adresu
jako ze synapse?
- nektere postovni servery maji ruzne bezpecnostni vychytavky, jako ze
treba kdyz se z nejake IP adresy pripojujes casteji nez X-krat za
sekundu, tak te na nejakou dobu bude ignorovat. Nedoslo k nejake
takovehle situaci?
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
WEB: http://www.ararat(tec)cz/synapse - Synapse Delphi and Kylix TCP/IP
Library
Synapse - problem s pripojeni v lokalni siti
[*] zmo <zmo(zv)volny(tec)cz> - 18.3.2005 15:19:32
> Co udela
>
> telnet mail_server 25
>
> spusteny na problematicke stanici? Pripoji se na postovni server ?
> Zobrazi se spravne greetings (tj ne nejake 220 AVG7 SMTP proxy atd) ?
>
> Co packety ze synapse - kam dorazi ?(pustit ethereal ci jiny sniffer)
> na PC se synapsi a na routeru a na PC s postovnim serverem na
> prislusnych interfacech...
bohuzel nejsem spravce dane site, ani nemam moznost provadet v ni pokusy.
Jsem pouze dodavatelem programu a tezko se mi vysvetluje, ze problem je v
siti, kdyz Outlook Express zpravu protlaci a muj program s pouzitim Synapse
ne.
Spise by me zajimalo, jestli nema nekdo zkusenosti s tim, jak komunikaci
pomoci Synapse nastavit (treba i nestandardne mimo smtpsend unit), aby
zpravu protlacila, pripadne co delam spatne - zprava je odeslana
nejjednodussi moznou formou pomoci procedury SendTo prikazu.
SMTP Mail server bezi na portu 25.
S pozdravem
Zdenek Moravec zmo(zv)volny(tec)cz
> >
> > v siti 8 je maska 255.255.248.0
> > v siti 4 je maska 255.255.252.0
>
> To s tim fungujicim OE jsem prehledl, sorry. Ale je to podivne
> Synapse by se mela pripojovat tam kam ji reknes - pokud je adresa (IP)
> serveru stejna jako v pripade OE pak by to melo fungovat (pokud neni
> jeste chyba napriklad v nastaveni ciloveho portu - nebezi SMTP server
> na nejakem nestandardnim portu = jinem nez 25?). Problemy muze jeste
> zpusobovat napriklad nejaky antivir - posledni dobou se cim dal tim
> agresivneji zapojuji do skryte kontroly posty (at zmenou nastaveni
> postovniho klienta ci instalaci skryteho 'presmerovavace' postovnich
> spojeni ).
>
OT: Koupe delphi
[*] hladik jirka <hlji(zv)atlas(tec)cz> - 18.3.2005 13:43:25
Zdravim,
nema nahodou nekdo prebytecna licence na Delphi Professional 4 nebo 6 ?
Pripadne nabidky prosim na muj soukromy email - hlji(zv)atlas(tec)cz
Dekuji
Hladik Jiri
Systemove barvy
[*] Martin Burle <mburle2(zv)volny(tec)cz> - 18.3.2005 13:41:25
> potrebuji u nasich aplikaci upravit barevne schema, ale nechci to delat
udelal bych to asi jinak:
a)pokud pouzivas vlastni komponenty, tak nacti schema pri jejich vytvoreni
b) pri vytvoreni formulare zavolej nejakou metodu, ktera projde komponenty,
vyhodnoti co jsou zac a nastavi jim barvy podle schematu. To ma vyhodu, ze
se da menit i za behu.
MB
Jak zapsat XML? SOS
[*] Petr Vones <konference(zv)petrvones(tec)net> - 18.3.2005 13:13:23
From: "Karel Kral" <kralkonf(zv)purusmeda(tec)cz>
> I kdyz je XML "obycejny textak" a jako takovy bych ho taky byl schopny
> vyrobit pomoci WriteLn atd., udelal bych to radeji trochu slusne pomoci
No to bych rozhodne nedoporucoval, od toho je XML parser.
> nejake komponenty.
>
> Muzete mi prosim poradit nejake odkazy a komponenty:
> 1. Kde se dozvetet alespon zaklady XML (z globalniho pohledu)
http://www.kosek(tec)cz/clanky/swn-xml/index.html
> 2. Co pouzit na zapis do XML? eForm neni jednoduchy dataset, obsahuje
> vsechny udaje o fakture.
V Delphi 6 a vyssim je pomerne slusna abstrakce XML parseru, viz interface
IXMLDocument (ono je to zaroven jako komponenta TXMLDocument ale tak to
nepouzivej).
Pokud jde o konverzi DataSetu do XML, tak v pripade ze mas Delphi Enterprise
muzes pouzit XML transformace (viz komponenta TXMLTransform). V opacnem
pripade to musis napsat rucne coz ale take neni az takova prace.
Petr Vones
Synapse - problem s pripojeni v lokalni siti
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 18.3.2005 13:05:21
On Friday, March 18, 2005 11:07 AM [GMT+1=CET],
zmo <zmo(zv)volny(tec)cz> wrote:
>> nejdriv si zsjitti jestli funguje ta sit jak ma. To znamena ping z
>> jedne vetve do druhe. Pokud nechodi ani ping tak jsou zrejme ty
>> vetve
>> mezi sebou neroutovane a bude treba nejaky ten routing zprovoznit.
>> Zrejme maji pocitace v kazde vetvi jinou subnetu (nenapsal jsi jake
>> tam jsou masky)
>
> ping funguje a jak jsem psal funguje take odeslani mailu pomoci
> Outlook Expressu nebo jineho mail klienta
>
> v siti 8 je maska 255.255.248.0
> v siti 4 je maska 255.255.252.0
To s tim fungujicim OE jsem prehledl, sorry. Ale je to podivne
Synapse by se mela pripojovat tam kam ji reknes - pokud je adresa (IP)
serveru stejna jako v pripade OE pak by to melo fungovat (pokud neni
jeste chyba napriklad v nastaveni ciloveho portu - nebezi SMTP server
na nejakem nestandardnim portu = jinem nez 25?). Problemy muze jeste
zpusobovat napriklad nejaky antivir - posledni dobou se cim dal tim
agresivneji zapojuji do skryte kontroly posty (at zmenou nastaveni
postovniho klienta ci instalaci skryteho 'presmerovavace' postovnich
spojeni ).
Co udela
telnet mail_server 25
spusteny na problematicke stanici? Pripoji se na postovni server ?
Zobrazi se spravne greetings (tj ne nejake 220 AVG7 SMTP proxy atd) ?
Co packety ze synapse - kam dorazi ?(pustit ethereal ci jiny sniffer)
na PC se synapsi a na routeru a na PC s postovnim serverem na
prislusnych interfacech...
Zdravi
Dalibor Toman
Fortech s.r.o.
Jak zapsat XML? SOS
[*] Karel Kral <kralkonf(zv)purusmeda(tec)cz> - 18.3.2005 12:55:20
Ahoj, nevim o XML vubec nic a ted musim do 14 dnu vyrobit (=zapsat, ne
cist) XML dokument pro export z naseho systemu do ucetnictvi
(http://www.stormware(tec)cz/eform/xml.asp).
I kdyz je XML "obycejny textak" a jako takovy bych ho taky byl schopny
vyrobit pomoci WriteLn atd., udelal bych to radeji trochu slusne pomoci
nejake komponenty.
Muzete mi prosim poradit nejake odkazy a komponenty:
1. Kde se dozvetet alespon zaklady XML (z globalniho pohledu)
2. Co pouzit na zapis do XML? eForm neni jednoduchy dataset, obsahuje
vsechny udaje o fakture.
--
______________________________________________________
Karel Kral, reditel IT / IT manager
PURUS-MEDA, s.r.o., Palackeho 174, 621 00 Brno, CZ
E-Mail: kral(zv)purusmeda(tec)cz
______________________________________________________
Synapse - problem s pripojeni v lokalni siti
[*] zmo <zmo(zv)volny(tec)cz> - 18.3.2005 11:07:12
> nejdriv si zsjitti jestli funguje ta sit jak ma. To znamena ping z
> jedne vetve do druhe. Pokud nechodi ani ping tak jsou zrejme ty vetve
> mezi sebou neroutovane a bude treba nejaky ten routing zprovoznit.
> Zrejme maji pocitace v kazde vetvi jinou subnetu (nenapsal jsi jake
> tam jsou masky)
ping funguje a jak jsem psal funguje take odeslani mailu pomoci Outlook
Expressu nebo jineho mail klienta
v siti 8 je maska 255.255.248.0
v siti 4 je maska 255.255.252.0
> > mam problem s posilanim jednoduchych mailu pomoci Synapse (smtpsend)
> > na server v ramci lokalni site.
> > Server je na ip adrese aaa.bbb.80.30 a ze vsech PC, ktere maji
> > adresu
> > aaa.bbb.8x.yyy pripojeni funguje a maily dojdou. Naproti tomu z
> > pocitacu, ktere jsou (zrejme) v jine vetvi site - adresy
> > aaa.bbb.4x.yyy se propojeni neuskutecni (nedojde ani ke connectu,
> > mail server se o zadnem pokusu o komunikaci nedozvi - log je
> > prazdny).
> > Existuje nejake nastaveni v ramci Synapse (zrejme i na jine urovni
> > nez SMTP protokol), ktere problem vyresi. Napr. z Outlook Expresu
> > nebo jineho mail klienta spojeni funguje ze vsech PC.
> > Netusi nekdo, v cem by mohl byt problem ?
>
Synapse - problem s pripojeni v lokalni siti
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 18.3.2005 10:51:11
DD,
On Friday, March 18, 2005 9:57 AM [GMT+1=CET],
zmo <zmo(zv)volny(tec)cz> wrote:
> Zdravim,
>
> mam problem s posilanim jednoduchych mailu pomoci Synapse (smtpsend)
> na server v ramci lokalni site.
> Server je na ip adrese aaa.bbb.80.30 a ze vsech PC, ktere maji
> adresu
> aaa.bbb.8x.yyy pripojeni funguje a maily dojdou. Naproti tomu z
> pocitacu, ktere jsou (zrejme) v jine vetvi site - adresy
> aaa.bbb.4x.yyy se propojeni neuskutecni (nedojde ani ke connectu,
> mail server se o zadnem pokusu o komunikaci nedozvi - log je
> prazdny).
> Existuje nejake nastaveni v ramci Synapse (zrejme i na jine urovni
> nez SMTP protokol), ktere problem vyresi. Napr. z Outlook Expresu
> nebo jineho mail klienta spojeni funguje ze vsech PC.
> Netusi nekdo, v cem by mohl byt problem ?
nejdriv si zsjitti jestli funguje ta sit jak ma. To znamena ping z
jedne vetve do druhe. Pokud nechodi ani ping tak jsou zrejme ty vetve
mezi sebou neroutovane a bude treba nejaky ten routing zprovoznit.
Zrejme maji pocitace v kazde vetvi jinou subnetu (nenapsal jsi jake
tam jsou masky)
D> Toman
EnumResourceNames - problem vyresen
[*] Krysl, Tomas <tomas.krysl(zv)cherry.de> - 18.3.2005 10:47:11
Ahoj
> > EnumResourceNames. Nekdy nejsou pristupne parametry lpType
> a lpName -
> > ukazuji na nesmyslne adresy $000000c9 apod. Asi mam blbe
> hlavicku, psal jsem
> > ji sam, nikde jsem (zatim) priklad nenasel:
>
> To jsou preddefinovane zakladni typy resource, viz konstanty
> RT_* z Win32 API.
Ano, tomu se rika dobre nakopnuti, diky Petre. Dival jsem se spise na ten
parametr lpName (ten me zajimal) a spatne jsem pochopil poznamky k te funkci
z MSDN.
lpName muze byt normalni integer (resource pojmenovany pomoci ID) nebo PChar
(resource pojmenovany stringem). Rozlisuje se pomoci horniho wordu (=0 - ID,
<>0 - PChar). V MSDN je uvedeno makro IS_INTRESOURCE, ktere Borlandi
neprepsali. To same se tyka lpType, ktery ale zrejme vzdy bude DWORD.
Cekal jsem to ID jako string uvozeny '#' (to taky muze byt).
Tk.
Synapse - problem s pripojeni v lokalni siti
[*] zmo <zmo(zv)volny(tec)cz> - 18.3.2005 09:57:07
Zdravim,
mam problem s posilanim jednoduchych mailu pomoci Synapse (smtpsend) na
server v ramci lokalni site.
Server je na ip adrese aaa.bbb.80.30 a ze vsech PC, ktere maji adresu
aaa.bbb.8x.yyy pripojeni funguje a maily dojdou. Naproti tomu z pocitacu,
ktere jsou (zrejme) v jine vetvi site - adresy aaa.bbb.4x.yyy se propojeni
neuskutecni (nedojde ani ke connectu, mail server se o zadnem pokusu o
komunikaci nedozvi - log je prazdny).
Existuje nejake nastaveni v ramci Synapse (zrejme i na jine urovni nez SMTP
protokol), ktere problem vyresi. Napr. z Outlook Expresu nebo jineho mail
klienta spojeni funguje ze vsech PC.
Netusi nekdo, v cem by mohl byt problem ?
Predem dekuji za odpoved.
S pozdravem
Zdenek Moravec zmo(zv)volny(tec)cz
Systemove barvy
[*] Milan Tomes <delphi(zv)haida(tec)cz> - 18.3.2005 09:49:06
Dobry den,
potrebuji u nasich aplikaci upravit barevne schema, ale nechci to delat
rucni upravou barev u kazde komponenty. Rad bych to udelal jakymsi overridem
pri zjistovani systemovych barev, ale nevim jak na to. Dival jsem se do
jednotky Graphics - myslel jsem si, ze jednotlive systemove barvy (clBtnFace
atd...) budou deklarovany jako promenne a jejich obsah se bude zjistovat v
initialization a nasledne se bude reagovat na zmenu (WM_SYSCOLORCHANGE), ale
je to bohuzel tak, ze se hodnota systemove barvy pokazde zjistuje pomoci
volani GetSysColor.
Neradte mi, prosim, ze definovat barevne scheme pro konkretni aplikaci je
nesmysl - s tim nic delat nemohu, anz je to prikaz shora a krom jineho se mi
to docela i libi...
S pozdravem
Milan Tomes
Synapse - odeslani zpravy s prilohou
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 18.3.2005 09:13:03
On Thursday, March 17, 2005 2:39 PM [GMT+1=CET],
Karel Kral <kralkonf(zv)purusmeda(tec)cz> wrote:
> Pouzivame ve firme KMS uz leta, odeslany tisice mailu i z knihoven
> Delphi (ale Indy) a nikdy zadny problem nebyl.
tak o tvrzenich tohoto typu vim jedine - casto kdy z jsem byl
presvedcen o tom, ze neco funguje bezchybne prave proto, ze to funguje
bez problemu jiz dlouhou dobu, zahy se ukazalo, ze to funguje jen diky
shode okolnosti :-)
Jeden takovy zazitek mam prave z vlastni implementace SMTP. Pri cteni
RFC jsem predpokladal, ze separator nazvu hlavicky a datove casti je
': ' (dvojtecka a mezera). Vse fungovalo leta bez problemu (tisice
instalaci po celem svete) az jednou nekdo hlasi, ze z tiskarny Minolta
zadny mail neprojde. Ta totiz (asi jako jedina) cetla RFC podrobne a
narozdil od vsech ostatnich implementaci SMTP, pri vytvareni hlavicek
jako oddelovac posilala jen tu dvojtecku...
D. Toman
Synapse - odeslani zpravy s prilohou
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 18.3.2005 09:03:02
On Thursday, March 17, 2005 4:25 PM [GMT+1=CET],
Bauglir <konference(zv)xhtmlweb.com> wrote:
> Lukas Gebauer wrote:
>
>> Evidentne tedy KMS nevi, ze zacatek zpravy je na zacatku a ne
>> uprostred. :-/
>>
> No, jeste pred pul rokem jsem v KMS tymu delal, takze mi ver,
> ze se davaji nazacatek (jeste jsem se tedy radsi zeptal architekta
> KMS, zda v tomto ohledu nedoslo k nejake prevratne zmene :))
> navic jsem pred rokem pouzival na nejake veci pripojeni
> pomoci Synapse k KMS a tento problem jsem neresil :)
Snad neni takovy problem pustit nejaky sniffer (napriklad ethereal) ci
socket spy (pokud bezi oba na stejnem PC) na komunikaci aplikace
smail serverem (pripadne zalogovat do filu vystupy tesne pred
odeslanim do site) aby se verohodne zjistilo jak ty hlavicky vypadaji
nez je dostane mail server?
Neni mozne, ze KMS hleda zacatek hlavicky (treba muze mit u mailu
vlastni meta informace pred hlavickou) a najde ji spatne?
Zdravi
Dalibor Toman
Podminka v COMPUTED BY
[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 18.3.2005 02:46:37
Pardon, samozrejme to musi byt trochu jinak
COMPUTE BY ( rebate * (rebate_percentage*price_total/100 +
1-rebate_percentage))
nebo pouzit CASE (viz release dokumentace), ale nevim jestli funguje v
COMPUTE BY.
Slavek
> Elementarni matematika zakladni skoly:
>
> COMPUTE BY (prize_total/(1 + 99*rebate_percentage))
>
> Slavek
>
>
>
> > CREATE TABLE orders
> > (
> > order_id ID NOT NULL,
> > .
> > .
> > .
> > rebate FLOAT,
> > rebate_percentage BOOLEAN,
> > price_total FLOAT,
> > price_rebate COMPUTE BY ( v y p o c e t ),
> >
> > PRIMARY KEY (order_id)
> > );
> >
> > A ten vypocet by mel byt:
> >
> > if rebate_percentage = 0 then
> > price_rebate := rebate
> > else
> > price_rebate := rebate * (price_total / 100);
> >
>
>
>
> Podminka v COMPUTED BY
[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 18.3.2005 02:34:36
Elementarni matematika zakladni skoly:
COMPUTE BY (prize_total/(1 + 99*rebate_percentage))
Slavek
> CREATE TABLE orders
> (
> order_id ID NOT NULL,
> .
> .
> .
> rebate FLOAT,
> rebate_percentage BOOLEAN,
> price_total FLOAT,
> price_rebate COMPUTE BY ( v y p o c e t ),
>
> PRIMARY KEY (order_id)
> );
>
> A ten vypocet by mel byt:
>
> if rebate_percentage = 0 then
> price_rebate := rebate
> else
> price_rebate := rebate * (price_total / 100);
> Prubezna aktualizace serveru i klienta
[*] little_bobes(zv)centrum(tec)cz - 17.3.2005 21:04:10
> Podobnou vec jsem resil tak, ze na zacatku spojeni si server a klient
> vymenili svoje verze a oba se zachovali podle potreby.
> Myslim, ze spravnejsi postup by byl ten, ze klient se bude upgradovat az
ve
> chvili, kdy mu k tomu da pokyn server na zaklade zjisteni verze klienta.
> Je tam smozrejme moznost spusty situaci v zavislosti na tom jake problemy
by
> prinasela spoluprace ruznych verzi mezi sebou.
> Ludek
To by bylo fajn, kdyby mi klient nebezel s pravy obycejneho uzivatele, ktery
nema pravo zapisovat, resp. prepisovat exe soubory v Program Files.
Bob
komunikace Service a Aplikace
[*] jiri.bartonek(zv)email(tec)cz - 17.3.2005 19:44:05
Zdravim,
mam napsanou sluzbu ktera zaregistruje message: Msg1 := RegisterWindowMessage('Ma_Message');
kterou nasledne posle: SendMessage(hwnd_Broadcast, Msg1, 0, 0);
aplikace zaregistruje stejnou message a pak jen ceka, v pripade ze prijde ocekavana message
provede akci.
pokud sem komunikoval timto zpusobem mezi dvema aplikacemi nebyl problem,
v pripade ze message posila service tak ji aplikace neprijme.
sluzbu sem poustel pod mistnim systemovym uctem i pod uctem administratora
a povolil i pouiti plochy - oboji neuspesne.
pro pomoc sem si pridal k odeslani message pipnuti a to je OK.
debug service taky probehl v poradku nicmene "naslouchaci" aplikace message nezpracovala.
diky za navody.
service i aplikace napsana v D6 Ent
system WinXP Prof SP2
Mnoho insertu do FB
[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 17.3.2005 17:19:55
> s cca 10 tabulkami s velkym poctem vet v kazde tabulce (pres milion
> zaznamu). Da se ocekavat, ze vicemene soubezne vkladani dat do
> teze tabulky bude v pohode a server to ustoji? Mate s tim nejake
Ano, s timto by nemel byt problem, ale zvazil bych prechod na FB1.5, je
rychlejsi.
> zkusenosti? Nejedna se o update, jen insert a delete. Bylo by hloupe
> zjistit, ze server treba umi jen jeden insert soucasne, takze by melo
Bohuzel umi jen jeden insert soucasne (bavime se o insertu,
tj. o tom co dela CPU), ne o transakcich a jak to vypada navenek.
Pokud opravdu potrebujes pararelni vkladani (cca vice jak desitky tisic
zaznamu/sec) tak pouzij Clasic, mohutny SMP stroj (cca 4CPU a vice)
a odpovidijici diskove pole.
Superserver umi zpracovavat (nikoliv zpracovat) v jeden okamzik pouze
jeden prikaz. Avsak zpracovani klientu je pararelni (pokud jeden klient
ceka na IO, tak se zpracovava jiny klient).
IO - sit, hdd, a UDF.
> dochazet k vytvareni fronty...
A cemu to vadi ?
Stejne se data serializuji pri zapisu na disk.
Slavek
Synapse - odeslani zpravy s prilohou
[*] Bauglir <konference(zv)xhtmlweb(tec)com> - 17.3.2005 16:25:51
Lukas Gebauer wrote:
> Evidentne tedy KMS nevi, ze zacatek zpravy je na zacatku a ne
> uprostred. :-/
>
No, jeste pred pul rokem jsem v KMS tymu delal, takze mi ver,
ze se davaji nazacatek (jeste jsem se tedy radsi zeptal architekta KMS, zda v tomto ohledu
nedoslo k nejake prevratne zmene :))
navic jsem pred rokem pouzival na nejake veci pripojeni
pomoci Synapse k KMS a tento problem jsem neresil :)
--
s pozdravem
Bronislav Klucka
----------=[ pro2-soft.com ]=----------
http://pro2-soft.com
Bronislav.Klucka(zv)pro2-soft.com
+420 605 58 29 22
* webove aplikace
* software na zakazku
---------------------------------------
Synapse - odeslani zpravy s prilohou
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 17.3.2005 16:03:49
> uz jsem vam psal, ze KMS dava vzdy hlavicky na zacatek :)
Evidentne tedy KMS nevi, ze zacatek zpravy je na zacatku a ne
uprostred. :-/
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.Pole typu Boolean na FB1.5
[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 17.3.2005 15:49:48
Lepsi je smallint, 0 -false, 1 - true.
Ma to vyhodu, ze tim jde nasobit, treba takto
SELECT SUM(nakalady*danove), SUM(naklady*jiny_priznak), ...
Pro defini samozrejme domenu s omezenim hodnot na 0,1, null
Slavek
>
> budto si zapnout SQL 3 a nebo si nadefinovat svuj typ
>
> CREATE DOMAIN BOOLEAN AS
> CHAR(1)
> NOT NULL
> CHECK (VALUE IN ("T","F"))
>
>
> Jirka Virt
>
>
> Synapse - odeslani zpravy s prilohou
[*] Bauglir <konference(zv)xhtmlweb(tec)com> - 17.3.2005 15:37:47
Lukas Gebauer wrote:
>
>
> Pak je mi zahada, proc ji KMS rozdeli a vecpe tam ty hlavicky. :-O
>
> Rekl bych, ze kdyby se takto standardne KMS chovalo, tak by to vubec
> nefungovalo! Hledal bych chybu v nejakych nestandardnich modulech pro
> KMS, nebo pripadne v necem co je jeste po ceste mezi Synapsi a KMS.
>
>
>
uz jsem vam psal, ze KMS dava vzdy hlavicky na zacatek :)
--
s pozdravem
Bronislav Klucka
----------=[ pro2-soft.com ]=----------
http://pro2-soft.com
Bronislav.Klucka(zv)pro2-soft.com
+420 605 58 29 22
* webove aplikace
* software na zakazku
---------------------------------------
Synapse - odeslani zpravy s prilohou
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 17.3.2005 14:57:44
> > Ja se totiz koukam do kodu, a vubec nenachazim duvod k tomu, aby ta
> > content-type hlavicka byla vybec rozdelena na vice radku! At delam co
> > delam, vzdy je jen a jen na jednom.
> >
> ona totiz rozdelena neni - to patrne provede ten mail server
Pak je mi zahada, proc ji KMS rozdeli a vecpe tam ty hlavicky. :-O
Rekl bych, ze kdyby se takto standardne KMS chovalo, tak by to vubec
nefungovalo! Hledal bych chybu v nejakych nestandardnich modulech pro
KMS, nebo pripadne v necem co je jeste po ceste mezi Synapsi a KMS.
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.Synapse - odeslani zpravy s prilohou
[*] Karel Kral <kralkonf(zv)purusmeda(tec)cz> - 17.3.2005 14:39:42
Pouzivame ve firme KMS uz leta, odeslany tisice mailu i z knihoven
Delphi (ale Indy) a nikdy zadny problem nebyl.
>>
>
> ona totiz rozdelena neni - to patrne provede ten mail server
>
> S pozdravem
> Zdenek Moravec zmo(zv)volny(tec)cz
>
> -
______________________________________________________
Karel Kral, reditel IT / IT manager
PURUS-MEDA, s.r.o., Palackeho 174, 621 00 Brno, CZ
E-Mail: kral(zv)purusmeda(tec)cz
______________________________________________________
EnumResourceNames - problem
[*] Petr Vones <konference(zv)petrvones(tec)net> - 17.3.2005 14:27:41
From: "Krysl, Tomas" <tomas.krysl(zv)cherry.de>
> EnumResourceNames. Nekdy nejsou pristupne parametry lpType a lpName -
> ukazuji na nesmyslne adresy $000000c9 apod. Asi mam blbe hlavicku, psal jsem
> ji sam, nikde jsem (zatim) priklad nenasel:
To jsou preddefinovane zakladni typy resource, viz konstanty RT_* z Win32 API.
Petr Vones
komponenta pro TAPI
[*] Petr Vones <konference(zv)petrvones(tec)net> - 17.3.2005 14:21:40
From: "Liska David" <david.liska(zv)aac-czech(tec)cz>
> potreboval bych spolehlivou komponentu, ktera by umela tyto dve veci:
> 1. vytocit cislo
> 2. reagovat na prichozi volani
http://sourceforge.net/projects/tpapro/
Petr Vones
Synapse - odeslani zpravy s prilohou
[*] zmo <zmo(zv)volny(tec)cz> - 17.3.2005 13:59:32
> > Taky jsem zkousel, vysledek porad stejny.
> > Zjistil jsem, ze mail server (Kerio) vlozi do zpravy radky oznacene na
> > zacatku <<<< a tim odtrhne popis boundary, coz zrejme zpusobi, ze
zprava
> > neni spravne rozdelovana - v tele zpravy se objevuji radky s boundary.
>
> No tak to reknu rovnou, ze se koukas na zmrsene MIME. ;-)
Musel jsem se do toho ponorit vice, nez jsem si puvodne predstavoval. :-(
> Pouzivas opravdu posledni Synapsi?
mam release 35 - specialne jsem si ji jeste jednou stahl
>
> Ja se totiz koukam do kodu, a vubec nenachazim duvod k tomu, aby ta
> content-type hlavicka byla vybec rozdelena na vice radku! At delam co
> delam, vzdy je jen a jen na jednom.
>
ona totiz rozdelena neni - to patrne provede ten mail server
S pozdravem
Zdenek Moravec zmo(zv)volny(tec)cz
Podminka v COMPUTED BY
[*] Kalhous <kalhous(zv)eu(tec)cz> - 17.3.2005 14:15:34
Na to nemam odpoved ale spis dotaz. Jaky smysl ma davat do tabulky takto
dopocitavane sloupce?
Co normalizace dat? Compute si dejte az do selectu.
> CREATE TABLE orders
> price_rebate COMPUTE BY ( v y p o c e t ),
> To vse na FB1.5
Podminka v COMPUTED BY
[*] Petr Fiser <petr.fiser(zv)3jservis(tec)cz> - 17.3.2005 13:39:30
Jak mam udelat podminku v COMPUTED BY? Je to proveditelne?
CREATE DOMAIN ID AS INTEGER;
CREATE DOMAIN BOOLEAN AS SMALLINT DEFAULT 0 NOT NULL CHECK (VALUE IN 0, 1));
CREATE TABLE orders
(
order_id ID NOT NULL,
.
.
.
rebate FLOAT,
rebate_percentage BOOLEAN,
price_total FLOAT,
price_rebate COMPUTE BY ( v y p o c e t ),
PRIMARY KEY (order_id)
);
A ten vypocet by mel byt:
if rebate_percentage = 0 then
price_rebate := rebate
else
price_rebate := rebate * (price_total / 100);
To vse na FB1.5
Petr Fiser
Synapse - odeslani zpravy s prilohou
[*] Bauglir <konference(zv)xhtmlweb(tec)com> - 17.3.2005 13:17:28
KMS pridava nove hlavicky zasadne na zacatek zpravy.
Brona
zmo wrote:
>
> Taky jsem zkousel, vysledek porad stejny.
> Zjistil jsem, ze mail server (Kerio) vlozi do zpravy radky oznacene na
> zacatku <<<< a tim odtrhne popis boundary, coz zrejme zpusobi, ze zprava
> neni spravne rozdelovana - v tele zpravy se objevuji radky s boundary.
>
> Subject: test message
> Date: Thu, 17 Mar 2005 09:40:12 +0100
> MIME-Version: 1.0 (produced by Synapse)
> X-mailer: Synapse - Pascal TCP/IP library by Lukas Gebauer
> Content-type: Multipart/mixed;
>
>
>>>>>Message-Id: <20050317084135.ZQKM2354.mail(zv)xxx>
>>>>>X-Received-Date: Thu, 17 Mar 2005 09:43:12 +0100
>>>>>Status: U
>>>>>X-UIDL: 1111048993.P99278I6930717_15.m1,S=44808
>
>
> boundary="2773B78E_658CA80C_Synapse_boundary"
> Content-Description: Multipart message
>
> --2773B78E_658CA80C_Synapse_boundary
> Content-type: message/rfc822
> Content-Description: E-mail Message
>
--
s pozdravem
Bronislav Klucka
----------=[ pro2-soft.com ]=----------
http://pro2-soft.com
Bronislav.Klucka(zv)pro2-soft.com
+420 605 58 29 22
* webove aplikace
* software na zakazku
---------------------------------------
Pole typu Boolean na FB1.5
[*] Pavel Malinsky <malinsky(zv)pmcom(tec)cz> - 17.3.2005 12:39:25
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
>
> FB datovy typ boolean nema a nezna, takze je nutne ho vytvorit prave
> domenou...
Tak, tak. Osobne pouzivam domenu typu Smallint je False = 0, True = -1. S pozdravem a dikem
=====================================
> Pavel Malinsky; malinsky(zv)pmcom(tec)cz <
=====================================
> GSM: 602 652 203 | ICQ: 322015967 <
=====================================
JclCompression
[*] Kratochvil Milan <mkratochvil(zv)farmtec(tec)cz> - 17.3.2005 12:21:24
Doposud jsem pouzival ZipMastera ale ten je jen pro Win.(budu potrebovat i Linux) Prave jsem vyzkousel komponentu TJvZlibMultiple a program JvZLibMultipleDemo v jvcl komponentach a rekl bych ze to funguje pekne.
Milan
> umite nekdo prosim pakovat pomoci JclCompression?
> Nedokazu pochopit jak se to dela a na webu jsem nenasel vubec nic.
> Event. muzete doporucit nejakou komponentu pro vytvareni a
> rozbaleni ZIP? Dekuji moc.
Pole typu Boolean na FB1.5
[*] Milan Tomes <delphi(zv)haida(tec)cz> - 17.3.2005 12:17:23
FB datovy typ boolean nema a nezna, takze je nutne ho vytvorit prave
domenou...
S pozdravem
Milan Tomes
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Petr Fiser
> Sent: Thursday, March 17, 2005 11:31 AM
>
> Tim CREATE DOMAIN to zatim prave resim, ale chtel jsem pouzit
> nativni format. U databaze mam nastaveno "SQL dialect 3" ale
> jest-li se to musi aktivovat jeste nekde jinde?
>
> > CREATE DOMAIN BOOLEAN AS
> > CHAR(1)
> > NOT NULL
> > CHECK (VALUE IN ("T","F"))
> >
> > Jirka Virt
Pole typu Boolean na FB1.5
[*] Petr Fiser <petr.fiser(zv)3jservis(tec)cz> - 17.3.2005 11:31:18
Tim CREATE DOMAIN to zatim prave resim, ale chtel jsem pouzit nativni
format. U databaze mam nastaveno "SQL dialect 3" ale jest-li se to musi
aktivovat jeste nekde jinde?
Petr Fiser
> budto si zapnout SQL 3 a nebo si nadefinovat svuj typ
>
> CREATE DOMAIN BOOLEAN AS
> CHAR(1)
> NOT NULL
> CHECK (VALUE IN ("T","F"))
>
> Jirka Virt
>
>
> Pole typu Boolean na FB1.5
[*] Jiri Virt <virt(zv)volny(tec)cz> - 17.3.2005 11:21:16
budto si zapnout SQL 3 a nebo si nadefinovat svuj typ
CREATE DOMAIN BOOLEAN AS
CHAR(1)
NOT NULL
CHECK (VALUE IN ("T","F"))
Jirka Virt
Pole typu Boolean na FB1.5
[*] Petr Fiser <petr.fiser(zv)3jservis(tec)cz> - 17.3.2005 11:17:16
Dobry den.
Predem se omlouvam za zacatecnicke otazky, ale s databazi FB1.5 si hraju poprve a potrebuji ziskat zakladni informace.
Koukam se samozrejmne na domovskou stranku i na ibphoenix ale informace jsou rozhazene po spouste dokumentu a hledani je zrout casu.
Taky bych prohledal konferenci ale nevim jak se dostat do archivu. Odkazy jsem nejak nenasel. Vim ze tady ta adresa pred casem probehla ale po padu OS jsem prisel o veskerou postu :(
Po delsi omluve konecne k dotazu:
Jak vytvorit pole typu BOOLEAN?
PS: Pokud jeste prilozite odkaz na archiv konference budu otravovat mene.
Dekuji. Petr Fiser
JclCompression
[*] Jan Rizek <jan_rizek(zv)centrum(tec)cz> - 17.3.2005 11:11:15
ZipMaster
Jan Harman wrote:
> Zdravim,
> umite nekdo prosim pakovat pomoci JclCompression?
> Nedokazu pochopit jak se to dela a na webu jsem nenasel vubec nic.
> Event. muzete doporucit nejakou komponentu pro vytvareni a
> rozbaleni ZIP? Dekuji moc.
> Honza
Synapse - HTTP upload progress
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 17.3.2005 10:27:15
> Provadi se to same i pri pouziti SSL ???
> V tomto pripade se mi totiz tento event zavola na zacatku - nejdrive pro
> samostatnou hlavicku, pote pred odeslanim dat a pak az po uplnem odeslani...
> :(((
Jo, to je mozne. veskery SSL kod je v soucasne dobe podroben hodne
velke rekonstrukci, takze ted z hlavy uz fakt nevim, jak to v tom
starem kodu presne vypadalo.
Kazdopadne novy SSL kod to jiz zcela urcite dela, takze od pristi
verze budes mit po problemu.
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.Synapse - odeslani zpravy s prilohou
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 17.3.2005 10:39:16
> Taky jsem zkousel, vysledek porad stejny.
> Zjistil jsem, ze mail server (Kerio) vlozi do zpravy radky oznacene na
> zacatku <<<< a tim odtrhne popis boundary, coz zrejme zpusobi, ze zprava
> neni spravne rozdelovana - v tele zpravy se objevuji radky s boundary.
No tak to reknu rovnou, ze se koukas na zmrsene MIME. ;-)
> Content-type: Multipart/mixed;
>
> >>>> Message-Id: <20050317084135.ZQKM2354.mail(zv)xxx>
> >>>> X-Received-Date: Thu, 17 Mar 2005 09:43:12 +0100
> >>>> Status: U
> >>>> X-UIDL: 1111048993.P99278I6930717_15.m1,S=44808
>
> boundary="2773B78E_658CA80C_Synapse_boundary"
tady kerio evidentne cpe hlavicky doprostred Conent-type hlavicky, a
to ve vysledku opravdu rozdejchat nejde. ;-(
Pouzivas opravdu posledni Synapsi?
Ja se totiz koukam do kodu, a vubec nenachazim duvod k tomu, aby ta
content-type hlavicka byla vybec rozdelena na vice radku! At delam co
delam, vzdy je jen a jen na jednom.
Ale i kdyz jsem zkusil umele tu hlavicky prodlouzit, tak ji Synapse
zcela korektne rozdelila na vice radku.
Takze nejak nevidim duvod pro to, aby Kerio z toho bylo zblble... At
se snazim jak se snazim, vyleze mi z toho vzdycky koretkni MIME.
Pochopitelne nemohu vyloucit to, ze je neco spatne u tebe na serveru.
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.Required package 'djcl70.bpl'
[*] horky(zv)cominn(tec)cz - 17.3.2005 10:27:14
> From: Krakora Martin [mailto:krakoram(zv)seznam(tec)cz]
> pokud vytvarim dll knihovnu s COM komponent., tak mi nekdy pri
> kompilaci zahlasi chybu viz subj..
> Prohledl jsem cely projekt te dll knihovny, ale
> nikde neni pouzito nic z JCL nebo JVCL.
Najit vsechny DCP od tvych balicku a DCU od tvych unit pouzitych v projektu a vsechny smazat. Potom pouzit Build, aby se VSE prekompilovalo. Pripadne prenest
ciste zdrojove texty do jineho adresare a zacit znovu v novem adresari.
Podivat se do prohledavanych cest, kam se to vsude diva. Nekde bude neco zapomenute. Ale hleda se to spatne.
--
S pozdravem Karel Horky, D7, FB 1.0.3, IBX 7.08, WXP SP1
[mailto:horky(zv)cominn(tec)cz]
komponenta pro TAPI
[*] Liska David <david.liska(zv)aac-czech(tec)cz> - 17.3.2005 10:15:33
Zdravim,
potreboval bych spolehlivou komponentu, ktera by umela tyto dve veci:
1. vytocit cislo
2. reagovat na prichozi volani
Mate nekdo neco vyzkouseneho?
Diky, David
Mnoho insertu do FB
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 17.3.2005 09:57:27
Ahoj,
mame FB 1.0 a spoustu uzivatelu (cca 5.000), kteri se pres internet
pripojuji k teto databazi (CGI, pozdeji prevedene na DLL). Jde o cca 5
pripojeni za sekundu. Uzivatele dosud pri pripojeni pouze provadeli
pomerne jednoduchy select z jedne tabulky. Nyni zvazujeme, ze by pri
pripojeni do databaze data i vkladali. Jedna se o jednoduchou databazi
s cca 10 tabulkami s velkym poctem vet v kazde tabulce (pres milion
zaznamu). Da se ocekavat, ze vicemene soubezne vkladani dat do
teze tabulky bude v pohode a server to ustoji? Mate s tim nejake
zkusenosti? Nejedna se o update, jen insert a delete. Bylo by hloupe
zjistit, ze server treba umi jen jeden insert soucasne, takze by melo
dochazet k vytvareni fronty...
Diky
David Lebeda
Synapse - odeslani zpravy s prilohou
[*] zmo <zmo(zv)volny(tec)cz> - 17.3.2005 09:51:26
> Podivej se, jak jsou jednotlive metody AddPart* napsany, a podle toho
> snadno obslehnes kod, ve kterem si nastavis co chces a jak chces. V tvem
> pripade si udelej kod stejny kod jako je v metode AddPartText, akorat do
> property Disposition dej 'Attachment' a ne 'inline'.
Taky jsem zkousel, vysledek porad stejny.
Zjistil jsem, ze mail server (Kerio) vlozi do zpravy radky oznacene na
zacatku <<<< a tim odtrhne popis boundary, coz zrejme zpusobi, ze zprava
neni spravne rozdelovana - v tele zpravy se objevuji radky s boundary.
Subject: test message
Date: Thu, 17 Mar 2005 09:40:12 +0100
MIME-Version: 1.0 (produced by Synapse)
X-mailer: Synapse - Pascal TCP/IP library by Lukas Gebauer
Content-type: Multipart/mixed;
>>>> Message-Id: <20050317084135.ZQKM2354.mail(zv)xxx>
>>>> X-Received-Date: Thu, 17 Mar 2005 09:43:12 +0100
>>>> Status: U
>>>> X-UIDL: 1111048993.P99278I6930717_15.m1,S=44808
boundary="2773B78E_658CA80C_Synapse_boundary"
Content-Description: Multipart message
--2773B78E_658CA80C_Synapse_boundary
Content-type: message/rfc822
Content-Description: E-mail Message
S pozdravem
Zdenek Moravec zmo(zv)volny(tec)cz
----- Original Message -----
From: "Lukas Gebauer" <gebylist(zv)mlp(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, March 16, 2005 9:30 PM
Subject: Re: Synapse - odeslani zpravy s prilohou
> > Otocil jsem a bohuzel nepomohlo, v hlavnim tele zpravy se zobrazuji jako
> > predtim obe zpravy jen v opacnem poradi.
>
> Tak tu druhou cast priloz jako attachment. ;-)
>
Paradox s pocitaci W98 a WXP a Cannot access direc
[*] Petr Hlozek <petr_h(zv)mrp(tec)cz> - 17.3.2005 09:45:23
Milan Bartonek napsal(a):
> v BDE administratoru NET DIR ukazuje taky na jiny spolecny adresar, ale ten
> nepouzije
>
> V jine firma mi ta sama aplikace taky funguje s konbinacemi W98 a WXP.
> Rozdil je akorat ve velikosti site. Tam kde to funguje je na cele siti 10
> PC (s aplikaci pracuje jen 5) a nejsou v domene.
>
> Tam kde to nefunguje se pocitace (asi 30 s aplikaci pracuje jen 9) hlasi do
> domeny, ale data jsou ulozena na klasickem PC s W98.
Dobry den,
BDE je strasne naladove. Je nutne mit spravne nastaveny net dir a pokud
ani to nepomaha tak cesta k datum musi byt kratka tzn. adresare bez
cestiny, mezer a maximalne 8 znaku v nazvu. Pak to chodi i v XP. Ale jak
rikam, je to strasne naladove. U nas takto chodi 10PC v pohode, je jedno
do jake cesty se pristupuje. U zakazniku se mi obcas stava ze pokud neni
program nebo data ulozen v adresarich s kratkym nazvem tak to zlobi.
Snad to pomuze.
Petr
Paradox s pocitaci W98 a WXP a Cannot access direc
[*] Jiri Virt <virt(zv)volny(tec)cz> - 17.3.2005 09:13:21
mame site s Win2003 a Novell 5.1.
adresare jsou primo na techto serverech a pristupuje k nim 60 useru ..
stabice Win9x - WinXP
takle uz mne nic nenapada, co by mohlo byt pricinou ... v ramci BDE
Jirka Virt
Paradox s pocitaci W98 a WXP a Cannot access direc
[*] Milan Bartonek <mbartonek(zv)synthesia(tec)cz> - 17.3.2005 09:07:20
Ahoj,
v BDE administratoru NET DIR ukazuje taky na jiny spolecny adresar, ale ten
nepouzije
V jine firma mi ta sama aplikace taky funguje s konbinacemi W98 a WXP.
Rozdil je akorat ve velikosti site. Tam kde to funguje je na cele siti 10
PC (s aplikaci pracuje jen 5) a nejsou v domene.
Tam kde to nefunguje se pocitace (asi 30 s aplikaci pracuje jen 9) hlasi do
domeny, ale data jsou ulozena na klasickem PC s W98.
>jeste me napadlo ...
>mrkni do BDE administatora
>Config> drivers>native>paradox> NET DIR
Bartonek Milan
TVideoCapture + WDM + ATI
[*] Josef Zvonicek <prosoft(zv)prosoft(tec)cz> - 17.3.2005 08:53:19
Predpokladam ze ATI ma v sobe crossbar a implementace alespon ve verzi
TVideoCapture, kterou pouzivam neni podle mne dodelana.
Podivej se na na http://www.progdigy.com - DSpack.
Zvo.>Ahoj,
>ve sve aplikaci vyvuzivam zachytavani pres komponentu TVideoCapture,
bohuzel u graficke karty ATI pri pouziti zachvytavani, ktera pouziva ovladac
ATI Rage Theater Video Capture, mi program totalne zatuhne
>Zkousel jsem jine aplikace a u nich to bezi bez problemu.
>Nevite nekdo, kde by mohla byt chyba?
TVideoCapture + WDM + ATI
[*] Dalibor <dalibor(zv)torola(tec)cz> - 17.3.2005 08:25:17
Ahoj,
ve sve aplikaci vyvuzivam zachytavani pres komponentu TVideoCapture, bohuzel u graficke karty ATI pri pouziti zachvytavani, ktera pouziva ovladac ATI Rage Theater Video Capture, mi program totalne zatuhne
Zkousel jsem jine aplikace a u nich to bezi bez problemu.
Nevite nekdo, kde by mohla byt chyba?
D:
Paradox s pocitaci W98 a WXP a Cannot access direc
[*] Jiri Virt <virt(zv)volny(tec)cz> - 17.3.2005 08:03:15
mame taky paradox Win9x - WinXP ..
netdir pouzivame ve stylu = Drive:\Dir\
stejne tak privat
jeste me napadlo ...
mrkni do BDE administatora
Config> drivers>native>paradox> NET DIR
Jirka Virt
>Ahoj,
>NET DIR i PRIVATE DIR nastavuji v Session pri spusteni aplikace
>pPrg = jmeno aplikace
>pNetDir = z registru ulozena cesta k datum = \\jmenoPC\adresar
>Session1.NetFileDir := pNetDir;
>Session1.PrivateDir := tempdir+pPrg;
Required package 'djcl70.bpl'
[*] Krakora Martin <krakoram(zv)seznam(tec)cz> - 17.3.2005 07:57:14
Zdravim vsechny,
naistaloval jsem si nove JCL 1.94 a JVCL 3.0. Vse probehlo v proadku a
pokud vytvarim normalni aplikaci, tak se zatim nic nestalo. Jenze pokud
vytvarim dll knihovnu s COM komponent., tak mi nekdy pri kompilaci zahlasi
chybu viz subj.. Uz jsem preinstaloval Delphi i zminene JCL a JVCL, vse bez
uspechu. Prohledl jsem cely projekt te dll knihovny, ale nikde neni pouzito
nic z JCL nebo JVCL. Nakonec jsem zkusil JCL i JVCL odinstalovat a smazat
vsechny jejich balicky na disku, ale chyba se vyskytuje stale. Zajimave je,
ze jen pri jedne kompilaci z nekolika. Dvakrat se mi to treba povede a
potreti zahlasi chybu. Pokud ale buildnu jiny projekt (napr. klientskou
aplikaci pro muj COM server), ktery je soucasti bpg, tak mi potom jde zase
kompilovat i tu dll.
Nemate nahodou nekdo zkusenosti s odtranenim takovehoto problemu, dohani
mne k silenstvi. Mozna jsem udelal nekde chybu ja, tak predem diky za
nakopnuti.
D7 Ent + Upd1 , WinXP SP1, P4
S pozdravem Krakora M.Paradox s pocitaci W98 a WXP a Cannot access direc
[*] Milan Bartonek <mbartonek(zv)synthesia(tec)cz> - 17.3.2005 07:49:14
Ahoj,
NET DIR i PRIVATE DIR nastavuji v Session pri spusteni aplikace
pPrg = jmeno aplikace
pNetDir = z registru ulozena cesta k datum = \\jmenoPC\adresar
Session1.NetFileDir := pNetDir;
Session1.PrivateDir := tempdir+pPrg;
Bartonek Milan
Paradox s pocitaci W98 a WXP a Cannot access direc
[*] Jiri Virt <virt(zv)volny(tec)cz> - 17.3.2005 07:39:13
kam smeruji PRIVATE dir ? neni do C:\ ..
Jirka Virt
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz] On
Behalf Of Milan Bartonek
Sent: Thursday, March 17, 2005 7:33 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Paradox s pocitaci W98 a WXP a Cannot access directory
Local Share = True nastavene je, jinak by to nefungovalo ani na W98
Bartonek Milan
Paradox s pocitaci W98 a WXP a Cannot access direc
[*] Milan Bartonek <mbartonek(zv)synthesia(tec)cz> - 17.3.2005 07:33:12
Local Share = True nastavene je, jinak by to nefungovalo ani na W98
Bartonek Milan
Paradox s pocitaci W98 a WXP a Cannot access direc
[*] Jiri Virt <virt(zv)volny(tec)cz> - 17.3.2005 07:21:11
v bde nastavit local - SHARE !
Jirka Virt
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz] On
Behalf Of Milan Bartonek
Sent: Thursday, March 17, 2005 6:09 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: Paradox s pocitaci W98 a WXP a Cannot access directory
Ahoj,
mam starsi sitovou aplikaci psanou v D5 pouzivajici paradoxove tabulky pres
DBE Pokud byly jen pocitace s W98 tak to fungovalo dobre.
Nyni se pridaly dva PC s WXP a nastal problem - pokud pracuje jen jedeno PC
s WXP spolecne s pocitaci s W98 tak to vetsinou funguje.
Pokud se ale pusti druhy PC S WXP tak to nahlasi chybu "Cannot access
directory".
Staci, aby prvni PC S WXP ukoncil aplikaci a tomu druhemu to funguje.
DBE 5.1.1.1 a NET DIR jsou na vsech PC stejne nastaveny.
Kde by se dala hledat chyba ?
Dekuji
Bartonek Milan
Synapse - HTTP upload progress
[*] Milan Tomes <delphi(zv)haida(tec)cz> - 17.3.2005 07:07:10
Provadi se to same i pri pouziti SSL ???
V tomto pripade se mi totiz tento event zavola na zacatku - nejdrive pro
samostatnou hlavicku, pote pred odeslanim dat a pak az po uplnem odeslani...
:(((
S pozdravem
Milan Tomes
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Lukas Gebauer
> Sent: Wednesday, March 16, 2005 4:00 PM
>
> > vi nekdo jak donutit synapsi k tomu, aby behem odesilani dat na
> > HTTP(S) vyvolavala udalost OnStatus ??? U downloadu to
> problem neni,
> > ale u uploadu docela ano... Nejak se mi nechce upravovat metodu
> > HTTPMethod aby to posilalo po nejakych blocich definovane
> velikosti...
>
> Proc to chces upravovat? Ona to Synapse takto davno sama dela! ;-)
Paradox s pocitaci W98 a WXP a Cannot access direc
[*] Milan Bartonek <mbartonek(zv)synthesia(tec)cz> - 17.3.2005 06:09:06
Ahoj,
mam starsi sitovou aplikaci psanou v D5 pouzivajici paradoxove tabulky pres
DBE
Pokud byly jen pocitace s W98 tak to fungovalo dobre.
Nyni se pridaly dva PC s WXP a nastal problem - pokud pracuje jen jedeno PC
s WXP spolecne s pocitaci s W98 tak to vetsinou funguje.
Pokud se ale pusti druhy PC S WXP tak to nahlasi chybu "Cannot access
directory".
Staci, aby prvni PC S WXP ukoncil aplikaci a tomu druhemu to funguje.
DBE 5.1.1.1 a NET DIR jsou na vsech PC stejne nastaveny.
Kde by se dala hledat chyba ?
Dekuji
Bartonek Milan
Synapse - odeslani zpravy s prilohou
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 16.3.2005 21:30:31
> Otocil jsem a bohuzel nepomohlo, v hlavnim tele zpravy se zobrazuji jako
> predtim obe zpravy jen v opacnem poradi.
Tak tu druhou cast priloz jako attachment. ;-)
Podivej se, jak jsou jednotlive metody AddPart* napsany, a podle toho
snadno obslehnes kod, ve kterem si nastavis co chces a jak chces. V tvem
pripade si udelej kod stejny kod jako je v metode AddPartText, akorat do
property Disposition dej 'Attachment' a ne 'inline'.
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
WEB: http://www.ararat(tec)cz/synapse - Synapse Delphi and Kylix TCP/IP
Library
Vytvareni TFrame za chodu
[*] Josef Zvonicek <prosoft(zv)prosoft(tec)cz> - 16.3.2005 21:10:29
>Ahoj, moje aktualni zkusenosti rikaji "No Frames" a "Kdyz uz, tak nikdy
with packages" !
>Kolega stravil skoro rok budovanim rozsahle frame-based struktury, aby se
nakonec ukazalo, ze
>-moc framu na formulari = problem s resources na Win 98 -jakekoli framy +
balicky = caste padani IDE Delphi (D6)
>Takze jakkoli jsou framy lakave, snazim se obejit bez nich. Pokud
nevyzadujes viditelnost framu v design-time, pak se da vcelku s uspechem
pouzit technika, kdy vytvoris jiny formular a "zaparentujes" si jej >na jiny
formular.
Souhlasim. Mam ty same zkusenosti.
Zvo.JclCompression
[*] Pavel Malinsky <malinsky(zv)pmcom(tec)cz> - 16.3.2005 19:46:23
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Jan Harman
> Sent: Wednesday, March 16, 2005 7:06 PM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: JclCompression
>
Ahoj,
> umite nekdo prosim pakovat pomoci JclCompression?
Nevim, nepouzivam, ale
> Nedokazu pochopit jak se to dela a na webu jsem nenasel vubec nic.
> Event. muzete doporucit nejakou komponentu pro vytvareni a
> rozbaleni ZIP? Dekuji moc.
pouzivam http://sourceforge.net/projects/tpabbrevia/ .
S pozdravem a dikem
=====================================
> Pavel Malinsky; malinsky(zv)pmcom(tec)cz <
=====================================
> GSM: 602 652 203 | ICQ: 322015967 <
=====================================
JclCompression
[*] Jan Harman <jharman(zv)volny(tec)cz> - 16.3.2005 19:06:20
Zdravim,
umite nekdo prosim pakovat pomoci JclCompression?
Nedokazu pochopit jak se to dela a na webu jsem nenasel vubec nic.
Event. muzete doporucit nejakou komponentu pro vytvareni a
rozbaleni ZIP? Dekuji moc.
Honza
--
! NOVINKA ! -- SURVIVAL L-Carnitin+Chrom -- Zbav se kil a dej se do
formy! http://www.sportwave(tec)cz
Synapse - odeslani zpravy s prilohou
[*] zmo <zmo(zv)volny(tec)cz> - 16.3.2005 18:32:17
Otocil jsem a bohuzel nepomohlo, v hlavnim tele zpravy se zobrazuji jako
predtim obe zpravy jen v opacnem poradi.
S pozdravem
Zdenek Moravec zmo(zv)volny(tec)cz
> > pokousim se pomoci Synapse odeslat zpravu s prilohou nize popsanym
zpusobem,
> > zprava se sice odesle, ale cely text je v hlavnim tele zpravy
(prohlizemo
> > Outlook expressem), coz me zklamalo.
>
> Protoze nedelas prilohu, ale dopis s dvemi rovnocenymi textovymi
> castmi.. a tak Outlook ukaze tu prvni, na kterou prijde.
>
> A ty nejdriv pridavas 'prilohu' a az pak text zpravy. Zkus to otocit!
> ;-)
EnumResourceNames - problem
[*] Krysl, Tomas <tomas.krysl(zv)cherry.de> - 16.3.2005 17:56:13
Ahoj,
mam problem s callback funkci EnumResNameProc, ktera se predava do
EnumResourceNames. Nekdy nejsou pristupne parametry lpType a lpName -
ukazuji na nesmyslne adresy $000000c9 apod. Asi mam blbe hlavicku, psal jsem
ji sam, nikde jsem (zatim) priklad nenasel:
function EnumResNameProc(hModule: HINST; const lpType: PChar; lpName: PChar;
dwParam: DWORD): Boolean; stdcall;
GetLastError vraci nulu, FindResource na tentyz modul funguje OK, potrebuju
nacitat pres index.
Diky za pomoc
Tk.
Synapse - autorizace k proxy v protokolu HTTPS
[*] Stanislav Jurny <jurny(zv)mrp(tec)cz> - 16.3.2005 16:52:07
> > pouzivam knihovnu Synapse pro komunikaci protokolem HTTPS pres proxy
server.
> > Pritom jsem narazil na problem jak zjistit, ze proxy pozaduje
autorizaci.
> > Pokud komunikace probiha v HTTP pak synapse spravne vrati chybu 407
"Proxy
> > Authentication Required". Pokud ovsem pouziju HTTPS synapse vrati chybu
500
> > (a chybu socketu 10091) - pritom kdyz se podivam do logu komunikace tak
> > proxy server spravne vratil chybu 407 - lze nejak synapsi nastavit, aby
> > vracela spravne kod chyby ?
>
> Ono je to dano architekturou synapse i zpusobem pruchodu HTTPS
> protokolu skrze proxy.
>
> HTTPS protokol je totiz krytpovane HTTP pomoci SSL/TLS protokol, tedy
> pro proxy je to jen a jen binarni proud dat. Aby to slo vubec
> pouzivat pres proxy, vyuziva se technologie HTTP tunelingu (HTTP
> metoda CONNECT).
>
> To se nejdriv te HTTP proxy rekne, ze chces pouzit tunel na tu a tu
> adresu a port, a on jej vytvori. Ve vysledku vznikne TCP kanal,
> skrzeva ktery si muzes posilat co chces. (Aby to lide nezneuzivali,
> tak v konfiguraci proxy byva nastaveno, ze je toto mozne udelat jen
> pro vybrane cilove porty!)
>
> Protoze HTTP tuneling je technologie, kterou lze v principu pouzit
> pro tunelovani jakehokoliv TCP protokolu (ne jen HTTPS!), je toto v
> Synapsi reseno jiz na urovni samotne TCP implementace.
>
> A v TCP implementaci nejak neni misto pro HTTP chybovy kod, proto je
> chyba signalizovana chybovym kodem na urovni TCP protokolu, tedy
> chybou, ze se nepodarilo navazat spojeni.
>
> Reseni je toto cele obejit... tedy nejakjinak zjistit ze proxy
> potrebuje autorizaci, a kdyz ji potrebuje, predem vypnit autorizaci
> pro HTTPS protokol.
>
> Uznavam, ze toto je opruz a slibuji, ze s tim v pristi verzi neco
> udelam. ;-)
>
>
Nakonec jsem to udelal tak, ze jsem trochu (prasacky) upravil metodu
TTCPBlockSocket.HTTPTunnelDoConnect. V pripade ze server vrati jakoukoli
HTTP chybu nastavi prom FLastError := 70000 + HttpError. V metode
THTTPSend.HTTPMethod pak otestuji zda je FLastError > 70000 pokud ano, pak
nastavim FResultCode := FLastError - 70000 a ukoncim metodu. V podstate je
to rozsireni puvodniho zpusobu kdy HTTPTunnelDoConnect v pripade chyby
nastavila vzdy FLastError := WSASYSNOTREADY. Chci se zeptat, zda zaklad
70000, ktery pouzivam na rozliseni HTTP chyby nekoliduje s nejakymi jinymi
chybovymi kody ?
-STj-
Synapse - odeslani zpravy s prilohou
[*] zmo <zmo(zv)volny(tec)cz> - 16.3.2005 16:58:08
Zdravim,
pokousim se pomoci Synapse odeslat zpravu s prilohou nize popsanym zpusobem,
zprava se sice odesle, ale cely text je v hlavnim tele zpravy (prohlizemo
Outlook expressem), coz me zklamalo.
Muze mi prosim nekdo poradit, co delam spatne ?
m:=TMimemess.create;
l:=tstringlist.create;
try
p := m.AddPartMultipart('mixed', nil);
l.loadfromfile('c:soubor.ini');
m.AddPartText(l,p); // to bych chtel jako prilohu
m.AddPartText(BodyMemo.Lines,p); // vlastni text zpravy
m.header.from:='aaa(zv)aaatech(tec)cz';
m.header.tolist.add (ToEdit.Text);
m.header.subject:='test message';
m.EncodeMessage;
bResult:=SendToRaw ('bbb(zv)bbb(tec)cz', // from
ToEdit.Text, // to
SmtpEdit.Text, // smtp host
m.Lines,
'', ''
);
if bResult then
ResultLabel.Caption := 'Send OK'
else
ResultLabel.Caption := 'Send invalid';
finally
m.free;
l.free;
end;
S pozdravem
Zdenek Moravec zmo(zv)volny(tec)cz
Synapse - odeslani zpravy s prilohou
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 16.3.2005 17:14:09
> pokousim se pomoci Synapse odeslat zpravu s prilohou nize popsanym zpusobem,
> zprava se sice odesle, ale cely text je v hlavnim tele zpravy (prohlizemo
> Outlook expressem), coz me zklamalo.
Protoze nedelas prilohu, ale dopis s dvemi rovnocenymi textovymi
castmi.. a tak Outlook ukaze tu prvni, na kterou prijde.
A ty nejdriv pridavas 'prilohu' a az pak text zpravy. Zkus to otocit!
;-)
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.Synapse - HTTP upload progress
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 16.3.2005 16:00:03
> vi nekdo jak donutit synapsi k tomu, aby behem odesilani dat na HTTP(S)
> vyvolavala udalost OnStatus ??? U downloadu to problem neni, ale u uploadu
> docela ano... Nejak se mi nechce upravovat metodu HTTPMethod aby to posilalo
> po nejakych blocich definovane velikosti...
Proc to chces upravovat? Ona to Synapse takto davno sama dela! ;-)
Musis si ale uvedomit, ze HTTPsend posila data po 32k blocich, a ten
event je volan jen pro kazdy blok dat. Blok datmuzes zmensit pomoci
property sock.SendMaxChunk. Cim mensi hodnota tobude, tim casteji se
ti bude ten event volat, ale take tim pomalejsi to odesilni bude.
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.Synapse - autorizace k proxy v protokolu HTTPS
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 16.3.2005 15:54:02
> pouzivam knihovnu Synapse pro komunikaci protokolem HTTPS pres proxy server.
> Pritom jsem narazil na problem jak zjistit, ze proxy pozaduje autorizaci.
> Pokud komunikace probiha v HTTP pak synapse spravne vrati chybu 407 "Proxy
> Authentication Required". Pokud ovsem pouziju HTTPS synapse vrati chybu 500
> (a chybu socketu 10091) - pritom kdyz se podivam do logu komunikace tak
> proxy server spravne vratil chybu 407 - lze nejak synapsi nastavit, aby
> vracela spravne kod chyby ?
Ono je to dano architekturou synapse i zpusobem pruchodu HTTPS
protokolu skrze proxy.
HTTPS protokol je totiz krytpovane HTTP pomoci SSL/TLS protokol, tedy
pro proxy je to jen a jen binarni proud dat. Aby to slo vubec
pouzivat pres proxy, vyuziva se technologie HTTP tunelingu (HTTP
metoda CONNECT).
To se nejdriv te HTTP proxy rekne, ze chces pouzit tunel na tu a tu
adresu a port, a on jej vytvori. Ve vysledku vznikne TCP kanal,
skrzeva ktery si muzes posilat co chces. (Aby to lide nezneuzivali,
tak v konfiguraci proxy byva nastaveno, ze je toto mozne udelat jen
pro vybrane cilove porty!)
Protoze HTTP tuneling je technologie, kterou lze v principu pouzit
pro tunelovani jakehokoliv TCP protokolu (ne jen HTTPS!), je toto v
Synapsi reseno jiz na urovni samotne TCP implementace.
A v TCP implementaci nejak neni misto pro HTTP chybovy kod, proto je
chyba signalizovana chybovym kodem na urovni TCP protokolu, tedy
chybou, ze se nepodarilo navazat spojeni.
Reseni je toto cele obejit... tedy nejakjinak zjistit ze proxy
potrebuje autorizaci, a kdyz ji potrebuje, predem vypnit autorizaci
pro HTTPS protokol.
Uznavam, ze toto je opruz a slibuji, ze s tim v pristi verzi neco
udelam. ;-)
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.Synapse - HTTP upload progress
[*] Milan Tomes <delphi(zv)haida(tec)cz> - 16.3.2005 15:28:00
Ahoj,
vi nekdo jak donutit synapsi k tomu, aby behem odesilani dat na HTTP(S)
vyvolavala udalost OnStatus ??? U downloadu to problem neni, ale u uploadu
docela ano... Nejak se mi nechce upravovat metodu HTTPMethod aby to posilalo
po nejakych blocich definovane velikosti...
S pozdravem
Milan Tomes
Soubor napovedy *.cnt
[*] Marek Dostal <konf(zv)agnis(tec)cz> - 16.3.2005 11:35:44
Mam soubor MujHelp.hlp a MujHelp.cnt a chci z Delphi otevrit okno s obsahem helpu definovane v cnt souboru. Kdyz zavolam
Application.HelpCommand(HELP_FINDER,0);
tak to sice zafunguje, pred otevrenim okna s obsahem problikne okno s prvnim definovanym topicem v hlp souboru a to nevypada dobre. Prosim o radu, jak otevrit rovnou ten obsah.
Marek Dostal
D7Prof, WinXP, FireBird 1.0, 1.5
Kodovani DBF
[*] Robert Plzak <rpvp(zv)vagnerplast(tec)cz> - 16.3.2005 11:31:42
tak si napis svoji funkcicku
const
CSChars = 'tady mam Latin2 nebo Kameniky';
WebChars = 'tady mam znaky ve Win1250';
( Napsat je tam nemuzu. Jsou tam hacky i carky. Prisel by
na mne zahradnik :o)
function cs(S: String): String;
var
I, P: Integer;
R: String;
begin
R := S;
For I := 1 to Length(S) do
begin
P := Pos(S[I], CSChars);
If P > 0 then
R[I] := WebChars[P];
end;
Result := R;
end;
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz
[mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of David
Klodner
Sent: Wednesday, March 16, 2005 11:14 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Kodovani DBF
Ahoj vsichni,
tak zase otravuju s tim DBF, hlavne je to dotaz na Lukase
Gebauera.
Milos Veselovsky byl tak ochotny, ze mi zjistil, ze muj
soubor je v kodovani Latin2, i kdyz ve windows mam nastavene
defaultni kodovani win1250.
Problem je v tom, ze kdyz to chci pres Synapsi prekodovat
pres CharSetConversion z ISO_8859_2 do CP1250, tak ve
vysledku neni cestina spravne. Prekodovavam kazdy Field
tabulky zvlast.
David Klodner
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Robert
Plzak
> Sent: Tuesday, March 15, 2005 7:37 AM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: Re: Kodovani DBF
>
>
> Kdyz potrebuju napr. stare DBF s kodovanim DOS b.
> Kamenickych do Windows tak to vyexportuju do TXT souboru,
ten textak
> prevedu z DOS (kamenickych) na Windows a pak to nathanu
zpet do DBF.
>
> Jest-li ti to pomuze...
>
> Robert
>
>
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of David
Klodner
> Sent: Tuesday, March 15, 2005 2:59 AM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: Re: Kodovani DBF
>
> Tvuj program jsem si stahnul a zjistil, ze muj soubor je v
OEM_Charset
> a koleguv soubor je v ANSI_Charset. To same ukazoval i
Total Commander
> - muj soubor ASCII (znak. sada
> DOS) a jeho souboru ANSI (znak Windows). GetCurCP mi
hlasi, ze mam v
> systemu nastavenou znak. sadu Windows 1250.
>
> Zkousim vsemozne kombinace prekodovani meho souboru tak,
abych z nej
> vytvoril soubor citelny pro znak. sadu ANSI Windows, ale
nic nezabira.
>
> Nevite nekdo?
>
> David Klodner
>
>
> > Nazdar,
> >
> > ak chces, tak si mozes z mojej stranky stiahnut program
> DBFview. Ten
> > ma funkciu prekodovania DBF medzi strankami Kamenicky,
> Latin2,
> > Win1250, ISO 8859-2, KOI 8 CS.
> >
> > Link: http://www.fornex.sk/software/dbfview131.exe
> >
> > mildy
>
>
>
>
>
>
>
>
Kodovani DBF
[*] David Klodner <delphikonfer(zv)seznam(tec)cz> - 16.3.2005 11:25:41
Kodovani vyreseno, mimo konferenci mi poradili,
ze iso-8859-2 a pc latin2 nejsou tataz kodovani ... prvni je opravdu ISO
a druhe je cp852.
David Klodner
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Robert Plzak
> Sent: Tuesday, March 15, 2005 7:37 AM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: Re: Kodovani DBF
>
>
> Kdyz potrebuju napr. stare DBF s kodovanim DOS b.
> Kamenickych do Windows tak to vyexportuju do TXT souboru,
> ten textak prevedu z DOS (kamenickych) na Windows a pak to
> nathanu zpet do DBF.
>
> Jest-li ti to pomuze...
>
> Robert
>
>
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of David
> Klodner
> Sent: Tuesday, March 15, 2005 2:59 AM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: Re: Kodovani DBF
>
> Tvuj program jsem si stahnul a zjistil, ze muj soubor je v
> OEM_Charset a koleguv soubor je v ANSI_Charset. To same
> ukazoval i Total Commander - muj soubor ASCII (znak. sada
> DOS) a jeho souboru ANSI (znak Windows). GetCurCP mi hlasi,
> ze mam v systemu nastavenou znak. sadu Windows 1250.
>
> Zkousim vsemozne kombinace prekodovani meho souboru tak,
> abych z nej vytvoril soubor citelny pro znak. sadu ANSI
> Windows, ale nic nezabira.
>
> Nevite nekdo?
>
> David Klodner
>
>
> > Nazdar,
> >
> > ak chces, tak si mozes z mojej stranky stiahnut program
> DBFview. Ten
> > ma funkciu prekodovania DBF medzi strankami Kamenicky,
> Latin2,
> > Win1250, ISO 8859-2, KOI 8 CS.
> >
> > Link: http://www.fornex.sk/software/dbfview131.exe
> >
> > mildy
>
>
>
>
>
>
>
> Kodovani DBF
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 16.3.2005 11:21:40
> tak zase otravuju s tim DBF, hlavne je to dotaz na Lukase Gebauera.
> Milos Veselovsky byl tak ochotny, ze mi zjistil, ze muj soubor je v
> kodovani Latin2,
> i kdyz ve windows mam nastavene defaultni kodovani win1250.
>
> Problem je v tom, ze kdyz to chci pres Synapsi prekodovat pres
> CharSetConversion z ISO_8859_2 do CP1250, tak
> ve vysledku neni cestina spravne. Prekodovavam kazdy Field tabulky
> zvlast.
1. Neni tim Latin2 myslena spise CP852 (tedy PC-Latin2) nez ISO-8859-
2 (tedy ISO-Latin2)? To jsou dve ruzne kodove tabulky!
2. jakym zpusobem ziskavas ta data z toho fieldu? Bacha na to, aby se
nejaky databazovy driver nepokusil o svoje prekodovani, kterym byto
zmrsil!
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.Kodovani DBF
[*] David Klodner <delphikonfer(zv)seznam(tec)cz> - 16.3.2005 11:13:39
Ahoj vsichni,
tak zase otravuju s tim DBF, hlavne je to dotaz na Lukase Gebauera.
Milos Veselovsky byl tak ochotny, ze mi zjistil, ze muj soubor je v
kodovani Latin2,
i kdyz ve windows mam nastavene defaultni kodovani win1250.
Problem je v tom, ze kdyz to chci pres Synapsi prekodovat pres
CharSetConversion z ISO_8859_2 do CP1250, tak
ve vysledku neni cestina spravne. Prekodovavam kazdy Field tabulky
zvlast.
David Klodner
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Robert Plzak
> Sent: Tuesday, March 15, 2005 7:37 AM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: Re: Kodovani DBF
>
>
> Kdyz potrebuju napr. stare DBF s kodovanim DOS b.
> Kamenickych do Windows tak to vyexportuju do TXT souboru,
> ten textak prevedu z DOS (kamenickych) na Windows a pak to
> nathanu zpet do DBF.
>
> Jest-li ti to pomuze...
>
> Robert
>
>
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of David
> Klodner
> Sent: Tuesday, March 15, 2005 2:59 AM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: Re: Kodovani DBF
>
> Tvuj program jsem si stahnul a zjistil, ze muj soubor je v
> OEM_Charset a koleguv soubor je v ANSI_Charset. To same
> ukazoval i Total Commander - muj soubor ASCII (znak. sada
> DOS) a jeho souboru ANSI (znak Windows). GetCurCP mi hlasi,
> ze mam v systemu nastavenou znak. sadu Windows 1250.
>
> Zkousim vsemozne kombinace prekodovani meho souboru tak,
> abych z nej vytvoril soubor citelny pro znak. sadu ANSI
> Windows, ale nic nezabira.
>
> Nevite nekdo?
>
> David Klodner
>
>
> > Nazdar,
> >
> > ak chces, tak si mozes z mojej stranky stiahnut program
> DBFview. Ten
> > ma funkciu prekodovania DBF medzi strankami Kamenicky,
> Latin2,
> > Win1250, ISO 8859-2, KOI 8 CS.
> >
> > Link: http://www.fornex.sk/software/dbfview131.exe
> >
> > mildy
>
>
>
>
>
>
>
> Viditelnost private WAS: Jak vyvolavat vlastni hin
[*] Krysl, Tomas <tomas.krysl(zv)cherry.de> - 16.3.2005 09:33:30
> Tohle je klasicky priklad co se stane,
> kdyz autor deklaruje vsechny atributy private, prestoze je sam
> pouziva, coz mu bohuzel shitoidni Delphi bez varovani povoli :-((
Tim narazis jiste na viditelnost private clenu povolenou na modul scope.
To je skutecny hnus. Delphi 2005 to resi (tusim) klicovym sluvkem strict,
ale kdo to bude vsechno prepisovat, aby to bylo koser. Opravte me jestli se
pletu.
Tk.
Sluzba a net use
[*] Sula Milos <milos.sula(zv)musumperk(tec)cz> - 16.3.2005 08:51:10
No tak jsem to mapovani na lpt1 konecne vyresil, ne tedy pres sluzbu
bezici pod lokalnim administratorem ale elegantneji pod uzivatelskym
uctem.
Kdyz se totiz snazite namapovat na lpt1 sitovou tiskarnu napr jako power
users tak to chce porad nazev uctu a heslo, a at zadate co chcete tak
vam to vraci spatne heslo. Problem je v tom ze lpt1 je vetsinou na pc i
fyzicky port, ktery proste nemuzete premapovat sitovou tiskarnou (pokud
nejste administrator) a tak je potreba ho zakazat a pak uz net use na
lpt1 pod power users nechce zadne heslo a poslusne se namapuje.
Milos
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz] On
Behalf Of konference(zv)sales(tec)cz
Sent: Thursday, March 10, 2005 2:44 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Sluzba a net use
On Behalf Of Sula Milos
> Ahoj,
> mam napsanou sluzbu v niz pod systemovym uctem mapuju lpt1 na USB
> tiskarnu pomoci sdileni. Bohuzel kdyz se servisni aplikace spusti sama
> (po spusteni pc) , je mapovani neuspesne. Kdyz ji pak restartuju rucne
> vse je to ok:
>
> procedure TService1.ServiceStart(Sender: TService; var Started:
> Boolean); var a,l:integer;
> str:string;
> begin
> a:=ShellExecute(0, 'open', 'net', ' use lpt1 \\localhost\hp', nil,
> SW_HIDE);
> end;
>
Ahoj.
Mozne priciny :
1) Sluzba NESMI bezet pod uctem "LocalSystem" protoze ten nema moznost
videt
UNC cesty (\\neco\nekde), mel bys ji pustit pod nejakym jinym uctem.
2) Je nutne v dependencies nastavit startovani sluzby pozdeji nez sluzba
"Computer Browser"
Ludek
Objekt versus pointer na record
[*] Karel Kral <kralkonf(zv)purusmeda(tec)cz> - 16.3.2005 08:41:08
Objekt samozrejme systemove zdroje nezere. Ja osobne pouzivam vsude v
seznamech potomky TObject a TObjectList, protoze se nemusim starat o
uvolnovani pameti.
Objekt zabira oproti recordu o neco vice pameti (budou to desitky bajtu,
nevim presne).
Petr Balsanek napsal(a):
> napr. 10 000, mohl by mi muj program pri pouziti napr. u Win98 sebrat
> veskere systemove zdroje a shodit system. Proto jsem radeji pouzil ty
> recordy. Chtel bych se zeptat, zda je toto pravda, pripadne jaky zpusob
Zarovnani textu do prava v komponente edit
[*] Milan Tomes <delphi(zv)haida(tec)cz> - 16.3.2005 07:12:57
Standardni TEdit tuto vlastnost nema, takze si vytvor potomka:
uses
StdCtrls, Classes;
type
TAlignedEdit = class (TEdit)
private
FAlignment: TAlignment;
protected
procedure CreateParams(var Params: TCreateParams); override;
published
property Alignment: TAlignment read FAlignment write setAlignment
default taLeftJustify;
end;
implementation
uses
Windows;
procedure TAlignedEdit.CreateParams(var Params: TCreateParams);
const
Alignments: array[TAlignment] of DWORD = (ES_LEFT, ES_RIGHT, ES_CENTER);
begin
inherited CreateParams(Params);
Params.Style := Params.Style or Alignments[FAlignment] or ES_MULTILINE;
end;
procedure TAlignedEdit.setAlignment(const Value: TAlignment);
begin
if FAlignment <> Value then
begin
FAlignment := Value;
RecreateWnd;
end;
end;
HTH
S pozdravem
Milan Tomes
> MH> Potrebuji v komponente edit zarovnant text na pravou
> stranu. Porad
> MH> se mi nedari najit cim to udelat.
> MH> Da se to nekde nastavit, nebo se musi jit jinudy?
>
> MH> Dekuji
> MH> Martin Holik
Index is read only - BDE
[*] Jan Fiala <jan.fiala(zv)wo(tec)cz> - 16.3.2005 06:28:54
15.3.2005 Slavek Hemala:
> Zdravim vsechny programatory,
> mam problem s indexem.
> Pouzivam BDE v D5. Vytvoril jsem si tabulku, kde mam mimo jine pole 'IC' a
> 'NazevFirmy1'. IC jsem nastavil jako primarni klic. A v database destop jsem
> vytvoril nad NazevFirmy1 secondary index se jmenem NazevFirmy. Ve svem
> programku jsem pripojil k TTable svoji tabulku a nastavil index NazevFirmy.
> Polozky se mi zobrazili serazene podle NazevFirmy1, ale kamen urazu nastal,
> kdyz jsem se pokusil udelat nejakou zmenu a volal Post. To nahlasilo 'Index
> is read-only'.
> Nevite prosim, proc je index read-only? Nemam zkusenosti s indexy a
> pristupem pres BDE.
Protoze jsi index v database desktop nenastavil jako "maintained"
(udrzovany). Tzn. ze se neaktualizuje automaticky s tabulkou a musel
bys jej aktuaslizovat rucne.
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
DAO problem po instalaci nejakeho servis packu
[*] Fait <develop(zv)lmss(tec)cz> - 16.3.2005 00:02:24
> Stary (Access 97) a novy (Access 2000) format MDB ?
Novy DAO 3.6
Index is read only - BDE
[*] Slavek Hemala <vlkb(zv)atlas(tec)cz> - 15.3.2005 23:18:19
Zdravim vsechny programatory,
mam problem s indexem.
Pouzivam BDE v D5. Vytvoril jsem si tabulku, kde mam mimo jine pole 'IC' a
'NazevFirmy1'. IC jsem nastavil jako primarni klic. A v database destop jsem
vytvoril nad NazevFirmy1 secondary index se jmenem NazevFirmy. Ve svem
programku jsem pripojil k TTable svoji tabulku a nastavil index NazevFirmy.
Polozky se mi zobrazili serazene podle NazevFirmy1, ale kamen urazu nastal,
kdyz jsem se pokusil udelat nejakou zmenu a volal Post. To nahlasilo 'Index
is read-only'.
Nevite prosim, proc je index read-only? Nemam zkusenosti s indexy a
pristupem pres BDE.
Diky za kazde pozduchnuti.
Slavek Hemala
--
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.7.2 - Release Date: 11.3.2005
Jak vyvolavat vlastni hint window z Lischkeho Virt
[*] Petr Fejfar <development(zv)callnet(tec)cz> - 15.3.2005 22:46:16
Petr Fejfar wrote:
> To zhruba pracuje, jak bych ocekaval, az na to,
> ze se hint zobrazuje jen na kazde druhe kliknuti
> na uzel ve stromu.
Uz jsem na to prisel, tak kdyby to nekoho zajimalo:
Aby to fungovalo, tak musi TVirtualHintWindow pri skryti okna
resetovat atribut TBaseVirtualTree.FLastHintRect na Rect(0,0,0,0)
V externi tride hint okna se to neda implementovat, protoze
FLastHintRect je prozirave deklarovan jako private atribut
- ostatne jako vzdy, kdyz clovek potrebuje reusabilitu.
BTW, nedavno se tady nekdo ptal na strategii deklarovani
private vs. protected. Tohle je klasicky priklad co se stane,
kdyz autor deklaruje vsechny atributy private, prestoze je sam
pouziva, coz mu bohuzel shitoidni Delphi bez varovani povoli :-((
HTH, pf
DAO problem po instalaci nejakeho servis packu
[*] Jan Fiala <jan.fiala(zv)wo(tec)cz> - 15.3.2005 20:12:05
15.3.2005 Fait:
> Se zdesenim jsem zjistil, ze po instalaci nejakeho servis packu W2K mi
> najednou prestalo v aplikacich fungovat vytvoreni MDB databaze.
> Pri pokusu o vytvoreni databaze se fyzicky vytvori mdb soubor na disku, ale
> konci to chybou ve smyslu Vyhradniho otevreni....atd.
> Soubor ale nema format MDB.....v Acccessu otevrit nejde...
Stary (Access 97) a novy (Access 2000) format MDB ?
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
DAO problem po instalaci nejakeho servis packu
[*] Fait <develop(zv)lmss(tec)cz> - 15.3.2005 18:31:57
Se zdesenim jsem zjistil, ze po instalaci nejakeho servis packu W2K mi
najednou prestalo v aplikacich fungovat vytvoreni MDB databaze.
Pri pokusu o vytvoreni databaze se fyzicky vytvori mdb soubor na disku, ale
konci to chybou ve smyslu Vyhradniho otevreni....atd.
Soubor ale nema format MDB.....v Acccessu otevrit nejde...
Nesetkal jste se s tim nekdo?
Dik Jirka
Vytvareni TFrame za chodu
[*] Martin Burle <mburle2(zv)volny(tec)cz> - 15.3.2005 18:31:55
> a)
> Hlasky z teto konference rikaji, ze TFrame se nekdy nechova tak, jak by
mel.
> b)
> Asi "build with runtime packages", jinak se dostanes do problemu (globalni
promenne, operatory "is" a "as").
Ahoj, moje aktualni zkusenosti rikaji "No Frames" a "Kdyz uz, tak nikdy with
packages" !
Kolega stravil skoro rok budovanim rozsahle frame-based struktury, aby se
nakonec ukazalo, ze
-moc framu na formulari = problem s resources na Win 98
-jakekoli framy + balicky = caste padani IDE Delphi (D6)
Takze jakkoli jsou framy lakave, snazim se obejit bez nich. Pokud
nevyzadujes viditelnost framu v design-time, pak se da vcelku s uspechem
pouzit technika, kdy vytvoris jiny formular a "zaparentujes" si jej na jiny
formular.
MB
Zarovnani textu do prava v komponente edit
[*] Ales Orsag <cherokeex(zv)seznam(tec)cz> - 15.3.2005 18:15:54
Dobry den,
14. brezna 2005, 12:57:14, napsal jste:
MH> Potrebuji v komponente edit zarovnant text na pravou stranu. Porad se mi
MH> nedari najit cim to udelat.
MH> Da se to nekde nastavit, nebo se musi jit jinudy?
MH> Dekuji
MH> Martin Holik
osobne si myslim, ze edit tuto vlastnost nema. Aspon tedy v D3
ne. Doporucuji se podivat po jinych komponentach treba na
www.torry.net. Vlastnost zarovnani maji uvedenu u treba u TImgMEdit.
Vlastni zkusenost ale nemam.
--
S pozdravem,
Ales Orsag
mailto:cherokeeX(zv)seznam(tec)cz
DBEdit like IE
[*] MAd <mad(zv)worldmail(tec)cz> - 15.3.2005 17:23:50
Zdravim,
jiz nejaky cas hledam komponentu Edit (jeste lepe DBEdit), ktera umi
"nabizet" polozky, ktere vyhovuji zadavanemu retezci podobne, jako to dela
IE ci Outlook. Combobox s autocomplete neni pro mou potrebu vhodny.
Muzete mi neco doporucit ?
Dekuji, S pozdravem Michal A. Vytvareni TFrame za chodu
[*] Jan Sebelik <honza(zv)haes(tec)cz> - 15.3.2005 15:59:44
> Potreboval bych za chodu vytvorit a zobrazit pripraveny TFrame.
> Ale dopredu nevim kolik a jake budou.
> Cili do nainstalovane aplikace bych je potreboval pridavat asi
> jako soubor a mit moznost vytvorit v aplikaci jejich seznam a z
> neho si vybrat.
Napr.
a)
pro kazdy frame DLL
function GetFrame: TMyFrame
(nadrazena trida vsem v uvahu prichazejicim Frame)
procedure GetCaption(ACaption: PChar; MaxSize: Integer);
Vsechny Frame (dll) umistim do nejakeho adresare
Z aplikace
b)
zjistim pritomne dll (FindFirst, FindNext, FindClose)
u kazde z nich zavolam GetCaption - mam jmenny seznam Frame (treba do menu)
je treba LoadLibrary, GetProcAddress('GetCaption')
c)
Pri volbe nejakeho Frame prilinkuju prislusnou dll a zavolam GetFrame.
je treba LoadLibrary, GetProcAddress('GetFrame')
Pozor:
a)
Hlasky z teto konference rikaji, ze TFrame se nekdy nechova tak, jak by mel.
b)
Asi "build with runtime packages", jinak se dostanes do problemu (globalni promenne, operatory "is" a "as").
viz kurz "Delphi: pokrocile techniky"
Honza
====================================
= RNDr. Jan Sebelik - HAES
= Skolici a konzultacni stredisko pro vyvoj SW
= www.haes(tec)cz
= Vojtiskova 321
= 507 81 Lazne Belohrad
= tel. 493 792 931 (mobil 776 347 735)
====================================
Design Time - Kopirovani komponent na formu
[*] Jan Sebelik <honza(zv)haes(tec)cz> - 15.3.2005 15:41:42
> mam nainstalovane nove D2005. A uz delsi dobu se trapim tim, ze mi
> nefunguje kopirovani komponent na formu v dobe navrhu. Jako obvykle
> udelam CTRL+C a potom CTRL+V a NIC.
Ja myslim, ze to bude nejaka chybka:
viz Seminar "Belohrad 2005",
prezentace Petra Vonese - "Delphi 2005",
ke stazeni:
http://www.haes(tec)cz/ws_pozv.asp?r=x
Honza
====================================
= RNDr. Jan Sebelik - HAES
= Skolici a konzultacni stredisko pro vyvoj SW
= www.haes(tec)cz
= Vojtiskova 321
= 507 81 Lazne Belohrad
= tel. 493 792 931 (mobil 776 347 735)
====================================Design Time - Kopirovani komponent na formu
[*] Jan Harman <jharman(zv)volny(tec)cz> - 15.3.2005 15:33:41
Zdravim vsechny,
mam nainstalovane nove D2005. A uz delsi dobu se trapim tim, ze mi
nefunguje kopirovani komponent na formu v dobe navrhu. Jako obvykle
udelam CTRL+C a potom CTRL+V a NIC. Hledam to v kdejakem moznem
nastaveni a zatim nic. Dost me to stve, nesetkal se nekdo s tim?
Diky moc a moc.
Honza
--
Levnejsi internet v pracovni dny jiz od 18:00 hod.
Surfujte s VOLNY!
http://mimospicku.volny(tec)cz
Vytvareni TFrame za chodu
[*] Jiri Bouchala <bouchala(zv)starmon(tec)cz> - 15.3.2005 15:23:40
Potreboval bych za chodu vytvorit a zobrazit pripraveny TFrame. Ale dopredu nevim kolik a jake budou.
Cili do nainstalovane aplikace bych je potreboval pridavat asi jako soubor a mit moznost vytvorit v aplikaci jejich seznam a z neho si vybrat. Je to mozne? Jak na to? Nemohu nic takoveho v helpu najit.
Objekt versus pointer na record
[*] Radek Cervinka <radek.cervinka(zv)technodat(tec)cz> - 15.3.2005 15:15:40
Petr Balsanek wrote:
> Dobry den,
> mam technicky dotaz. Potrebuji spravovat velky seznam dat (stylu seznam
> osob, dokladu, ...). Data ctu z databaze, ale chci je udrzovat v pameti a
> zobrazovat pomoci ListView ve virtualnim rezimu. Jde mi predevsim o rychlost
viz nize
> a pokud mozno i co nejmensi pametovou narocnost a modulovatelnost. Zatim
> jsem to resit tak, ze jsem mel objek typu TList, kde jednotlive prvky byly
...
> Nevim uz, kde presne jsem to cetl, ale nekde jsem pred casem cetl, ze
> jakykoliv Create nejakeho objektu "zere" systemove zdroje a dale uz je
to je blbost (mozna u OLE...), ale jinak ne
> nevraci. Pokud by to tak bylo, a ja takhle vytvoril nejakych svych objektu
> napr. 10 000, mohl by mi muj program pri pouziti napr. u Win98 sebrat
> Dekuji predem za nazor k teto problematice.
Pouzij Virtual Tree. Odpadne ti sposta prace a navic to budes mit
prehlednejsi (a nezbavis se tech vyhod virtualniho ListView - jen to
bude o moc efektivnejsi). Navic on uschovava data jako recordy a muzes
povolit jeho optimalizavany memory manager.
Radek
Objekt versus pointer na record
[*] Jan Sebelik <honza(zv)haes(tec)cz> - 15.3.2005 14:59:38
> Data ctu z databaze, ale chci je udrzovat v pameti a
> zobrazovat pomoci ListView ve virtualnim rezimu. Jde mi predevsim
> o rychlost
> Petr Balsanek
> A.S.E.I. spol. s r.o.
Objekt zere zdroje - to snad ne, proboha, alespon doufam....
Pokud je mi znamo, zdroje zraly nektere spatne napsane komponenty (treba TBitBtn) do verze D5, tusim.
Ja bych se s tim moc nemazlil - TClientDataSet a mohu si s daty delat co chci a je to rychly - je to v pameri.
A modularnost - jak to myslis.
TClientDataSet ma treba property XMLText (nebo tak nejak), takze by si mel predat data s cimkoli.
(samozrejme, nevim, k cemu to potrebujes, takze jenom hadam, co by bylo nejlepsi)
Honza
P.S.
Pozdravuj v A.S.E.I. - Pavla Vodicku, Vladu Broukala, Radima Buryse a dalsi.
====================================
= RNDr. Jan Sebelik - HAES
= Skolici a konzultacni stredisko pro vyvoj SW
= www.haes(tec)cz
= Vojtiskova 321
= 507 81 Lazne Belohrad
= tel. 493 792 931 (mobil 776 347 735)
====================================Objekt versus pointer na record
[*] Petr Balsanek <petr.balsanek(zv)asei(tec)cz> - 15.3.2005 14:39:37
Dobry den,
mam technicky dotaz. Potrebuji spravovat velky seznam dat (stylu seznam
osob, dokladu, ...). Data ctu z databaze, ale chci je udrzovat v pameti a
zobrazovat pomoci ListView ve virtualnim rezimu. Jde mi predevsim o rychlost
a pokud mozno i co nejmensi pametovou narocnost a modulovatelnost. Zatim
jsem to resit tak, ze jsem mel objek typu TList, kde jednotlive prvky byly
Pointry na recordy ulozene v pameti. To vsechno funguje a je to krasne
rychle a dokonce i pametove celkem nenarocne. Stale ale take uvazuji o
nahrade techto pointru objekty, a timto smerem se tahne ma otazka.
Nevim uz, kde presne jsem to cetl, ale nekde jsem pred casem cetl, ze
jakykoliv Create nejakeho objektu "zere" systemove zdroje a dale uz je
nevraci. Pokud by to tak bylo, a ja takhle vytvoril nejakych svych objektu
napr. 10 000, mohl by mi muj program pri pouziti napr. u Win98 sebrat
veskere systemove zdroje a shodit system. Proto jsem radeji pouzil ty
recordy. Chtel bych se zeptat, zda je toto pravda, pripadne jaky zpusob
byste doporucili Vy? Pokud by pouziti velkeho mnozstvi objektu nicemu
nevadilo (a take by to nebylo vyrazne pomalejsi), bylo by to vyhodne, nebot
bych mohl mit v techto objektech napr dalsi TListy, ktere by obsahovaly
konkretni data sloupcu ze selectu, kterym si ta data plnim.
Dekuji predem za nazor k teto problematice.
S pozdravem
Petr Balsanek
A.S.E.I. spol. s r.o.
U Rajske zahrady 3
130 00 Praha 3
ICO 47122722
Spolecnost je zapsana u Mestskeho soudu v Praze, oddil C - vlozka 13458.
tel.: +420 - 2 - 24 106 102
Jak vyvolavat vlastni hint window z Lischkeho Virt
[*] Petr Fejfar <development(zv)callnet(tec)cz> - 15.3.2005 14:09:34
Ahoj vespolek,
sice jsem stejny dotaz posilal do VTV konference,
ale zatim zustava bez odezvy,
tak to zkousim jeste na tomto foru.
Potrebuju zobrazovat Hint window vlastniho typu.
Abych nemusel znovu programovat logiku,
co a jak se ma vlastne jako hint zobrazit,
tak jsem odchytil message CM_SHOWHINT
a nechal probehnut inherited handler.
Ja nakonec nastavim jen HintWindowClass na moji tridu.
To zhruba pracuje, jak bych ocekaval, az na to,
ze se hint zobrazuje jen na kazde druhe kliknuti
na uzel ve stromu.
A nepomohlo obsluhovat treba globalni
priznak HintWindowDestroyed z moji tridy
a podobne cunarnicky, kterymi implementace
TVirtualHintWindow nesetri.
Kdyz ani Lischke neodpovida, tak mi ani tak nejde
o to najit symbiozu s jeho mechanismem,
ale spis cestu, jak co nejjednoduseji prekryt
to jeho hint okno, aniz bych musel psat znovu
logiku nad stromem, ktera saha i na private
zalezitosti.
Dik, pf
Pristup do adresare
[*] Jiri Virt <virt(zv)volny(tec)cz> - 15.3.2005 13:55:33
asi by bylo resenim pres CreateFile a vyplnit security.
mrkni sem ...
http://www.experts-exchange.com/Programming/Programming_Platforms/Win_Prog/Q
_10250329.html
Jirka Virt
Synapse - autorizace k proxy v protokolu HTTPS
[*] Stanislav Jurny <jurny(zv)mrp(tec)cz> - 15.3.2005 13:49:32
Zdravim,
pouzivam knihovnu Synapse pro komunikaci protokolem HTTPS pres proxy server.
Pritom jsem narazil na problem jak zjistit, ze proxy pozaduje autorizaci.
Pokud komunikace probiha v HTTP pak synapse spravne vrati chybu 407 "Proxy
Authentication Required". Pokud ovsem pouziju HTTPS synapse vrati chybu 500
(a chybu socketu 10091) - pritom kdyz se podivam do logu komunikace tak
proxy server spravne vratil chybu 407 - lze nejak synapsi nastavit, aby
vracela spravne kod chyby ?
diky za odpovedi
--
Stanislav Jurny
dbGrid a export dat do Excelu
[*] Lada <lada.xt(zv)volny(tec)cz> - 15.3.2005 13:29:30
Petr Cafourek napsal(a):
>ja jsem MAX komponenty zkousel, ale pak mi tu nekdo poradil toto....
>
>
Ahoj,
nekolik variant znam, cas od casu se v konferenci objevuji a zkousel
jsem nekolik popsanych zpusobu. Presto bych rad pouzil tu MAX komponentu..
Libi se mne moznost exportu ve vice formatech, coz sam jako zacatecnik
dohromady jen tak nedam... Bohuzel, je tam pouze nejake demo k
TStringgridu.. Ja potrebuju pouzit MxdbgridExport. Ani v diskuzi na
strankach MAX se zacatecnik nic nedozvi.. i kdyz se tam presne o tuto
komponentu zajimaji..
Tak jsem zkratka myslel, jestli by mne sem nekdo nemohl zkopirovat kus
kodu, pokud tu komponentu pouziva..
Kazdopadne moc dekuju,
Lada
Pristup do adresare
[*] Martin Bursa <martin.bursa(zv)ikos(tec)cz> - 15.3.2005 13:21:29
Ahoj,
nevite nekdo jak ulozit soubor do zaheslovaneho aresare na siti, kdyz znam
jmeno i heslo uzivatele s povolenym pristupem ?
Nasel jsem reseni pomoci namapovani tohoto adresare jako sitovy disk, to mi
vsak nevyhovuje - potrebuji pouzit UNC cestu.
Diky, Maca
Zmena velikosti paketu v IdIcmpClient
[*] Roman Polansky <rpoli(zv)email(tec)cz> - 15.3.2005 13:17:29
Zdravim,
pouzivam komponentu IdIcmpClient z knihovny Indy pro PING a potreboval bych menit velikost paketu. Nevite nekdo jak na to?
komponenta s definovanym casem pro akci.
[*] Jan Fiala <jan.fiala(zv)wo(tec)cz> - 15.3.2005 12:47:26
15.3.2005 MUDr. Patrik Valenta:
> nema prosim nekdo hotovou komponentu ktera umi na definovany cas udelat akci
> ?
> priklad:
> potrubuji dat povel ON na dobu 2 vterin, pote se samo vrati zpet na OFF.
> Tech komponent bude vicero a resit to pomoci haldy Timeru mi pripada
> nesikovne.
Podivej se na SimpleTimer. Je to trosku jina implementace timeru,
ktera zvlada i seznam timeru apod.
http://www.koders.com/delphi/fidF8B8ED502893ECD13725DD501FFFEA8BC9892660.aspx
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
ODBCe - pripojeni s username a password
[*] Martin Cajbik <cajbik(zv)sct.sk> - 15.3.2005 11:59:23
Zdravim,
nechapem, naco je tam to Name - to je nazov komponenty, nazov databazy
by uz mal byt uvedeny priamo v DSN, alebo ho potom treba zadat cez
property Database. Skus napisat s cim presne je problem.
Inak ten postup vyzera ok, este sa skus pohrat s property
DriverCompletion, ak nastavis DriverComplete alebo
DriverCompleteRequired aspon uvidis co na pripojenie chyba.
--
Martin Cajbik
SCT s.r.o. Kosice
zmo wrote:
> Zdravim,
>
> zatim jsem se vzdy pripojoval pomoci ODBCe na MSSQL databazi bez username a
> hesla (Windows authentication) takto:
> db := TODBCDatabase.Create (..);
> with db do
> begin
> dsn := ...
> name := 'Test';
> end;
>
> a dale napr.
> pomQuery.Database := db;
> pomQuery.SQL.Text := ...
> pomQuery.Open;
>
>
> Ted potrebuji ovsem tomuto pripojeni zadat username a heslo. Zkousel jsem
> takto
> db := TODBCDatabase.Create (..);
> with db do
> begin
> dsn := ...
> user := ..
> password := ...
> name := 'Test';
> end;
>
> ale bohuzel nefunguje. Ma nekdo nejaky napad ?
>
>
> Predem dekuji.
> S pozdravem (Regards)
> Zdenek Moravec moravec(zv)digitech(tec)cz
komponenta s definovanym casem pro akci.
[*] Krysl, Tomas <tomas.krysl(zv)cherry.de> - 15.3.2005 11:37:21
Ahoj,
> potrubuji dat povel ON na dobu 2 vterin, pote se samo vrati
> zpet na OFF.
> Tech komponent bude vicero a resit to pomoci haldy Timeru mi pripada
> nesikovne.
A coz takhle pouzit jeden Timer a pole casovych zaznamu a pri OnTimer
vsechny nenulove dekrementovat v cyklu?
Tk.
Vytvareni panelu v runtime
[*] Kalhous <kalhous(zv)eu(tec)cz> - 15.3.2005 11:25:20
Nevim jestli jsem postupoval v tomto pripade zcela spravne a delphi-ciste,
ale funguje to kdyz se ty panely a splittery vytvareji v tom poradi v jakem
tam maji byt naskladany. Takze vlastne stejne jako v designu.
> potreboval bych v runtime vytvorit promenny pocet panelu polozenych nad
> sebou do jineho panelu jako do kontejneru a chtel bych, aby sly
> pridavat/ubirat a vertikalne resizovat. Ulozeni e-mailovych zprav do souboru
[*] david.kopecek(zv)hacktrack(tec)com - 15.3.2005 11:21:19
Cau
AO> snazim se vitvorit jednoducheho e-mailoveho klienta pro
AO> prijem a odesilani mailu. Potreboval bych nakopnout, jak
AO> nejjednodussim zpusobem ulozit stazene zpravy do souboru a
AO> pracovat s nimi pak off-line.
AO> D3&synapse, w2k
me se nejvice osvedcilo davat soubory do binary file jako to ma
TheBat! ci OE. a nebo do jednoho velkeho jak to ma Outlook.
Vyhledavani a prace byla velmi rychla. Narozdil od ukladani na disk
kde se to hodne zpomalovalo a dost tomu daval zabrat i antivir..
UDelej to proste jak to ma the bat!
jeden soubor s kompletnimi maily v nejake strukture hlavicky souboru
atd.. A druhej index soubor do nej budes ukladat pozice vdatovem a
ruzne doplnujici info. jestli byl prectenej, smamzanej atd.. A po
urcite dobe muzes udelat funkcni na udrzbu datovych souboru tak ze
vymazes podle indexu stare a nepotrebne objekty v datovem souboru.
AO> OT: je nekde k mani archiv konference Delphi pro KonfView
AO> dekuji a preju pekny den
--
S pozdravem,
david
david.kopecek(zv)hacktrack.com
komponenta s definovanym casem pro akci.
[*] MUDr. Patrik Valenta <valentapat(zv)volny(tec)cz> - 15.3.2005 11:13:18
nema prosim nekdo hotovou komponentu ktera umi na definovany cas udelat akci
?
priklad:
potrubuji dat povel ON na dobu 2 vterin, pote se samo vrati zpet na OFF.
Tech komponent bude vicero a resit to pomoci haldy Timeru mi pripada
nesikovne.
diky za pochopeni valik
Dedicnost
[*] Krysl, Tomas <tomas.krysl(zv)cherry.de> - 15.3.2005 11:07:18
Ahoj,
> TCustomClientDataSet --> TSimpleDataSet --> TMujDataSet
> TCustomClientDataSet --> TClientDataSet --> TMujDruhyDataSet
>
> V podstate bych potreboval, aby ten muj dataset byl jednou
> potomkem TSimpleDataSetu a jindy zase TClientDatasetu. Jde to
> nejak jinak, nez mit dva ruzne potomky s duplicitnim kodem?
Opetovne 'spojeni' rozvetvenych trid lze, pokud vim, resit alespon trochu
elegantne pouze pres interface.
Ztrati se tim ovsem veskere 'virtualni' vztahy:-)
Plati obecne, pro jakekoli tridy:
type
{ ty uz jsou nadefinovane, musi implementovat 3 zakladni metody IInterface
QueryInterface, _AddRef a _Release (to by mely)}
TSimpleDataSet = class(TInterfacedObject)
procedure Neco;
end;
TClientDataSet = class(TInterfacedObject)
procedure NecoJineho;
end;
// nove veci
IMujDataSet = interface
//spolecne vyuzivane metody
procedure Neco;
end;
TInterfacedSimpleDataSet = class(TSimpleDataSet, IMujDataSet)
//spolecne vyuzivane metody, maji-li jinou hlavicku
end;
TInterfacedClientDataSet = class(TClientDataSet, IMujDataSet)
//spolecne vyuzivane metody, maji-li jinou hlavicku
procedure Neco;
end;
TMujDataSet = class(TObject)
private
I: IMujDataSet; // ten se pak vyuziva
public
constructor Create;
procedure Neco;
end;
//to uz je hotove
procedure TSimpleDataSet.Neco;
begin
end;
procedure TClientDataSet.NecoJineho;
begin
end;
//nove veci
procedure TInterfacedClientDataSet.Neco;
begin
NecoJineho;
end;
constructor TMujDataSet.Create;
begin
I := TInterfacedSimpleDataSet.Create;
// nebo
I := TInterfacedClientDataSet.Create;
end;
procedure TMujDataSet.Neco;
begin
I.Neco;
end;
Tk.
OT: Ceske razeni ve Firebirdu pri pouziti UNICODE_
[*] TomA?L? Krejzek <tomas.krejzek(zv)kpsys(tec)cz> - 15.3.2005 11:01:17
Ahoj nevite nekdo jak udelat aby firebird pri pouzite znakove sade
UNICODE_FSS radil cesky, collation UNICODE_FSS radi jen presne dle
hodnot jednotlivych znaku, tj. +AQw- je az za Z, stejne tak selecty
neobsahuji slova zacinajici ceskymi znaky. Cetl jsem ze pomoci intl2.dll
lze pridavat dalsi znakove sady a collace, nevite odkud a zda vubec by
sla stahnout tahle knihovna a jak to potom integruju na server.
diky Tom
Vytvareni panelu v runtime
[*] Jiri Foldyna <jiri.f(zv)avizo(tec)cz> - 15.3.2005 10:47:16
Ahoj,
potreboval bych v runtime vytvorit promenny pocet panelu polozenych nad
sebou do jineho panelu jako do kontejneru a chtel bych, aby sly
pridavat/ubirat a vertikalne resizovat. V designu bych to udelal pomoci
splitteru a kombinace alTop/alClient, ale jak v runtime zaridim propojeni
panelu se splittery a dodrzeni poradi panelu ? Delal nekdo neco podobneho,
abych nebyl prukopnikem slepych ulicek ?
Diky
Jiri Foldyna
Dedicnost
[*] Jan Sebelik <honza(zv)haes(tec)cz> - 15.3.2005 10:33:14
> TCustomClientDataSet --> TSimpleDataSet --> TMujDataSet
> TCustomClientDataSet --> TClientDataSet --> TMujDruhyDataSet
>
> V podstate bych potreboval, aby ten muj dataset byl jednou
> potomkem TSimpleDataSetu a jindy zase TClientDatasetu. Jde to
> nejak jinak, nez mit dva ruzne potomky s duplicitnim kodem?
Jak tak na to koukam, TSimpleDataSet (nikdy jsem ho nepouzil) v sobe uz obsahuje TSQLConnection, TSQLDataSet a TDataSetProvider. Tedy asi neco podobnyho, jako byly v D6 ty ruzny TSQLClientDataSet, TBDEClientDataSet, TIBClientDataSet (nebo jak se to jmenovalo - nikdy jsem to nepouzil, tak to z D7 vyhodili :-).
TSimpleDataSet v sobe tedy obsahuje specificke zalezitosti kolem dbExpress, a tedy ten pokus implementovat do nej urcitou funkcnost prichazi trochu "pozde". Asi by sis pral, aby ji mel uz TCustomClientDataSet a bylo by vystarano.
Ja bych to resil tak, ze bych TSimpleDataSet zahodil a misto toho bych pouzil
TClientDataSet + TDataSetProvider + TSQLDataSet.
Ma to velikou vyhodu (proto jsem ty "hybridy" z D6 nepouzil):
a)
Mam to lepe pod kontrolou
b)
TDataSetProvider zvlast - osetrim si pekne ty udalosti
TClientDataSert zvlast - napisu nad nim uzivatelsky front-end bez zavislosti na zvolene technoligii pripojeni k databazi (BDE, ADO, IBX, dbExpress a cokoli dalsiho).
TSQLDataSet zvlast - tam uz se nic neprogramuje, snadno ho vymenim za jakykoli jiny dataset (view as text + find/replace - bez problemu).
Pak bys tuto dodatecnou funkcnost implementoval jenom do TClientDataSet a mas vystarano pro vsechny typy pripojeni.
Druha moznost - to se mi ale moc nelibi
Napsat trdiu TDataSetManager
s polozkami
FDataSet:TCustomClientDataSet
property DataSet: TCustomClientDataSet;
Pak tu funkcnost, kterou implementujes, budes vztahovat k tomu FDataSet.
A pak uz jenom oddedis
TSimpleDataSet --> TMujDataSet
TClientDataSet --> TMujDruhyDataSet
kde pridas jenom
property DataSetManager: TDataSetManager
a funkcnost je diky tomuto "managerovi" zajistena v obou pripadech.
Honza
====================================
= RNDr. Jan Sebelik - HAES
= Skolici a konzultacni stredisko pro vyvoj SW
= www.haes(tec)cz
= Vojtiskova 321
= 507 81 Lazne Belohrad
= tel. 493 792 931 (mobil 776 347 735)
====================================
Ulozeni e-mailovych zprav do souboru
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 15.3.2005 10:07:12
> Asi jako bloby? :-) Problem bude mozna v tom, ze zprava muze mit prilohy a
> jako prilohu muze mit i
> email.. Aspon neco v tomto smyslu psal kdysi pan Gebauer. Presen nevim, ale
> je to nekde (tak pul rok) v konferenci - nekdo psal neco o stromove
> strukture, takoveho vysledneho emailu. Ale presne nevim.. Mozna by stacil
> jeden blob na text (html) zpravy a jedna tabulka blob-u na prilohy..
To o stromove strukture plati pro vnitrni strukturu MIME zpravy.
Kazda MIME zprava se musi tvarit v zakodovane forme jako jeden
textovy blok dat, protoze SMTP protokol(ktery se pouziva na
dorucovani mailu) neumi prenaset nic jineho nez jdnoducha textova
data! Az kdyz takovy text MIME mailu dekoduju, vypadne na mne teprve
pripadna stromova struktura priloh, vnorenych mailu, ...
Takze pokud jde o ukladani v zakodovane forme (tak se to vesinou
dela), jde ciste o ukladani a nahravani textovych dat z TstringList.
Ostane maly priklad... vezmu Pop3send, stahnu tim zpravu, a obsah
property lines pomoci SaveToFile ulozim do souboru . Tento soubor
pojmenuji jako x.eml. A tento EML soubor bez problemu otevru treba
Outlookem, ktery az teprve provede dekodovani MIME a pripadne zobrazi
onu stromovou strukturu MIME priloh, atd.
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.Dedicnost
[*] Petr Daricek <petr.daricek(zv)seznam(tec)cz> - 15.3.2005 10:05:12
A neslo by udelat tridu, ktera bude reprezentovat funkcnost, kterou mas stejnou v TMujDataSet a TMujDruhyDataSet? Objekt teto tridy pak vytvorit v konstruktoru obou techto trid.
Petr
Ulozeni e-mailovych zprav do souboru
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 15.3.2005 09:59:11
> snazim se vitvorit jednoducheho e-mailoveho klienta pro prijem a
> odesilani mailu. Potreboval bych nakopnout, jak nejjednodussim
> zpusobem ulozit stazene zpravy do souboru a pracovat s nimi pak
> off-line. D3&synapse, w2k
No, kdyz pomoci Synapse stahnes nejakou zpravu (bud pres Pop3send,
nebo pres imapsend), tak tu zpravu mas ulozenou ve TStringList. Tento
objekt ma metodu SaveToFile, pomoci ktere jednoduse tu zpravu ulozis
na disk. ;-)
Posleze muzes zase do nejakeho stringlistu tu zpravu nacist pomoci
metody LoadFromFile, a takto ziskana data muzes prehodit MIME
parseru. K tomu muzes pouzit treba TmimeMess objekt v Synapsi, ktery
ti dekoduje hlavicky, rozlizi ti tu zpravu na jednotlive soucasti a
prilohy, se kterymi pak muzes pracovat. (jako zobrazovat text,
ukladat prilohy, atd.)
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.Ulozeni e-mailovych zprav do souboru
[*] Jan Rizek <jan_rizek(zv)centrum(tec)cz> - 15.3.2005 09:37:10
Zdravim,
Ukladani prijmu muze byt problem:
--
Asi jako bloby? :-) Problem bude mozna v tom, ze zprava muze mit prilohy a
jako prilohu muze mit i
email.. Aspon neco v tomto smyslu psal kdysi pan Gebauer. Presen nevim, ale
je to nekde (tak pul rok) v konferenci - nekdo psal neco o stromove
strukture, takoveho vysledneho emailu. Ale presne nevim.. Mozna by stacil
jeden blob na text (html) zpravy a jedna tabulka blob-u na prilohy..
--
Odesilani bude podle vas.. Takze v tom problem nebude..
--
JR
Ales Orsag wrote:
> Dobry den,
> snazim se vitvorit jednoducheho e-mailoveho klienta pro prijem a
> odesilani mailu. Potreboval bych nakopnout, jak nejjednodussim
> zpusobem ulozit stazene zpravy do souboru a pracovat s nimi pak
> off-line. D3&synapse, w2k
>
> OT: je nekde k mani archiv konference Delphi pro KonfView
>
> dekuji a preju pekny den TPicture a LoadFromStream
[*] Krysl, Tomas <tomas.krysl(zv)cherry.de> - 15.3.2005 09:33:09
Ahoj,
> pouzivam v aplikaci tridu TPicture a rozsirenou knihovnu GraphicEx pro
> nacitani dalsich formatu. Vse fungovalo jak ma, ale prisel novy
> pozadavek zasifrovat obrazky. Na to potrebuju pracovat se streamy -
> jenze trida TPicture nema LoadFromStream. Nevim jak dal - potrebuju si
> nejdriv nacist obrazek do streamu, v nem ho upravit podle sveho, a pak
> pouzit Picture.LoadFromStream.
Bohuzel TPicture pouziva interni a zvenci nepristupny seznam
(TGraphics.FileFormats) pro rozliseni typu souboru, navic pouze podle
pripony toho souboru. Takze podle obsahu streamu TPicture nepozna co to je
za format. Z toho plyne, ze TPicture.LoadFromStream by nemela (v tomto
navrhu TPicture) smysl. Pro Tebe by se hodila metoda neco jako
LoadFromStreamAs(Stream: TStream; const Ext: string); -to bohuzel neni a
nelze dopsat ani v odvozene tride od TPicture. Takze Ti nezbyde nez
zasifrovany soubor rozsifrovat a ulozit na disk a pak nacist do TPicture.
Nebo si napsat vlastni "TPicture" s vlastnim seznamem podporovanych formatu.
Tk.
pocet skrytych kopii v Outlooku
[*] Jan Rizek <jan_rizek(zv)centrum(tec)cz> - 15.3.2005 09:05:04
Pokud neni nutne pouzit Outlook, tak pouzijte Synapse..
--
delphi(zv)kopr(tec)cz wrote:
> Zdravim,
> napsal jsem program, ktery hromadne odesle zpravu do Outlooku
> (Express i neExpress) a do zpravy se zapise do zkryte kopie X adres.
> Bohuzel neni nikde zapsano, kolik takovych adres do zkryte kopie mohu
> poslat. Jakmile je tam poslano asi 50 adres, tak se Outlook ani
> neotevre.
>
> Nevi nekdo, kolik a nebo jak zaslat do Outlooku moc hodne adresa
> Diky
> Pavel ZIDEK
Dedicnost
[*] Marek Dostal <konf(zv)agnis(tec)cz> - 15.3.2005 09:03:04
Mam z TSimpleDataSet vytvoreneho potomka TMujDataSet, ktery ma urcitou funkcnost. A chtel bych stejnou funkcnost mit i v potomkovi TMujDruhyDataSet, ktery bude vytvoren z TClientDataSet.
TCustomClientDataSet --> TSimpleDataSet --> TMujDataSet
TCustomClientDataSet --> TClientDataSet --> TMujDruhyDataSet
V podstate bych potreboval, aby ten muj dataset byl jednou potomkem TSimpleDataSetu a jindy zase TClientDatasetu. Jde to nejak jinak, nez mit dva ruzne potomky s duplicitnim kodem?
Marek Dostal
D7Prof, WinXP, FireBird 1.0, 1.5
komponenta DBMoney
[*] Jan Fiala <jan.fiala(zv)wo(tec)cz> - 15.3.2005 08:57:02
15.3.2005 Pavel Volak:
> Ahoj,
> udelal jsem export dat z Money. Vyber dat je ale pomaly protoze prochazim
> tabulku a zjistuju zda je dana skupina uzivatelem oznacena. Pokud jo, tak z
> podrizene tabulky prekopiruju vyfiltovane polozky dane skupiny cyklem while
> not eof do pomocneho souboru .
> Nevite o rychlejsim zpusobu?
Pokud jsem to dobre pochopil, je oznaceno x-skupin z tabulky a ty pak
pro kazdou prochazis polozky.
Nebylo by rychlejsi si v prvnim kroku udelat seznam skupin a ve druhem
vyexportovat polozky v jednom pruchodu ?
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
dbGrid a export dat do Excelu
[*] Petr Cafourek <petr.cafourek.d7(zv)seznam(tec)cz> - 15.3.2005 07:50:54
> Zdravim vsechny,
> nejak se nemuzu pohnout z mista a tak prosim nekoho, kdo ma zkusenosti s
> komponentou MxdbgridExport od MaxComponents o kousek kodu, ktery by me
> nasmeroval pri exportu dat z dbGridu do tabulky xls.
> Jsem zacatecnik a pomuze mi nejvic prakticky priklad...
> Moc dekuju,
> Lada
Ahoj,
ja jsem MAX komponenty zkousel, ale pak mi tu nekdo poradil toto:
procedure TForm2.sBitBtn14Click(Sender: TObject);
var
SouborExcel: Variant;
i, Radek, sloupec: Integer;
tmpJmeno : string;
resourcestring
sNotExcel = 'Microsoft Excel neni nainstalovan';
begin
Radek := 1;
tmpJmeno := '';
sloupec := 2;
try
SouborExcel := GetActiveOleObject('Excel.Application');
except
try
SouborExcel := CreateOleObject('Excel.Application');
except
exit;
end;
end;
SouborExcel.WorkBooks.Add;
Screen.Cursor := crHourglass;
with DBGrid4.DataSource.DataSet, DBGrid4 do
begin
DisableControls;
First;
SouborExcel.Rows[Radek].Font.Bold := True;
for i := 0 to Columns.Count - 1 do
begin
if Columns[i].Visible then begin
SouborExcel.Cells[Radek, sloupec].Value := Columns[i].Title.Caption;
inc(Sloupec);
end;
end;
Radek := 2;
while not Eof do
begin
Sloupec := 2;
for i := 0 to Columns.Count - 1 do begin
if Columns[i].Visible then begin
SouborExcel.Cells[Radek, (sloupec) ].Value := FieldByName(Columns[i].FieldName).DisplayText;
Inc(Sloupec)
end;
end;
Inc(Radek);
Next;
end;
First;
EnableControls;
end;
SouborExcel.Cells.Columns.AutoFit;
SouborExcel.Visible := True;
Screen.Cursor := crDefault ;
SouborExcel.Visible := True;
end;
A jsem s tim velice spokojen. Ma to jen tu podminku, ze na PC musi byt
nainstalovan Excel. Ale jinak to funguje skvele.
S pozdravem,
Petr mailto:petr.cafourek.d7(zv)seznam(tec)cz
Kodovani DBF
[*] Robert Plzak <rpvp(zv)vagnerplast(tec)cz> - 15.3.2005 07:36:52
Kdyz potrebuju napr. stare DBF s kodovanim DOS b.
Kamenickych do Windows tak to vyexportuju do TXT souboru,
ten textak prevedu z DOS (kamenickych) na Windows a pak to
nathanu zpet do DBF.
Jest-li ti to pomuze...
Robert
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz
[mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of David
Klodner
Sent: Tuesday, March 15, 2005 2:59 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Kodovani DBF
Tvuj program jsem si stahnul a zjistil, ze muj soubor je v
OEM_Charset a koleguv soubor je v ANSI_Charset.
To same ukazoval i Total Commander - muj soubor ASCII (znak.
sada DOS) a jeho souboru ANSI (znak Windows).
GetCurCP mi hlasi, ze mam v systemu nastavenou znak. sadu
Windows 1250.
Zkousim vsemozne kombinace prekodovani meho souboru tak,
abych z nej vytvoril soubor citelny pro znak. sadu ANSI
Windows, ale nic nezabira.
Nevite nekdo?
David Klodner
> Nazdar,
>
> ak chces, tak si mozes z mojej stranky stiahnut program
DBFview. Ten
> ma funkciu prekodovania DBF medzi strankami Kamenicky,
Latin2,
> Win1250, ISO 8859-2, KOI 8 CS.
>
> Link: http://www.fornex.sk/software/dbfview131.exe
>
> mildy
komponenta DBMoney
[*] Pavel Volak <volakp(zv)chello(tec)cz> - 15.3.2005 07:32:52
Ahoj,
udelal jsem export dat z Money. Vyber dat je ale pomaly protoze prochazim
tabulku a zjistuju zda je dana skupina uzivatelem oznacena. Pokud jo, tak z
podrizene tabulky prekopiruju vyfiltovane polozky dane skupiny cyklem while
not eof do pomocneho souboru .
Nevite o rychlejsim zpusobu?
Money S3 je souborova databaze a neni podporovana emulace SQL dotazu.
Neexistuje tedy obdoba TQuery
Dik
Pavel
Aktivni zdroj dat-TDataSource
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 15.3.2005 07:22:51
> nemate nahodou nekdo po ruce rutinu, ktera zjisti kteremu TDataSource patri
> editacni komponenta na ktere je focus?
>
Ahoj,
z hlavy presne nevim, ale patral bych timhle smerem:
TForm.ActiveControl - vrati aktivni prvek
Pak pomoci procedur z unity TypInfo zjistit, zda onen aktivni prvek ma
property Datasource a nacist ji. Priklady najdes v archivu.
Presneji ted poradit neumim.
David Lebeda