Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
Firebird + Linux - vice procesu
[*] Jirka <jw-delphi(zv)seznam(tec)cz> - 12.5.2005 08:39:03
Ahoj,
mel bych dotaz jestli je normalni, ze na serveru (Linux) bezi treba i
deset procesu firebirdu a vsechny zabiraji stejne pameti (100MB)?
Zkousel jsem to u nas a bezi jen jeden proces tak nevim cim by to mohlo byt.
Poradte prosim.
Jirka
Charset vs. jayzkove prostredi Windows
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 12.5.2005 08:05:00
> 1. Kdyz dam Mainform.Font.Name = Arial nebo jiny font, nic se nestane - furt
> se zobrazuje ten MS Sans Serif.
> Asi protoze je v resourcich natvrdo dan do DLGTEMPLATE?
Pismo u vetsiny komponent muzes ovlivnit nastavenim prislusne
property Font. Ale jsou komponenty, kde je pismo dano systemem a z
aplikace jej neovlivnis: menu, titulky formularu, tusim radiobuttony
(radiogroup), checkboxy, co si tak vzpominam. Je to uz rok, co jsem se
zabyval upravou aplikace pro moznost lokalizace do rustiny, tak uz to
nemam v hlave presne.
U menu jsem si pomohl rezimem uzivatelskeho vykreslovani. Urcity
problem je, ze mam D5, takze menu se v uzivatelskem vykreslovani
jevi podobne jako tusim na W2k, takze na XP je videt, ze je trosku jine
nez normalni menu, rovnez tak jsem trosku na XP narazil s barvou
clMenu. Ac se menu v aplikacich zobrazuje sede, v barve clMenu je
jakasi bila. Protoze pri uzivatelskem vykreslovani se clMenu pouziva
(viz zdrojak VCL), bylo menu na XP bile.
U titulku formularu si lze pomoci bud rovnez uzivatelskym
prekreslovanim titulku (to se nepochybne nalezne v nejake sbirce tipu a
triku) nebo treba pomoci komponenty RxGradient. I tady ale plati, ze
vzhled na XP je mirne odlisny od standardu, pokud si s tim nedas vic
prace.
Nejsem si jist, jestli MS Sans Serif resp. font, ktery je systemem pouzit
na menu a titulky formularu, obsahuje i v ruskem narodnim prostredi na
neruskych Windows opravdu azbuku. Faktem ale je, ze ve sve aplikaci
v pripade, ze ma byt zobrazena v rustine, nahrazuji veskere fonty
fontem Arial Cyr. Jak rikam, duvod uz presne nevim, ale tipuji, ze tento
font pri zmene narodniho prostredi na Windows opravdu zacne
obsahovat azbuku i na neruskych win - nutno prozkoumat. Mam pocit,
ze jsem ale dosahl stavu, ze aplikace byla schopna zobrazit rustinu
uplne vsude, takze snad moc nekecam.
Zdravi
David Lebeda
Tvorba aplikace pro WAP v Delphi?
[*] Krakora Martin <krakoram(zv)seznam(tec)cz> - 12.5.2005 08:01:00
Preji dobry den vsem,
resim ted problem, jak vytvorit aplikaci, ktera by se dala provozovat na
mobilu prostrednictvim WAPu. Bohuzel s WAPem nemam zadne zkusenosti.
Nastudoval jsem zatim par materialu popisujicich tuto technologii, ale trapi
mne stale otazku jak takovou aplikaci vytvorit.
Zda by se dala vytvorit pomoci delphi nejaka aplikace ktera by na zaklade
sberu dat z DB nebo jineho zdroje, generovala stranky pro WAP. Hlavne nevim,
jaky server pro to potrebuji. Jestli by to slo prostrednictvim IIS.
Mate s tim nekdo zkusenosti? Treba by bylo lepsi upustit o Delphi a udelat
to na .NETu. Cetl jsme ze APS.NET podporuje jakousi mobilni technologii, ale
jestli to neni jen pro systemy s Windows CE.
Uvitam kazde nasmerovani a odkaz, predem moc dekuji.
S pozdravem
Krakora Martin
--------------------------------
Delphi 7 Ent, Windows XP, FB 1.5
-------------------------------- FastReport 3.12 - znaky s diakritikou
[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 12.5.2005 07:44:58
Dobre rano,
asi uz blbnu, ale nejak se mi nedari prijit na to, jak jednoduse presvedcit FastReport 3.12 Pro,
aby tisknul ve znakovem rezimu (dot-matrix) ceske znaky v te znakove sade, jakou potrebuji.
Nektere tiskarny maji Latin2, nektere jeste Kamenicke, nektere nemaji cestinu zadnou... Diky
predem za kazde nasmerovani (spravnym smerem...).
Karel Rys
SQL perlicka v FB1.5
[*] Ales Pavel <aldik(zv)quick(tec)cz> - 11.5.2005 22:04:19
NJ, ted to vidim...puvodne jsem to tak chtel napsat ale mozek mi to
zkratil na "j" :-D smarja, to je ta unava:-D
Aldik:-D
Martin Radvansky wrote:
>Dobry den,
>
>AP> mozna jsem blbej, nebo jsem te jen nepochopil, ale proc neudelas
>AP> jednoduse tohle nezkousel jsem to ale melo by to jit...
>
>AP> select f.id_Firmy, f.ID, f.Nazev, min(j.datum) as datum,j.predmet from Firma f
>AP> left join Jednani j
>AP> on f.ID_Firmy=j.ID_Firmy
>and j.datum >>= CURRENT_DATE
>AP> group by f.id_Firmy, f.ID, f.Nazev,j.predmet
>
>No protoze v SELECT musi byt vse to co je v GROUP BY a navic jen
>agragacni funkce. To bude asi ten duvod :).
> Takze by musel pridat i ten predmet do do group by a tim by to
> fungovalo uplne jinak.
>
> Myslim, ze reseni tu uz byla napr tou ulozenou procedurou nebo
> select(select..
> pripadne ted me napda co to tak po tom grupovani ( :-) krasny vyraz)
> jeste spojit znovu s tou orginalni tabulkou Firma a vzit si predmet.
> to by slo)
>
>
>
Charset vs. jayzkove prostredi Windows
[*] Zbysek Hlinka <konference(zv)hlinka(tec)cz> - 11.5.2005 21:56:18
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Krysl, Tomas
> Sent: Wednesday, May 11, 2005 6:00 PM
>
> Ahoj, jeste k tomuto tematu. Dejme tomu ze to takhle chci.
Nekteri lide maji obravdu obskurni prani. :-)))
> ...
> Samozrejme na ruskych woknech to chodi v pohode.
>
> No asi ma Zbysek pravdu, nezbyde nez to ozelet...
Zbysek se s tim potykal u Lokalizatoru, a nakonec to vyresil tak, ze pouzil
unicode editor a napsal si vlastni grid, ve kterem slozite zjistoval jazyk a
prekodovaval texty. Na labely a ostatni opicarny se proste vy... kaslal,
protoze na to uz nemel nervy. ;-) Nyni se raduje z .NETu a Win98 nechava s
nevyslovnou radosti konkurentum.
S pozdravem
Zbysek Hlinka
E-mail: hlinka zavin. hlinka(tec)cz
SQL perlicka v FB1.5
[*] Martin Radvansky <delphiconf(zv)radvansky(tec)net> - 11.5.2005 20:32:11
Dobry den,
AP> mozna jsem blbej, nebo jsem te jen nepochopil, ale proc neudelas
AP> jednoduse tohle nezkousel jsem to ale melo by to jit...
AP> select f.id_Firmy, f.ID, f.Nazev, min(j.datum) as datum,j.predmet from Firma f
AP> left join Jednani j
AP> on f.ID_Firmy=j.ID_Firmy
and j.datum >>= CURRENT_DATE
AP> group by f.id_Firmy, f.ID, f.Nazev,j.predmet
No protoze v SELECT musi byt vse to co je v GROUP BY a navic jen
agragacni funkce. To bude asi ten duvod :).
Takze by musel pridat i ten predmet do do group by a tim by to
fungovalo uplne jinak.
Myslim, ze reseni tu uz byla napr tou ulozenou procedurou nebo
select(select..
pripadne ted me napda co to tak po tom grupovani ( :-) krasny vyraz)
jeste spojit znovu s tou orginalni tabulkou Firma a vzit si predmet.
to by slo)
--
S pozdravem,
Martin Radvansky, MCSD .NET
SQL perlicka v FB1.5
[*] Ales Pavel <aldik(zv)quick(tec)cz> - 11.5.2005 19:32:07
mozna jsem blbej, nebo jsem te jen nepochopil, ale proc neudelas
jednoduse tohle nezkousel jsem to ale melo by to jit...
select f.id_Firmy, f.ID, f.Nazev, min(j.datum) as datum,j.predmet from Firma f
left join Jednani j
on f.ID_Firmy=j.ID_Firmy
and j.datum >= CURRENT_DATE
group by f.id_Firmy, f.ID, f.Nazev,j.predmet
Aldik
Karel Pecinka wrote:
>Zdravim profiky na FB,
>
>mam tabulky Firma a Jednani a potrebuju v jednom SQL zobrazit vsechny
>firmy a k nim informace o nejblizsim jednani v budoucnu. Kdyz udelam
>tohle:
>
>select f.id_Firmy, f.ID, f.Nazev, min(j.datum) as datum from Firma f
>left join Jednani j
>on f.ID_Firmy=j.ID_Firmy
>and j.datum >= CURRENT_DATE
>group by 1, 2, 3
>
>
>
>
MS SQL a ulozeni record structure
[*] lelicek(zv)volny(tec)cz - 11.5.2005 18:54:05
Ahoj,
a jaky je typ parametru na strane serveru ?
Pavel
Od: "Otisk Rene" <otisk(zv)misel(tec)cz>
> Chtel jsem se zeptat, jak ulozim do parametru
> (TODBCDataset.ParamByName('FieldName').LoadFromStream(?))
> ulozene procedury MS SQL Serveru pole recordu nasledujici
> deklarace?
>
> type
> TMyRec = record
> X1: Integer;
> X2: Integer;
> X3: Integer;
> X3: string[255];
> X4: string[255];
> X5: Integer;
> X6: string[255];
> X7: Integer;
> end;
>
> var
> F: array of TMyRec
>
> Pocet prvku v poli znam tesne pred ulozenim...
Charset vs. jayzkove prostredi Windows
[*] Krysl, Tomas <tomas.krysl(zv)cherry.de> - 11.5.2005 18:00:01
> Zaver? Psat v Delphi aplikace tak, aby na ceskych W98 bezela
> rustina je
> riskantni, a ma-li to byt dobre osetreno, pak i dost drahe.
Ahoj, jeste k tomuto tematu. Dejme tomu ze to takhle chci. Mam treba
mainform a modalni aboutform. Vsude nastavim RUSSIAN_CHARSET. Texty jsou v
resourcich (string, DFM) spravne kodovane do ruske znakove sady Windows
(oznaceni ted nevim):
1. Kdyz dam Mainform.Font.Name = Arial nebo jiny font, nic se nestane - furt
se zobrazuje ten MS Sans Serif.
Asi protoze je v resourcich natvrdo dan do DLGTEMPLATE?
2. Mam na nemeckych W2K nastavenu nemcinu. Pustim program s ruskymi texty v
ANSI a nastavenym RUSSIAN_CHARSET. Zobrazi se vsude otazniky. Dobra,
prenastavim na rustinu. Zobrazi se spravne rustina v labelech s Arial i MS
Sans serif. Vida, na typu fontu to tedy nezavisi. Ale... nazev dialogu a
polozky menu hlavniho dialogu se zobrazuji jako znaky nejake cizi znakove
sady (ne otazniky) a polozky nactene z resourcestring se zobrazuji i nadale
jako otazniky. To je bordel:-(
Samozrejme na ruskych woknech to chodi v pohode.
No asi ma Zbysek pravdu, nezbyde nez to ozelet...
Tk.
Unicode komp. pod W98 Was: Charset vs. jazykove pr
[*] Zbysek Hlinka <konference(zv)hlinka(tec)cz> - 11.5.2005 13:27:42
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Krysl, Tomas
> Sent: Wednesday, May 11, 2005 1:20 PM
>
> > http://www.tntware.com/delphicontrols/unicode/
> Ty pouzivam lec funguji jen pod W2K a WXP. Navic je to
> popsano na tom webu i v tom readme. Leda doinstalovat nejakou
> tu podporu unicode do W9x/ME, jak radi Petr Vones, aby se
> treba daly rozchodit... ale myslim ze by to autori popsali uz
> davno...
Unicode editor z OLE DB komponent funguje i na W95. Muzes si to proverit,
pouzivam je v Lokalizatoru.
Byl to ale opruz, a dnes uz bych to nedelal, protoze neni duvod... :)
S pozdravem
Zbysek Hlinka
E-mail: hlinka zavin. hlinka(tec)cz
Unicode komp. pod W98 Was: Charset vs. jazykove pr
[*] Petr Vones <konference(zv)petrvones(tec)net> - 11.5.2005 13:27:42
From: "Krysl, Tomas" <tomas.krysl(zv)cherry.de>
> Ty pouzivam lec funguji jen pod W2K a WXP. Navic je to popsano na tom webu i
> v tom readme. Leda doinstalovat nejakou tu podporu unicode do W9x/ME, jak
> radi Petr Vones, aby se treba daly rozchodit... ale myslim ze by to autori
Melo by to byt tohle:
http://www.microsoft.com/downloads/details.aspx?FamilyID=73ba7bd7-ed06-4f0d-80a4-2a7eeaee17e2&displaylang=en
Petr Vones
Unicode komp. pod W98 Was: Charset vs. jazykove pr
[*] Krysl, Tomas <tomas.krysl(zv)cherry.de> - 11.5.2005 13:19:41
> http://www.tntware.com/delphicontrols/unicode/
Ty pouzivam lec funguji jen pod W2K a WXP. Navic je to popsano na tom webu i
v tom readme. Leda doinstalovat nejakou tu podporu unicode do W9x/ME, jak
radi Petr Vones, aby se treba daly rozchodit... ale myslim ze by to autori
popsali uz davno...
Tk.
Unicode komp. pod W98 Was: Charset vs. jazykove pr
[*] Petr Vones <konference(zv)petrvones(tec)net> - 11.5.2005 12:33:37
From: "Krysl, Tomas" <tomas.krysl(zv)cherry.de>
> jeste se zeptam, jestli neznate funkcni unicode komponenty (staci mi jen
> TEdit a TMemo), ktere plne funguji i pod W9x, tj. nejsou stavene na winapi
> tride EDIT. Nejlepe free, nebo neco levneho. Pro D7.
Do Windows 98 bude asi treba doinstalovat (castecnou) podporu pro Unicode.
Petr Vones
MAPI a zobrazeni hlavnich slozek
[*] Petr Kuklik <petr.kuklik(zv)centrum(tec)cz> - 11.5.2005 11:53:34
Diky, seznam jiz mam, chtel bych zobrazit par udaju ke kazde MessageStore, napriklad Name="Postovni schranka", Provider="MS Exchange". Volanim IMAPISession.getMsgStoresTable ziskam IMAPITable. Co jsem pochopil, tak v ni bych mel najit popisy jednotlivych MsgStore.
- Je to tak?
IMAPITable.GetRowCount mi sdeli, ze mam 3 radky, coz odpovida skutecnosti. Pomoci IMAPITable.QueryRows, ziskam strukturu TSRowSet, ta rika, ze jsou 3 radky. Cekal jsem z v TSRowSet.aRow bude array o trech prvcich, ale je tam jen jeden.
- Proc je jen jeden?
- Daji se z TSRow ziskat informace, ktere hledam? (viz. priklad na zacatku mailu)
TSRow.cValues rika (aspon jsem to tak pochopil), kolik property ma jeden radek (pocet columns, kdyz uz je to tabulka :) ).
- Jsou v TSRow.lpProps jednotlive columny i se svymi hodnotami pro aktualni radek?
Podle helpu jsem pochopil, ze TSRow.lpProps je pole jednotlivych columnu, TSRow.cValues mi v konkretnim pripade rika, ze jich je 14, ale opet je TSRow.lpProps pouze jednoprvkove pole. Mozna, ze k nemu pristupuju spatne a ziskavam pouze prvni prvek, nevim.
Z prvniho prvku (TSPropValue) tohoto pole jsem podle TSPropValue.ulPropTag ziskal PROP_TYPE, konkretne PT_BINARY. No a tady koncim, nejsem schopen rozlouskout binarni hodnotu teto property.
Diky za kazdou radu
Petr
______________________________________________________________
> Od: grubhoffer(zv)software602(tec)cz
> Komu: delphi-l(zv)clexpert(tec)cz
> CC:
> Datum: 11.05.2005 10:17
> Predmet: Re: MAPI a zobrazeni hlavnich slozek
>
> Zavolanim IMAPISession.GetMsgStoresTable se ziska seznam vsech "message
> storu". To jsou ty "hlavni slozky". Nasledne volanim
> IMAPISession.OpenMsgStore se otevre vybrany "store".
>
> JG
>
> > -----Original Message-----
> > From: petr.kuklik(zv)centrum(tec)cz [mailto:petr.kuklik(zv)centrum(tec)cz]
> > Sent: Tuesday, May 10, 2005 5:16 PM
> > To: delphi-l(zv)clexpert(tec)cz; grubhoffer(zv)software602(tec)cz
> > Subject: MAPI a zobrazeni hlavnich slozek
> >
> > Ahoj,
> > jakym zpusobem ziskam pomoci MAPI "hlavni" slozky, ktere se
> > zobrazuji v Outlooku? V Outlook vidim "Postovni schranka",
> > "Osobni slozky" a "Verejne slozky".
> > Zatim jsem se prokousal k IMAPISession, jsem prihlasen.
> >
> > Diky Petr
> >
> >
> >
> >
>
>
> Unicode komp. pod W98 Was: Charset vs. jazykove pr
[*] Jan Fiala <jan.fiala(zv)wo(tec)cz> - 11.5.2005 11:53:34
11.5.2005 Krysl, Tomas:
> Ahoj,
> jeste se zeptam, jestli neznate funkcni unicode komponenty (staci mi jen
> TEdit a TMemo), ktere plne funguji i pod W9x, tj. nejsou stavene na winapi
> tride EDIT. Nejlepe free, nebo neco levneho. Pro D7.
Treba tyhle ?
http://www.tntware.com/delphicontrols/unicode/
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
MAPI a zobrazeni hlavnich slozek
[*] grubhoffer(zv)software602(tec)cz - 11.5.2005 10:01:26
Zavolanim IMAPISession.GetMsgStoresTable se ziska seznam vsech "message storu". To jsou ty "hlavni slozky". Nasledne volanim IMAPISession.OpenMsgStore se otevre vybrany "store".
JG
> -----Original Message-----
> From: petr.kuklik(zv)centrum(tec)cz [mailto:petr.kuklik(zv)centrum(tec)cz]
> Sent: Tuesday, May 10, 2005 5:16 PM
> To: delphi-l(zv)clexpert(tec)cz; grubhoffer(zv)software602(tec)cz
> Subject: MAPI a zobrazeni hlavnich slozek
>
> Ahoj,
> jakym zpusobem ziskam pomoci MAPI "hlavni" slozky, ktere se
> zobrazuji v Outlooku? V Outlook vidim "Postovni schranka",
> "Osobni slozky" a "Verejne slozky".
> Zatim jsem se prokousal k IMAPISession, jsem prihlasen.
>
> Diky Petr
>
>
>
>
Tpoint 3D
[*] Venca Zaruba <zaruba(zv)elastoform(tec)cz> - 11.5.2005 09:55:24
Hloupy dotaz: Existuje obdoba Tpoint, ale 3D? (rucne jsem si ho uz natypoval, jen me zajima, existuje-li)
Prijemny zbytek dne
Vasek Zaruba
8^)
Unicode komp. pod W98 Was: Charset vs. jazykove pr
[*] Zbysek Hlinka <konference(zv)hlinka(tec)cz> - 11.5.2005 09:17:16
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Krysl, Tomas
> Sent: Wednesday, May 11, 2005 8:57 AM
>
> jeste se zeptam, jestli neznate funkcni unicode komponenty
> (staci mi jen TEdit a TMemo), ktere plne funguji i pod W9x,
> tj. nejsou stavene na winapi tride EDIT. Nejlepe free, nebo
> neco levneho. Pro D7.
http://delphree.clexpert.com/pages/projects/oledb/default.htm
Komponenta TWORichEdit.
S pozdravem
Zbysek Hlinka
E-mail: hlinka zavin. hlinka(tec)cz
Unicode komp. pod W98 Was: Charset vs. jazykove pr
[*] Krysl, Tomas <tomas.krysl(zv)cherry.de> - 11.5.2005 08:57:15
Ahoj,
jeste se zeptam, jestli neznate funkcni unicode komponenty (staci mi jen
TEdit a TMemo), ktere plne funguji i pod W9x, tj. nejsou stavene na winapi
tride EDIT. Nejlepe free, nebo neco levneho. Pro D7.
Dik
Tk.Charset vs. jayzkove prostredi Windows
[*] Zbysek Hlinka <konference(zv)hlinka(tec)cz> - 11.5.2005 08:35:13
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Lebeda David
> Sent: Wednesday, May 11, 2005 7:37 AM
>
> Muzes si zkusit, ze kdyz na svych ceskych
> Windows nastavis ruske prostredi, tak se ti u ceske aplikace
> zacnou misto znaku s diakritikou objevovat nejaka pismena z
> azbuky. Mozna by bylo resenim se svou aplikaci dodavat i
> vlastni font, ale ale to je ted jen momentalni napad, nevim,
> nakolik to je realizovatelne.
Ja bych k tomu dodal jeste dousku. Se standardni VCL se jedna prakticky o
neresitelny problem, protoze kvuli kompatidebilite s Win9x jsou zakladni
komponenty vylucne v ASCII verzi. Optimalnim resenim je dusledne zavedeni
unicode komponent. Ve Win9x je vsak podpora unicode oproti rade Win NT (tedy
i XP) neuplna, z cehoz plynou ruzne obtize pri pokusu zprovoznit takovy
program na obou radach.
Tohle je jeden z duvodu, proc jsem radostne uvital .NET: v nem jsou vsechny
stringy primarne v unicode (coz plati i pro komponenty), takze popsany
problem se automaticky vyresi sam. Samozrejme za cenu, ze na W95 to nebezi
vubec na W98/ME podminecne (pricemz .NET 2 na nich nejspis nepobezi vubec).
Zaver? Psat v Delphi aplikace tak, aby na ceskych W98 bezela rustina je
riskantni, a ma-li to byt dobre osetreno, pak i dost drahe.
S pozdravem
Zbysek Hlinka
E-mail: hlinka zavin. hlinka(tec)cz
ukonceni aplikace pri odhlaseni uzivatele
[*] likeapear <likeapear(zv)centrum(tec)cz> - 11.5.2005 08:01:10
Vyreseno. Byla tam spatne obslouzena obslouha zpravy WndProc u pomocneho okna. Vysledek DefWindowProc se nepouzil.
{likeapear}
----- Original Message -----
From: "likeapear" <likeapear(zv)centrum(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, May 10, 2005 5:38 PM
Subject: Re: ukonceni aplikace pri odhlaseni uzivatele
| Toho jsem si vsimnul, ze ji ukonci. Problem je, ze pote co ji ukonci uz neodhlasi uzivatele. Musim dat znovu odhlasit uzivatele.
|
| BTW Obsluhu zpravy tam mam pro pripad, ze bych chtel tomu odhlaseni zabranit. Ale v prve rade potrebuju prijit na to, proc ta aplikace brani odhlaseni uzivatele i kdyz nema.
ukonceni aplikace pri odhlaseni uzivatele
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 11.5.2005 07:49:09
> procedure TForm_Main.WMQueryEndSession(var Msg: TWMQueryEndSession);
> begin
> Msg.Result := 1;
> // tady bude ulozeni dat
> Application.Terminate;
> end;
>
> Jenze ono se to cele chova nejak divne. Zprava prijde, aplikace se ukonci, ale windows prerusi odhlasovani.
Ahoj,
mam v jedne aplikaci neco podobneho a funguje to dobre. Ale nemam
tam to Application.Terminate. Zkusil bych ho pro zacatek vyhodit. Pak
me jeste napada, jestli nemuze pri sjizdeni aplikace (tj. krome obsluhy
vyse uvedene udalosti i v OnClose, OnCloseQuery, OnDestroy
cehokoli, co tou dobou jeste zije) nastat nejaka vyjimka? Treba z toho
duvodu, ze se pokousis pouzit neco, co uz diky sjizdejicim Windows
neni dostupne apod. Nevim, jestli by to mohlo zpusobit popsane
chovani, je me to tak napadlo.
David Lebeda
Charset vs. jayzkove prostredi Windows
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 11.5.2005 07:37:08
> Potrebuji zobrazit treba ted konkretne na nemeckych W2k ruske texty ve
> formulari, dejme tomu v klasicke komponente TLabel - tj. ANSI text. Nastavim
> RUSSIAN_CHARSET, Font.Name = Arial nebo Arial Unicode MS a stale vidim
> otaznicky. Na ruskych W2k v teze aplikaci vidim spravne rusky text (tam
> staci DEFAULT_CHARSET). Na tech nemeckych W2k neni nainstalovane ruske
> prostredi. Souvisi to nejak s chybejicim prostredim?
>
Jak uz psal Zbysek - ruske prostredi je treba. Ja jen malinko doplnim
popis stavu. Kdyz si na ruskych Windows nechas zobrazit mapu znaku
nejakeho fontu - zjistis, ze na dolnich pozicich ASCII (0..127) je
normalne latinka a v hornich pozicich (>127) je cela azbuka. Neboli
znaky azbuky jsou vlastne totez, co u nas znaky s diakritikou. Je mozne
libovolne kombinovat latinku a azbuku apod. Kdyz si zobrazis mapu
znaku (i s ruskym charsetem, cyrilice nebo jak se tomu rika) na
Windows s neruskym prostredim, tak tam ta azbuka neni. Z uvedeneho
plyne, ze i font se stejnym nazvem a charsetem obsahuje v ruznych
jazykovych nastavenich windows ruzne znaky. Muzes si zkusit, ze kdyz
na svych ceskych Windows nastavis ruske prostredi, tak se ti u ceske
aplikace zacnou misto znaku s diakritikou objevovat nejaka pismena z
azbuky. Mozna by bylo resenim se svou aplikaci dodavat i vlastni font,
ale ale to je ted jen momentalni napad, nevim, nakolik to je
realizovatelne.
David Lebeda
SQL perlicka v FB1.5
[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 11.5.2005 01:26:43
1. Ulozna procedura
2. Neco na tento zpusob:
SELECT ....
(SELECT FIRST 1 datum FROM .. ORDER ..),
(SELECT FIRST 1 Predmet FROM ... ORDER...)
FROM
...
WHERE ...
Jiny priklad pouziti stejneho triku je zde:
http://www.dbsvet(tec)cz/view.php?cisloclanku=2004092901
Slavek
> mam tabulky Firma a Jednani a potrebuju v jednom SQL zobrazit
> vsechny firmy a k nim informace o nejblizsim jednani v
> budoucnu. Kdyz udelam
> tohle:
>
> select f.id_Firmy, f.ID, f.Nazev, min(j.datum) as datum from
> Firma f left join Jednani j on f.ID_Firmy=j.ID_Firmy and
> j.datum >= CURRENT_DATE group by 1, 2, 3
>
> zobrazi se mi spravny pocet firem a u tech, kde existuje
> jednani pro dnesek nebo do budoucna, to spravne zobrazi datum
> nejblizsiho jednani.
>
> Potiz nastava v momente, kdy se potrebuju dostat na j.Predmet
> ze stejneho radku, jako je to zobrazene datum. Napada nekoho,
> jak by se to dalo udelat? SQL perlicka v FB1.5
[*] Karel Pecinka <k.pecinka(zv)seznam(tec)cz> - 11.5.2005 00:02:37
Zdravim profiky na FB,
mam tabulky Firma a Jednani a potrebuju v jednom SQL zobrazit vsechny
firmy a k nim informace o nejblizsim jednani v budoucnu. Kdyz udelam
tohle:
select f.id_Firmy, f.ID, f.Nazev, min(j.datum) as datum from Firma f
left join Jednani j
on f.ID_Firmy=j.ID_Firmy
and j.datum >= CURRENT_DATE
group by 1, 2, 3
zobrazi se mi spravny pocet firem a u tech, kde existuje jednani pro
dnesek nebo do budoucna, to spravne zobrazi datum nejblizsiho jednani.
Potiz nastava v momente, kdy se potrebuju dostat na j.Predmet ze
stejneho radku, jako je to zobrazene datum. Napada nekoho, jak by se to
dalo udelat?
Diky Karel, D5, FB1.5
Synapse a SSL
[*] Frantisek Mlcoch <frantisek.mlcoch(zv)vsb(tec)cz> - 10.5.2005 22:08:29
Poradte jak aktivovat SSL spojeni pri komunikaci pomoci TCPBlockSocket.
Idealni by byl priklad jak pro klienta, tak pro server.
Diky F.
Zalohovani jen casti databaze
[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 10.5.2005 20:56:21
Tomas Bradle wrote:
> To je vcelku zajimava metoda, pocitam ze pro zachovani
> referencni integrity takto provedene zalohy musi byt
> transakce pro selecty typu snapshot.
Presne tak, cely proces zalohy bezi ve snapshot transakci.
> Neni potreba pri provadeni obnovy dat odpojit vsechny
> connections na danou DB ? Je asi fakt, ze obnova se
> provadi ojedinele a v pripade poskozeni DB, takze by
> to asi nevadilo.
Pro obnovu dat je samozrejme potreba exkluzivni pristup a cela se
odehrava bezprostredne po zalozeni databaze (tabulek, ulozenych
procedur, vypnutych triggeru, nezbytnych indexu). Po obnove dat se
vytvori ref.integrita, dalsi indexy a zapnou se triggery. Teprve
potom je databaze pristupna pro ostatni uzivatele -- protoze je
aplikace trivrstva, jde to udelat snadno.
Martin Schayna
www.abra(tec)cz
> ----- Original Message -----
> From: "Martin Schayna" <mschayna(zv)aktis(tec)cz>
>
>>volani SELECT * ... na tabulkach, ktere se maji zalohovat. Behem
>>obnovy se provadeji bezne INSERTy, jen nejsou tou dobou vyrobene
>>zadne bezne indexy ani ref.integrita ani nejsou zapnute triggery. To
>>vse se vytvori az po nacteni dat (je to tak rychlejsi a ma to
>>blahodarny efekt pro statistiku indexu). Ackoli se to zda silene,
>>resime tim vcelku pohodlne updaty struktury predtim nez se data
>>vkladaji do tabulek -- plati ze jakakoliv zaloha je obnovitelna do
>>jakekoliv vyssi verze.
Zalohovani jen casti databaze
[*] Tomas Bradle <t.bradle(zv)sanet(tec)cz> - 10.5.2005 20:30:20
To je vcelku zajimava metoda, pocitam ze pro zachovani referencni integrity
takto provedene zalohy musi byt transakce pro selecty typu snapshot.
Neni potreba pri provadeni obnovy dat odpojit vsechny connections na danou
DB ? Je asi fakt, ze obnova se provadi ojedinele a v pripade poskozeni DB,
takze by to asi nevadilo.
diky za napad
Tomas Bradle
t.bradle(zv)sanet(tec)cz
t.bradle(zv)worldonline(tec)cz
----- Original Message -----
From: "Martin Schayna" <mschayna(zv)aktis(tec)cz>
Subject: Re: Zalohovani jen casti databaze
> volani SELECT * ... na tabulkach, ktere se maji zalohovat. Behem
> obnovy se provadeji bezne INSERTy, jen nejsou tou dobou vyrobene
> zadne bezne indexy ani ref.integrita ani nejsou zapnute triggery. To
> vse se vytvori az po nacteni dat (je to tak rychlejsi a ma to
> blahodarny efekt pro statistiku indexu). Ackoli se to zda silene,
> resime tim vcelku pohodlne updaty struktury predtim nez se data
> vkladaji do tabulek -- plati ze jakakoliv zaloha je obnovitelna do
> jakekoliv vyssi verze.
>
ukonceni aplikace pri odhlaseni uzivatele
[*] likeapear <likeapear(zv)centrum(tec)cz> - 10.5.2005 17:38:07
Toho jsem si vsimnul, ze ji ukonci. Problem je, ze pote co ji ukonci uz neodhlasi uzivatele. Musim dat znovu odhlasit uzivatele.
BTW Obsluhu zpravy tam mam pro pripad, ze bych chtel tomu odhlaseni zabranit. Ale v prve rade potrebuju prijit na to, proc ta aplikace brani odhlaseni uzivatele i kdyz nema.
{likeapear}
----- Original Message -----
From: "Jiri Cincura" <diskuze(zv)cincura.net>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, May 10, 2005 5:22 PM
Subject: Re: ukonceni aplikace pri odhlaseni uzivatele
| A proc ten od na ulozeni nedas to OnCloseQuery? To mas to same.
|
| BTW Win si tu tvoji app. ukonci sami, nemusis to obsluhovat a jeste k tomu
| pres Terminate.
ukonceni aplikace pri odhlaseni uzivatele
[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 10.5.2005 17:22:05
likeapear wrote (on Tuesday, May 10, 2005 5:08 PM):
> Ahoj,
>
> trapim se uz pomerne dlouho s timto problemem: Potrebuju aby se aplikace
> ukoncila, pokud se uzivatel odhlasi. Taky chci aby si pri ukonceni
> ulozila nejaka data. Tak jsem si napsal obsluhu zpravy
> WM_QueryEndSession:
A proc ten od na ulozeni nedas to OnCloseQuery? To mas to same.
BTW Win si tu tvoji app. ukonci sami, nemusis to obsluhovat a jeste k tomu
pres Terminate.
--
Jiri Cincura
http://www.cincura.net/
http://ID3renamer.cincura.net/
ICQ: 314711544; Yahoo!: x2develop
http://photo.cincura.net/
http://phorum.cincura.net/
http://x2develop.com/MAPI a zobrazeni hlavnich slozek
[*] Petr Kuklik <petr.kuklik(zv)centrum(tec)cz> - 10.5.2005 17:16:04
Ahoj,
jakym zpusobem ziskam pomoci MAPI "hlavni" slozky, ktere se zobrazuji v Outlooku? V Outlook vidim "Postovni schranka", "Osobni slozky" a "Verejne slozky".
Zatim jsem se prokousal k IMAPISession, jsem prihlasen.
Diky Petr
ukonceni aplikace pri odhlaseni uzivatele
[*] likeapear <likeapear(zv)centrum(tec)cz> - 10.5.2005 17:08:04
Ahoj,
trapim se uz pomerne dlouho s timto problemem: Potrebuju aby se aplikace ukoncila, pokud se uzivatel odhlasi. Taky chci aby si pri ukonceni ulozila nejaka data. Tak jsem si napsal obsluhu zpravy WM_QueryEndSession:
procedure TForm_Main.WMQueryEndSession(var Msg: TWMQueryEndSession);
begin
Msg.Result := 1;
// tady bude ulozeni dat
Application.Terminate;
end;
Jenze ono se to cele chova nejak divne. Zprava prijde, aplikace se ukonci, ale windows prerusi odhlasovani. Pokud moje aplikace nebezi, tak odhlaseni probehne. Bez obsluhy te zpravy se to chova uplne stejne :(
Proste to nechapu. Co delam spatne? Musim obslouzit i WM_EndSession?
PS: V Prohlizeci udalosti ve Windows jsem nasel toto:
Pokus o Neni znamo PIS_06 se nezdaril.
Dalsi informace ziskate v Centru pro napovdu a pomoc na http://go.microsoft.com/fwlink/events.asp.
PIS_06 je jmeno meho pocitace.
{likeapear}
FastReport 3 slovensky
[*] Roman <sw.maurice(zv)seznam(tec)cz> - 10.5.2005 16:44:01
Ahoj,
nevideli jste nekde nekdo nebo nemate slovenske resources pro FR3? V
oficialnim baleni jsou zatim jen ve FR2.
Diky
Roman
Charset vs. jayzkove prostredi Windows
[*] Zbysek Hlinka <konference(zv)hlinka(tec)cz> - 10.5.2005 16:32:00
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Krysl, Tomas
> Sent: Tuesday, May 10, 2005 3:50 PM
>
> Potrebuji zobrazit treba ted konkretne na nemeckych W2k ruske
> texty ve formulari, dejme tomu v klasicke komponente TLabel -
> tj. ANSI text. Nastavim RUSSIAN_CHARSET, Font.Name = Arial
> nebo Arial Unicode MS a stale vidim otaznicky. Na ruskych W2k
> v teze aplikaci vidim spravne rusky text (tam staci
> DEFAULT_CHARSET). Na tech nemeckych W2k neni nainstalovane
> ruske prostredi. Souvisi to nejak s chybejicim prostredim?
Ano, souvisi to velice uzce. Je nutne ho doinstalovat. Dalsim resenim je
pouzivat unicode komponenty, ty vsak ve standardni VCL nejsou.
S pozdravem
Zbysek Hlinka
E-mail: hlinka zavin. hlinka(tec)cz
Charset vs. jayzkove prostredi Windows
[*] Krysl, Tomas <tomas.krysl(zv)cherry.de> - 10.5.2005 15:49:57
Ahoj, jak to presne je:
Potrebuji zobrazit treba ted konkretne na nemeckych W2k ruske texty ve
formulari, dejme tomu v klasicke komponente TLabel - tj. ANSI text. Nastavim
RUSSIAN_CHARSET, Font.Name = Arial nebo Arial Unicode MS a stale vidim
otaznicky. Na ruskych W2k v teze aplikaci vidim spravne rusky text (tam
staci DEFAULT_CHARSET). Na tech nemeckych W2k neni nainstalovane ruske
prostredi. Souvisi to nejak s chybejicim prostredim?
Dik
Tk.
SQL a nazev tabulky v parametru
[*] Petr Langer <langer(zv)xdom(tec)cz> - 10.5.2005 15:27:55
zapomnel jsem puvodni zavorku, ma to byt samozrejme:
set (zv)sql = N'select top 1 (zv)mnoz = mnoz from ' + (zv)tab
pl
----- Original Message -----
From: "Petr Langer" <langer(zv)xdom(tec)cz>
Subject: Re: SQL a nazev tabulky v parametru
> declare
> (zv)sql nvarchar(500),
> (zv)tab varchar(50),
> (zv)mnoz numeric(13,3)
>
> set (zv)tab= '*tabulka*'
>
> set (zv)sql = N'select top 1 (zv)mnoz = mnoz from ' + (zv)tab + ')'
> exec sp_executesql (zv)sql, N'(zv)mnoz numeric(13,3) output', (zv)mnoz output
> select (zv)mnoz
>
> HTH,
> pl
>
> ----- Original Message -----
> From: "Vlastimil Zdenek" <vlastimil.zdenek(zv)seznam(tec)cz>
> Subject: SQL a nazev tabulky v parametru
>
>
>> Ahoj vsici,
>> velmi prosim o pomoc s timto nad MSSQL 2000:
>>
>> DECLARE
>> (zv)tab varchar(50),
>> (zv)mnoz numeric(13,3)
>>
>> SET (zv)mnoz=(SELECT TOP 1 mnoz FROM (zv)tab)
>> SELECT (zv)mnoz
>>
>> Nevite prosim nebkdo, jak toto napsat, aby ot SQL server vzal? Zkratka
>> potrebuju do selectu dostat tabulku v parametru.
>>
>> Diky vsem za jakykoli postouchnuti....
>>
>> MSSQL 2000
>> Vlasta
>
>
>
>SQL a nazev tabulky v parametru
[*] Petr Langer <langer(zv)xdom(tec)cz> - 10.5.2005 15:15:54
declare
(zv)sql nvarchar(500),
(zv)tab varchar(50),
(zv)mnoz numeric(13,3)
set (zv)tab= '*tabulka*'
set (zv)sql = N'select top 1 (zv)mnoz = mnoz from ' + (zv)tab + ')'
exec sp_executesql (zv)sql, N'(zv)mnoz numeric(13,3) output', (zv)mnoz output
select (zv)mnoz
HTH,
pl
----- Original Message -----
From: "Vlastimil Zdenek" <vlastimil.zdenek(zv)seznam(tec)cz>
Subject: SQL a nazev tabulky v parametru
> Ahoj vsici,
> velmi prosim o pomoc s timto nad MSSQL 2000:
>
> DECLARE
> (zv)tab varchar(50),
> (zv)mnoz numeric(13,3)
>
> SET (zv)mnoz=(SELECT TOP 1 mnoz FROM (zv)tab)
> SELECT (zv)mnoz
>
> Nevite prosim nebkdo, jak toto napsat, aby ot SQL server vzal? Zkratka
> potrebuju do selectu dostat tabulku v parametru.
>
> Diky vsem za jakykoli postouchnuti....
>
> MSSQL 2000
> Vlasta
SQL a nazev tabulky v parametru
[*] Vlastimil Zdenek <vlastimil.zdenek(zv)seznam(tec)cz> - 10.5.2005 14:57:53
Ahoj vsici,
velmi prosim o pomoc s timto nad MSSQL 2000:
DECLARE
(zv)tab varchar(50),
(zv)mnoz numeric(13,3)
SET (zv)mnoz=(SELECT TOP 1 mnoz FROM (zv)tab)
SELECT (zv)mnoz
Nevite prosim nebkdo, jak toto napsat, aby ot SQL server vzal? Zkratka
potrebuju do selectu dostat tabulku v parametru.
Diky vsem za jakykoli postouchnuti....
MSSQL 2000
Vlasta
Hledam komponentu pro md5 ci jinou hashovaci funkc
[*] Pavel Poles <delphi(zv)noni(tec)cz> - 10.5.2005 14:29:50
> muze mi prosim nekdo poradit kde najit uvedene?
LockBox od TurboPower ke stazeni na sourceforge.net...
Hledam komponentu pro md5 ci jinou hashovaci funkc
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 10.5.2005 14:25:50
> muze mi prosim nekdo poradit kde najit uvedene?
Proc to musi byt hned komponenta, kdyz je to uloha na jednu
prachobycejnou funkci?
Implementaci existuje mnoho, mimo jine i v Synapsi v unite
synacode.pas najdes jednoduche funkce na generovani MD5 ci SHA1. ;-)
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.Hledam komponentu pro md5 ci jinou hashovaci funkc
[*] Jan Fiala <jan.fiala(zv)wo(tec)cz> - 10.5.2005 14:21:50
10.5.2005 Zdenek Gala:
> Dobry den,
> muze mi prosim nekdo poradit kde najit uvedene?
> Dekuji, Z. Gala.
Komponentu ??? K cemu komponenta na neco, co vraci jednu hodnotu ?
Pouzivam unitu MD5
http://www.fichtner.net/delphi/
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
Hledam komponentu pro md5 ci jinou hashovaci funkc
[*] Zdenek Gala <zgala(zv)atlas(tec)cz> - 10.5.2005 14:17:49
Dobry den,
muze mi prosim nekdo poradit kde najit uvedene?
Dekuji, Z. Gala.
zacatky s MAPI + JCLMapi
[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 10.5.2005 13:45:47
Petr Kuklik wrote:
> Dival jsem se na JCLMapi.pas, pokud jsem dobre pochopil,
> tak JCLMapi je taky postaveno na SimpleMapi?
>
> Mozna bych mel popsat muj cil, treba me nekdo odkazete
> na spravne reseni. Potreboval bych do sve aplikace udelat
> cast, ktera by obsahovala spravu emailu, kontaktu, ukolu,
> poznamek, atd. Neco jako je treba OutLook. Taky bych chtel,
> aby zmeny provedene v me aplikaci byly videt i ve standardnich
> postovnich klientech. Nelibi se mi ale komunikace primo s
> klientem. Ma predstava je, ze budu komunikovat primo s postovnim
> serverem. Hledal jsem rozhrani, ktere takovy server poskytuje
> a MAPI se mi zda vhodne. Nebo mam misto MAPI pouzit neco jineho?
Pres MAPI i SimpleMAPI budes vzdy komunikovat s postovnim klientem,
nikoliv primo se serverem, je to podle me rozumne rozhrani pro
programovy pristup k mailum. Kdyby tvoje aplikace mela komunikovat s
postovnim serverem, pak by se z ni stal postovni klient a ty bys
musel podporovat radu ruznych protokolu (i kdyz 99% tvori SMTP/POP3
a IMAP).
Martin Schayna
zacatky s MAPI + JCLMapi
[*] Petr Kuklik <petr.kuklik(zv)centrum(tec)cz> - 10.5.2005 13:01:38
Dival jsem se na JCLMapi.pas, pokud jsem dobre pochopil, tak JCLMapi je taky postaveno na SimpleMapi?
Mozna bych mel popsat muj cil, treba me nekdo odkazete na spravne reseni. Potreboval bych do sve aplikace udelat cast, ktera by obsahovala spravu emailu, kontaktu, ukolu, poznamek, atd. Neco jako je treba OutLook. Taky bych chtel, aby zmeny provedene v me aplikaci byly videt i ve standardnich postovnich klientech. Nelibi se mi ale komunikace primo s klientem. Ma predstava je, ze budu komunikovat primo s postovnim serverem. Hledal jsem rozhrani, ktere takovy server poskytuje a MAPI se mi zda vhodne. Nebo mam misto MAPI pouzit neco jineho?
Diky Petr
______________________________________________________________
> Od: konference(zv)petrvones.net
> Komu: delphi-l(zv)clexpert(tec)cz
> CC:
> Datum: 10.05.2005 11:54
> Predmet: Re: zacatky s MAPI
>
> From: "Petr Kuklik" <PETR.KUKLIK(zv)CENTRUM.CZ>
> > muzete mi poradit s MAPI? Jde mi o to, ze se nedokazu prihlasit k
> profilu.
>
> Podivej se na unit JclMapi v JCL knihovne. Tam uz mas vetsinu vyresenou:
> http://jcl.sf.net
>
> Jinak to co pouzivas je Simple MAPI a ne MAPI.
>
> Petr Vones
> Kopia do schranky
[*] Zalesak Tomas <tomas.zalesak(zv)lcs(tec)cz> - 10.5.2005 12:43:37
> neviete mi niekto poradit, ako zabezpecit, aby pri prenose cez schranku
> z Delphi aplikacie nedochadzalo k problemom s diakritikou. Ak je pri
> kopirovani zapnuta anglicka klavesnica, niektore znaky sa neprenesu
> spravne.
uses Clipbrd, Windows, SysUtils;
procedure Clipboard_AsText(S : AnsiString);
var
MyHandle: THandle;
TextPtr, MyLocale : PChar;
begin
MyLocale := PChar(IntToStr(GetUserDefaultLCID));
Clipboard.Open;
try
Clipboard.Clear;
MyHandle := LocalAlloc(LMEM_MOVEABLE, Length(MyLocale) + 1);
TextPtr := LocalLock(MyHandle);
StrPCopy(TextPtr, MyLocale);
LocalUnLock(MyHandle);
Clipboard.SetAsHandle(CF_LOCALE, MyHandle);
MyHandle := LocalAlloc(LMEM_MOVEABLE, Length(S) + 1);
TextPtr := LocalLock(MyHandle);
StrPCopy(TextPtr, S);
LocalUnLock(MyHandle);
Clipboard.SetAsHandle(CF_TEXT, MyHandle);
finally
Clipboard.Close;
end;
end;
Tomas Zalesak
Kopia do schranky
[*] Martin Cajbik <cajbik(zv)sct.sk> - 10.5.2005 11:35:32
Zdravim,
neviete mi niekto poradit, ako zabezpecit, aby pri prenose cez schranku
z Delphi aplikacie nedochadzalo k problemom s diakritikou. Ak je pri
kopirovani zapnuta anglicka klavesnica, niektore znaky sa neprenesu
spravne.
--
Martin Cajbik
SCT s.r.o. Kosice
TSHFileOpStruct
[*] toman(zv)plbohnice(tec)cz - 10.5.2005 11:15:30
Zdravim po dlouhe dobe vyvojare v Delphi
Mel bych jeden skromny dotaz. Nevite jde pomoci TSHFileOpStruct
kopirovat jen novejsi soubory
a ne vsechno. Nikde nemohu najit v helpu ani na MSDN jak udelat, aby se
kopirovaly jen novejsi
soubory pomoci TSHFileOpStruct.
Mohl bych si je predem zjistit do nejakeho StrngListu a pak kopirovat
jen ze seznamu, ale chci aby
to bezelo rychle i na vykopavkach typu Pent.200.
Taky jsem driv pouzival XCopy tam je parametr /D ale radsi bych to
resil bez nej.
Nebo jestli nemate nekdo nejakou utility. Za vsechny rady predem dekuji.
Jirka.
Normalne pouzivam toto:
var: FileOp: TSHFileOpStruct;
ZeroMemory((zv)FileOp,SizeOf(fileOp));
fileOp.Wnd := Application.MainForm.Handle;
FileOp.wFunc := Fo_Copy;
FileOp.pFrom:= 'P:\Batch\UpgrPrg\'+'*.*' +#0;
FileOp.pTo:= 'C:\Program'+#0;
FileOp.fFlags:= FOF_ALLOWUNDO or FOF_SILENT or
FOF_SIMPLEPROGRESS FOF_NOCONFIRMATION;MS SQL a ulozeni record structure
[*] Otisk Rene <otisk(zv)misel(tec)cz> - 10.5.2005 11:11:30
Hi,
Chtel jsem se zeptat, jak ulozim do parametru (TODBCDataset.ParamByName('FieldName').LoadFromStream(?)) ulozene procedury MS SQL Serveru pole recordu nasledujici deklarace?
type
TMyRec = record
X1: Integer;
X2: Integer;
X3: Integer;
X3: string[255];
X4: string[255];
X5: Integer;
X6: string[255];
X7: Integer;
end;
var
F: array of TMyRec
Pocet prvku v poli znam tesne pred ulozenim...
Diky moc
Sroub
zacatky s MAPI
[*] Petr Vones <konference(zv)petrvones(tec)net> - 10.5.2005 11:07:30
From: "Petr Kuklik" <petr.kuklik(zv)centrum(tec)cz>
> muzete mi poradit s MAPI? Jde mi o to, ze se nedokazu prihlasit k profilu.
Podivej se na unit JclMapi v JCL knihovne. Tam uz mas vetsinu vyresenou:
http://jcl.sf.net
Jinak to co pouzivas je Simple MAPI a ne MAPI.
Petr Vones
zacatky s MAPI
[*] Petr Kuklik <petr.kuklik(zv)centrum(tec)cz> - 10.5.2005 11:03:29
Ahoj,
muzete mi poradit s MAPI? Jde mi o to, ze se nedokazu prihlasit k profilu. Delam to takto
HNDLLibrary := LoadLibrary(PChar(LibraryName));
(zv)MAPIInitialize := GetProcAddress(HNDLLibrary, 'MAPIInitialize');
(zv)MAPIUninitialize := GetProcAddress(HNDLLibrary, 'MAPIUninitialize');
(zv)MAPILogon := GetProcAddress(HNDLLibrary, 'MAPILogon');
MAPIInitialize(nil);
// az sem to projde v poradku, pak zavolam Logon
MAPILogon(HWNDParForm, pchar(ProfileName), pchar(Pass), MAPI_LOGON_UI, 0, FSession);
Podle helpu jsem pochopil, ze by se mel vyvolat dialog pro prihlaseni. Vrati se mi ale pouze chyba MAPI_E_FAILURE.
Diky Petr
synapse - recvstring exception
[*] david.kopecek(zv)hacktrack(tec)com - 10.5.2005 10:43:26
Dobry den,
10. kvetna 2005, 10:31:24, napsal jste:
MT> A mas nastavene FreeOnTerminate na true ???
MT> S pozdravem
ano mam
MT> Milan Tomes
>> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of
>> david.kopecek(zv)hacktrack.com
>> Sent: Tuesday, May 10, 2005 10:23 AM
>>
>> jenze tedka dkyz dojde po minute na ten lasterror a ma
>> priznak ruzny nule tak to ma skoncit .. jenze se destructor
>> nezavola a spojeni a otevrene soubory jsou stale otevrene..
>> ale thread se sam o sobe ukonci . poznam to po podle monitoru procesu
--
S pozdravem,
david
david.kopecek(zv)hacktrack.com
Delphi optimaizace (Re: synapse - recvstring excep
[*] Winsoft <winsoft(zv)netkosice.sk> - 10.5.2005 10:35:25
> > ma Delphi nieco ako su v C-cku "volatile" premenne?
> > Potrebujem totiz zarucit, aby mi Delphi kompilator nezoptimalizoval
> > kod, v ktorom citam premennu modifikovanu v inom threade.
>
> Ona ti delphi optimalizace takovou promennou vyhodila? Neco podobneho
> se mi nikdy nestalo.
nie, Delphi kod bol v poriadku, pozeral som to v assembleri.
Ale mozem sa spolahnut, ze Delphi (rozne verzie) tu premennu
nikdy nevyhodi ani neda do registra?
Erik
synapse - recvstring exception
[*] Milan Tomes <delphi(zv)haida(tec)cz> - 10.5.2005 10:31:24
A mas nastavene FreeOnTerminate na true ???
S pozdravem
Milan Tomes
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of
> david.kopecek(zv)hacktrack.com
> Sent: Tuesday, May 10, 2005 10:23 AM
>
> jenze tedka dkyz dojde po minute na ten lasterror a ma
> priznak ruzny nule tak to ma skoncit .. jenze se destructor
> nezavola a spojeni a otevrene soubory jsou stale otevrene..
> ale thread se sam o sobe ukonci . poznam to po podle monitoru procesu
synapse - recvstring exception
[*] david.kopecek(zv)hacktrack(tec)com - 10.5.2005 10:23:24
Cau
LG> No, delas to nejen spatne, ale i zbytecne dost slozite. :-)
ok necham se poucit ale tak jsem to udelal dle vas ...
execute jsem predelal takto
while not terminated do
begin
reply:=Sock.RecvString(cConnectionTimeout);
if Sock.LastError=0 then
begin
stemp:=reply;
cmd:=Fetch(stemp,' ');
par:=stemp;
ProcessCmd(cmd,par,reply);
end else
begin
terminate;
end;
end;
tim jsem vyradil ten timer na vic a kontrolu lasterror pro pripad
chyby. tj pokud existuje jedna chyba neni potreba pokracovat..
a zrusil jsem TSMTPTHread.Terminate a nahradil ji destructorem
destroy.
destructor TSMTPThread.destroy;
begin
FreeAndNil(logData);
sTo.Free;
FreeAndNil(emailData);
Sock.CloseSocket;
Sock.free;
inherited destroy;
end;
jenze tedka dkyz dojde po minute na ten lasterror a ma priznak ruzny
nule tak to ma skoncit .. jenze se destructor nezavola a spojeni a
otevrene soubory jsou stale otevrene.. ale thread se sam o sobe ukonci
. poznam to po podle monitoru procesu
Takze nechapu kde je zakopany
pes..
synapse - recvstring exception
[*] delphin(zv)post(tec)cz - 10.5.2005 10:15:23
> jedno z rieseni je eliminovat thready, kde sa len da. O tom sme sa
> uz tu bavili ale teraz tu reagujem nie koli vyvolavaniu nejakych dalsich
> diskusii na tuto temu ale narazil som na jeden problem v tejto
> suvislosti: ma Delphi nieco ako su v C-cku "volatile" premenne?
> Potrebujem totiz zarucit, aby mi Delphi kompilator nezoptimalizoval
> kod, v ktorom citam premennu modifikovanu v inom threade.
Uved konkretni pripad. Pouzivam thready hodne casto a nikdy se mi nestalo,
ze by Delphi v souvislosti s thready neco spatne zoptimalizovalo. Prenos dat pomoci HTTP
[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 10.5.2005 10:05:22
Zdenek Gala wrote (on Tuesday, May 10, 2005 9:47 AM):
> mozne vyuzit k prenosu HTTP a zda existuje pro to nejaka knihovna nejlepe
http://synapse.ararat(tec)cz, Synapse TCP/IP Library
--
Jiri Cincura
http://www.cincura.net/
http://ID3renamer.cincura.net/
ICQ: 314711544; Yahoo!: x2develop
http://photo.cincura.net/
http://phorum.cincura.net/
http://x2develop.com/OT: Konference o bezpecnosti siti
[*] Ing. Jiri Sokol <js-delphi(zv)email(tec)cz> - 10.5.2005 09:59:21
Ahoj vsem!
Omlouvam se za OT, ale obratil se na me kamarad, ktery dela diplomku tykajici se bezpecnosti siti. Chtel by si overit, zda informace, ktere v ni ma nejsou jiz zastarale. Neznate nekdo nejake forum, konferenci na toto tema?
I odkazy na stranky s touto problematikou potesi.
Jestli by to nepatrilo do konference, i kdyz pod OT se to muzu i tak nekomu do budoucna hodit, tak mi to, prosim, poslete na soukro mail.
Diky vsem za vas cas!
Hezky den
Jirka
--------------------------------------------------
Ing. Jiri Sokol; jiri.sokol(zv)seznam(tec)cz; 972 231 187
D6Prof+SP3; WinXPProf+SP2; FB 1.5.2
programator amater
Prenos dat pomoci HTTP
[*] Zdenek Gala <zgala(zv)atlas(tec)cz> - 10.5.2005 09:47:20
Dobry den,
resim problem s prenosem dat na vzdaleny server. Zakaznik si preje pouzivat
HTTP. Tedy: data se oedituji na klientu a poslou se pomoci HTTP. Skript na
serveru je zpracuje.
Mam na Vas tedy dotaz, zda by bylo mozne vyuzit k prenosu HTTP a zda
existuje pro to nejaka knihovna nejlepe free, pripadne kde najdu vice
informaci.
Pouzivam Delphi 5.
Dekuji, Z. Gala.vnoreny selekt nevrati viac ako 255 stlpcov
[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 10.5.2005 09:08:57
Ahoj,
co takhle udelat si na to ulozenou proceduru a selektit ji? To by slo
na FB urcite, na jinych serverech nevim.
Peca
Delphi optimaizace (Re: synapse - recvstring excep
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 10.5.2005 08:40:46
> ma Delphi nieco ako su v C-cku "volatile" premenne?
> Potrebujem totiz zarucit, aby mi Delphi kompilator nezoptimalizoval
> kod, v ktorom citam premennu modifikovanu v inom threade.
Ona ti delphi optimalizace takovou promennou vyhodila? Neco podobneho
se mi nikdy nestalo.
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.Synapse a skryta kopie
[*] Karel Kral <kralkonf(zv)purusmeda(tec)cz> - 10.5.2005 08:26:45
Jsou to mirni idioti a ja jsem trochu popleta.
Je tam volba "Pridavat X-Envelope-To pro lokalni prijemce", tedy ne BCC
jak jsem tvrdil. Ale to vyjde nastejno, stejne si to prectes ve zdrojaku.
Proc jsou trochu idioti? Protoze kdyz posles mail na 100 adresatu a 1x
sobe (aby v TO neco bylo), nacpe to do X-Envelope-To adresu vsech 101
adresatu.
Lukas Gebauer napsal(a):
>
> Doufam, ze tam tu hlavicku generuji jen tehdy, pokud ja sam jsem BCC
> adresat, tak ze mi tim sdeli, ze mail mi byl dorucen prave diky BCC... A
> pak je to v poradku.
--
______________________________________________________
Karel Kral, reditel IT / IT manager
PURUS-MEDA, s.r.o., Palackeho 174, 621 00 Brno, CZ
E-Mail: kral(zv)purusmeda(tec)cz
______________________________________________________
Firebird - Mandrake Linux
[*] pilifs <pilifs(zv)seznam(tec)cz> - 10.5.2005 07:20:40
rpmfind.net
http://rpmfind.net/linux/rpm2html/search.php?query=libstdc&submit=Search+...
>Ahoj,
>pri instalaci SuperServer for Linux V1.5.2 mi na konci nahlasi chybejici
>knihovnu libstdc++.so.
>Nevite co je to za problem? Pripadne kde ji sehnat?Firebird - Mandrake Linux
[*] Fait <develop(zv)lmss(tec)cz> - 10.5.2005 01:28:14
Ahoj,
pri instalaci SuperServer for Linux V1.5.2 mi na konci nahlasi chybejici
knihovnu libstdc++.so.
Nevite co je to za problem? Pripadne kde ji sehnat?
Dik Jirka
synapse - recvstring exception
[*] Winsoft <winsoft(zv)netkosice.sk> - 10.5.2005 00:10:03
> Takze to dela presne to co chces, totez co se snazis delat slozite pomoci
> periodickeho prolejzani vsech threadu.
>
> Dneska je urodny den... lekci programovani threadu a uprava vnitrni
> logiky aplikace... to je dneska uz druhe pivo, ktere bych si zaslouzil.
> ;-)))
jedno z rieseni je eliminovat thready, kde sa len da. O tom sme sa
uz tu bavili ale teraz tu reagujem nie koli vyvolavaniu nejakych dalsich
diskusii na tuto temu ale narazil som na jeden problem v tejto
suvislosti: ma Delphi nieco ako su v C-cku "volatile" premenne?
Potrebujem totiz zarucit, aby mi Delphi kompilator nezoptimalizoval
kod, v ktorom citam premennu modifikovanu v inom threade.
Erik
Zalohovani jen casti databaze
[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 10.5.2005 00:08:03
Vlastik Bartos wrote:
> V Firebirdu je delana ABRA G2, zalohovani zvenci vypada, jako by bylo
> udelano vlastnim programem (zdani klame), takze jedna z moznosti by byla
> obratit se nadrzo na ne s dotazem. Ale doufej, ze nekdo na tomto foru
> poradi.
Zalohovani v ABRA G2/G3 primo z klienta nedelame pomoci gbak ani
setupapi, jedna se o nejprostsi zpusob jaky vas asi napadne: pomoci
volani SELECT * ... na tabulkach, ktere se maji zalohovat. Behem
obnovy se provadeji bezne INSERTy, jen nejsou tou dobou vyrobene
zadne bezne indexy ani ref.integrita ani nejsou zapnute triggery. To
vse se vytvori az po nacteni dat (je to tak rychlejsi a ma to
blahodarny efekt pro statistiku indexu). Ackoli se to zda silene,
resime tim vcelku pohodlne updaty struktury predtim nez se data
vkladaji do tabulek -- plati ze jakakoliv zaloha je obnovitelna do
jakekoliv vyssi verze.
Zalohovani pomoci gbak (v ramci jedne verze) je samozrejme mozne a
vrele doporucovane.
Martin Schayna
www.abra(tec)cz
synapse - recvstring exception
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 9.5.2005 23:30:00
No, delas to nejen spatne, ale i zbytecne dost slozite. :-)
> a samotny terminate toho vlakna vypada takto
>
> procedure TSMTPThread.Terminate;
> begin
> Sock.CloseSocket;
> Sock.free;
> inherited Terminate;
> end;
Fuj, fuj! Takovyto uklid vubec nepatri do Terminate, ale do destruktoru
Destroy! Jen tak zajistis, ze se ti uklidovy kod zavola vzdy, at koncis
thread jakymkoliv zpusobem! Treba i tim, ze jednoduse sam dobehl a
dokoncil cinnost! (v takovem pripade se tvuj uklizeci kod v Terminate
metode vubec neprovede!)
Navic si uvedom, co terminate metoda dela... nedela totiz nic jineho, nez
ze nastavi flag 'terminated' na true! A tva programova smycka v execute
metode pak spravne periodicky kontrolue tento flag, a kdyz je nahozeny,
tak ukonci beh threadu.
Vsimni si tedy co delas... ty zavolas terminate -> ten zlikviduje Sock ->
zavolas puvodni terminate, ktery nastavi terminated na true -> ale
mezitim uvnitr threadu s tim Sockem vesele pracujes... a az pak nekdy
pozdeji testujes teprve terminated property!
Hle, upalil sis objekt pod rukou a to je pricina toho tveho exception!
Tedy nesahej do terminated metody, uklid pridej do destruktoru! Pak
zavolas terminate, ten jen nastavi flag, a az tvuj thread dobehne k mistu
kde testujes terminated, tak zjisti, ze se ma ukoncit. Thread skonci, a
sam pri svem ukoncovani zavola destruktor, ktery po sobe v pameti uklidi.
> takze nevim . jedine to ze existuje na pozadi timer ktery prochazi
> vsechna vlakna v tom lst a testuje jak dlouho uplylnujo od posledni
> akce a pokud nikdo nedopovedel dele jak 1 min tak zavola
> TSMTPThreadTerminate .. takze jinak..
Ted vubec nechapu... Proc tohle delas takhle slozite? Proc si kvuli
tomuto vytvaris seznam threadu a periodicky je kontrolujes a zabijis?
Kazdy thread preci sam o sobe vi, jak dlouho s nim druha strana
nekomunikovala a tak se kazdy ten thread pripadne dokaze ukoncit sam, ne?
Jsme zpet u toho lasterroru synapse. Po kazde operaci cteni dat obsahuje
bud 0 - precetli jsme v poradku co jsme chteli, nebo obsahuje chybovy
kod. Pokud chyba odpovida chybe timeoutu, pak jsme jen v pozadovanem
intervalu neprecetli data. Pokud nastala jakakoliv jina chyba, nema ani
smysl v dalsi praci se socketem pokracovat, a thread ukoncime. To je
potreba do te smyckyu take zabudovat, aby tvoje aplikace dokazala spravne
reagovat na ukoncena spojeni, na uhnila spojnei, ba i na jine komunikacni
chyby.
A ted pozor... pokud nastavis onen timeout pri cteni prave na tu tvoji
jednu minutu, pak to cele muzes zjednodusit tak, ze jakmile pri cteni
nastala jakakoliv chyba, thread ukoncis. Pak totiz chyba timeoutu nastane
jen tehdy, kdyz protejsi strana dele nez minutu mlci, coz je dle logiky
aplikace uz take chybiovy stav a je potreba thread ukoncit.
Takze to dela presne to co chces, totez co se snazis delat slozite pomoci
periodickeho prolejzani vsech threadu.
Dneska je urodny den... lekci programovani threadu a uprava vnitrni
logiky aplikace... to je dneska uz druhe pivo, ktere bych si zaslouzil.
;-)))
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
WEB: http://www.ararat(tec)cz/synapse - Synapse Delphi and Kylix TCP/IP
Library
vnoreny selekt nevrati viac ako 255 stlpcov
[*] hlas <hlas(zv)inmail.sk> - 9.5.2005 22:35:54
takyto Select Pole1, (select....), (select...) from tabulka
sa nevykona ak tych vnorenych selektov je viac ako 255
neda sa to nejako sikovne obist?
synapse - recvstring exception
[*] david.kopecek(zv)hacktrack(tec)com - 9.5.2005 22:07:52
Ahoj
>> Nevite nahodou proc mi tato exception nastava a jak se ji muzu
>> ubranit. ? Pred tim kdyz tam lasterror nebyl pouzit to fungovalo bez
>> problemu..
LG> V tom kodu neni sebemensi duvod k takoveho exception, zvlaste na
LG> takovem miste. Protoze koukam, ze to volas uvnitr threadu, tak si
LG> tipnu, ze se jedna o nejakou zavlecenou chybu vlivem spatne
LG> mezithreadove synchronizace. (a az sahnutim do kodu se ta chyba
LG> projevila...)
LG> Nesahas na Sock objekt jeste nekde mimo ten thread?
no v hlavnim vlakne vytvorim socket takto
Sock.CreateSocket;
Sock.SetLinger(true, MaxConn);
Sock.Bind(Options.IP,options.Port);
sock.Listen;
a pak v execute
var
sout: string;
clientsock:TSocket;
begin
while not terminated do
begin
sock.CanRead(1000);
clientsock:=sock.Accept;
if sock.lasterror=0 then
begin
Lst.Add(TSMTPThread.Create(Self,clientsock,ServerOnTerminate,sout,SessionID));
end;
end;
ve create TSMTPThread zavolam
sock:=TTCPBlockSocket.create;
Sock.Socket:=Hsock;
a pak v execute to co jste videl
while not terminated do
begin
reply:=Sock.RecvString(cConnectionTimeout);
if Sock.LastError=0 then
begin
stemp:=reply;
cmd:=Fetch(stemp,' ');
par:=stemp;
ProcessCmd(cmd,par,reply);
end;
end;
a samotny terminate toho vlakna vypada takto
procedure TSMTPThread.Terminate;
begin
Sock.CloseSocket;
Sock.free;
inherited Terminate;
end;
takze nevim . jedine to ze existuje na pozadi timer ktery prochazi
vsechna vlakna v tom lst a testuje jak dlouho uplylnujo od posledni
akce a pokud nikdo nedopovedel dele jak 1 min tak zavola
TSMTPThreadTerminate .. takze jinak..
LG> Kdyby tam byla chyba v Synapsi, tak si bud jisty, ze na takhle velkou
LG> botu by se jiste uz prislo. ;-)
--
S pozdravem,
david
david.kopecek(zv)hacktrack.com
Synapse a skryta kopie
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 9.5.2005 18:19:35
> Nektere servery jsou tak nastavene, ze pridavaji do hlavicek i hlavicku
> BCC (napr. u nas se tak da nastavit Kerio mailserver). S tim pak v Synapsi
> nic nenadelas.
Doufam, ze tam tu hlavicku generuji jen tehdy, pokud ja sam jsem BCC
adresat, tak ze mi tim sdeli, ze mail mi byl dorucen prave diky BCC... A
pak je to v poradku.
Princip BCC spociva v tom, ze se normalni adresati nedozvi, ze mail byl
dporucen jeste nekomu jinemu. Zatimco pro BCC adresata je uzitecna
informace, ze mu byl mail dorucen jako BCC adresatovi.
Pokud do BCC prasknou vsem vsechny BCC adresaty, pak jsou v Keriu idioti,
protoze by tim deklasovali BCC na obycejne CC... :-O
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
WEB: http://www.ararat(tec)cz/synapse - Synapse Delphi and Kylix TCP/IP
Library
Synapse a skryta kopie
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 9.5.2005 18:15:35
> No to jsem pochopil zcela jasne z helpu, ze kdyz napisu do MailTo
> jednotlive adresy oddelene carkou, ze zpravu poslu vice lidem, ale stale
> kdyz mi tato zprava dojde, tak ve zdroji stale vidim, komu vsem jsem tento
> mail poslal. Jednotlive zadane maily si umim poscitat mimo funkci SendTo.
> Stale nevim jak udelat ten bcc. Tvuj navrh, jak to udelat stale neresi
> problem skryte kopie.
Ten kus zdrojaku, co jsme ti poslal, dela skutecne BCC. Podivej se na nej
poradne... vidis tam snad nekde, ze bych do 'TO' hlavicky daval obsah
promenne MailBCC? Jeji obsah do hlavicek mailu vubec nedavam, jeji obsah
se predava jen do volani funkce SendToRaw, ktera hodnotu pouzije jen a
jen do SMTP obalky. Ve vlastnim textu mailu se nic z promenne MailBCC
neocitne!
V jake hlavicce vidis ty BCC adresaty, kdyz pouzijes mnou uvedeny
zdrojak? Jestli tvuj postovni server uklada BCC adresaty do hlavicek (Pak
je autor toho serveru lemoun!), ale pak ti nemuze fungovat BCC od nikoho
a neni ti jak pomoci.
Nedochazi jen k chybne interpretaci hlavicek v mailu tebou?
Treba vcelku bezna vec je ta, ze se v hlavickach mailu dopatras adresy ze
SMTP obalky, ale tam vidis jen adresu, diky ktere byla zprava prirazena
prave do tve postovni schranky, vsechny ostatni adresati ze SMTP hlavicky
tam nebudou! V pripade meho serveru je to hlavicka X-Envelope-To.
Takze pokud si posilas to BCC sam sobe, je vcelku prirozene, ze ty jako
adresat, se dozvis ze byla zprava poslana na tvoji adresu.
Pokud to chces vyzkouset, posli si mail, uved svoji adresu do MailTo, a
do mailBCC uved nejakou zcela jinou adresu. A pak se podivej do mailu co
prisel tobe, ne do mailu co sel na BCC adresu! Nikde tam neuvidis, ze
zprava byla poslana jeste nekam jinam... a to je prave BCC. :-)
Ze ve zprave dorazivsi na BCC adresu poznas, ze byla na na tu adresu
posilana (z bonz hlavicek postovniho serveru), to je vcelku normalni a
prirozene. :-)
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
WEB: http://www.ararat(tec)cz/synapse - Synapse Delphi and Kylix TCP/IP
Library
Zalohovani jen casti databaze
[*] Vlastik Bartos <bartos(zv)spsmvbr(tec)cz> - 9.5.2005 17:45:32
V Firebirdu je delana ABRA G2, zalohovani zvenci vypada, jako by bylo
udelano vlastnim programem (zdani klame), takze jedna z moznosti by byla
obratit se nadrzo na ne s dotazem. Ale doufej, ze nekdo na tomto foru
poradi.
Vlastik
> To se omlouvam, ze jsem neuved databazi, je to Firebird a prave tohle tam
> nejde, protoze pouzivam triggery a procedury.
>
> > > Zdravim vsechny,
> > >
> > > poreboval bych zalohovat jen cast databaze (tedy vsechno krome jedne
> > > konkretni tabulky, ktera obsahuje obrazky) pomoci gbak. Nevi nekdo jak
> > > na to jit ?
Synapse a skryta kopie
[*] Karel Kral <kralkonf(zv)purusmeda(tec)cz> - 9.5.2005 17:21:29
A v jake hlavicce vidis to, komu to dojde?
Nektere servery jsou tak nastavene, ze pridavaji do hlavicek i hlavicku
BCC (napr. u nas se tak da nastavit Kerio mailserver). S tim pak v
Synapsi nic nenadelas.
delphi(zv)kopr(tec)cz napsal(a):
> No to jsem pochopil zcela jasne z helpu, ze kdyz napisu do MailTo jednotlive
> adresy oddelene carkou, ze zpravu poslu vice lidem, ale stale kdyz mi tato
> zprava dojde, tak ve zdroji stale vidim, komu vsem jsem tento mail poslal.
--
______________________________________________________
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 a skryta kopie
[*] delphi(zv)kopr(tec)cz - 9.5.2005 16:45:27
No to jsem pochopil zcela jasne z helpu, ze kdyz napisu do MailTo jednotlive
adresy oddelene carkou, ze zpravu poslu vice lidem, ale stale kdyz mi tato
zprava dojde, tak ve zdroji stale vidim, komu vsem jsem tento mail poslal.
Jednotlive zadane maily si umim poscitat mimo funkci SendTo. Stale nevim jak
udelat ten bcc.
Tvuj navrh, jak to udelat stale neresi problem skryte kopie.
I tak jsem rad, ze se mi venujes...
Pavel ZIDEK
> ... jak jsem rikal, BCC nemuzes davat do hlavicek! Hlavicka BCC
> proste neexistuje. Jinak by to nebylo BCC. ;-) Uvedom si, ze maily
> nejsou dorucovany podle toho, c je napsano v hlavickach mailu, ale
> podle toho, co je predano v SMTP protokolu... a SMTP protokolu je
> obsah prenasene zpravy vcetne hlavicek uplne ukradeny.
>
> zkus to tohle (psano z hlavy...):
>
> function SendToEx(const MailFrom, MailTo, MailBCC, Subject, SMTPHost:
> string;
> const MailData: TStrings; const Username, Password: string):
> Boolean;
> var
> t: TStrings;
> s: string;
> begin
> t := TStringList.Create;
> try
> t.Assign(MailData);
> t.Insert(0, '');
> t.Insert(0, 'X-mailer: Synapse - Delphi & Kylix TCP/IP library by
> Lukas Gebauer');
> t.Insert(0, 'Subject: ' + Subject);
> t.Insert(0, 'Date: ' + Rfc822DateTime(now));
> t.Insert(0, 'To: ' + MailTo);
> t.Insert(0, 'From: ' + MailFrom);
> //vidis, hlavicky jsou uplne stejne!
> //tady zacina zmena...
> s := MailTo;
> if (MailBCC <> '') and (s <> '') then
> s := s + ',';
> s := s + MailBCC;
> //s ted obsahuje MailTo a MailBCC dohromady... a tam to odesleme!
> Result := SendToRaw(MailFrom, s, SMTPHost, t, Username,
> Password);
> finally
> t.Free;
> end;
> end;Synapse a skryta kopie
[*] Karel Kral <kralkonf(zv)purusmeda(tec)cz> - 9.5.2005 16:43:27
Takhle posilame BCC u nas. BCC das do Adress:
// Odeslani mailu pomoci Synapse - pridani odesilatele, prijemcu, textu
// zpravy a samotne odeslani pres SMTP server
procedure TSynaSmtpMailer.SendSynaMailPrimEx(SMTP: TSMTPSend; const
Adress: string);
var
OneAdress: string;
S: string;
begin
if SMTP.MailFrom(GetEmailAddr(FSynMessage.Header.From),
Length(FSynMessage.Lines.Text)) then
begin
S := Adress;
repeat
OneAdress := GetEmailAddr(FetchEx(S, ',', '"'));
if OneAdress <> '' then
if not SMTP.MailTo(OneAdress) then // prijemce neni spravne zadany
raise ESmtpMailer.CreateResFmt((zv)sSmtpToErr, [OneAdress,
SMTP.ResultString]);
until S = '';
if not SMTP.MailData(FSynMessage.Lines) then
// nepodarilo se odeslat zpravu
raise ESmtpMailer.CreateResFmt((zv)sSmtpDataErr , [SMTP.ResultString]);
end
else // odesilatel neni spravne zadany
raise ESmtpMailer.CreateResFmt((zv)sSmtpFromErr,
[GetEmailAddr(FSynMessage.Header.From) ,SMTP.ResultString]);
end;
delphi(zv)kopr(tec)cz napsal(a):
> Mail vcetne kompletnich hlavicek neumim udelat, ani rucne pomoci TMimeMess
> objekt nevim jak udelat.
>
> Proto jsem sel jinou cestou,
> upravil jsem tvou funkci SendToEx, kde posilam seznam skrytych mailu
>
> function SendToExBcc(const MailFrom, MailTo, MailBcc, Subject, SMTPHost:
> string;
> const MailData: TStrings; const Username, Password: string): Boolean;
> .....
> t.Insert(0, 'From: ' + MailFrom);
> t.Insert(0, 'Bcc: ' + MailBcc);
> .....
> end;
>
> MailBcc := 'jedna(zv)volny(tec)cz,dve(zv)volny(tec)cz';
>
> a ono to nechodi,
> jdu spravnou cestou?
>
> Pavel ZIDEK
>
>
>>Tedy vyrob si mail vcetne kompletnich hlavicek (pokud to neumis
>>rucne, pak pouzij TMimeMess objekt), a vysledek odesli napriklad pres
>>SendToRaw.
>>
>>
>
>
>
>
>
>
>
>
>
--
______________________________________________________
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 a skryta kopie
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 9.5.2005 15:17:19
> Proto jsem sel jinou cestou,
> upravil jsem tvou funkci SendToEx, kde posilam seznam skrytych mailu
...
> t.Insert(0, 'From: ' + MailFrom);
> t.Insert(0, 'Bcc: ' + MailBcc);
> .....
... jak jsem rikal, BCC nemuzes davat do hlavicek! Hlavicka BCC
proste neexistuje. Jinak by to nebylo BCC. ;-) Uvedom si, ze maily
nejsou dorucovany podle toho, c je napsano v hlavickach mailu, ale
podle toho, co je predano v SMTP protokolu... a SMTP protokolu je
obsah prenasene zpravy vcetne hlavicek uplne ukradeny.
zkus to tohle (psano z hlavy...):
function SendToEx(const MailFrom, MailTo, MailBCC, Subject, SMTPHost:
string;
const MailData: TStrings; const Username, Password: string):
Boolean;
var
t: TStrings;
s: string;
begin
t := TStringList.Create;
try
t.Assign(MailData);
t.Insert(0, '');
t.Insert(0, 'X-mailer: Synapse - Delphi & Kylix TCP/IP library by
Lukas Gebauer');
t.Insert(0, 'Subject: ' + Subject);
t.Insert(0, 'Date: ' + Rfc822DateTime(now));
t.Insert(0, 'To: ' + MailTo);
t.Insert(0, 'From: ' + MailFrom);
//vidis, hlavicky jsou uplne stejne!
//tady zacina zmena...
s := MailTo;
if (MailBCC <> '') and (s <> '') then
s := s + ',';
s := s + MailBCC;
//s ted obsahuje MailTo a MailBCC dohromady... a tam to odesleme!
Result := SendToRaw(MailFrom, s, SMTPHost, t, Username,
Password);
finally
t.Free;
end;
end;
A mam u tebe pivo za namahu. ;-)
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.Synapse a skryta kopie
[*] delphi(zv)kopr(tec)cz - 9.5.2005 14:27:16
Mail vcetne kompletnich hlavicek neumim udelat, ani rucne pomoci TMimeMess
objekt nevim jak udelat.
Proto jsem sel jinou cestou,
upravil jsem tvou funkci SendToEx, kde posilam seznam skrytych mailu
function SendToExBcc(const MailFrom, MailTo, MailBcc, Subject, SMTPHost:
string;
const MailData: TStrings; const Username, Password: string): Boolean;
.....
t.Insert(0, 'From: ' + MailFrom);
t.Insert(0, 'Bcc: ' + MailBcc);
.....
end;
MailBcc := 'jedna(zv)volny(tec)cz,dve(zv)volny(tec)cz';
a ono to nechodi,
jdu spravnou cestou?
Pavel ZIDEK
> Tedy vyrob si mail vcetne kompletnich hlavicek (pokud to neumis
> rucne, pak pouzij TMimeMess objekt), a vysledek odesli napriklad pres
> SendToRaw.
>
> D7 tvorba menu okna
[*] Maixner Adam <adam.maixner(zv)pvt(tec)cz> - 9.5.2005 10:40:58
Rad bych si vytvoril framework s vlatnimi menu okny, toolbary a
podobnymi nabidkami. Ale opravdu se mi nedari vytvorit menu okna.
Vytvorene okno bud neprijima zpravy nebo kdyz mu predam focus,
deaktivuji tim hlavni okno, kteremu by menu melo patrit.
Mate s tim nekdo nejakou zkusenost ? Diky.ReadComponent
[*] dam <arthur(zv)argh(tec)cz> - 9.5.2005 10:22:56
Ahoj,
chtel jsem nastavit nektera (ne vsechna) property u objektu z meho uloziste.
To jsem napsal celkem obecne pomoci unit typinfo a procedury SetPropValue.
Bohuzel obcas narazim na kontroly toho objektu. Tyto kontroly jsou typicky
pro ComponentState csReading vypnuty, takze cteni ze streamu pomoci
ReadComponent. Bohuzel nejak nedokazu ComponentState nastavit. Poradite
nekdo?
Dik
David
Synapsy a skryta kopie
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 9.5.2005 10:18:56
> mailTo := 'blabla(zv)volny(tec)cz, blabla(zv)razdca(tec)cz';
> SendTo(MailFrom, MailTo,....)
>
> napisu adresy s carkovym oddelovacem. Bohuzel vsichni dostanou seznam mych
> odeslanych adres.
> Jak mam zadat skryte kopie ... bcc ?
jednoducha ukazkova funkce SendTo podle mailTo generuje i patricne
hlavicky, takze je vcelku prirozene, ze vsicni adresati jsou v
hlavickach videt. ;-)
BCC adresat funguje tak, ze v hlavickach nikde neni uvedeny, ale i
pres to je na tu adresu dopis dorucen. Toho docilis tak, ze si
vygenerujes mail i s hlavickama, kde BCC adresat uveden nebude, a pak
tenhle cely mail odesles pres SMTP, kde k seznamu adresatu navic
pridas ty BCC adresy.
Tedy vyrob si mail vcetne kompletnich hlavicek (pokud to neumis
rucne, pak pouzij TMimeMess objekt), a vysledek odesli napriklad pres
SendToRaw.
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.Synapsy a skryta kopie
[*] delphi(zv)kopr(tec)cz - 9.5.2005 10:00:54
Zdravim,
zacinam se Synapsy a potrebuji zaslat vice mailu najednou.
Z helpu jsem pochopil, ze do
mailTo := 'blabla(zv)volny(tec)cz, blabla(zv)razdca(tec)cz';
SendTo(MailFrom, MailTo,....)
napisu adresy s carkovym oddelovacem. Bohuzel vsichni dostanou seznam mych
odeslanych adres.
Jak mam zadat skryte kopie ... bcc ?
Diky za pomoc Pavel ZIDEK
synapse - recvstring exception
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 9.5.2005 09:00:49
> Nevite nahodou proc mi tato exception nastava a jak se ji muzu
> ubranit. ? Pred tim kdyz tam lasterror nebyl pouzit to fungovalo bez
> problemu..
V tom kodu neni sebemensi duvod k takoveho exception, zvlaste na
takovem miste. Protoze koukam, ze to volas uvnitr threadu, tak si
tipnu, ze se jedna o nejakou zavlecenou chybu vlivem spatne
mezithreadove synchronizace. (a az sahnutim do kodu se ta chyba
projevila...)
Nesahas na Sock objekt jeste nekde mimo ten thread?
Kdyby tam byla chyba v Synapsi, tak si bud jisty, ze na takhle velkou
botu by se jiste uz prislo. ;-)
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.zapis pomoci INSERT do FF2
[*] Petr Fiser <petr.fiser(zv)3jservis(tec)cz> - 9.5.2005 09:00:49
Dobry den.
Je mozne zapsat jednim prikazem INSERT nekolik zaznamu najednou (a jak), nebo se musi kazdy zaznam vlozit a provest samostatne.
DB FF2.
Petr Fiser
synapse - recvstring exception
[*] david.kopecek(zv)hacktrack(tec)com - 9.5.2005 08:44:48
Zdravim konferenci
Mam jednoduchou aplikaci ktera prijima prichozi mailiky postavenou na
blocksock ze synapse
v jednoduche funkci ctu vstupy od klienta
while not terminated do
begin
reply:=Sock.RecvString(cConnectionTimeout);
if Sock.LastError=0 then
begin
stemp:=reply;
cmd:=Fetch(stemp,' ');
par:=stemp;
ProcessCmd(cmd,par,reply);
end;
end;
pomoci dotazu na Sock.LastError=0 si zjistuji jestli mi vsechno prislo
ok ,ale nad celou aplikaci mi bezi exception check od JCL a ten mi cas
od casu vypise
Exception EAccessViolation: Access violation at address 00000000. Read of address 00000000 (OS Exception)
Exception occured at $00000000 (Module "", Procedure "", Unit "", Line 0)
Exception info: OffsetFromProcName=00, OffsetFromLineNumber=00
Except frame-dump: Frame at $012CFCA4 (type: efkFinally)
Code at $0045F012
Module "blcksock", Procedure "TBlockSocket.RecvTerminated", Unit "blcksock.pas", Line 2330
Frame at $012CFCEC (type: efkFinally)
Code at $0045F0BD
Module "blcksock", Procedure "TBlockSocket.RecvString", Unit "blcksock.pas", Line 2340
Frame at $012CFD14 (type: efkFinally)
Code at $00465F94
Module "UnitServer", Procedure "TSMTPThread.Execute", Unit "UnitServer.pas", Line 267
Frame at $012CFF78 (type: efkAnyException, handles exception)
Handler at $00419C22
Module "Classes", Procedure "ThreadProc", Unit "", Line 0
Frame at $012CFF84 (type: efkFinally)
Code at $00419C3F
Module "Classes", Procedure "ThreadProc", Unit "", Line 0
Frame at $012CFFA8 (type: efkUnknown)
Code at $012CFFAC
Module "", Procedure "", Unit "", Line 0
Mam Delphi 7 na os WIndows 2000 a blcksock.pas ve verzi 008.003.007
Nevite nahodou proc mi tato exception nastava a jak se ji muzu
ubranit. ? Pred tim kdyz tam lasterror nebyl pouzit to fungovalo bez
problemu..
Thx david.Zalohovani jen casti databaze
[*] Tomas Bradle <t.bradle(zv)sanet(tec)cz> - 9.5.2005 07:35:30
To se omlouvam, ze jsem neuved databazi, je to Firebird a prave tohle tam
nejde, protoze pouzivam triggery a procedury.
dik
Tomas Bradle
t.bradle(zv)sanet(tec)cz
t.bradle(zv)worldonline(tec)cz
----- Original Message -----
From: "Vlastik Bartos" <bartos(zv)spsmvbr(tec)cz>
Subject: Re: Zalohovani jen casti databaze
> To nevim, ale databazove systemy obvykle pracuji s vice databazemi
soucasne,
> takze bych dotycnou tabulku presunul do samostatne databaze a je vystarano
> :-).
> Pro upresneni napis, jaka databaze to je - ja pouzivam jen MS SQL, ale u
> jine dtb ti urcite poradi ostatni.
>
> Vlastik
>
>
> ----- Original Message -----
> From: "Tomas Bradle" <t.bradle(zv)sanet(tec)cz>
> Subject: Zalohovani jen casti databaze
>
>
> > Zdravim vsechny,
> >
> > poreboval bych zalohovat jen cast databaze (tedy vsechno krome jedne
> > konkretni tabulky, ktera obsahuje obrazky) pomoci gbak. Nevi nekdo jak
na
> to
> > jit ?
> >
> > diky
> >
>
Firebird - vytvoreni tabulky s klicovym slovem
[*] Kalhous <kalhous(zv)eu(tec)cz> - 9.5.2005 06:53:24
Musi se to napsat do uvozovek. Tip - rozmyslet si, jestli je opravdu nutne
aby se ten sloupec jmenoval prave takhle. Do uvozovek ho totiz je pak nutne
davat i v prikazech SQL a to je dost nepohodlne.
----- Original Message -----
From: "Pavel Hora" <phofficial(zv)centrum(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Sunday, May 08, 2005 9:12 PM
Subject: Firebird - vytvoreni tabulky s klicovym slovem
> Zdravim,
> pouzivam Firebird 1.5 a snazim se vytvorit tabulku, jez ma sloupecek s
> nazvem length (varchar) coz FB skriktne odmita. Jak to oblafnout? Dik za
> pomoc, Pavel Hora
>
>
> Firebird - vytvoreni tabulky s klicovym slovem
[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 8.5.2005 21:28:46
Pavel Hora wrote (on Sunday, May 08, 2005 9:13 PM):
> Zdravim,
> pouzivam Firebird 1.5 a snazim se vytvorit tabulku, jez ma sloupecek s
> nazvem length (varchar) coz FB skriktne odmita. Jak to oblafnout? Dik za
> pomoc, Pavel Hora
Nevim jak presne to delas, ale konzoli to staci napsat v uvozovkach. Mam
sloupec date a v pohode to jede.
--
Jiri Cincura
http://www.cincura.net/
http://ID3renamer.cincura.net/
ICQ: 314711544; Yahoo!: x2develop
http://photo.cincura.net/
http://phorum.cincura.net/
http://x2develop.com/Firebird - vytvoreni tabulky s klicovym slovem
[*] Pavel Hora <phofficial(zv)centrum(tec)cz> - 8.5.2005 21:12:44
Zdravim,
pouzivam Firebird 1.5 a snazim se vytvorit tabulku, jez ma sloupecek s nazvem length (varchar) coz FB skriktne odmita. Jak to oblafnout? Dik za pomoc, Pavel Hora
zeos a cestina
[*] Webmaster - Kassoft <webmaster(zv)kassoft(tec)cz> - 8.5.2005 21:02:41
To nepopiram, ja jenom vim, ze kdyz se na databazi podivam pres Mysql
Control Center mam tam 'rz' a kdyz se pokusim data z db nacist pomoci
zeosu : data:=ZQuery1['sloupec']; (napr.), vrati mi to '??'
Vubec nevim cim by to mohlo byt...
(jestli to pomuze: db je Mysql 4.1 tabulka je v kodovani latin2, D6, zeos -
ten posledni co byl na sourceforge.net)
>Zeosy neprekladaju kodovanie, proste si DB prekonvertuj do win-1250 s tym
nie su ziadne problemy ani na EN windowsoch.
Zalohovani jen casti databaze
[*] Vlastik Bartos <bartos(zv)spsmvbr(tec)cz> - 8.5.2005 20:32:39
To nevim, ale databazove systemy obvykle pracuji s vice databazemi soucasne,
takze bych dotycnou tabulku presunul do samostatne databaze a je vystarano
:-).
Pro upresneni napis, jaka databaze to je - ja pouzivam jen MS SQL, ale u
jine dtb ti urcite poradi ostatni.
Vlastik
----- Original Message -----
From: "Tomas Bradle" <t.bradle(zv)sanet(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Sunday, May 08, 2005 7:58 PM
Subject: Zalohovani jen casti databaze
> Zdravim vsechny,
>
> poreboval bych zalohovat jen cast databaze (tedy vsechno krome jedne
> konkretni tabulky, ktera obsahuje obrazky) pomoci gbak. Nevi nekdo jak na
to
> jit ?
>
> diky
>
> Tomas Bradle
> t.bradle(zv)sanet(tec)cz
> t.bradle(zv)worldonline(tec)cz
>
>
>
>
>Zakaz spousteni aplikace pres Terminal (vzdalenou
[*] Zalesak Tomas <tomas.zalesak(zv)lcs(tec)cz> - 8.5.2005 20:22:38
> mam takovy problemek a priznam se, ze jsem bezradny.
> Potrebuju zakazat spousteni aplikace pres terminal (vzdalenou
> plochu) ... jde to vubec ?? tusite nekdo jak ??
touto funkci zjistis, jestli aplikace bezi na Terminal Serveru
{ vraci True, kdyz EXE bezi na Terminal Serveru jako Remote Session }
function IsRemoteSession : Boolean;
begin
Result := (SysUtils.Win32Platform=Windows.VER_PLATFORM_WIN32_NT) and
(GetSystemMetrics($1000{=SM_REMOTESESSION})<>0);
end;
Tomas Zalesak
Rychle rozbaleni
[*] Jan Novak <delfin4(zv)volny(tec)cz> - 8.5.2005 20:02:36
> 250 kB rozbaluje asi 3,5 sekundy, WINRAR to zvladne mene nez za
sekundu.
Rozbaleni RARu je k dispozici i ve zdrojacich (www.rarlab.com v casti
Extras). A pro ZIP pouziva taky neco oficialne zverejnene.
Zalohovani jen casti databaze
[*] Tomas Bradle <t.bradle(zv)sanet(tec)cz> - 8.5.2005 19:58:36
Zdravim vsechny,
poreboval bych zalohovat jen cast databaze (tedy vsechno krome jedne
konkretni tabulky, ktera obsahuje obrazky) pomoci gbak. Nevi nekdo jak na to
jit ?
diky
Tomas Bradle
t.bradle(zv)sanet(tec)cz
t.bradle(zv)worldonline(tec)cz
zeos a cestina
[*] Pavol Stugel, NETGraphics <palo(zv)netgraphics.sk> - 8.5.2005 19:56:35
Zeosy neprekladaju kodovanie, proste si DB prekonvertuj do win-1250 s tym
nie su ziadne problemy ani na EN windowsoch.
> narazil jsem na problem s pouzivanim zeosu.
> Potreboval bych nejak nastavit kodovani cestiny, ve kterem potrebuji
> vysledek vraceny databazi.
> Pouzivam to nejak takhle:Zakaz spousteni aplikace pres Terminal (vzdalenou
[*] Jiri Baudys <konference(zv)baudys.name> - 8.5.2005 19:14:32
DD,
mam takovy problemek a priznam se, ze jsem bezradny.
Potrebuju zakazat spousteni aplikace pres terminal (vzdalenou plochu) ...
jde to vubec ?? tusite nekdo jak ??
diky za kazdou radu
zeos a cestina
[*] Webmaster - Kassoft <webmaster(zv)kassoft(tec)cz> - 8.5.2005 17:26:24
Mam tam MySQL 4.1
Nevim jak je to mozne, protoze kdyz jsem zkousel tabulku prevest na kodovani
win1250 (prikaz alter table databaze default character set = cp1250)
tak to delalo presne to same: misto pismen s diakritikou to udelalo '?'
Napadlo me, ze by to mohlo byt kvuli tomu, ze k datum nepristupuji pres db
komponenty (napr dbedit atd...), ale ty se mi moc nechce pouzivat.
Potreboval bych s daty programove pracovat, a pritom je neprohlizet
(nezobrazovat)...
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz] On
Behalf Of Michal S.
Sent: Sunday, May 08, 2005 3:48 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: zeos a cestina
Webmaster - Kassoft napsal(a):
> Dobry den,
> narazil jsem na problem s pouzivanim zeosu.
> Potreboval bych nejak nastavit kodovani cestiny, ve kterem potrebuji
> vysledek vraceny databazi. Pouzivam to nejak takhle:
>
> begin
> if datamodule1.ZConnection1.Connected=false then
> datamodule1.ZConnection1.Connect;
> datamodule1.ZQuery1.SQL.Text:='select sloupec from databaze';
> datamodule1.ZQuery1.ExecSQL; datamodule1.ZQuery1.Active:=true;
> datamodule1.ZQuery1.First;
> while not datamodule1.ZQuery1.Eof do
> begin
> memo1.Lines.Add(datamodule1.ZQuery1['sloupec']);
> datamodule1.ZQuery1.Next;
> end;
> end;
>
> Problem je, ze to zeos vraci v kodovani latin1 (databazi mam v latin2)
> a i kdyz jsem se pokousel funkci synachar.CharsetConversion prevest
> kodovani na cp1250, stejne se mi to nezobrazuje spravne (z latin1 to
> podle me ani nemuze jit prevest...)
>
> Potreboval bych poradit, jak to nastavit, aby mi zeos vysledky vracel
> ve spravnem kodovani...
>
> Nevim jestli jsem to popsal dobre, kazdopadne dekuji za kazdou
> informaci.
>
>
>
>
>
>
Nevim jakou pouzivas db, ale ja mam zeosy na pripojeni k mysql 4 a
cestina je naprosto v poradku. DB je myslim (ale opravdu jen myslim)
nakodovana ve Win1250. Jakou pouzivas db?zeos a cestina
[*] Michal S. <micsdelphi(zv)centrum(tec)cz> - 8.5.2005 15:48:18
Webmaster - Kassoft napsal(a):
> Dobry den,
> narazil jsem na problem s pouzivanim zeosu.
> Potreboval bych nejak nastavit kodovani cestiny, ve kterem potrebuji
> vysledek vraceny databazi.
> Pouzivam to nejak takhle:
>
> begin
> if datamodule1.ZConnection1.Connected=false then
> datamodule1.ZConnection1.Connect;
> datamodule1.ZQuery1.SQL.Text:='select sloupec from databaze';
> datamodule1.ZQuery1.ExecSQL;
> datamodule1.ZQuery1.Active:=true;
> datamodule1.ZQuery1.First;
> while not datamodule1.ZQuery1.Eof do
> begin
> memo1.Lines.Add(datamodule1.ZQuery1['sloupec']);
> datamodule1.ZQuery1.Next;
> end;
> end;
>
> Problem je, ze to zeos vraci v kodovani latin1 (databazi mam v latin2) a i
> kdyz jsem se pokousel funkci synachar.CharsetConversion prevest kodovani na
> cp1250, stejne se mi to nezobrazuje spravne (z latin1 to podle me ani nemuze
> jit prevest...)
>
> Potreboval bych poradit, jak to nastavit, aby mi zeos vysledky vracel ve
> spravnem kodovani...
>
> Nevim jestli jsem to popsal dobre, kazdopadne dekuji za kazdou informaci.
>
>
>
>
>
>
Nevim jakou pouzivas db, ale ja mam zeosy na pripojeni k mysql 4 a
cestina je naprosto v poradku. DB je myslim (ale opravdu jen myslim)
nakodovana ve Win1250. Jakou pouzivas db?Rychle rozbaleni
[*] Karel Pecinka <k.pecinka(zv)seznam(tec)cz> - 8.5.2005 15:04:15
Zdar,
potreboval bych mezi svymi aplikacemi prenaset komprimovana data v
libovolnem formatu, ale bez pouziti externich DLL. Nyni pouzivam
klasicky TCompressStream z Delphi, ten je ale relativne pomaly. Napr. 10
MB textovy soubor spakovany na 250 kB rozbaluje asi 3,5 sekundy, WINRAR
to zvladne mene nez za sekundu. Nevite nekdo o necem, co by mi umoznilo
rychle rozbalit Stream, ale pritom fungovalo bez DLL? Rychlost pakovani
neni dulezita.
Dik Karel, D5
zeos a cestina
[*] Webmaster - Kassoft <webmaster(zv)kassoft(tec)cz> - 8.5.2005 14:36:12
Dobry den,
narazil jsem na problem s pouzivanim zeosu.
Potreboval bych nejak nastavit kodovani cestiny, ve kterem potrebuji
vysledek vraceny databazi.
Pouzivam to nejak takhle:
begin
if datamodule1.ZConnection1.Connected=false then
datamodule1.ZConnection1.Connect;
datamodule1.ZQuery1.SQL.Text:='select sloupec from databaze';
datamodule1.ZQuery1.ExecSQL;
datamodule1.ZQuery1.Active:=true;
datamodule1.ZQuery1.First;
while not datamodule1.ZQuery1.Eof do
begin
memo1.Lines.Add(datamodule1.ZQuery1['sloupec']);
datamodule1.ZQuery1.Next;
end;
end;
Problem je, ze to zeos vraci v kodovani latin1 (databazi mam v latin2) a i
kdyz jsem se pokousel funkci synachar.CharsetConversion prevest kodovani na
cp1250, stejne se mi to nezobrazuje spravne (z latin1 to podle me ani nemuze
jit prevest...)
Potreboval bych poradit, jak to nastavit, aby mi zeos vysledky vracel ve
spravnem kodovani...
Nevim jestli jsem to popsal dobre, kazdopadne dekuji za kazdou informaci.OT: Licence Delphi 5 nebo 7
[*] Milos Sontak <delphi(zv)sonsoft(tec)net> - 8.5.2005 10:35:56
zdravim,
nemate nekdo licence na D5 nebo 7, ktere by jste chteli prodat?
Diky
Milos S.
nacteni html kodu do mema
[*] Vlastimil Burian <vlastax.b(zv)seznam(tec)cz> - 8.5.2005 09:49:53
nedari se mi dostat z TWebBrowser html kod ... prosim o pomoc
Delphi 2005 Compiler, Language, and Debugger Enhan
[*] Petr Vones <konference(zv)petrvones(tec)net> - 7.5.2005 11:18:20
Borland Delphi 2005 Compiler, Language, and Debugger Enhancements
http://bdn.borland.com/article/0,1410,33050,00.html
Petr Vones
synapse (- sock.recvstring)
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 6.5.2005 18:47:01
> jeste jedna takova mala otazecka videl jsem synasnap z 12 brezna a je tam
> docela hodne zmen. KDy bude ostra verze ?
Ten synasnap je jen prvni z planovane rady Synasnapu. V jadru Synapse se
odehravaji dramaticke zmeny ohledne SSL podpory, a jeste je potreba mnoho
kolem dodelat. V brzke dobe je planovan druhy synasnap, ale rozhodne
nebude posledni.
Kazdopadne pohled na soucasny Synasnap doporucuji hlavne tem, kteri
netrpelive cekaji na nejakou free podporu SSHv2 protokolu. ;-)
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
WEB: http://www.ararat(tec)cz/synapse - Synapse Delphi and Kylix TCP/IP
Library
synapse - sock.recvstring
[*] david.kopecek(zv)hacktrack(tec)com - 6.5.2005 17:16:55
Zdravim
>> pomoci TTCPBlockSocket prijimam data od klienta
>>
>> ale jak osetrim to ze mi behem cConnectionTimeout nedojdou zadna data
>> ?
>> protoze jakmile skonci dany timeout funkce navrati prazdny string a
>> ten se presune k dalsimu zpracovani coz je spatne .
LG> Testuj Lasterror:
>> while not terminated do
>> begin
>> reply:=Sock.RecvString(cConnectionTimeout);
LG> if Sock.lasterror = 0 then
LG> begin
>>
>> stemp:=reply;
>>
>> cmd:=Fetch(stemp,' ');
>> par:=stemp;
>>
>> ProcessCmd(cmd,par,reply);
LG> end;
>> end;
Funguje
o dekuji ti nejvyssi ...
jeste jedna takova mala otazecka videl jsem synasnap z 12 brezna a je
tam docela hodne zmen. KDy bude ostra verze ?
THX
Dvadi...
synapse - sock.recvstring
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 6.5.2005 15:44:49
> pomoci TTCPBlockSocket prijimam data od klienta
>
> ale jak osetrim to ze mi behem cConnectionTimeout nedojdou zadna data
> ?
> protoze jakmile skonci dany timeout funkce navrati prazdny string a
> ten se presune k dalsimu zpracovani coz je spatne .
Testuj Lasterror:
> while not terminated do
> begin
> reply:=Sock.RecvString(cConnectionTimeout);
if Sock.lasterror = 0 then
begin
>
> stemp:=reply;
>
> cmd:=Fetch(stemp,' ');
> par:=stemp;
>
> ProcessCmd(cmd,par,reply);
end;
> end;
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.synapse - sock.recvstring
[*] david.kopecek(zv)hacktrack(tec)com - 6.5.2005 15:38:48
Zdravim konferenci
chte bych se zeptat na jednu vec ohledne Synasock
pomoci TTCPBlockSocket prijimam data od klienta
ale jak osetrim to ze mi behem cConnectionTimeout nedojdou zadna data
?
protoze jakmile skonci dany timeout funkce navrati prazdny string a
ten se presune k dalsimu zpracovani coz je spatne .
nevite nekdo jak na to ? while not terminated do
begin
reply:=Sock.RecvString(cConnectionTimeout);
stemp:=reply;
cmd:=Fetch(stemp,' ');
par:=stemp;
ProcessCmd(cmd,par,reply);
end;
pdf a OleContainer
[*] radek3311(zv)volny(tec)cz - 6.5.2005 14:16:42
Ahoj,
ukladam do OleContaineru ruzne pdf dokumenty a zobrazuji je
takhle:
if not (OleContainer1.State in [osEmpty]) then
begin
OleContainer1.DoVerb(ovShow);
end;
problem je ze nekdy se pdf v Acrobat Readeru zobrazi a nekdy se ani
Acrobat nespusti - uz jsem s toho docela zoufalej, pritom s jinyma
souborama to funguje dobre. Je to nejaky problem v Acrobatu ?
Potreboval bych to nejak vyresit. V podstate me jde o nejakou
univerzalni metodu jak do databaze nastrkat ruzne dokumenty -
vsechno celkem funguje az na to pdf. Nevite nekdo kde by mohl byt
problem ? Proc to obcas funguje a obcas ne ?
Radek
--
Ochrana proti presmerovani na drahe linky. Jiz zadne vysoke ucty!
VOLNY internet alarm - jeste bezpecnejsi surfovani!
Stazeni i pouzivani je ZDARMA na http://alarm.volny(tec)cz
Cestina MSSQL-MYSQL
[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 6.5.2005 14:10:36
Venca Zaruba wrote (on Friday, May 06, 2005 1:49 PM):
> Zdravim,
> Potreboval bych helfnout. Prenasim data (1 x 24hodin) z MSSQL na www s
> MYSQL (Linux). V app je vidim ok na obou serverech pres ODBC pokud nic
> nikde nenastavuuji, ale z app v PHP mam cinstinu. Data bych rad prenasel
> pomoci BatchMove, ale nebranim se jinemu elagantnejsimu reseni. Zkousel
> jsem ruzne nastaveni langdriveru, ale mam z toho uz zamotanou hlavu.
> Kodovani by melo byt v 1250, ale .... Nad daty jsem (alespon vedome)
> nedelal zadnou konverzi.
Myslim, ze toto pomuze: http://manual.pipni(tec)cz/read.php?id=73
Omlouvam se adminovi, neni to reklama.
--
Jiri Cincura
http://www.cincura.net/
http://ID3renamer.cincura.net/
ICQ: 314711544; Yahoo!: x2develop
http://photo.cincura.net/
http://phorum.cincura.net/
http://x2develop.com/Cestina MSSQL-MYSQL
[*] Venca Zaruba <zaruba(zv)elastoform(tec)cz> - 6.5.2005 13:48:34
Zdravim,
Potreboval bych helfnout. Prenasim data (1 x 24hodin) z MSSQL na www s MYSQL (Linux). V app je vidim ok na obou serverech pres ODBC pokud nic nikde nenastavuuji, ale z app v PHP mam cinstinu. Data bych rad prenasel pomoci BatchMove, ale nebranim se jinemu elagantnejsimu reseni. Zkousel jsem ruzne nastaveni langdriveru, ale mam z toho uz zamotanou hlavu. Kodovani by melo byt v 1250, ale .... Nad daty jsem (alespon vedome) nedelal zadnou konverzi.
Prijemny zbytek dne
Vasek Zaruba
8^)
Odeslani emailu v plain text a html zaroven pomoci
[*] Michal S. <micsdelphi(zv)centrum(tec)cz> - 6.5.2005 12:52:30
Lukas Gebauer napsal(a):
>>mam takovy problem. Potreboval bych odeslat email pomoci synapse v html
>>i plain text formatu. Pomoci Indy to jde, ale blbne cestina. Proto se to
>>snazim predelat do Synapse. Ale nemuzu prijit jak to poslat v obou
>>formatech zaroven. A nechci aby jedno nebo druhe byla priloha.
>
>
> Vzdyt jsem vcera presne na tohle sem posilal priklad! :-O
>
> Jen si musis ty sam pripravit dve verze textu... v HTML a v
> plaintextu.
>
>
Ja jsem se do diskuse prihlasil zrovna dnes. Mohl bys mi to prosim
poslat jeste jednou? Diky moc.string to dword
[*] RNDr. Milan Vorisek <vorisek(zv)igtt(tec)cz> - 6.5.2005 12:30:29
> take nefunguje, zadam-li do const cislo vetsi nez +int,
> s pozdravem Votava
> >>>>nemohu nikde najit, jak mam prevest string zadany napr. v editu do
> >>>>promenne typu dword, poradite?
> >>>>S pozdravem Votava
dw:=dword(strtoint64('4000000000'));
Odeslani emailu v plain text a html zaroven pomoci
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 6.5.2005 11:40:25
> mam takovy problem. Potreboval bych odeslat email pomoci synapse v html
> i plain text formatu. Pomoci Indy to jde, ale blbne cestina. Proto se to
> snazim predelat do Synapse. Ale nemuzu prijit jak to poslat v obou
> formatech zaroven. A nechci aby jedno nebo druhe byla priloha.
Vzdyt jsem vcera presne na tohle sem posilal priklad! :-O
Jen si musis ty sam pripravit dve verze textu... v HTML a v
plaintextu.
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.Odeslani emailu v plain text a html zaroven pomoci
[*] Michal S. <micsdelphi(zv)centrum(tec)cz> - 6.5.2005 11:34:24
Ahoj,
mam takovy problem. Potreboval bych odeslat email pomoci synapse v html
i plain text formatu. Pomoci Indy to jde, ale blbne cestina. Proto se to
snazim predelat do Synapse. Ale nemuzu prijit jak to poslat v obou
formatech zaroven. A nechci aby jedno nebo druhe byla priloha.
Diky moc za pomoc
string to dword
[*] votavaSW <mail(zv)votavasw(tec)com> - 6.5.2005 11:22:23
take nefunguje, zadam-li do const cislo vetsi nez +int,
s pozdravem Votava
Malecek Ondrej napsal(a):
> Function StrToDWORD( const strExtData : string) : DWORD;
> var intError: integer;
> begin
> Val( strExtData, Result, intError);
> if intError <> 0 then Raise Exception.Create( 'Chyba pri konverzi retezce:
> ''' + strExtData + ''' nelze zkonvertovat do typu DWORD.');;
> end;
>
>
>
>>-----Puvodni zprava-----
>>
>>>>dobry den,
>>>>nemohu nikde najit, jak mam prevest string zadany napr. v editu do
>>>>promenne typu dword, poradite?
>>>>S pozdravem Votava
>
>
>
>
>
>
> .
>
Mysql 5
[*] Webmaster - Kassoft <webmaster(zv)kassoft(tec)cz> - 6.5.2005 11:00:22
Zdravim,
Chtel bych se zeptat, jestli se nekdo z vas pripojuje z Delphi k MySQL 5 a
pres co? Pouzival jsem Simple Mysql k pripojeni na databazi MySQL 4.1 ale s
verzi 5 to uz nejak nefunguje...
Dekuji
string to dword
[*] Malecek Ondrej <ondrej.malecek(zv)radom-cz(tec)cz> - 6.5.2005 07:01:50
Function StrToDWORD( const strExtData : string) : DWORD;
var intError: integer;
begin
Val( strExtData, Result, intError);
if intError <> 0 then Raise Exception.Create( 'Chyba pri konverzi retezce:
''' + strExtData + ''' nelze zkonvertovat do typu DWORD.');;
end;> -----Puvodni zprava-----
> >>dobry den,
> >>nemohu nikde najit, jak mam prevest string zadany napr. v editu do
> >>promenne typu dword, poradite?
> >>S pozdravem Votava
string to dword
[*] votavaSW <mail(zv)votavasw(tec)com> - 5.5.2005 23:35:19
ja ovsem takto potrebuji prevest typ longword
Jakub Cermak napsal(a):
> funkce StrToInt(retezec):integer
>
> S pozdravem
>
> Jakub Cermak
> ICQ 159971304
> http://cermi.wz(tec)cz
>
>
>
> votavaSW napsal(a):
>
>
>>dobry den,
>>nemohu nikde najit, jak mam prevest string zadany napr. v editu do
>>promenne typu dword, poradite?
>>S pozdravem Votava
>>
>>
>>
>>
>>
>>
>
>
>
>
> .
>
string to dword
[*] Jakub Cermak <cermiforum(zv)centrum(tec)cz> - 5.5.2005 23:19:18
funkce StrToInt(retezec):integer
S pozdravem
Jakub Cermak
ICQ 159971304
http://cermi.wz(tec)cz
votavaSW napsal(a):
>dobry den,
>nemohu nikde najit, jak mam prevest string zadany napr. v editu do
>promenne typu dword, poradite?
>S pozdravem Votava
>
>
>
>
>
string to dword
[*] votavaSW <mail(zv)votavasw(tec)com> - 5.5.2005 23:07:17
dobry den,
nemohu nikde najit, jak mam prevest string zadany napr. v editu do
promenne typu dword, poradite?
S pozdravem Votava
TAPI - APRO - prichozi hovor
[*] Liska David <david.liska(zv)aac-czech(tec)cz> - 5.5.2005 19:03:00
> From: "Liska David" <david.liska(zv)aac-czech(tec)cz>
> > nejak se mi s komponentami "TurboPower Async Professional" nedari
> > reagovat na prichozi hovor od ustredny podporujici TAPI.
>
> Jinak doporucuji si stahnout od Microsoftu TAPI Browser a v
> nem si nasimulovat vsechna volani s potrebnymi parametry.
>
> Petr Vones
>
Takze po pochopeni ovladani TAPI Browseru jsem zjistil, ze aby TAPI reagovalo na prichozi udalosti, musi byt linka otevrena s parametrem Privleges = LINECALLPRIVILEGE_MONITOR.
Staci tedy upravit metodu TApdCustomTapiDevice.SetOpen
misto kodu
procedure TApdCustomTapiDevice.SetOpen(NewOpen : Boolean);
{-Open or close the selected TAPI line device}
const
CallPrivilege : array[Boolean] of LongInt =
(LINECALLPRIVILEGE_OWNER, LINECALLPRIVILEGE_NONE);
dat
procedure TApdCustomTapiDevice.SetOpen(NewOpen : Boolean);
{-Open or close the selected TAPI line device}
const
CallPrivilege : array[Boolean] of LongInt =
(LINECALLPRIVILEGE_MONITOR, LINECALLPRIVILEGE_NONE);
Po teto uprave jiz TApdTapiDevice reaguje na prichozi hovory a jine stavy prichazejici z ustredny.
Diky za nakopnuti spravnym smerem.
David
Pripojeni pres mobil a AT prikazy
[*] Malecek Ondrej <ondrej.malecek(zv)radom-cz(tec)cz> - 5.5.2005 16:28:42
TMagRas neznam, obecne lze pri navazanem datovem spojeni na modemu prejit do
command modu odeslani sekvence +++ . Pak lze zadavat AT prikazy a nasledne
prejit zpet do on-line pomoci ATO. Nevim ale o komponentach (to muze byt
moje neznalost), ktere by to podporovaly.
O :-)
> -----Puvodni zprava-----
> mamm program, ktery umoznuje pripojeni se k internetu pres GPRS a
> taky posilat AT prikazy do modemu(mobilu).ktery je na com1. Pro
> pripojeni pouzivam komponentu MagRasCon z knihovny TMagRas. Pro
> posilani AT prikazu pouzivam komponentu xmodem z knihovny xcomm.
> Problem je v tom, ze kdyz se pripojim k siti, tak se uz nedostanu
> k portu com1 protoze je obsazeny a nemuzu teda zadavat AT
> prikazy. Nevite nekdo jak by se dalo vyrest to abych mohl byt
> pripojeny k internetu a zaroven posilat do modemu AT prikazy?
autentifikace k MySQL
[*] Tomas Bradle <t.bradle(zv)sanet(tec)cz> - 5.5.2005 15:52:39
Takze bych to uzavrel... Upgradoval jsem ZEOS komponenty (v 6.5.1), ty uz
podporuji i server MySQL v 4.1.x. Takze pokud se da protocol:=mysql tak si
zvoli automaticky knihovnu podle verze serveru. Takze vyreseno. Diky za
namety.
Tomas Bradle
t.bradle(zv)sanet(tec)cz
t.bradle(zv)worldonline(tec)cz
----- Original Message -----
From: "Vaclav Halik" <spravasd(zv)suz.cvut(tec)cz>> Ostatne bez upgradu ZEOS muzes na nejake pripojovani
> na 4.1 Server zapomenout. Problem je v tom ze
> vyvojari MySQL zmenili dost veci, takze ti pak nefunguje
> spravne ani MySQL Control Center, i kdyz se tvari ze je
> vse OK. Navic nektere funkce v mysqllib.dll vraci jine
> poradi vysledku a maji jine parametry.
>
> Vaclav Halik
>
Pripojeni pres mobil a AT prikazy
[*] delphin(zv)post(tec)cz - 5.5.2005 15:18:36
>> Nevite nekdo jak by se dalo vyrest
>> to abych mohl byt pripojeny k internetu a zaroven posilat do
>> modemu AT prikazy?
>
> Pokud vim tak nelze protoze pri datovem spojeni se vse povazuje za data
> tak se vse posle. Ukonceni spojeni je
> prostym zavesenim (kdyz nebudu brat v uvahu nejaka zakoncovaci data) .
"Normalni" telefon to neumi, ale lze pouzit "lepsi" telefon s Javou a uvnitr
telefonu z Javy jde posilat AT prikazy i pri datovem/GPRS spojeni. Pripojeni pres mobil a AT prikazy
[*] Kratochvil Milan <mkratochvil(zv)farmtec(tec)cz> - 5.5.2005 14:46:33
> Nevite nekdo jak by se dalo vyrest
> to abych mohl byt pripojeny k internetu a zaroven posilat do
> modemu AT prikazy?
Pokud vim tak nelze protoze pri datovem spojeni se vse povazuje za data tak se vse posle. Ukonceni spojeni je prostym zavesenim (kdyz nebudu brat v uvahu nejaka zakoncovaci data) .
Milan
odeslani mailu Content-type: multipart
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 5.5.2005 14:36:32
> Dekuji, myslim, ze mi to hodne pomohlo.
> Ted uz jenom prijit na to, jak se pracuje s temi mimemess a mimepart... :-)
To pochopis rychle, snad ti pomuze nasledujici prikladek.
Predpoklada se, ze plaintext i HTML data jsou ve windows-1250
kodovani (v tom kodovani, v jakem mas system). O veskere prekodovani
a zakodovani se postara Synapse, ty jen predavas data v tom kodovani,
v jakem ti jede operacni system. (tedy pravdepodobne Windows-1250).
Synapse sama zakoduje text dopisu, subject, i popisku u e-mailovych
adres.
procedure TForm1.Button13Click(Sender: TObject);
var
m:TMimemess;
l:tstringlist;
p: TMimepart;
begin
m:=TMimemess.create;
l:=tstringlist.create;
try
//zaciname s prazdnem...
p := m.AddPartMultipart('alternative', nil);
//mame multipart a do nej davame jednotlive casti...
l.loadfromfile('c:\x.txt');
//proste v l stringlistu mas ten plaintext... mohl bys pochopitelne
pouzit primo AddPartTextFromFile...
m.AddPartText(l,p);
//tim jsme pridali cast s plaintextem do multipartu
//pridame dalsi cast s HTML...
m.AddPartHTMLFromFile('c:\x.html',p);
//...opet, pokus mas HTML ve stringlistu, muzes pouzit primo
AddPartHTML
//nastavime hlavicky e-mailu...
m.header.from:='"Lukas Gebauer" <gebauer(zv)x(tec)cz>';
m.header.tolist.add('kdosi(zv)kdesi(tec)cz');
m.header.tolist.add('kdosidalsi(zv)kdesi(tec)cz');
m.header.subject:='test message';
//nechame zchroupat do MIME formatu...
m.EncodeMessage;
//a zde je vysedek...
memo1.lines.assign(m.lines);
finally
m.free;
l.free;
end;
end;
Ze to neni slozite? ;-)
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.Pripojeni pres mobil a AT prikazy
[*] Roman Polansky <rpoli(zv)email(tec)cz> - 5.5.2005 14:20:31
Zdravim,
mamm program, ktery umoznuje pripojeni se k internetu pres GPRS a taky posilat AT prikazy do modemu(mobilu).ktery je na com1. Pro pripojeni pouzivam komponentu MagRasCon z knihovny TMagRas. Pro posilani AT prikazu pouzivam komponentu xmodem z knihovny xcomm. Problem je v tom, ze kdyz se pripojim k siti, tak se uz nedostanu k portu com1 protoze je obsazeny a nemuzu teda zadavat AT prikazy. Nevite nekdo jak by se dalo vyrest to abych mohl byt pripojeny k internetu a zaroven posilat do modemu AT prikazy?
Diky.
Roman Polansky
E-mail a cestina
[*] Karel Kral <kralkonf(zv)purusmeda(tec)cz> - 5.5.2005 13:44:26
Moje zkusenosti (s Indy 9) jsou nedobre. Nakonec jsem skoncil tim, ze
jsem posilal zpravy ASCII a po roce presel na Synapsi. V Indy si totiz
musis zakodovat zpravy do prislusneho kodovani sam (tzn. prevest to do
Quoted-printable atd).
Jedina berlicka, kterou jsem nasel, bylo tam dat text ve Win1250 a
nastavit prislusne kodovani. Ale ve chvili, kdy pripojis prilohu, ti
Indy zmeni ContentTransferEncoding na '7bit' a jsi zase v pr...
Zde je priklad ale doporucuji zkusit Synapsi.// vytvoreni hlaseni. Z udaju ScheduleItem a Recpt sestavi hlaseni Msg
procedure TMailer.CreateMailMessage(Recpt: TContactItem; Msg:
TIdMessage; MsgText: string);
begin
Msg.Clear;
with Msg, Recpt do
begin
ContentType:= 'text/plain';
CharSet := 'windows-1250';
ContentTransferEncoding:= '8bit';
Recipients.EMailAddresses:= EMail;
Subject:= StrWinEEToAscii(ClearMsg(ScheduleItem.ShortMsgText));
Body.Add(MsgText);
.....
end; // with
Petr Gregor napsal(a):
>
>
>
>>>Muzete mi poradit, co zmenit aby prochazely korektne i ceske hacky a
>>>carky v textu zpravy a v jejim predmete?
>>
>>Podivej se jestli mas spravne kodovani a jestli mas spravne
>>nastaveno quoted-printable
>
>
> Muzete mi poradit, kde se to nastavuje?
>
> Petr Gregor
>
>
>
>
>
>
>
>
>
--
______________________________________________________
Karel Kral, reditel IT / IT manager
PURUS-MEDA, s.r.o., Palackeho 174, 621 00 Brno, CZ
E-Mail: kral(zv)purusmeda(tec)cz
______________________________________________________
E-mail a cestina
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 5.5.2005 13:08:23
> Pouzivam komponentu TIdSMTP k odeslani e-mailu.
> Vse mi funguje OK, ale v predmetu a v tele zpravy se mi
> po prijmu zpravy znaky s diakritikou objevuji nespravne.
>
> Muzete mi poradit, co zmenit aby prochazely korektne i
> ceske hacky a carky v textu zpravy a v jejim predmete?
Asi se budu dneska uz opakovat, ale abys mel v mailu spravne cestinu,
musis spravne vygenerovat MIME mail. ;-)
Telo dopisu by spravne melo byt kodovane v Quoted-printable kodu (ale
jde pouzit i base64, ackoliv neni pro cesky text vyhody), a znaky by
mely byt v kodovani ISO-8859-2. Rozmaha se i pouzivani UTF-8 kodu,
ale jeste existuje hodne postovnich klientu, kteri tento kod neumi!
(Pouzivani Windows-1250 v e-mailech je spatne, nema to oporu v RFC
dokumentech. Protoze toto kodovani s oblibou pouzival MS outlook, tak
se toto kodovani sice mnoho jinych postovnich kleintu naucilo
pouzivat, ale to nemeni nic na tom, ze se NEMA v mailech pouzivat.)
Pochopitelne v pripade Indy musis ten text do patricneho kodovani
prevest vlastnimi silami a pak musis indy rict, v jakem kodovani
predavas data, aby indy mohlo sravne vygenerovat hlavicky. Doufam, ze
se v poslednich verzich v tomto smeru v indy neco nezmenilo, kdyztak
mne opravte!
Jak konkretne donutit Indy aby vyrodukovalo vysledek odpovidajici
vyse uvedenemuzadani, to ti fakt neporadim.
Kdybys misto Indy pouzil Synapsi, tak by ses o tohle nemusel vubec
starat, protoze Synapse dokaze nejen sama poznat jake kodovani se ma
spravne pouzit, ale take ti tu cestinu i sama prekoduje. ;-)
Jinak poznamka... velmi casta chyba mnoha programu odesilajicich
maily je v tom, ze sice hezky nastavi jaky pouzivaji charset, ale uz
zapomenou na hlavicku, ktera rika jake je pouzite kodovani. Casto
pouzivaji '8-bit', ale neuvedou patricnou hlavicku.. coz spravne
napsane klienty zmate, protoze dle MIME RFC pokud tam ta hlavicka
neni, bere se jako default 7-bit! Tuto chybu pozoruji casto u ruznych
freemailu a automatu, napriklad i u NIC.CZ! :-(
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.odeslani mailu Content-type: multipart
[*] Webmaster - Kassoft <webmaster(zv)kassoft(tec)cz> - 5.5.2005 13:08:23
Dekuji, myslim, ze mi to hodne pomohlo.
Ted uz jenom prijit na to, jak se pracuje s temi mimemess a mimepart... :-)
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz] On
Behalf Of Lukas Gebauer
Sent: Thursday, May 05, 2005 11:58 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: odeslani mailu Content-type: multipart
> snazim se poslat e-mail pomoci komponenty nmsmtp.
> Samotne odeslani mi funguje - odeslu e-mail ve formatu html, ale
> potreboval bych k tomu nejak jeste pridat plain text verzi, aby se to
> v pripade, ze postovni klient neumi html, zobrazilo spravne (t.j. bez
> tagu). Hledal jsem v archivu a nasel jsem tam nekolikrat zminku prave
> o multipart, ale nenasel jsem nejaky konkr. priklad. Nevite nekdo kde
> bych se o tom mohl neco dozvedet? V napovede komponenty jsem nasel
> nejakou vlastnost FinalHeader, ale nevim jak to pouzit...
No, predne nejde je o nastaveni content-typu, ale jde hlavne o to,
abys vygeneroval korekni MIME dopis!
Kazda cast MIME dopisu musi byt spravne zakodovana. Musis osetrit
osmibitove znaky, nastavit patricne hlavicky, vcetne pouzite znakove
sady (znakova sada Windows-1250 opravdu neni spravna znakova sada pro
pouziti v e-mailu!), atd. To musis provest jak pro HTML cast, tak i
pro plaintext cast.
Pak musis vyrobit onen multipart (ve tvem pripade s MIME typem
'multipart/mixed'), nastavit spravne boundary, a spravne do nej
vlozit obe casti dopisu. Vysledkem je teprve text dopisu vcetne
hlavicek, ktery se odesila.
Obavam se, ze toto vsechno NmSMTP opravdu umet nebude...
Jsi z toho jelen? Nezoufej! ;-) O tohle vsechno se umi postarat
napriklad Synapse, konkretne unity mimepart a mimemess.
Jsou to unity ktere jsou zcela nezavisle na nejakych TCP/IP sluzbach!
Vystup je prosty stringlist, ktery obsahuje prave zakodovany text
mailu vcetne vsech potrebnych hlavicek. A jestli ten vysledny text
ulozis na disk jako EML, posles pres SMTP protokol pomoci Synapse ci
pomoci cehokoliv jineho, to je uz uplne jedno.
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.E-mail a cestina
[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 5.5.2005 13:02:22
Petr Gregor wrote (on Thursday, May 05, 2005 12:28 PM):
>>> Muzete mi poradit, co zmenit aby prochazely korektne i ceske hacky a
>>> carky v textu zpravy a v jejim predmete?
>>
>> Podivej se jestli mas spravne kodovani a jestli mas spravne nastaveno
>> quoted-printable
>
> Muzete mi poradit, kde se to nastavuje?
Neznam presne Indy, ale bud na to je property enbo to musis zadat primo do
hlavicek (a podle toho take korektne upravit text).
Mel bys tam mit neco jako treba tohle (mimo jineho):
Content-Transfer-Encoding: quoted-printable
Content-Type: text/plain;
charset="iso-8859-2"
--
Jiri Cincura
http://www.cincura.net/
http://ID3renamer.cincura.net/
ICQ: 314711544; Yahoo!: x2develop
http://photo.cincura.net/
http://phorum.cincura.net/
http://x2develop.com/E-mail a cestina
[*] Petr Gregor <pgregor(zv)orsia(tec)cz> - 5.5.2005 12:28:20
> > Muzete mi poradit, co zmenit aby prochazely korektne i ceske hacky a
> > carky v textu zpravy a v jejim predmete?
>
> Podivej se jestli mas spravne kodovani a jestli mas spravne
> nastaveno quoted-printable
Muzete mi poradit, kde se to nastavuje?
Petr Gregor
TAPI - APRO - prichozi hovor
[*] Petr Vones <konference(zv)petrvones(tec)net> - 5.5.2005 11:58:17
From: "Liska David" <david.liska(zv)aac-czech(tec)cz>
> nejak se mi s komponentami "TurboPower Async Professional" nedari reagovat
> na prichozi hovor od ustredny podporujici TAPI.
Nemuze by problem v tomto ?
http://sourceforge.net/tracker/index.php?func=detail&aid=760635&group_id=71007&atid=529802
Jinak doporucuji si stahnout od Microsoftu TAPI Browser a v nem si nasimulovat
vsechna volani s potrebnymi parametry.
Petr Vones
odeslani mailu Content-type: multipart
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 5.5.2005 11:58:17
> snazim se poslat e-mail pomoci komponenty nmsmtp.
> Samotne odeslani mi funguje - odeslu e-mail ve formatu html, ale potreboval
> bych k tomu nejak jeste pridat plain text verzi, aby se to v pripade, ze
> postovni klient neumi html, zobrazilo spravne (t.j. bez tagu).
> Hledal jsem v archivu a nasel jsem tam nekolikrat zminku prave o multipart,
> ale nenasel jsem nejaky konkr. priklad.
> Nevite nekdo kde bych se o tom mohl neco dozvedet?
> V napovede komponenty jsem nasel nejakou vlastnost FinalHeader, ale nevim
> jak to pouzit...
No, predne nejde je o nastaveni content-typu, ale jde hlavne o to,
abys vygeneroval korekni MIME dopis!
Kazda cast MIME dopisu musi byt spravne zakodovana. Musis osetrit
osmibitove znaky, nastavit patricne hlavicky, vcetne pouzite znakove
sady (znakova sada Windows-1250 opravdu neni spravna znakova sada pro
pouziti v e-mailu!), atd. To musis provest jak pro HTML cast, tak i
pro plaintext cast.
Pak musis vyrobit onen multipart (ve tvem pripade s MIME typem
'multipart/mixed'), nastavit spravne boundary, a spravne do nej
vlozit obe casti dopisu. Vysledkem je teprve text dopisu vcetne
hlavicek, ktery se odesila.
Obavam se, ze toto vsechno NmSMTP opravdu umet nebude...
Jsi z toho jelen? Nezoufej! ;-) O tohle vsechno se umi postarat
napriklad Synapse, konkretne unity mimepart a mimemess.
Jsou to unity ktere jsou zcela nezavisle na nejakych TCP/IP sluzbach!
Vystup je prosty stringlist, ktery obsahuje prave zakodovany text
mailu vcetne vsech potrebnych hlavicek. A jestli ten vysledny text
ulozis na disk jako EML, posles pres SMTP protokol pomoci Synapse ci
pomoci cehokoliv jineho, to je uz uplne jedno.
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.E-mail a cestina
[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 5.5.2005 12:14:19
Petr Gregor wrote (on Thursday, May 05, 2005 12:04 PM):
> Muzete mi poradit, co zmenit aby prochazely korektne i ceske hacky a
> carky v textu zpravy a v jejim predmete?
Podivej se jestli mas spravne kodovani a jestli mas spravne nastaveno
quoted-printable
--
Jiri Cincura
http://www.cincura.net/
http://ID3renamer.cincura.net/
ICQ: 314711544; Yahoo!: x2develop
http://photo.cincura.net/
http://phorum.cincura.net/
http://x2develop.com/prechod na .NET
[*] Zbysek Hlinka <konference(zv)hlinka(tec)cz> - 5.5.2005 11:36:15
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Rosta
> Sent: Thursday, May 05, 2005 11:04 AM
>
> Neda me to, abych si nerypnul ... neni to poprve, co tu
> Zbysek nebo Honza Sebelik propaguji haes ... je to reklama,
> coz je v podstate kazdy odkaz nekam na www, jenomze tohle je
> jejich reklama, oba z toho maji penize ...
Ano, je to reklama... Ale domnivam se, ze zcela koser, protoze dotaz znel ve
smyslu, "kde se mohu naucit...".
Podobne, kdyz nekdo hleda nejake reseni, a ja ho mam, take ho mohu
nabidnout. Typicky se tu takto resily databaze (FlashFiler), Lokalizator,
tiskove sestavy a dalsi veci.
> PS: Pokud tomu nekdo nerozumi, mozna by bylo vhodne prolozit
> to nejakou placenou konzultaci, objednavky na mem mailu. :)
Bude-li to k veci a nebude-li to jedina informace ve zprave (tedy kdyz mail
neni ciste reklamni), proc nakonec ne? Konfera by mela slouzit nejen k
ziskani informaci jak si neco udelat sam, ale take jak si usetrit praci tim,
ze nekde koupim uz hotove reseni, ktere je proverene a dobre.
S pozdravem
Zbysek Hlinka
E-mail: hlinka zavin. hlinka(tec)cz
E-mail a cestina
[*] Petr Gregor <pgregor(zv)orsia(tec)cz> - 5.5.2005 12:04:18
Dobry den,
Pouzivam komponentu TIdSMTP k odeslani e-mailu.
Vse mi funguje OK, ale v predmetu a v tele zpravy se mi
po prijmu zpravy znaky s diakritikou objevuji nespravne.
Muzete mi poradit, co zmenit aby prochazely korektne i
ceske hacky a carky v textu zpravy a v jejim predmete?
Dekuji za pomoc.
Petr Gregor
ADMIN: prechod na .NET
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 5.5.2005 11:36:14
Puvodni zprava ze dne 5.5.2005:
> Neda me to, abych si nerypnul ... neni to poprve, co tu Zbysek nebo
> Honza Sebelik propaguji haes ... je to reklama, coz je v podstate
> kazdy odkaz nekam na www, jenomze tohle je jejich reklama, oba z
> toho maji penize ... nemyslim, ze je to v poradku :( Pisu to s
> vedomim, ze to tady asi pekne schytam, znam popularitu Lazni v
> komunite teto konfery, taky jsem tam byl, taky jsem byl spokojeny,
> jenomze stejne ... je to reklama. Vzhledem k povestne adminove
> pedantnosti nad chovanim se v konferenci me prekvapuje jeho
> tolerance:). Zrejmne se nemeri stejnym metrem ....
Za prve - tento prispevek tu nema co delat, je v rozporu s pravidly,
takze toto ber jako napomenuti. Tohle mas posilat me a ne sem do
konference. A nema to vubec nic spolecneho s tim, proti cemu nebo
proti komu se ohrazujes.
Za druhe - plne s tebou souhlasim a vyprosuji si hlasky, ze to
toleruju. Ja to netoleruju a Honza Sebelik ode me dostal jiz spousty
mailu, kde mu pisu, ze si ucastnici stezuji na jeho reklamy, a ze si
nepreju, aby to sem posilal. Ze ty maily nejsou videt, protoze je
posilam primo a ne do konference, to je snad logicke. Zeptej se ho na
to (ne pres konferenci).
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================
odeslani mailu Content-type: multipart
[*] Webmaster - Kassoft <webmaster(zv)kassoft(tec)cz> - 5.5.2005 11:34:12
Dobry den,
snazim se poslat e-mail pomoci komponenty nmsmtp.
Samotne odeslani mi funguje - odeslu e-mail ve formatu html, ale potreboval
bych k tomu nejak jeste pridat plain text verzi, aby se to v pripade, ze
postovni klient neumi html, zobrazilo spravne (t.j. bez tagu).
Hledal jsem v archivu a nasel jsem tam nekolikrat zminku prave o multipart,
ale nenasel jsem nejaky konkr. priklad.
Nevite nekdo kde bych se o tom mohl neco dozvedet?
V napovede komponenty jsem nasel nejakou vlastnost FinalHeader, ale nevim
jak to pouzit...
Za kazdou radu predem dekuji...
prechod na .NET
[*] Petr Vones <konference(zv)petrvones(tec)net> - 5.5.2005 11:22:11
From: "Ing. Petr Sikola" <developer(zv)efg(tec)cz>
> Planujeme psat DB (MS SQL, ORACLE) aplikaci pristupnou pres www rozhrani +
> jednu app, ktera by bezela jako sluzba (sitova komunikace).
>
> Staci na .NET www aplikace ADO.NET?
Jiste.
> Muzete prosim doporucit nejakou literaturu, examples, vyvojove prostredi,
> jazyk...
Jazyk C# a vyvojove prostredi Visual Studio. Ono se tedy i Delphi 2005 IDE da
pouzit pro vyvoj v C#, ale proc to delat slozite a prijit o debugger ...
> Dosavadni zkusenosti s .NET aplikacemi (webovymi) nemame moc dobre, co jsme
> videli bylo strasne pomale - jsou tyto aplikace spatne navrzeny nebo je to
> vlastnost? Pokud jsou spatne navrzeny, znate nejaka pravidla, jak psat
> "rychle" www aplikace v .NET ?
Co je mysleno tim pomale ? Rychlost vlastniho .NET kodu je vice nez dobra,
problem mohl byt spise ve spatne napsane aplikaci ktera produkovala prilis
velky HTML kod (problem s viewstate) a tim se jevila pomala.
Petr Vones
prechod na .NET
[*] Rosta <rlekes(zv)atlas(tec)cz> - 5.5.2005 11:04:09
Neda me to, abych si nerypnul ... neni to poprve, co tu Zbysek nebo
Honza Sebelik propaguji haes ... je to reklama, coz je v podstate kazdy
odkaz nekam na www, jenomze tohle je jejich reklama, oba z toho maji
penize ... nemyslim, ze je to v poradku :( Pisu to s vedomim, ze to tady
asi pekne schytam, znam popularitu Lazni v komunite teto konfery, taky
jsem tam byl, taky jsem byl spokojeny, jenomze stejne ... je to reklama.
Vzhledem k povestne adminove pedantnosti nad chovanim se v konferenci me
prekvapuje jeho tolerance:). Zrejmne se nemeri stejnym metrem ....
Rosta
PS: Pokud tomu nekdo nerozumi, mozna by bylo vhodne prolozit to nejakou
placenou konzultaci, objednavky na mem mailu. :)
>
>Mozna by take bylo vhodne prolozit to nejakym skolenim, doporucuju
>www.haes(tec)cz :)
>
>S pozdravem
>
>Zbysek Hlinka
>
>
>prechod na .NET
[*] Zbysek Hlinka <konference(zv)hlinka(tec)cz> - 5.5.2005 09:41:51
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Ing. Petr Sikola
> Sent: Thursday, May 05, 2005 9:22 AM
>
> planujeme prechod na .NET technologii, dosud jsme pracovali
> jen v Delphi 5.
>
> Planujeme psat DB (MS SQL, ORACLE) aplikaci pristupnou pres
> www rozhrani + jednu app, ktera by bezela jako sluzba (sitova
> komunikace).
>
> Staci na .NET www aplikace ADO.NET?
Zde je treba rozlisit, co ktera zkratka znamena. ADO.NET jsou udelatka pro
pristup k databazim. Takze pokud se pracuje s databazemi, pak je pouziti
ADO.NET zcela prirozene, at uz je aplikace WinOkenni, webova nebo treba pro
mobilni zarizeni.
Pro tvorbu weboveho rozhrani se pak pouziva ASP.NET.
> Muzete prosim doporucit nejakou literaturu, examples,
> vyvojove prostredi, jazyk...
Pro .NET je dle meho nazoru naprosto nejvhodnejsi C#. Z Delphi se na nej
take docela prijemne prechazi. Vyvojove prostredi - jednoznacne MSVS,
Delphi.NET ne. Duvody zde byly probrany.
Literatura - pro obecnejsi seznameni napriklad .NET Framework programovani
aplikaci od Jeffrey Richter, ADO.NET krok za krokem od Rebecca Riordan. Pro
ASP.NET je na trhu take ledacos, konkretni zkusenost nemam. No a predevsim
MSDN.
Mozna by take bylo vhodne prolozit to nejakym skolenim, doporucuju
www.haes(tec)cz :)
S pozdravem
Zbysek Hlinka
E-mail: hlinka zavin. hlinka(tec)cz
Indy / Synampse - FTP klient jako proces.
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 5.5.2005 09:35:50
> Predtava je nasledujici : Proces bude periodicky prohledavat nejaky adresar, soubory, ktere v nem najde odesle na FTP server.
> Musi byt schopen reagovat na chyby pir FTP prenosu (nedostupny server, chyba pri prenosu atd..).
>
> Ma s tim nekdo zkusenosti? Je v tomto ripade lepsi pouziti Synapse mnebo INDY 10 ?
Co na tohle asi muzu rict? ;-))) Kdybych si nemyslel, ze je Synapse
lepsi nez Indy, tak bych Synapsi opravdu neztracel cas.
> Pomohl by mi i priklad kodu.
Podivej se v synapsi na unitu ftpsend.pas. V najdes tridu TFTPSend,
ktera implementuje FTP protokol s vsim co potrebujes. Priklad pouziti
teto tridy je take soucasti te unity... podivej se na konci na
implementaci funkci: FtpGetFile, FtpPutFile a FtpInterServerTransfer
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.OT: prechod na .NET
[*] Ing. Petr Sikola <developer(zv)efg(tec)cz> - 5.5.2005 09:21:49
Zdravim konferenci,
planujeme prechod na .NET technologii, dosud jsme pracovali jen v Delphi 5.
Zatim nejsme vubec seznameni s moznostmi a pripadnymi uskalimi.
Planujeme psat DB (MS SQL, ORACLE) aplikaci pristupnou pres www rozhrani +
jednu app, ktera by bezela jako sluzba (sitova komunikace).
Staci na .NET www aplikace ADO.NET?
Muzete prosim doporucit nejakou literaturu, examples, vyvojove prostredi,
jazyk...
Dosavadni zkusenosti s .NET aplikacemi (webovymi) nemame moc dobre, co jsme
videli bylo strasne pomale - jsou tyto aplikace spatne navrzeny nebo je to
vlastnost? Pokud jsou spatne navrzeny, znate nejaka pravidla, jak psat
"rychle" www aplikace v .NET ?
Diky za nasmerovani
Petr Sikola
TAPI - APRO - prichozi hovor
[*] Venca Zaruba <zaruba(zv)elastoform(tec)cz> - 5.5.2005 07:51:34
> Ahoj,
> nejak se mi s komponentami "TurboPower Async Professional" nedari reagovat
> na prichozi hovor od ustredny podporujici TAPI.
> Pouzivam TApdTapiDevice, kde vyberu driver ustredny, spustim AutoAnswer a
> cekam na udalost OnTapiStatus. A nic. Na ustrednu si samozrejme volam :-)
> Podle helpu by to tak melo fungovat. Opacny smer - vytoceni cisla jde v
> pohode. Mate s tim nekdo nejake zkusenosti?
>
> pozn.: K ustredne je dodavan soft, ktery na hovory reaguje, takze
> komunikace mezi ustrednou a PC tady je.
>
> Diky za pomoc.
>
> David Liska
>
>
>
A co se deje, kdyz se pripojis primo na port?
Dokazes zachytit a desifrovat dosly "clip"?
Co je to za ustrednu a modem ?TAPI - APRO - prichozi hovor
[*] Liska David <david.liska(zv)aac-czech(tec)cz> - 5.5.2005 01:53:09
Ahoj,
nejak se mi s komponentami "TurboPower Async Professional" nedari reagovat na prichozi hovor od ustredny podporujici TAPI.
Pouzivam TApdTapiDevice, kde vyberu driver ustredny, spustim AutoAnswer a cekam na udalost OnTapiStatus. A nic. Na ustrednu si samozrejme volam :-) Podle helpu by to tak melo fungovat. Opacny smer - vytoceni cisla jde v pohode. Mate s tim nekdo nejake zkusenosti?
pozn.: K ustredne je dodavan soft, ktery na hovory reaguje, takze komunikace mezi ustrednou a PC tady je.
Diky za pomoc.
David Liska
OT aktivace programu
[*] votavaSW <mail(zv)votavasw(tec)com> - 5.5.2005 00:29:03
diky,
jak jednoduche :), v Synapsi je dokonce priklad, HTTPSend,
s pozdravem Votava
Jiri Cincura napsal(a):
> votavaSW wrote (on Wednesday, May 04, 2005 11:29 PM):
>
>>dobry den,
>>rad bych sve programy vybavil aktivaci, dle HW program vygeneruje cislo,
>>pripoji se na server a stahne aktivacni cislo, nevim jak napsat skript v
>>PHP na serverove strane, ktery by naslouchal, cislo prevzal a vypocitane
>>aktivacni cislo poslal zpet navazanym spojenim z programu. Nevite jak na
>>to? S pozdravem Votava
>
>
> Co treba:
> skript.php
> <?php
> function vypocitej($cislo)
> {
> return 10*$cislo-2; //dummy
> }
>
> echo vypocitej($_GET["cislo"]);
> ?>
>
> a volat skript.php?cislo=10 a na vystup dostanes 98.
>
OT aktivace programu
[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 4.5.2005 23:36:59
votavaSW wrote (on Wednesday, May 04, 2005 11:29 PM):
> dobry den,
> rad bych sve programy vybavil aktivaci, dle HW program vygeneruje cislo,
> pripoji se na server a stahne aktivacni cislo, nevim jak napsat skript v
> PHP na serverove strane, ktery by naslouchal, cislo prevzal a vypocitane
> aktivacni cislo poslal zpet navazanym spojenim z programu. Nevite jak na
> to? S pozdravem Votava
Co treba:
skript.php
<?php
function vypocitej($cislo)
{
return 10*$cislo-2; //dummy
}
echo vypocitej($_GET["cislo"]);
?>
a volat skript.php?cislo=10 a na vystup dostanes 98.
--
Jiri Cincura
http://www.cincura.net/
http://ID3renamer.cincura.net/
ICQ: 314711544; Yahoo!: x2develop
http://photo.cincura.net/
http://phorum.cincura.net/
http://x2develop.com/OT aktivace programu
[*] votavaSW <mail(zv)votavasw(tec)com> - 4.5.2005 23:28:58
dobry den,
rad bych sve programy vybavil aktivaci, dle HW program vygeneruje cislo,
pripoji se na server a stahne aktivacni cislo, nevim jak napsat skript v
PHP na serverove strane, ktery by naslouchal, cislo prevzal a vypocitane
aktivacni cislo poslal zpet navazanym spojenim z programu. Nevite jak na to?
S pozdravem Votava
autentifikace k MySQL
[*] Tomas Bradle <t.bradle(zv)sanet(tec)cz> - 4.5.2005 17:36:35
----- Original Message -----
From: "Vaclav Halik" <spravasd(zv)suz.cvut(tec)cz>> Vypada to na problem s autentifikaci a kdovi jeste s cim.
> Nemnel jsem cas se tim vubec zabyvat. Takze se myslim
> ze ti to spis nepude nez pude bez uprav kodu.
uprav kodu ceho ? komponent ? nebo moji aplikace ?
> Ostatne bez upgradu ZEOS muzes na nejake pripojovani
> na 4.1 Server zapomenout. Problem je v tom ze
> vyvojari MySQL zmenili dost veci, takze ti pak nefunguje
> spravne ani MySQL Control Center, i kdyz se tvari ze je
> vse OK. Navic nektere funkce v mysqllib.dll vraci jine
> poradi vysledku a maji jine parametry.
>
No to je ale pekna cunarna, neslo by to resit treba pres ODBC?
diky
Tomas Bradle
OT: instalce deltagis udrizne firebird?
[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 4.5.2005 16:46:31
Ahoj,
vola mi zakaznik, ze mu prestala fungovat nase aplikace pouzivajici
Firebird 1.5.2. Pry po instalaci programu DeltaGIS (
http://www.deltagis.com/ ).
Nemate s tim nekdo zkusenost?
Dik Peca