Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
Synapse - SMTPSend - posilani souboru
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 05.6.2006 15:38:02
> > Ahoj, diky za radu .. ale potreboval bych poradit jeste trosku vic.
> > Kdyz pomoci TMimemess vyrobim zpravu, jak ji potom odeslu pomoci
> > TSMTPSend?
>
> Odesles to proste jako hotovy text zpravy. Pokud nechces pouzit primo
> THTTPSend tridu, muzes pouzit SendToEx funkci.
KECAM! Myslel jsem SendToRaw, pochopitelne.
> > Jinak priklad na uvedenem odkazu je nejspise chybne nebo k jine
> > verzi, misto AddPartBinary tam asi ma byt AddPartBinaryFromFile.
>
> To mas pravdu. ;-)
Uz jsem to tam opravil...
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://synapse.ararat(tec)cz/ - Ararat Synapse - TCP/IP Lib.
Synapse - SMTPSend - posilani souboru
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 05.6.2006 15:34:01
> Ahoj, diky za radu .. ale potreboval bych poradit jeste trosku vic.
> Kdyz pomoci TMimemess vyrobim zpravu, jak ji potom odeslu pomoci
> TSMTPSend?
Odesles to proste jako hotovy text zpravy. Pokud nechces pouzit primo
THTTPSend tridu, muzes pouzit SendToEx funkci.
> Jinak priklad na uvedenem odkazu je nejspise chybne nebo k jine verzi,
> misto AddPartBinary tam asi ma byt AddPartBinaryFromFile.
To mas pravdu. ;-)
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://synapse.ararat(tec)cz/ - Ararat Synapse - TCP/IP Lib.
Prepracovani app na UNICODE
[*] Zbysek Hlinka <konference(zv)hlinka(tec)cz> - 05.6.2006 16:16:05
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Maixner Adam
> Sent: Monday, June 05, 2006 4:04 PM
>
> ma nekdo zabehnuty zpusob, jak prepracovat aplikaci v Delphi
> (7) tak, aby podporovala Unicode ?
Znamena to nahradit vsechny controly za takove, ktere podporuji unicode,
protoze VCL komponenty podporuji toliko ascii.
> Kdyz jsem testoval TNT tak napriklad do captionu formu stejne
> nesel vlozit unicode retezec.
>
> Prosil bych o nejaky tip, dekuji.
Pokud chces nahradit i caption formu, pak si prepis celou VCL. Nebo, coz
bude rychlejsi a efektivnejsi, nauc se .NET nebo muzes take prejit do VC++.
S pozdravem
Zbysek Hlinka
E-mail: hlinka zavin. hlinka(tec)cz
Prepracovani app na UNICODE
[*] Maixner Adam <adam.maixner(zv)pvt(tec)cz> - 05.6.2006 16:04:04
Dobry den,
ma nekdo zabehnuty zpusob, jak prepracovat aplikaci v Delphi (7) tak, aby podporovala Unicode ?
Musim prepracovat vse, nahradit vsechny controly TNT ?
Kdyz jsem testoval TNT tak napriklad do captionu formu stejne nesel vlozit unicode retezec.
Prosil bych o nejaky tip, dekuji.
Zobrazenie DBGrid
[*] Robert Fujak <robof(zv)inmail.sk> - 05.6.2006 15:50:03
>V pripade ze Vasi klienti nejsou kyborgove, nepotrebujete zobrazovat 10000
>zaznamu v jednom Grid. Pri vetsim poctu zaznamu se jednoduse provede vhodny
>select, ktery mnozinu omezi na snesitelnych cca 100-250.
select ... where ... to mi je jasne a suhlasim s tym
,ale predsa ked oni chcu listovat !?
>A proc tam nezobrazujes primo data z ibquery?
>
> Milan Dvorak
Data sa najskor nacitaju a transakciu ukoncim.
S pozdravom
Robert Fujak
> Zdravim.
>
> Aky pouzivate system na zobrazovanie dat v Gride?
> Ja plnim kbmMemTable, ale pri vacsom (>10,000) mnozstve zaznamov je to
> dost
> pomale.
> Napada ma:
> - natiahnut len primarne kluce a dotahovat postupne zaznamy podla
> viditelnych
Komponenta pro zpracovani textu ve formatu WordPro
[*] Petr Gregor <pgregor(zv)orsia(tec)cz> - 06.6.2006 07:01:05
Dobry den,
potrebuji prevest soubory ulozene ve formatu WordPro (pripona lwp)
do formatu MS-Word nebo alespon do cisteho textoveho formatu..
Shanim nejakou komponentu, ktera by to umela.
Zakaznik jiz nema ani instalacky od WordPro, takze mam jen soubory,
ktere mam prevest.
Dekuji za pomoc.
Petr Gregor
VarArrayCreate
[*] Ing. Antonin Spurny <spurny(zv)kavlounky(tec)cz> - 06.6.2006 08:47:13
Ahoj,
pouzivam funkci VarArrayCreate na vytovoreni variantniho pole, ale jedna vec
mi neni jasna, kdyz to pole vytvorim musim to pole taky nekde uvolnit?
function Priklad: boolean;
var lV: Variant;
i: integer;
begin
....
// vytvorim pole v promenne lV
lV:= VarArrayCreate([0, X-1], varVariant);
// naplnim pole
for i:= 0 to X-1 do
begin
lV[i]:= IBTable.Fields[i].Value;
end;
// pouziju pole lV treba ve funkci TIBTable.Locate....
// je treba ted lV nejakym zpusobem uvolnit?
end;
Podle toho co jsem zjistil v napovede a prikladech to vypada, ze neni treba
nic uvolnovat. Pro jistotu se ptam, protoze funkci VarArrayCreate pouzivam v
cyklu i nekolik tisickrat.
dekuji Tonda
VarArrayCreate
[*] delphin(zv)post(tec)cz - 06.6.2006 09:37:19
> Ahoj,
> pouzivam funkci VarArrayCreate na vytovoreni variantniho pole, ale jedna
> vec
> mi neni jasna, kdyz to pole vytvorim musim to pole taky nekde uvolnit?
Za obvyklych okolnosti Varianty uvolnuje Delphi automaticky.
Komponenta pro zpracovani textu ve formatu WordPro
[*] Radek Cervinka <radek.cervinka(zv)technodat(tec)cz> - 06.6.2006 09:57:20
Petr Gregor napsal(a):
> Dobry den,
>
> potrebuji prevest soubory ulozene ve formatu WordPro (pripona lwp)
> do formatu MS-Word nebo alespon do cisteho textoveho formatu..
> Shanim nejakou komponentu, ktera by to umela.
>
> Zakaznik jiz nema ani instalacky od WordPro, takze mam jen soubory,
> ktere mam prevest.
Jsem si skoro jist ze u MSOffice byl(je) konvertor i pro WordPro (ale musel se zaskrtnout)
R.
Pristup k FB z vice vlaken
[*] Marek Dostal <konf(zv)agnis(tec)cz> - 06.6.2006 10:53:24
Prosim o radu. V programu mam dve vlakna, z nichz pristupuji pres fbclient.dll k databazi a ctu data. Pokud se trefim do "stejneho" okamziku, skonci to chybou: "Sql server error: error reading data from the connection".
Mate nekdo zkusenost jak toto resit? Zatim me napada pomoci nejakeho globalniho priznaku blokovat pristup k datum v dalsich vlaknech, pokud jiz nejake cteni dat probiha. Ale je to takove provizorni. Jde nejak pristupovat k datum soubezne?
Marek Dostal
D7Prof, WinXP, FireBird 1.0, 1.5
Pristup k FB z vice vlaken
[*] Tomas Krejzek <tomas.krejzek(zv)kpsys(tec)cz> - 06.6.2006 11:35:27
Mozna nesdilet jedno pripojeni k databazi, ma kazde vlakno svou connection???
Tom
Marek Dostal napsal(a):
> Prosim o radu. V programu mam dve vlakna, z nichz pristupuji pres fbclient.dll k databazi a ctu data. Pokud se trefim do "stejneho" okamziku, skonci to chybou: "Sql server error: error reading data from the connection".
> Mate nekdo zkusenost jak toto resit? Zatim me napada pomoci nejakeho globalniho priznaku blokovat pristup k datum v dalsich vlaknech, pokud jiz nejake cteni dat probiha. Ale je to takove provizorni. Jde nejak pristupovat k datum soubezne?
>
> Marek Dostal
> D7Prof, WinXP, FireBird 1.0, 1.5
>
>
>
>
>
Pristup k FB z vice vlaken
[*] Pavel Malinsky <malinsky(zv)pmcom(tec)cz> - 06.6.2006 11:41:28
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Marek Dostal
Ahoj,
> Prosim o radu. V programu mam dve vlakna, z nichz pristupuji
[...
> to takove provizorni. Jde nejak pristupovat k datum soubezne?
Zakladem je, ze KAZDE vlakno musi mit svoji connectionu.
Pak klasicke rizeni transakcemi.
S pozdravem a dikem
=====================================
> Pavel Malinsky; malinsky(zv)pmcom(tec)cz <
=====================================
> GSM: 602 652 203 | ICQ: 322015967 <
=====================================
Synapse - SMTPSend - posilani souboru
[*] delphak(zv)centrum(tec)cz - 06.6.2006 12:37:32
> > Odesles to proste jako hotovy text zpravy. Pokud nechces pouzit primo
> > THTTPSend tridu, muzes pouzit SendToEx funkci.
> KECAM! Myslel jsem SendToRaw, pochopitelne.
Dik za odpovedi, ale asi jsem uplne blbej ... v HTTPSend zadna fce SendToRaw neni. Pokud je to preklep a melo to bejt v SMTPSend, tak tam ta funkce je, ale myslim si ze ji nelze pouzit. Ta fce vyzadujete MailFrom, MailTo .. sice bych je mohl zadat znova, ale jiz jsou v sestavene zprave - a tahle funkce by je asi pouzila jako data.
Ja zpravu sestavim vice-mene tak jako v prikladu (na konci zpravy) - jenom ji pak nedavam do memo .. ale chtel bych to poslat .. mohl bys me napsat ty 2-3 radky kodu, ktere to udelaji? Mohl bych to vyexperimentovat sam, ale zabere me to moc casu ...
Diky.
procedure TForm1.Button13Click(Sender: TObject);
var
m:TMimemess;
l:tstringlist;
p: TMimepart;
begin
m:=TMimemess.create;
l:=tstringlist.create;
try
p := m.AddPartMultipart('mixed', nil);
l.loadfromfile('c:search.log');
m.AddPartText(l,p);
m.AddPartBinaryFromFile('c:search.log',p);
m.header.from:='youraddress(zv)somewhere.com';
m.header.tolist.add('You(zv)somewhere.com');
m.header.subject:='test message';
m.EncodeMessage;
memo1.lines.assign(m.lines);
finally
m.free;
l.free;
end;
end;
Synapse - SMTPSend - posilani souboru
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 06.6.2006 12:59:34
> > KECAM! Myslel jsem SendToRaw, pochopitelne.
>
> Dik za odpovedi, ale asi jsem uplne blbej ... v HTTPSend zadna fce
> SendToRaw neni. Pokud je to preklep a melo to bejt v SMTPSend,
Jejda, pochopitelne jsem myslel smtpsend.
> tak tam ta funkce je, ale myslim si ze ji nelze pouzit. Ta fce
> vyzadujete MailFrom, MailTo .. sice bych je mohl zadat znova, ale jiz
> jsou v sestavene zprave - a tahle funkce by je asi pouzila jako data.
Ano, musis to zadat znova, protoze odesilatel a adresati v SMTP
protokolu nemusi vubec nijak souviset s odesilatelem a adresaty
zapsanych v mailu!
Napriklad takova skryta kopie se realizuje tak, ze v textu mailu se
adresat skryte kopie nijak nevyskytuje, vyskytuje se jen v SMTP
protokolu. Dalsi prikaldy jsou postovni konference, atd.
Takze je vcelku logicke, ze tam ty to udaje musis zadat znova, nevim
proc to brani nejakemu pouziti... ;-O
> Ja zpravu sestavim vice-mene tak jako v prikladu (na konci zpravy) -
> jenom ji pak nedavam do memo .. ale chtel bych to poslat .. mohl bys me
> napsat ty 2-3 radky kodu, ktere to udelaji? Mohl bych to
> vyexperimentovat sam, ale zabere me to moc casu ...
To jsem netusil ze to je takovy orisek...
> procedure TForm1.Button13Click(Sender: TObject);
> var
> m:TMimemess;
> l:tstringlist;
> p: TMimepart;
> begin
> m:=TMimemess.create;
> l:=tstringlist.create;
> try
> p := m.AddPartMultipart('mixed', nil);
> l.loadfromfile('c:search.log');
> m.AddPartText(l,p);
> m.AddPartBinaryFromFile('c:search.log',p);
> m.header.from:='youraddress(zv)somewhere.com';
> m.header.tolist.add('You(zv)somewhere.com');
> m.header.subject:='test message';
> m.EncodeMessage;
sendtoraw('youraddress(zv)somewhere.com', 'You(zv)somewhere.com',
'yoursmtp.domain.com', m.lines, '', '');
> finally
> m.free;
> l.free;
> end;
> end;
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://synapse.ararat(tec)cz/ - Ararat Synapse - TCP/IP Lib.
DrawThemeText
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 06.6.2006 12:51:33
Ahoj,
mam D5 a hraju si malinko s podporou temat pomoci knihovny
uxtheme.dll. Konkretne mam nyni TBitmap (20x20 pixelu) a
chtel bych do ni dostat pismenko V zobrazene stejnym fontem
jako caption okna. Delam neco takoveho (schematicky):
bmp := TBitmap.Create;
bmp.Width := 20;
bmp.Height := 20;
bmp.Canvas.Brush.Color := clBlue;
bmp.Canvas.FillRect(rect(0, 0, 20, 20));
r := rect(0, 0, 20, 20);
bmpNormal.Canvas.Font.Color := clRed;//vyrazna barva
bmpNormal.Canvas.Font.Style := [fsBold];
SetBkMode(bmp.Canvas.Handle, TRANSPARENT);
err1 := DrawThemeText(hTheme, bmp.Canvas.Handle,
WP_CAPTION, CS_ACTIVE,
WideString('V'), -1, DT_TOP + DT_CENTER, 0, (zv)r);
bmp.Free;
Kdyz dam misto DrawThemeText jen DrawText, pouziji se
vlastnosti fontu tak, jak jsou v kodu nastaveny, tj. objevi
se tucne cervene V. TO je OK. Pouziji-li DrawThemeText,
cekal bych, ze vlastnosti fontu canvasu se prepisi podle
fontu pro titulek okna ve Win a objevi se tucne bile V (mam
klasicky XP vzhled, tj. modre caption s bilym tucnym
fontem). Misto toho se mi objevi pismeno "V" v cerne barve.
Neprisel jsem na to, kde je problem. Neresil jste to nekdo?
Pokud menim bmp.Canvas.Font.Style, Size apod., tyto zmeny
se projevi - tj. fce DrawThemeText zrejme nemeni tucnost,
velikost apod. fontu - jen barvu, bohuzel ale nerozumim,
jak dospela k cerne barve.
D5E, WinXPSP2
David Lebeda
Prehravani AVI souboru
[*] Viktor Marek <viktor(zv)mbox.vol(tec)cz> - 06.6.2006 13:51:38
Na formu mam komponentu MediaPlayer1a pomoci ni bych chtel prehrat AVI
soubor. V okne se vsak zobrazi hlaska "Nelze najit dekomprimacni modul vids:
DIVX Video nebude k dispozici"
Pokud ale ten samy AVI otevru ve Windowsovskem MediaPlayeru je vse v
poradku.
Schazi mi neco v uses?
"Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, MPlayer, ExtCtrls,ShellApi;"
Diky za radu
Viktor Marek
Jak zjistit "maximalni" IP adresu
[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 06.6.2006 18:51:58
On 6.6.2006 18:37 +0200 Josef SIP wrote:
> Ahoj, mam tabulku ve Firebirdu a v jednom sloupci je ulozena IP adresa v textovem formatu varchar(15).
> Potreboval bych SQL dotazem zjistit posledni pouzitou bohuzel SELECT Max(IP) .. samozrejme nefunguje
> IP maji tvar treba 10.0.1.xx kde xx od 1 do 254 (sit /24), prvni tri bajty jsou znamy predem
> napada Vas jak na to ?
Pokud jsou pouze 10.0.1.xx tak vybrat posledni cislo a pretypovat (no nic
moc reseni). Pokud jsou obecne, tak me napada jedine to prevadet na cislo
(kazda "tecka" jeden rad) ve storce. Jde o to, kolik jich tam mas, aby to
bylo casove unosne. Kdyz je jich hodne, asi bych to cacheoval.
--
Jiri Cincura
http://www.cincura.net/
Jak zjistit "maximalni" IP adresu
[*] Josef SIP <conf(zv)sipj(tec)net> - 06.6.2006 18:37:57
Ahoj, mam tabulku ve Firebirdu a v jednom sloupci je ulozena IP adresa v textovem formatu varchar(15).
Potreboval bych SQL dotazem zjistit posledni pouzitou bohuzel SELECT Max(IP) .. samozrejme nefunguje
IP maji tvar treba 10.0.1.xx kde xx od 1 do 254 (sit /24), prvni tri bajty jsou znamy predem
napada Vas jak na to ?
Dik
HTTPSend.Sock.OnStatus
[*] standus <standus(zv)post(tec)cz> - 07.6.2006 10:43:09
Zdar,
mam problem s tim, ze si v progressbaru nechavam zobrazit kolik dat se mi
stahuje a odesila....
nekdy se ale stane, ze po tom co se vsechny data odeslou a ja vidim nacitani
odeslanych dat u konce, najednou se mi progressbaru cislo odeslanych dat
zmensuje. je to vubec mozny?
nikde totiz nemam odecitani dat, ale naopak prave pricitani prenesenych dat.
nevim jestli to vysvetluju dostatecne k pochopeni.
setkal se s tim nekdo?
diky
stan
HTTPSend.Sock.OnStatus
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 07.6.2006 11:39:13
> mam problem s tim, ze si v progressbaru nechavam zobrazit kolik dat se
> mi stahuje a odesila....
>
> nekdy se ale stane, ze po tom co se vsechny data odeslou a ja vidim
> nacitani odeslanych dat u konce, najednou se mi progressbaru cislo
> odeslanych dat zmensuje. je to vubec mozny? nikde totiz nemam
> odecitani dat, ale naopak prave pricitani prenesenych dat.
Neco evidentne delas blbe... pokud jen pricitas, tak by udaj o
prenesenem poctu dat musel byt zaporny, a to neni mozne. Nekde tam
proste neco delas blbe, tezko rict co, nevim jak mas ten event
napsany.
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://synapse.ararat(tec)cz/ - Ararat Synapse - TCP/IP Lib.
OT : Nabidka prace
[*] Libor Janecek <libor.janecek(zv)cegedim(tec)com> - 07.6.2006 12:05:15
Dobry den,
Hledame dodavatele (jednotlivec ci firma) ,ktery pro nas vyvine(VS 2005) SW
pro prenos souboru od klienta (COM server) na Server (WebService).
Pro blizsi informace me kontaktujte na muj email.
Libor Janecek
Product manager DATA
Cegedim CZ
PS : Specha
OT: specifikace NMEA pro zpracovani dat z GPS
[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 07.6.2006 12:13:16
ahoj,
nevite nekdo o nejake volne dostupne specifikaci protokolu NMEA? Vim
jenom, ze by to mel byt standard pro GPS. Sef dostal k narozkam hodinky
s GPS a ted se snazi z toho nejak vydolovat data.
Chtel jsem si s tim jen tak pohrat, ale zrejme mi unika neco
duleziteho. Prosim o nakopnuti.
Idealni by byl prikladek nacteni dat v deplhi :-)
Dekuji
Petr Palicka aka Peca
HTTPSend.Sock.OnStatus
[*] Petr Fiser <petr.fiser(zv)3jservis(tec)cz> - 07.6.2006 12:31:17
Je to asi nepravdepodobne ale neni nahodou pro pricitani pouzit typ ktery
pretece a pak ta hodnota spadne. Mozna i ten ProgressBar podporuje urcitou
velikost a pak to blbne. Kolik tech dat tahas?
PF
> Zdar,
>
> mam problem s tim, ze si v progressbaru nechavam zobrazit kolik dat se mi
> stahuje a odesila....
>
> nekdy se ale stane, ze po tom co se vsechny data odeslou a ja vidim
> nacitani
> odeslanych dat u konce, najednou se mi progressbaru cislo odeslanych dat
> zmensuje. je to vubec mozny?
> nikde totiz nemam odecitani dat, ale naopak prave pricitani prenesenych
> dat.
>
> nevim jestli to vysvetluju dostatecne k pochopeni.
> setkal se s tim nekdo?
>
> diky
> stan
HTTPSend.Sock.OnStatus
[*] standus <standus(zv)post(tec)cz> - 07.6.2006 13:19:21
Na to uz me nekdo upozornil, ze to muze bejt pretecenim, ale nechapu jak?
max. cca 2MB. Divny je to, ze se to stane jen nekdy a jen kdyz to po
odeslani dat dostava ze serveru jeste nejaky data.
zde jsou kousky kodu v C++:
AnsiString dataout;
.....
.....
TMemoryStream* data = new TMemoryStream();
THTTPSend *HTTPTest = new(THTTPSend);
HTTPTest->Sock->OnStatus = FormCounter->SockCallBack;
.....
data->Write(dataout.c_str(), dataout.Length());
data->Seek(0,0);
HTTPTest->Document->LoadFromStream(data); // musi se priradit dataout do
datasend
HTTPTest->HTTPMethod("POST",IniRead("http"));
data->Seek(0,0);
data->Clear();
HTTPTest->Sock->OnStatus = NULL;
FormCounter->Visible = false;
data->LoadFromStream(HTTPTest->Document);
HTTPTest->Free();
....
no a ten progressbar mam reseny takto:
void __fastcall TFormCounter::SockCallBack(TObject *Sender,
THookSocketReason Reason, const AnsiString Value)
{
switch(Reason)
{
case HR_ReadCount:{
int delta;
try{
delta=StrToInt(Value);
}
catch(...)
{
delta=1;
}
if(Label1->Caption!=NULL)
{
count = count + delta;
Label1->Caption = "Preneseno dat: " + IntToStr(count) + " b";
Application->ProcessMessages();
}
break;}
case HR_WriteCount:{
int delta;
try{
delta=StrToInt(Value);
}
catch(...)
{
delta=1;
}
if(Label1->Caption!=NULL)
{
count = count + delta;
Label1->Caption = "Preneseno dat: " + IntToStr(count) + " b";
Application->ProcessMessages();
}
break;}
default: ;
break;
}
}
Stan
Jak zjistit "maximalni" IP adresu
[*] Radek KALA <kala(zv)betacontrol(tec)cz> - 07.6.2006 13:43:23
a co treba neco jako
(pozor pisi primo do helpu tak se snad neseknu moc
select max(cast(substring(ip from 8 for 3) as integer))
from xxxx
where ip starting with '10.0.1.'
Josef SIP napsal(a):
> Ahoj, mam tabulku ve Firebirdu a v jednom sloupci je ulozena IP adresa v textovem formatu varchar(15).
> Potreboval bych SQL dotazem zjistit posledni pouzitou bohuzel SELECT Max(IP) .. samozrejme nefunguje
> IP maji tvar treba 10.0.1.xx kde xx od 1 do 254 (sit /24), prvni tri bajty jsou znamy predem
> napada Vas jak na to ?
>
> Dik
>
>
>
specifikace NMEA pro zpracovani dat z GPS
[*] campulka <campulka(zv)czas(tec)cz> - 07.6.2006 13:55:24
http://www.gpsinformation.org/dale/nmea.htm
http://www.nmea.org/pub/0183/
> -----Original Message-----
> nevite nekdo o nejake volne dostupne specifikaci protokolu
> NMEA? Vim Kontrola pravopisu v ruznych jazycich
[*] Radek Cervinka <radek.cervinka(zv)technodat(tec)cz> - 08.6.2006 07:36:36
> potrebuju do programu zabudovat kontrolu pravopisu pro cestinu, anglictinu a nemcinu.
> Napadly me dve moznosti, obe by mely byt pokud mozno free:
>
> 1. Kompoentna typu TMemo nebo podobny viceradkovy editacni prvek, ktery uz umi
> kontrolovat pravopis sam o sobe. Jde mi o kontrolu podtrhavanim ci zvyraznovanim
> chybnych slov, ne o kontrolu pomoci dialogu.
>
> 2. Stacily by mi nejake slovniky pro ruzne jazyky (treba typu textovych souboru, jake ma
> napriklad PSPad), ktere by byly volne k dispozici, a kotrolu bych si uz nejakou napsal sam,
> asi pomoci TRichText, nebo jak se ta komponenta jmenuje.
>
> Nevite nekdo o necem takovem?
treba PSPad pouziva SynEdit (coz je velmi cool sada komponent).
R.
Kontrola pravopisu v ruznych jazycich
[*] Ludek <delphi-konference(zv)bcpraha(tec)com> - 08.6.2006 07:32:36
Ahoj,
potrebuju do programu zabudovat kontrolu pravopisu pro cestinu, anglictinu a nemcinu.
Napadly me dve moznosti, obe by mely byt pokud mozno free:
1. Kompoentna typu TMemo nebo podobny viceradkovy editacni prvek, ktery uz umi
kontrolovat pravopis sam o sobe. Jde mi o kontrolu podtrhavanim ci zvyraznovanim
chybnych slov, ne o kontrolu pomoci dialogu.
2. Stacily by mi nejake slovniky pro ruzne jazyky (treba typu textovych souboru, jake ma
napriklad PSPad), ktere by byly volne k dispozici, a kotrolu bych si uz nejakou napsal sam,
asi pomoci TRichText, nebo jak se ta komponenta jmenuje.
Nevite nekdo o necem takovem?
Diky,
Ludek
HTTPSend.Sock.OnStatus
[*] Vlastik Bartos <bartos(zv)spsmvbr(tec)cz> - 07.6.2006 21:31:55
Nikde nevidim nastavene maximum progressbaru, nemuze se zvysit, kdyz se
objevi dalsi data? To by se pak pozice relativne snizila ..
Vlastik
>
> no a ten progressbar mam reseny takto:
> void __fastcall TFormCounter::SockCallBack(TObject *Sender,
> THookSocketReason Reason, const AnsiString Value)
> {
>
> switch(Reason)
> {
> case HR_ReadCount:{
> int delta;
> try{
> delta=StrToInt(Value);
> }
> catch(...)
> {
> delta=1;
> }
> if(Label1->Caption!=NULL)
> {
> count = count + delta;
> Label1->Caption = "Preneseno dat: " + IntToStr(count) + " b";
> Application->ProcessMessages();
> }
> break;}
> case HR_WriteCount:{
> int delta;
> try{
> delta=StrToInt(Value);
> }
> catch(...)
> {
> delta=1;
> }
> if(Label1->Caption!=NULL)
> {
> count = count + delta;
> Label1->Caption = "Preneseno dat: " + IntToStr(count) + " b";
> Application->ProcessMessages();
> }
> break;}
> default: ;
> break;
> }
> }
>
> Stan
>
>
>
>
>
Jak zjistit "maximalni" IP adresu
[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 07.6.2006 17:25:38
Pokud ten zacatek bude porad stejny ("10.0.1."), tak to bude fungovat,
osobne bych si na to udelal UDF funkci, takle by si mohl docela nabehnout.
Slavek
> a co treba neco jako
> (pozor pisi primo do helpu tak se snad neseknu moc
>
> select max(cast(substring(ip from 8 for 3) as integer))
> from xxxx
> where ip starting with '10.0.1.'
>
> Josef SIP napsal(a):
> > Ahoj, mam tabulku ve Firebirdu a v jednom sloupci je
> ulozena IP adresa
> > v textovem formatu varchar(15). Potreboval bych SQL dotazem zjistit
> > posledni pouzitou bohuzel SELECT Max(IP) .. samozrejme
> nefunguje IP
> > maji tvar treba 10.0.1.xx kde xx od 1 do 254 (sit /24), prvni tri
> > bajty jsou znamy predem napada Vas jak na to ?
Jak zjistit "maximalni" IP adresu
[*] mstevlik(zv)gamo.sk - 08.6.2006 08:32:40
> Ahoj, mam tabulku ve Firebirdu a v jednom sloupci je ulozena IP
> adresa v textovem formatu varchar(15).
> Potreboval bych SQL dotazem zjistit posledni pouzitou bohuzel
> SELECT Max(IP) .. samozrejme nefunguje
> IP maji tvar treba 10.0.1.xx kde xx od 1 do 254 (sit /24), prvni tri
> bajty jsou znamy predem
> napada Vas jak na to ?
>
> Dik
Ja by som ti navrhol aby si si vytvoril dalsi stlpec typu number nad nim
index a pri ukladani zaznamu do tejto tabulky na triger IPcku (resp jej
posledny byte) previest na cislo a ulozit to do toho noveho stlpca
Potom uz zotriedit nebude problem
Marian Stevlik (Michal)
IS programmer / developer
GAMO a.s.
Kyjevske nam. 6
974 04 Banska Bystrica
web: www.gamo.sk
mail: mstevlik(zv)gamo.sk
tel: +421 48 4372098, 4137935, 4372111
gsm: +421 905 462010
icq: 38493645
skype: majklbb
Jak zjistit "maximalni" IP adresu
[*] Griga Pavol <pavol.griga(zv)socpoist.sk> - 08.6.2006 08:58:42
Ja som to riesil tak ze ip som ukladal tak aby bola z 3 cifier doplnena
0 a slo potom triedit aj ako text
S pozdravom, Pavol Griga, RI KE
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz] On
Behalf Of Josef SIP
Sent: Tuesday, June 06, 2006 6:38 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Jak zjistit "maximalni" IP adresu
Ahoj, mam tabulku ve Firebirdu a v jednom sloupci je ulozena IP adresa v
textovem formatu varchar(15).
Potreboval bych SQL dotazem zjistit posledni pouzitou bohuzel SELECT
Max(IP) .. samozrejme nefunguje
IP maji tvar treba 10.0.1.xx kde xx od 1 do 254 (sit /24), prvni tri
bajty jsou znamy predem
napada Vas jak na to ?
Dik
HTTPSend.Sock.OnStatus
[*] standus <standus(zv)post(tec)cz> - 08.6.2006 09:48:48
No on to vlastne neni progressbar, ale jenom pocitadlo prenesenych dat....
Zjistil jsem, ale to, ze se to deje kdyz odesilam vice dat. Pri mensim
objemu dat se to nestava.
pritom kod je snad v poradku..... mel bych snad jeste neco nadefinovat, nebo
nastavit nejaky parametr?
proces: data odesle a prijima od serveru odpoved, kterou si nactu stejneho
streamu, kterej pred tim vymazu, ale pocitadlo mi po prijeti dat najednou
jede dolu a jako by se porad neco stahovalo. nemuze bejt problem na strane
serveru, ze by mi posilal po odpovedi jeste neco dal?
jako by nekde podtykal buffer.... jak to mam osetrit?
Diky za pomoc.
stan
[code]
// posilani
TMemoryStream* data = new TMemoryStream();
THTTPSend *HTTPTest = new(THTTPSend);
HTTPTest->Sock->OnStatus = FormCounter->SockCallBack;
FormCounter->Visible = true;
HTTPTest->Sock->SSL->Username = IniRead("user");
HTTPTest->Sock->SSL->Password = IniRead("password");
Application->ProcessMessages();
data->Write(dataout.c_str(), dataout.Length());
data->Seek(0,0);
HTTPTest->Document->LoadFromStream(data);
HTTPTest->HTTPMethod("POST",IniRead("http")); // a tady jako to asi dela
problem, kterej jsem popisoval
data->Seek(0,0);
data->Clear();
data->LoadFromStream(HTTPTest->Document); //pak se data dale
zpracovavaji....
FormCounter->Visible = false;
HTTPTest->Sock->OnStatus = NULL;
HTTPTest->Free();
//konec posilani
[/code]
Jak zjistit "maximalni" IP adresu
[*] Radek KALA <kala(zv)betacontrol(tec)cz> - 08.6.2006 12:57:01
Podivej se na konec tam pise, ze prvni 3 byte jsou zname predem
Slavomir Skopalik napsal(a):
> Pokud ten zacatek bude porad stejny ("10.0.1."), tak to bude fungovat,
> osobne bych si na to udelal UDF funkci, takle by si mohl docela nabehnout.
>
> Slavek
>
>> a co treba neco jako
>> (pozor pisi primo do helpu tak se snad neseknu moc
>>
>> select max(cast(substring(ip from 8 for 3) as integer))
>> from xxxx
>> where ip starting with '10.0.1.'
>>
>> Josef SIP napsal(a):
>>> Ahoj, mam tabulku ve Firebirdu a v jednom sloupci je
>> ulozena IP adresa
>>> v textovem formatu varchar(15). Potreboval bych SQL dotazem zjistit
>>> posledni pouzitou bohuzel SELECT Max(IP) .. samozrejme
>> nefunguje IP
>>> maji tvar treba 10.0.1.xx kde xx od 1 do 254 (sit /24), prvni tri
>>> bajty jsou znamy predem napada Vas jak na to ?
>
>
>
Export vlastnosti a eventu u ActiveX
[*] Sula Milos <milos.sula(zv)musumperk(tec)cz> - 08.6.2006 11:38:56
Zdravim,
Vytvarim ActiveX Form objekt, ktery chci pouzit v jinem programovacim jazyce nez Delphi.Na formulari mam umistenou komponentu, ktera ma spoustu eventu a vlastnosti, ktere se mi samozrejme nezpristupni ( z programu kde tento ActiveX objekt pouzivam ), takze je musim vsechny nadeklarovat rucne, nebo s eto to da udelat nejak automaticky ?
Diky
Milos
Kontrola pravopisu v ruznych jazycich
[*] Ludek <delphi-konference(zv)bcpraha(tec)com> - 08.6.2006 15:21:11
Diky, to je presne ono. Ma to jen dve drobne vady na krase - ve slovnikach knihovny
SynSpellCheck chybi cestina a ve zdrojovem souboru jsou chyby, takze to nejde rovnou
prelozit a je potreba to poupravit. Nemuze byt vsechno dokonale. Ale ta cestina mi chybi.
Ludek
> > potrebuju do programu zabudovat kontrolu pravopisu pro cestinu, anglictinu a nemcinu.
> > Napadly me dve moznosti, obe by mely byt pokud mozno free:
> >
> > 1. Kompoentna typu TMemo nebo podobny viceradkovy editacni prvek, ktery uz umi
> > kontrolovat pravopis sam o sobe. Jde mi o kontrolu podtrhavanim ci zvyraznovanim
> > chybnych slov, ne o kontrolu pomoci dialogu.
> >
> > 2. Stacily by mi nejake slovniky pro ruzne jazyky (treba typu textovych souboru, jake ma
> > napriklad PSPad), ktere by byly volne k dispozici, a kotrolu bych si uz nejakou napsal sam,
> > asi pomoci TRichText, nebo jak se ta komponenta jmenuje.
> >
> > Nevite nekdo o necem takovem?
>
> treba PSPad pouziva SynEdit (coz je velmi cool sada komponent).
>
> R.
>
>
Kontrola pravopisu v ruznych jazycich
[*] Jan Fiala <jan.fiala(zv)wo(tec)cz> - 08.6.2006 19:57:30
8.6.2006 Ludek:
> To jsem se neodvazil, protoze jsem nevedel, jestli je volne k dispozici. Ale pokud ano, tak
> bych ho pouzil.
> Diky,
> Ludek
>> Slovnik s cestinou si muzes stahnout na strankach PSPadu
>> http://www.pspad.com
>> Soucasne se muzes i podivat na to, jak to vypada v praxi
Uplne volne k dispozici neni, ale za zeptani nic nedas ;-)
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
Kontrola pravopisu v ruznych jazycich
[*] Ludek <delphi-konference(zv)bcpraha(tec)com> - 08.6.2006 18:27:24
To jsem se neodvazil, protoze jsem nevedel, jestli je volne k dispozici. Ale pokud ano, tak
bych ho pouzil.
Diky,
Ludek
> Slovnik s cestinou si muzes stahnout na strankach PSPadu
> http://www.pspad.com
> Soucasne se muzes i podivat na to, jak to vypada v praxi
Kontrola pravopisu v ruznych jazycich
[*] Jan Fiala <jan.fiala(zv)wo(tec)cz> - 08.6.2006 18:03:22
8.6.2006 Ludek:
> Diky, to je presne ono. Ma to jen dve drobne vady na krase - ve slovnikach knihovny
> SynSpellCheck chybi cestina a ve zdrojovem souboru jsou chyby, takze to nejde rovnou
> prelozit a je potreba to poupravit. Nemuze byt vsechno dokonale. Ale ta cestina mi chybi.
> Ludek
Slovnik s cestinou si muzes stahnout na strankach PSPadu
http://www.pspad.com
Soucasne se muzes i podivat na to, jak to vypada v praxi
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
Resize obrazku a animaci
[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 09.6.2006 13:44:43
Zdravim,
potrebuju nejakou (nejlepe free) knihovnu na resize obrazku (kvalitni
- resample), import ruznych formatu, export do alespon formatu (jpg,
png, gif) a take resize animovanych gifu (pripadne import videa do
animovaneho gifu).
Poradite nejake nastroje co umi toto (pripadne cast z tohoto)?
Potrebuju to do sveho programu ktery musi automatizovane konvertovat
obrazky, animace a generovat ruzna rozliseni.
Diky
TR
Resize obrazku a animaci
[*] Radek Cervinka <radek.cervinka(zv)technodat(tec)cz> - 09.6.2006 15:16:49
Tomas Rosa napsal(a):
> Zdravim,
>
> potrebuju nejakou (nejlepe free) knihovnu na resize obrazku (kvalitni
> - resample), import ruznych formatu, export do alespon formatu (jpg,
> png, gif) a take resize animovanych gifu (pripadne import videa do
> animovaneho gifu).
>
> Poradite nejake nastroje co umi toto (pripadne cast z tohoto)?
> Potrebuju to do sveho programu ktery musi automatizovane konvertovat
> obrazky, animace a generovat ruzna rozliseni.
>
> Diky
> TR
>
>
http://www.efg2.com/Lab/Library/Delphi/Graphics/ImageProcessing.htm
http://www.delphi-gems.com/Graphics.php
R.
Synapse - odesilani mailu
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 12.6.2006 08:39:18
Ahoj,
kolega pouziva k odesilani e-mailu z aplikace Synapsi.
Vsude to, zda se, chodi, u jednoho zakaznika ale pri pokusu
o odeslani mailu vznikne chyba Relay access denied.
Co to znamena? Do propert tridy TSMTPSend - UserName a
Password se dava spravne jmeno a heslo (snad tedy, verte
tvrzeni zakaznika, ze?).
Kudy se tedy vydat pri hledani reseni? Zakaznik ma jako
postovniho klienta Outlook Expres, ten funguje dobre.
Diky predem.
David Lebeda
Jak na MDB
[*] Jan Sebesta <sebesta(zv)cube(tec)cz> - 12.6.2006 07:21:12
Zdravim,
Potrebuji do sveho projektu v D5 pouze cist data z jine aplikace, ktere jsou
ulozeny v tabulce *.mdb.
Zatim jsem s touto databazi nikdy nepracoval takze se ptam pres ktere
komponenty je nejlepe k temto souborum pristupovat s ohledem na rychlost (V
databazi vznika cca 50000 zaznamu tydne).
Dekuji
Jan Sebesta
Jak na MDB
[*] Radek Cervinka <radek.cervinka(zv)technodat(tec)cz> - 12.6.2006 08:53:19
Jan Sebesta napsal(a):
> Zdravim,
>
>
> Potrebuji do sveho projektu v D5 pouze cist data z jine aplikace, ktere jsou
> ulozeny v tabulce *.mdb.
>
>
> Zatim jsem s touto databazi nikdy nepracoval takze se ptam pres ktere
> komponenty je nejlepe k temto souborum pristupovat s ohledem na rychlost (V
> databazi vznika cca 50000 zaznamu tydne).
>
>
50tis. je nic.
nejlepe pres ADO, k D5 (podle verze) se da budto ADO komponenty dokoupit
nebo se daji nejake stahnout.
Pak se v connection stringu specifikuje pripojeni pres Microsoft JET.
Mimochodem: to je takovy problem zadat do googlu dve slova?
DELPHI MDB
a hned prvni odkaz uvadi nekolik moznosti.
http://latiumsoftware.com/en/delphi/00036.php
R.
Synapse - odesilani mailu
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 12.6.2006 09:03:19
> kolega pouziva k odesilani e-mailu z aplikace Synapsi.
> Vsude to, zda se, chodi, u jednoho zakaznika ale pri pokusu
> o odeslani mailu vznikne chyba Relay access denied.
>
> Co to znamena?
To znamena, ze postovni server vnima jak adresu odesilatele, tak i
adresu prijemce jako cizi adresy, a tak se vcelku pochopitelne brani,
aby sis prez nej posilal cizi postu. Spravne nastaveny postovni
server totiz zpracuje jen takove e-maily, ktere bud pochazi od jeho
uzivatele, nebo naopak prichazi pro nejakeho jeho uzivatele. Cokoliv
jineho je vnimano jako 'relay', tedy ma slouzit jen jako preposilac
cizi posty. K takove akci musis mit na serveru nejake zvlastni
opravneni,treba tak ze to posilas z jemu zname IP adresu, nebo ses
autorizoval pres SMTP a zaroven tvuj ucet ma pravo k takove akci.
> Do propert tridy TSMTPSend - UserName a Password se dava spravne jmeno
> a heslo (snad tedy, verte tvrzeni zakaznika, ze?).
>
> Kudy se tedy vydat pri hledani reseni? Zakaznik ma jako
> postovniho klienta Outlook Expres, ten funguje dobre.
A ten OE odesila pomoci SMTP? Mas to nastavene stejne? A hlavne (!)
mas tam nastavenou stejnou adresu odesilatele?
Jeho OE mu funguje dobre, protoze treba odesila z adresy, ktera je
domovska pro ten postovn server, tak to pochopitelne funguje. Pokud
Synapsi nastavis uplne stejne, ale adresa odesilatele bude nejaka
izi, tak by to fungovat nemelo... viz muj prvni odstavec.
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://synapse.ararat(tec)cz/ - Ararat Synapse - TCP/IP Lib.
Synapse - odesilani mailu
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 12.6.2006 09:27:21
> > Do propert tridy TSMTPSend - UserName a Password se dava
> > spravne jmeno a heslo (snad tedy, verte tvrzeni zakaznika,
> > ze?).
> >
> > Kudy se tedy vydat pri hledani reseni? Zakaznik ma jako
> > postovniho klienta Outlook Expres, ten funguje dobre.
>
> A ten OE odesila pomoci SMTP? Mas to nastavene stejne? A
> hlavne (!) mas tam nastavenou stejnou adresu odesilatele?
>
> Jeho OE mu funguje dobre, protoze treba odesila z adresy,
> ktera je domovska pro ten postovn server, tak to
> pochopitelne funguje.
Zakaznik to posila pres IOL. Tim, ze OE funguje dobre, jsem
chtel jen rict, ze vlastne vubec ma funkcni mail. Kdyz pres
IOL jede Outlook, tak jsem mel za to, ze po zadani
autentikace by se tam mohl probit i nas program.
Zatim se klonime k tomu, ze zakaznik zadal neco blbe - bud
svou adresu nebo udaje pro autentikaci. Az se zase ozve,
znovu to zkusime s nim projet.
David Lebeda
Synapse - odesilani mailu
[*] Venca Zaruba <zaruba(zv)elastoform(tec)cz> - 12.6.2006 11:19:29
> kolega pouziva k odesilani e-mailu z aplikace Synapsi.
> Vsude to, zda se, chodi, u jednoho zakaznika ale pri pokusu
> o odeslani mailu vznikne chyba Relay access denied.
>
A jakej ma antivir ? Zkus to bez ochran
Synapse - LDAP - kodovani cestiny
[*] david.kopecek(zv)hacktrack(tec)com - 12.6.2006 12:09:33
Zdravim konferenci,
skousel sem se napojit na LDAP server (bezi na Win2003 Adv) pomoci LDAPSend a funguje to skvele.. Az na to ze mi nefunguje kodovani cestiny. Kdyz ma uzivatel jmeno s hackama a carkama tak ho to uplne skomoli.. nevite nekdo jak tohle resit?..
Diky David.Synapse - LDAP - kodovani cestiny
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 12.6.2006 12:17:33
> LDAPSend a funguje to skvele.. Az na to ze mi nefunguje kodovani
> cestiny. Kdyz ma uzivatel jmeno s hackama a carkama tak ho to uplne
> skomoli.. nevite nekdo jak tohle resit?..
Ta data zakoduj do UTF8, a az pak je cpi do LdapSendu. A naopak, po
precteni si to z toho UTF8 dekoduj.
Na kodovani do UTF8 muzes pouzit zase bud SYnapsi, nebotreba i
Win32APi funkce.
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://synapse.ararat(tec)cz/ - Ararat Synapse - TCP/IP Lib.
Synapse - odesilani mailu
[*] Jiri Vojtek <jiri(zv)vojtek.biz> - 12.6.2006 16:51:52
Spis nez v antiviru je problem v nastaveni smtp serveru. Neumoznuje odesilat
data mimo domenu pokud nejste v domene pripojeni - vetsinou se da resit pokud
pouzijete bezpecne pripojeni (pod heslem) k smtp.
Jiri Vojtek
>> kolega pouziva k odesilani e-mailu z aplikace Synapsi.
>> Vsude to, zda se, chodi, u jednoho zakaznika ale pri pokusu
>> o odeslani mailu vznikne chyba Relay access denied.
>>
> A jakej ma antivir ? Zkus to bez ochran
>
>
>
----------------------------------------------------------------
This message was sent using IMP, the Internet Messaging Program.
Synapse - LDAP - kodovani cestiny
[*] Petr Vones <konference(zv)petrvones(tec)net> - 12.6.2006 18:31:59
From: "David Kopecek" <david.kopecek(zv)hacktrack.com>
> no moment to nejak nechapu.. ja je neposilam, ja je ctu ze AD.. od tama
> se mi vracni divny paznaky
Neni lepsi pouzivat normalni rozhrani - ADSI:
http://www.agnisoft.com/white_papers/active_directory.asp
Petr Vones
Synapse - LDAP - kodovani cestiny
[*] David Kopecek <david.kopecek(zv)hacktrack(tec)com> - 12.6.2006 18:27:59
Dobry den,
12. cervna 2006, 12:17:33, napsal jste:
>> LDAPSend a funguje to skvele.. Az na to ze mi nefunguje kodovani
>> cestiny. Kdyz ma uzivatel jmeno s hackama a carkama tak ho to uplne
>> skomoli.. nevite nekdo jak tohle resit?..
LG> Ta data zakoduj do UTF8, a az pak je cpi do LdapSendu. A naopak, po
LG> precteni si to z toho UTF8 dekoduj.
no moment to nejak nechapu.. ja je neposilam, ja je ctu ze AD.. od tama
se mi vracni divny paznaky
LG> Na kodovani do UTF8 muzes pouzit zase bud SYnapsi, nebotreba i
LG> Win32APi funkce.
jj vim..
Thx
Synapse - LDAP - kodovani cestiny
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 12.6.2006 18:44:00
> LG> Ta data zakoduj do UTF8, a az pak je cpi do LdapSendu. A naopak, po
> LG> precteni si to z toho UTF8 dekoduj.
>
> no moment to nejak nechapu.. ja je neposilam, ja je ctu ze AD.. od tama se
> mi vracni divny paznaky
Tak znova: "po precteni si to z toho UTF8 dekoduj"
Tedy ty paznaky jsou normalni UTF8 kod, tak si to proste dekoduj.
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
WEB: http://www.ararat(tec)cz/synapse - Synapse Delphi and Kylix TCP/IP
Library
Callback z DLL(C++) do Delphi aplikace
[*] Martin Dietl <dietl(zv)4use(tec)cz> - 13.6.2006 08:33:05
Ahojte,
Mam problem s volanim DLL funkce, ktera je deklarovana takto:
typedef BOOL (__stdcall *DLLOpen)
( HANDLE *hOpen,
UINT *flags,
void *callback,
void *userData );
z aplikace v D5.
Chovani: DLLOpen vyvola predanou callback funkci, ta se provede OK, pak ale
nasleduje hlaseni: Project ... faulted with message: 'access violation at
0x7c9378ae: write of address 0x00030ff4'. Process Stopped. ...
Tohle je jen zkusebni kod, abych dokazal zavolat tu funkci.
Muzete mne nekdo nasmerovat, co je spatne, pliz?
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;
...
type
THandle = Integer;
PHandle = ^TDAHandle;
TDllOpen = function(hOpen: PHandle; Flags: PLongWord; Callback: pointer;
UserData: pointer): boolean; stdcall;
TCallBack = procedure(Event: integer; Socket: integer; pData: PDataStruc;
EventData: pointer; MyData: pointer); stdcall;
var
DllOpen: TDllOpen;
procedure CallBack(Event: integer; Socket: integer; pData: PDataStruc;
EventData: pointer; MyData: pointer); stdcall;
implementation
var
hOpen: THandle;
Flags: UINT;
UserData: PUserData;
procedure TForm1.DLLDynamic;
var
DllHandle: Integer;
Major, Minor, Version: integer;
S: string;
begin
DllHandle := LoadLibrary('DLLLIB.dll');
if DllHandle <> 0 then
begin
(zv)GetVersion := GetProcAddress(DllHandle, 'DllVersion');
if (zv)GetVersion <> nil then
begin
if GetVersion(Major, Minor, Version) = 0 then
lblDllVer.Caption := Format('Dll version %d.%d.%d', [Major,
Minor, Version]);
end;
(zv)DllOpen := GetProcAddress(DllHandle, 'DllOpen');
if (zv)DllOpen <> nil then
begin
Flags := 1;
new(UserData);
s := 'ccc';
move(S[1], UserData^, 3);
try
if DllOpen((zv)hOpen, (zv)Flags, (zv)CallBack, UserData) then // !!! tady to
konci !!!
Log('Open OK');
except
on E: Exception do MessageDlg(E.Message, mtError, [mbOK], 0);
end;
end;
FreeLibrary(DLLHandle);
end;
end;
Dekuju moc, uz nevim kudy kam.
Martin
Jak na MDB
[*] Ludek <konference(zv)sales(tec)cz> - 13.6.2006 09:55:11
> Potrebuji do sveho projektu v D5 pouze cist data z jine aplikace, ktere
> jsou
> ulozeny v tabulce *.mdb.
>
>
> Zatim jsem s touto databazi nikdy nepracoval takze se ptam pres ktere
> komponenty je nejlepe k temto souborum pristupovat s ohledem na rychlost
> (V
> databazi vznika cca 50000 zaznamu tydne).
>
Ahoj,
Dobre to jde pres ADO nebo hledej KADAO komponenty.
Ludek
Export gridu do PDF
[*] Tyslic Jiri <jiri.tyslic(zv)opp.tbggroup(tec)com> - 13.6.2006 10:19:13
FastReport by to mel zvladnout
> Ahoj,
>
> mam aplikaci, ve ktere delam export ruznych dbgridu do
> excelu a csv. Zakaznik nyni poptava export do PDF. Jake
> jsou moznosti realizace?
>
> Jedna cesta je "donutit" uzivatele, at si instaluje nektery
> z rady programu, ktere simuluji tiskarnu a obsah gridu pak
> tisknout na tuto tiskarnu. Ja bohuzel u vetsiny tech gridu
> tisk neimplementuji - nechce se mi delat tolik predloh do
> Siney apod. - proto bych rad jinou cestu.
>
> Existuje moznost nejak rucne ci s komponentou vytvorit PDF
> soubor jako klasicke export? Bez berlicek ve forme simulace
> tiskarny apod. Muzeme mi nekdo doporucit pripadne nejake
> komponenty apod?
>
> Diky za nasmerovani.
>
> D5E
>
> David Lebeda
Export gridu do PDF
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 13.6.2006 10:13:12
Ahoj,
mam aplikaci, ve ktere delam export ruznych dbgridu do
excelu a csv. Zakaznik nyni poptava export do PDF. Jake
jsou moznosti realizace?
Jedna cesta je "donutit" uzivatele, at si instaluje nektery
z rady programu, ktere simuluji tiskarnu a obsah gridu pak
tisknout na tuto tiskarnu. Ja bohuzel u vetsiny tech gridu
tisk neimplementuji - nechce se mi delat tolik predloh do
Siney apod. - proto bych rad jinou cestu.
Existuje moznost nejak rucne ci s komponentou vytvorit PDF
soubor jako klasicke export? Bez berlicek ve forme simulace
tiskarny apod. Muzeme mi nekdo doporucit pripadne nejake
komponenty apod?
Diky za nasmerovani.
D5E
David Lebeda
Export gridu do PDF
[*] Roman Borkovec <roman(zv)borkovec(tec)com> - 13.6.2006 10:31:14
Ahoj,
na www.borkovec.com/comps/lib.zip muzes stahnout printgrid (free,
source), ktery si poradi i s cestinou (na rozdil od jinych) - pokud
spechame, je to nejlepsi zpusob jak vyhodit okamzite tisk (opis) gridu. Do
pdf bohuzel pres pdf tiskarnu, ale porad lepsi nez delat sestavu pro sineu.
Snad aspon neco ....
Roman
overeni podpisu s expirovanym certifikatem
[*] delphak(zv)centrum(tec)cz - 13.6.2006 10:29:14
Ahoj,
potreboval bych odpoved od nekoho s praxi a zkusenostma. Do DB se ukladaji dokumenty a k nim i elektronicky podpis.
JAK to bude s overenim podpisu po expirovani certifikatu, kterym byla data podepsana?
Bude vysledkem pouze hlaseni, ze podpis neni platny???
Nebo je mozne ziskat informaci, ze PODPIS JE VPORADKU (tj. dokument ani podpis nebyl zmenen) ALE ZE JIZ PLATNOST PODEPISUJICIHO CERTIFIKATU SKONCILA?
A pripadne nejaky nastroj pro Win, kde bych si mohl generovat testovaci certifikaty, ktere bych mohl naimportovat do IE.
Dik moc za odpoved.
Export gridu do PDF
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 13.6.2006 10:27:14
> FastReport by to mel zvladnout
> > mam aplikaci, ve ktere delam export ruznych dbgridu do
> > excelu a csv. Zakaznik nyni poptava export do PDF. Jake
> > jsou moznosti realizace?
OK, beru na vedomi. Na druhou stranu - preferuji reseni bez
generatoru tiskovych sestav. Teprve kdyz se nenajde nic
takoveho, bych uvazoval o resenich pres tisk.
David Lebeda
Callback z DLL(C++) do Delphi aplikace
[*] aldik(zv)quick(tec)cz - 13.6.2006 10:25:14
Mozna je to slepa cesta ale mrkni se na dll ktere jeste potrebujes pres TDump
tusim...treba ti chybi knihovna kterou tahle dll pouziva.
ales
Quoting Martin Dietl <dietl(zv)4use(tec)cz>:
> Ahojte,
> Mam problem s volanim DLL funkce, ktera je deklarovana takto:
>
> typedef BOOL (__stdcall *DLLOpen)
> ( HANDLE *hOpen,
> UINT *flags,
> void *callback,
> void *userData );
>
> z aplikace v D5.
>
> Chovani: DLLOpen vyvola predanou callback funkci, ta se provede OK, pak ale
> nasleduje hlaseni: Project ... faulted with message: 'access violation at
> 0x7c9378ae: write of address 0x00030ff4'. Process Stopped. ...
Definice Typu
[*] mydelphi(zv)seznam(tec)cz - 13.6.2006 10:57:16
Dobry den,
mam dve unity, kazda obsahuje jeden objekt.
Unita A pouziva unitu B. Unita B unitu A.
Aby mi prekladac nehlasil tu znamou chybu "Circular unit reference" mam
Uses Unit_A v unite B v casti implementation.
Tady ale vyvstava problem. Objektu v unite B chci predat pri vytvoreni v
konstruktoru jako parametr ukazatel na objekt z unity A. no a pak mi
prekladac samozrejme hlasi "Undeclared identifier..." jelikoz typ obektu
z unity a jeste nezna.... Nevite jak to obejit?
Dik Michal.
OT: Nastroj pro dokumentaci DB
[*] delphak(zv)centrum(tec)cz - 13.6.2006 10:53:16
Ahoj,
vim ze to sem tak uplne nepatri, ale spousta z Vas dela DB. Muzete mi poradit najeky (nejlepe free) nastroj na dokumentaci DB? Datove diagramy, reference, tabulky .. nejlepe s moznosti generovani do HTML.
Potreboval bych to pro ORACLE. Bylo by fajn, kdyby to umelo samo alespon vytahnou zakladni udaje z DB (tabulky, popisky a tak), abych je nemusel opisovat.
V.
Nastroj pro dokumentaci DB
[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 13.6.2006 11:11:18
Ahoj,
delphak(zv)centrum(tec)cz napsal(a):
> Ahoj,
> vim ze to sem tak uplne nepatri, ale spousta z Vas dela DB. Muzete mi poradit najeky (nejlepe free) nastroj na dokumentaci DB? Datove diagramy, reference, tabulky.. nejlepe s moznosti generovani do HTML.
> Potreboval bych to pro ORACLE. Bylo by fajn, kdyby to umelo samo alespon vytahnou zakladni udaje z DB (tabulky, popisky a tak), abych je nemusel opisovat.
myslim, ze se zde hodne lidi shodne na programku CaseStudio2 od
CharonWare. Je jednoduchy, umi vse co potrebujes a stoji opravdu malo
(Ceska verze).
Nevim jak ted, treba se nekdo ozve, ale kdyz jsem kdysi hledal neco
podobneho free, tak jsem nic pouzitelneho nenasel.
Peca
Definice Typu
[*] Lucky62 <lucky62(zv)datarix.sk> - 13.6.2006 11:03:17
Zvolit ako parameter "vseobecnejsi" typ objektu napr. az TObject
a vnutri si otestovat ci je objekt typu aky pozadujeme.
Jan Kostial.
> mam dve unity, kazda obsahuje jeden objekt.
> Unita A pouziva unitu B. Unita B unitu A.
> Aby mi prekladac nehlasil tu znamou chybu "Circular unit reference" mam
> Uses Unit_A v unite B v casti implementation.
>
> Tady ale vyvstava problem. Objektu v unite B chci predat pri vytvoreni v
> konstruktoru jako parametr ukazatel na objekt z unity A. no a pak mi
> prekladac samozrejme hlasi "Undeclared identifier..." jelikoz typ obektu
> z unity a jeste nezna.... Nevite jak to obejit?
Nastroj pro dokumentaci DB
[*] Jiri Vojtek <jiri(zv)vojtek.biz> - 13.6.2006 11:21:19
Budu se opakovat, ale
CASE studio :)
Jiri Vojek
> Ahoj,
> vim ze to sem tak uplne nepatri, ale spousta z Vas dela DB. Muzete mi
> poradit najeky (nejlepe free) nastroj na dokumentaci DB? Datove
> diagramy, reference, tabulky .. nejlepe s moznosti generovani do HTML.
> Potreboval bych to pro ORACLE. Bylo by fajn, kdyby to umelo samo
> alespon vytahnou zakladni udaje z DB (tabulky, popisky a tak), abych
> je nemusel opisovat.
>
> V.
>
>
----------------------------------------------------------------
This message was sent using IMP, the Internet Messaging Program.
Callback z DLL(C++) do Delphi aplikace
[*] Martin Dietl <dietl(zv)4use(tec)cz> - 13.6.2006 11:15:18
Dekuju moc za tip, ale neni to ono.
V DLL asi chyba nebude, demo aplikace v C++ provede to volani OK.
Martin
>-----Original Message-----
>From: aldik(zv)quick(tec)cz
>Subject: Re: Callback z DLL(C++) do Delphi aplikace
>
>Mozna je to slepa cesta ale mrkni se na dll ktere jeste potrebujes pres
TDump
>tusim...treba ti chybi knihovna kterou tahle dll pouziva.
>
>ales
Callback z DLL(C++) do Delphi aplikace
[*] Radek Cervinka <radek.cervinka(zv)technodat(tec)cz> - 13.6.2006 11:23:19
Martin Dietl napsal(a):
> Ahojte,
> Mam problem s volanim DLL funkce, ktera je deklarovana takto:
>
> typedef BOOL (__stdcall *DLLOpen)
> ( HANDLE *hOpen,
> UINT *flags,
> void *callback,
> void *userData );
>
> z aplikace v D5.
>
> Chovani: DLLOpen vyvola predanou callback funkci, ta se provede OK, pak ale
> nasleduje hlaseni: Project ... faulted with message: 'access violation at
> 0x7c9378ae: write of address 0x00030ff4'. Process Stopped. ...
a ta callback ma jakou volaci konvenci? ty tam strkas stdcall, jen se tak ptam.
kdyz tak si to odkrokuj v debugeru delphi v ASM.
ta volaci konvence by tomu mohlo odpovidat
R.
Nastroj pro dokumentaci DB
[*] Kalhous <kalhous(zv)eu(tec)cz> - 13.6.2006 12:17:23
Abych jen neopakoval CaseStudio - krome neuveritelneho pomeru cena/vykon
bude asi z hlediska dokumentace zajimave treba to, ze program ma jednoduche
a pritom mocne nastroje k tomu, aby si uzivatel kteremu nevyhovuje format
standardnich vystupu dokumentace vytvoril skripty pro tisk podle sveho vkusu
a potreb.
Z.Kalhous
----- Original Message -----
> vim ze to sem tak uplne nepatri, ale spousta z Vas dela DB. Muzete mi
poradit najeky (nejlepe free) nastroj na dokumentaci DB? Datove diagramy,
reference, tabulky .. nejlepe s moznosti generovani do HTML.
Callback z DLL(C++) do Delphi aplikace
[*] Martin Dietl <dietl(zv)4use(tec)cz> - 13.6.2006 13:19:27
Stdcall je OK, Callback je volan s ocekavanymi hodnotami parametru.
Odkrokoval jsem - DllOpen je vyvolana, z ni je volana Callback. Ta se v
poradku
vrati do DllOpen, ta dojede a az po jejim RET to skoci nekam uplne mimo (AV)
Mate nekdo tip proc?
MD
-----Original Message-----
>From: Radek Cervinka
>
>a ta callback ma jakou volaci konvenci? ty tam strkas stdcall, jen se tak
ptam.
>kdyz tak si to odkrokuj v debugeru delphi v ASM.
>
>ta volaci konvence by tomu mohlo odpovidat
>
>R.Callback z DLL(C++) do Delphi aplikace
[*] Petr Fejfar <development(zv)callnet(tec)cz> - 13.6.2006 13:31:28
Martin Dietl wrote:
> Odkrokoval jsem - DllOpen je vyvolana, z ni je volana Callback. Ta se
> v poradku vrati do DllOpen, ta dojede a az po jejim RET to skoci nekam
uplne
> mimo (AV) Mate nekdo tip proc?
To vypada na to, ze ti nesouhlasi volaci konvence mezi Delphi a DLL
a pak to jako navratovou hodnotu pouzije buhvi co.
Krokuj to znovu pocinaje pushovanim parametru na stack pred volanim DLL
a peclive si vsimej obsahu zasobniku, zejmena jak vypada pred/po callech
DLL i CallBacku.
pf
Callback z DLL(C++) do Delphi aplikace
[*] Petr Malasek <malasek(zv)carsoft(tec)cz> - 13.6.2006 13:57:30
Toto mi to delalo kdyz jsem mel v DELPHI metodu deklarovanou jako STDCALL a
v C++ ne.
PeM
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz] On
Behalf Of Martin Dietl
Sent: Tuesday, June 13, 2006 1:19 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Callback z DLL(C++) do Delphi aplikace
Stdcall je OK, Callback je volan s ocekavanymi hodnotami parametru.
Odkrokoval jsem - DllOpen je vyvolana, z ni je volana Callback. Ta se v
poradku
vrati do DllOpen, ta dojede a az po jejim RET to skoci nekam uplne mimo (AV)
Mate nekdo tip proc?
MD
-----Original Message-----
>From: Radek Cervinka
>
>a ta callback ma jakou volaci konvenci? ty tam strkas stdcall, jen se tak
ptam.
>kdyz tak si to odkrokuj v debugeru delphi v ASM.
>
>ta volaci konvence by tomu mohlo odpovidat
>
>R.Callback z DLL(C++) do Delphi aplikace
[*] Martin Dietl <dietl(zv)4use(tec)cz> - 13.6.2006 14:53:34
To je zajimava informace. Tak jsem zkusil DllOpen deklarovat jako CDECL, ale
konci to podobne, i kdyz na jine adrese.
>-----Original Message-----
>From: Petr Malasek
>
>Toto mi to delalo kdyz jsem mel v DELPHI metodu deklarovanou jako STDCALL a
>v C++ ne.
>
>PeM
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz] On
Behalf Of Martin Dietl
Sent: Tuesday, June 13, 2006 1:19 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Callback z DLL(C++) do Delphi aplikace
Stdcall je OK, Callback je volan s ocekavanymi hodnotami parametru.
Odkrokoval jsem - DllOpen je vyvolana, z ni je volana Callback. Ta se v
poradku
vrati do DllOpen, ta dojede a az po jejim RET to skoci nekam uplne mimo (AV)
Mate nekdo tip proc?
MD
-----Original Message-----
>From: Radek Cervinka
>
>a ta callback ma jakou volaci konvenci? ty tam strkas stdcall, jen se tak
ptam.
>kdyz tak si to odkrokuj v debugeru delphi v ASM.
>
>ta volaci konvence by tomu mohlo odpovidat
>
>R.
Callback z DLL(C++) do Delphi aplikace
[*] Erik Salaj <winsoft(zv)netkosice.sk> - 13.6.2006 15:19:36
> To je zajimava informace. Tak jsem zkusil DllOpen deklarovat jako CDECL, ale
> konci to podobne, i kdyz na jine adrese.
DLLOpen funkcia ma byt stdcall, ked je tak deklarovana v C-cku.
Ale callback funkcia moze mat inu volaciu konvenciu napr. cdecl,
treba pozriet ako je callback funkcia deklarovana v C.
Erik Salaj
Callback z DLL(C++) do Delphi aplikace
[*] Martin Dietl <dietl(zv)4use(tec)cz> - 13.6.2006 15:41:38
!!! BINGO !!!
DLLOpen a ostatni funkce jsou deklarovane, takze STDCALL. Jenze jsem si
nevsiml, ze Callback neni deklarovany - pouze pointer, takze CDECL. Bohuzel
ve f...d manual je u Callback uvedeno STDCALL !
Taky me zmatlo, ze z Callback se to vraci v pohode.
Je to tak proste, dear Watson!
Diky vsem a Erikovi obzvlast !
Erik Salaj wrote:
>DLLOpen funkcia ma byt stdcall, ked je tak deklarovana v C-cku.
>Ale callback funkcia moze mat inu volaciu konvenciu napr. cdecl,
>treba pozriet ako je callback funkcia deklarovana v C.Delphi a overeni prihlaseni do AD
[*] David Kopecek <david.kopecek(zv)hacktrack(tec)com> - 13.6.2006 14:55:34
Zdravim konferenci,
potreboval bych ve sve aplikaci overit jmeno a heslo zadane uzivatelem
vuci Active Directory.. Poradi mi nekdo jak.?
Diky David
navrhar
[*] Petr Vetesnik <vetesnik(zv)gmail(tec)com> - 14.6.2006 10:40:57
Slunecny den vsem.
Potreboval bych ve svem programu vytvaret navrhy formularu podobne jako se
to dela v designu v prostredi delphi.
Nemate nekdo nejaky odkaz na tuto problematiku nebo jste si to napsali sami?
Petr Vetesnik
navrhar
[*] viktordoubek(zv)volny(tec)cz - 14.6.2006 10:50:58
Pouzivam s uspechem Runtime Design System v.2.2 od Kazuhiro Sasaki
ke stazeni treba zde:
http://www.torry.ru/authorsmore.php?id=1455
http://sodev(tec)cz/compbase/show.php?page=Others&la=
----- PUVODNI ZPRAVA -----
Od: "Petr Vetesnik" <vetesnik(zv)gmail.com>
Komu: delphi-l(zv)clexpert(tec)cz
Predmet: navrhar
Datum: 14.6.2006 - 10:40:57
> Slunecny den vsem.
>
> Potreboval bych ve svem programu vytvaret navrhy formularu
> podobne jako se
> to dela v designu v prostredi delphi.
> Nemate nekdo nejaky odkaz na tuto problematiku nebo
> jste si to napsali sami?
>
> Petr Vetesnik
>
>
>
API comport
[*] Dalibor Faltynek <dalibor.faltynek(zv)orgrez(tec)cz> - 14.6.2006 12:17:04
Ahoj,
z jisteho duvodu potrebuji pracovat se seriovym portem primo pres API funkce. Nemohl by nekdo poradit, kde je najit a jak je univerzalne volat (z Delphi, VBA)? Priklad by mi pomohl asi nejvic.
Dekuji za pripadne odezvy.
Dalibor
API comport
[*] Petr Vones <konference(zv)petrvones(tec)net> - 14.6.2006 12:23:05
From: "Dalibor Faltynek" <dalibor.faltynek(zv)orgrez(tec)cz>
> z jisteho duvodu potrebuji pracovat se seriovym portem primo pres API
> funkce. Nemohl by nekdo poradit, kde je najit a jak je univerzalne volat
> (z Delphi, VBA)? Priklad by mi pomohl asi nejvic.
http://msdn.microsoft.com/library/en-us/dnfiles/html/msdn_serial.asp
Petr Vones
API comport
[*] talpa(zv)suchdol(tec)net <aldik(zv)quick(tec)cz> - 14.6.2006 12:23:04
pouzij synaser ze synapse...
Dalibor Faltynek napsal(a):
>z jisteho duvodu potrebuji pracovat se seriovym portem primo pres API funkce.
>
Pristup k FB z vice vlaken
[*] Marek Dostal <konf(zv)agnis(tec)cz> - 14.6.2006 14:19:13
> Zakladem je, ze KAZDE vlakno musi mit svoji connectionu.
> Pak klasicke rizeni transakcemi.
Diky, bylo to tim. Jeste jsem ale narazil na jeden souvisejici problem. Kdyz
v jednom vlakne zapisi nejake udaje do databaze, jsou hned viditelne pro
cteni dat v jinem vlakne, nebo az po ukonceni toho prvniho?
Marek Dostal
D7Prof, WinXP, FireBird 1.0, 1.5
overeni podpisu s expirovanym certifikatem
[*] Ludek <konference(zv)sales(tec)cz> - 14.6.2006 14:37:14
----- Original Message -----
From: <delphak(zv)centrum(tec)cz>
> A pripadne nejaky nastroj pro Win, kde bych si mohl generovat testovaci
> certifikaty, ktere bych mohl naimportovat do IE.
>
Ahoj,
Certifikacni urad by mel byt soucasti serveru Windows 2003. Tam si vytvoris
svoji "autoritu" a muzes generovat certifikaty serverum, uzivatelum atd.
Ludek
Pristup k FB z vice vlaken
[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 14.6.2006 14:27:13
Tohle souvisi s izolaci transakci.
Zjednodusene (obe vlakna snapshot), po commitu v privnim vlakne, a commitu
v druhem vlakne jsou data citelna v druhem vlakne.
Commit musi byt proveden v uveden poradi.
Pokud je druha transakce typu read commted, tak budou
data v druhem vlakne citelna hned po commitu v prvnim vlakne.
Slavek
Ing. Slavomir Skopalik
Jednatel spolecnosti
Elekt Labs s.r.o.
Chaloupky 158
783 72 Velky Tynec
Czech Republic
--------------------------------------------
Mobil: +420 724 207 851
icq:199 118 333
e-mail:skopalik(zv)elektlabs(tec)cz
http://www.elektlabs(tec)cz
> Diky, bylo to tim. Jeste jsem ale narazil na jeden
> souvisejici problem. Kdyz
> v jednom vlakne zapisi nejake udaje do databaze, jsou hned
> viditelne pro
> cteni dat v jinem vlakne, nebo az po ukonceni toho prvniho?
>
> Marek Dostal
Pristup k FB z vice vlaken
[*] Ing. Marek Kocan <kocan(zv)ebchod(tec)cz> - 14.6.2006 14:27:13
cau,
to zalezi na urovni izolace a na tom, kdy ty zmeny
potvrdis. Koukni napr. do serialu od P. Cisare, ktery se
transakcim venuje -
http://www.dbsvet(tec)cz/view.php?cisloclanku=2005071802
KER
Pristup k FB z vice vlaken
[*] Jakub Dusek <conference(zv)corexpert(tec)com> - 14.6.2006 15:49:19
Ahoj,
zalezi na tom kdy se ukonci databazova transakce v tom vlaknu, ktere
zapisuje. Na ukonceni behu samotneho vlakna nezalezi.
Jakub Dusek
----------------------------------------------------------------------
web : http://corexpert.com, mobile : +420 724 505 904, ICQ : 8606 3232
odesilani smsek, vizitek, log a melodii, snadna integrace do Vaseho IS
=> Sms GateKeeper, Sms GateKeeper Service
======================================================================
Wednesday, June 14, 2006, 2:19:13 PM, you wrote:
MD> Diky, bylo to tim. Jeste jsem ale narazil na jeden souvisejici problem. Kdyz
MD> v jednom vlakne zapisi nejake udaje do databaze, jsou hned viditelne pro
MD> cteni dat v jinem vlakne, nebo az po ukonceni toho prvniho?
MD> Marek Dostal
MD> D7Prof, WinXP, FireBird 1.0, 1.5 overeni podpisu s expirovanym certifikatem
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 14.6.2006 16:59:24
Puvodni zprava ze dne 13.6.2006:
> JAK to bude s overenim podpisu po expirovani certifikatu, kterym
> byla data podepsana? Bude vysledkem pouze hlaseni, ze podpis neni
> platny???
Podpis je vzdy platny, kdyz je platny. Podpis <> certifikat, tj.
nemuze byt neplatny podpis, kdyz byl platny v dobe, kdy byl certifikat
platny.
> Nebo je mozne ziskat informaci, ze PODPIS JE VPORADKU (tj. dokument
> ani podpis nebyl zmenen) ALE ZE JIZ PLATNOST PODEPISUJICIHO
> CERTIFIKATU SKONCILA?
No jiste.
> A pripadne nejaky nastroj pro Win, kde bych si mohl generovat
> testovaci certifikaty, ktere bych mohl naimportovat do IE.
Soucasti treba Windows Serveru je certifikacni autorita.
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================
Manual na ASQLite komponenty (Aducom)
[*] MaReK Penguin Olsavsky <orsm(zv)centrum(tec)cz> - 15.6.2006 09:10:32
Dobry den,
potrebuji se poradit, jestli znate nekdo odkaz na pouziti Aducomackych
(http://www.aducom.com/cen/news.php) komponent pro SQLite3. Idealne s
priklady :-), ale to uz bych chtel asi moc. Strycek Google.com mi zatim
moc nepomohl :-\.
Dekuji
MaReK Olsavsky
--
- --
MaReK "Penguin" Olsavsky
PHP Voodoo
private mail: orsm(zv)centrum(tec)cz
private web: http://orsm.wz(tec)cz
Jabber#: penguin_007(zv)jabber.org; Skype: Penguin_007
tel.: +420-603-519-650; +420-775-154-689 (775-1-LINUX)
nacteni "surovych" dat z clipboardu
[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 15.6.2006 11:04:40
Ahoj,
mam v clipboardu nejaka data z webove stranky. Chtal bych ta data
ziskat tak jak jsou, vcetne vsech tagu. Kdyz pastnu do memo, mam jenom
cisty text, kdyz do openofficu, tak mam spravne naformatovany dokument.
Potreboval bych tedy nejak precist ta data, tak jak jsou v pameti do
nejake promenne (strong) a rozparsovat si to. Potrebuju si z toho
vytahnout nejakou tabulku.
Dik za nakopnuti,
Peca aka Petr Palicka
Jak na data v XML souboru?
[*] Ing. Igor Vodicka <vodicka(zv)sagit(tec)cz> - 15.6.2006 13:34:50
Ahoj!
Existuje pro D5 nejaka komponenta, ktera umi s XML souborem pracovat jako s
datasetem?
Predem diky
Ing. Igor Vodicka
informacni systemy
Nakladatelstvi Sagit
Tel.: 59 6786 001
HTTP://www.sagit(tec)cz/
Parser matematickych vyrazu
[*] Jiri Matejka <matejka(zv)stemmark(tec)cz> - 15.6.2006 15:24:58
Pouzivam Math Expression v 1.0
(http://www.torry.net/quicksearchd.php?String=math+expression&Title=Yes,
druha polozka odshora). Celkem jednoducha unitka, free.
Jirka Matejka
> muzete prosim nekdo doporucit parser matematickych vyrazu ? Potrebuji
> pouzivat konstanty, promenne, zakladni operatory a funkce. Na netu jsem
> toho
> nasel hafo, pro zkraceni vyzkumu by se mi hodila reference od nekoho, kdo
> nejaky uspesne pouziva.
>
> Diky
>
> Jiri Foldyna
Parser matematickych vyrazu
[*] Jiri Foldyna <jiri.f(zv)avizo(tec)cz> - 15.6.2006 15:16:57
Ahoj,
muzete prosim nekdo doporucit parser matematickych vyrazu ? Potrebuji
pouzivat konstanty, promenne, zakladni operatory a funkce. Na netu jsem toho
nasel hafo, pro zkraceni vyzkumu by se mi hodila reference od nekoho, kdo
nejaky uspesne pouziva.
Diky
Jiri Foldyna
Parser matematickych vyrazu
[*] Jiri Foldyna <jiri.f(zv)avizo(tec)cz> - 15.6.2006 15:32:58
Diky za tip, ale potrebuji neco komplexnejsiho, vcetne user defined
promennych. Nechtel bych je formatovat do parsovaneho stringu...
Jiri Foldyna
> Pouzivam Math Expression v 1.0
> (http://www.torry.net/quicksearchd.php?String=math+expression&
> Title=Yes,
> druha polozka odshora). Celkem jednoducha unitka, free.
>
> > muzete prosim nekdo doporucit parser matematickych vyrazu ?
> Potrebuji
> > pouzivat konstanty, promenne, zakladni operatory a funkce.
> Na netu jsem
> > toho
> > nasel hafo, pro zkraceni vyzkumu by se mi hodila reference
> od nekoho, kdo
> > nejaky uspesne pouziva.Parser matematickych vyrazu
[*] Martin Zeman <zeman14(zv)bonbox(tec)cz> - 15.6.2006 22:07:26
Ahoj, pouzival jsem http://www.rksolution(tec)cz/DELPHI/EXPARSE.ZIP,
spokojenost.
m.z.
...
muzete prosim nekdo doporucit parser matematickych vyrazu ? Potrebuji
pouzivat konstanty, promenne, zakladni operatory a funkce. Na netu jsem toho
nasel hafo, pro zkraceni vyzkumu by se mi hodila reference od nekoho, kdo
nejaky uspesne pouziva.
Diky
Jiri Foldyna
Parser matematickych vyrazu
[*] Petr Fejfar <development(zv)callnet(tec)cz> - 15.6.2006 17:27:06
Jiri Foldyna wrote:
> Diky za tip, ale potrebuji neco komplexnejsiho, vcetne user defined
> promennych. Nechtel bych je formatovat do parsovaneho stringu...
A co interpretr Pascalu, ktery je zabudovan do Inno Setup?
http://cc.borland.com/partners/delphi7disk1/innerfuse/innerfuse_pascal_script_3/index.html
pf
OT: Self prezentace APP.
[*] Venca Zaruba <zaruba(zv)elastoform(tec)cz> - 16.6.2006 08:10:10
Zdravim vsechny,
Nedelal jste nekdo (nemate) programek, ktery by simuloval cinnost uzivatele
(vstup klavesnice-mys) a k tomu obcas noco zobrazil a prehral podle daneho scriptu.
Zacal jsem neco takoveho pachat, ale puvodne odhadovana casova narocnost se mi
nejak vymknula z rukou :-).
Jeste mam prosbicku:
Opravdu nejde nejak naplnit promena, kdyz mam jeji nazev v jine promene?
Dekuji
Prijemny zbytek dne
a spoustu stastnych Byte
Vasek Zaruba
8^)
PS:s googlem jsem neco dohledal, ale dam na osobni referenci
Kombinace klaves CTR+ENTER
[*] Martin Holik <martin.holik(zv)pchelp(tec)cz> - 16.6.2006 10:20:20
Zdravim vsechny,
potrebuji nejakym zpusobem v komponente edit odchytavat kombinaci klaves
CTR+ENTER. Jakym nejjednodussim zpusobem mohu odchytnuti kombinace techto
klaves zajistit?
Dekuji za kazdou pomoc
D7
Martin Holik
Self prezentace APP.
[*] Tomas Krejzek <tomas.krejzek(zv)kpsys(tec)cz> - 16.6.2006 10:28:21
ahoj, nevim jak v pascalu, ale v C, C++ to jde pres makro, definujes makro kterymu predas
nazev promenne a v nem to prefrknes do vyrazu, trosku prasarnicka ale jde to.
tom
Venca Zaruba napsal(a):
> Zdravim vsechny,
> Nedelal jste nekdo (nemate) programek, ktery by simuloval cinnost uzivatele
> (vstup klavesnice-mys) a k tomu obcas noco zobrazil a prehral podle daneho scriptu.
> Zacal jsem neco takoveho pachat, ale puvodne odhadovana casova narocnost se mi
> nejak vymknula z rukou :-).
> Jeste mam prosbicku:
> Opravdu nejde nejak naplnit promena, kdyz mam jeji nazev v jine promene?
>
> Dekuji
>
> Prijemny zbytek dne
> a spoustu stastnych Byte
>
> Vasek Zaruba
> 8^)
>
> PS:s googlem jsem neco dohledal, ale dam na osobni referenci
>
>
>
Self prezentace APP.
[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 16.6.2006 11:16:24
On 16.6.2006 8:10 Venca Zaruba wrote:
> Zdravim vsechny,
> Nedelal jste nekdo (nemate) programek, ktery by simuloval cinnost uzivatele
> (vstup klavesnice-mys) a k tomu obcas noco zobrazil a prehral podle daneho scriptu.
> Zacal jsem neco takoveho pachat, ale puvodne odhadovana casova narocnost se mi
> nejak vymknula z rukou :-).
Znam utilitku WinMacro, to bys mozna mohl pouzit. A pak lepsi (ale nevim jak
se jmenuje), ktera umela take toto, vim ze to snad melo tez v nazvu macro a
bylo to na msdn k nejakemu clanku. Takze zkus kdyztak hledat.
--
Jiri Cincura
http://blog.vyvojar(tec)cz/jirka/ | http://photo.cincura.net
http://www.ID3renamer.com
Kombinace klaves CTR+ENTER
[*] Jan Dvorak <dvorak(zv)szu(tec)cz> - 16.6.2006 11:32:26
Delam to takto v D6:
procedure TRecForm.LabeledEdit3KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if (Key = VK_RETURN) and (Shift = [ssCtrl]) then
begin
Key:= 0;
LabeledEdit3DblClick(Sender); //nebo jina akce podle potreby
end;
end;
Jan Dvorak
> Zdravim vsechny,
>
> potrebuji nejakym zpusobem v komponente edit odchytavat
> kombinaci klaves
> CTR+ENTER. Jakym nejjednodussim zpusobem mohu odchytnuti
> kombinace techto
> klaves zajistit?
>
> Dekuji za kazdou pomoc
>
> D7
>
> Martin Holik
Self prezentace APP.
[*] Ludek Finstrle <ludek.finstrle(zv)pzkagis(tec)cz> - 16.6.2006 11:26:25
> > Nedelal jste nekdo (nemate) programek, ktery by simuloval cinnost uzivatele
> > (vstup klavesnice-mys) a k tomu obcas noco zobrazil a prehral podle daneho scriptu.
> > Zacal jsem neco takoveho pachat, ale puvodne odhadovana casova narocnost se mi
> > nejak vymknula z rukou :-).
>
> Znam utilitku WinMacro, to bys mozna mohl pouzit. A pak lepsi (ale nevim jak
> se jmenuje), ktera umela take toto, vim ze to snad melo tez v nazvu macro a
> bylo to na msdn k nejakemu clanku. Takze zkus kdyztak hledat.
AutoIt?
Luf
OT: ActiveX pro ms Access
[*] Jiri Baudys <konference(zv)baudys.name> - 19.6.2006 01:14:42
Krasny den,
mam na Vas trochu OT dotaz.
Schanim nejakou ActiveX (ocx) komponentu, ktera by sla pouzit v MS Accessu a
ktera by umela zobrazit rtf format z mema.
Diky za kazdou radu
jirka
odstraneni html
[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 18.6.2006 13:35:54
On 18.6.2006 13:03 David Kopecek wrote:
> Zdravim
>
> poradi mi nekdo nejakou dokonalou funknci na odstraneni HTML tagu
> tak aby na vystupu byl ciste text?
>
> H..
>
>
Myslis jako aby z '<html>neco</html>' zbylo jen 'neco'?
Potom by stacilo prochazet znak po znaku a pri nalezeni '<' mazat az k '>'.
Pravdepodobne se ale dostanes k pribuznym problemum, jako vnoreny
JavaScript, CSSko apod. Stejne tak je mozne, ze nekteri uzivatele
nezaquotuji nektere nebezpecne znaky (napr. '>' v textu browser vezme v
poradku, ale nemelo by tam byt).
Obecne lze ale napsat regulak, kterym to prozenes a je to bez tagu (pokud je
to ciste html).
--
Jiri Cincura
http://blog.vyvojar(tec)cz/jirka/ | http://photo.cincura.net
http://www.ID3renamer.com
odstraneni html
[*] David Kopecek <david.kopecek(zv)hacktrack(tec)com> - 18.6.2006 13:03:52
Zdravim
poradi mi nekdo nejakou dokonalou funknci na odstraneni HTML tagu
tak aby na vystupu byl ciste text?
H..
Absolute database - Componentace
[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 17.6.2006 23:24:54
Hloupa otazka, co je spatneho na FB embeded ?
Obrovska vyhoda proti BDE, ze to funguje dobre i v sitove verzi
(s FB server).
Slavek
>
> znate nekdo Absolute database od Componentace? Ja jsem si to
> stahnul a vypada to docela dobre. Otazkou je, nez si to
> koupim a zacnu to pouzivat zda si nemam dat na neco pozor ve
> smyslu 'neco' co je v BDE tak chybi v absolute database atd...
>
> Rad si prectu vase nazory a negativni zkusenosti.
Vyhlazene kresleni do TCanvas
[*] Dalibor <dalibor(zv)torola(tec)cz> - 17.6.2006 21:58:48
Ahoj,
da se nejak kreslit do TCanvas objekty (kruznice, cary, apod.), tak aby
byly vyhlazene a ne zubate?
D7
Demo HTTPSEND a HTTP - Synapse
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 17.6.2006 19:02:37
> hlaskou "Project httpserv.exe raised exception class EThread with message
> 'Thread Error: The handle is invalid (6)'. Process stopped. Use Step or
Ano, je to moje chyba, ze jsem jeste nevydal opravene demo, chystam se k
tomu pri releasu 37.
Na druhou stranu, tento problem byl davno diskutovan jak v Synalisty, tak
i tady. a aby sis nemyslel, ze jsme uplne byly a mam na webu nefukcni
dema, ono to totiz takto ve starsich Delphi vesele funguje!
> Pomoci synapse httpdemo se pripojim kamkoliv ale jen k httpserv DEMU
> synapse ne. To se to cele kousne a je nutno proces odstrelit.
Pouzij posledni verzi ze Synasnapu. Chyba je v blcksock.pas, ostatne
staci nahlednout do changelogu na opravene chyby od posledniho releasu,
pripadne opet e-mail konference Synalist i tato konference zde tento
problem diskutovala.
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
WEB: http://www.ararat(tec)cz/synapse - Synapse Delphi and Kylix TCP/IP
Library
Absolute database - Componentace
[*] Viktor Marek <viktor(zv)mbox.vol(tec)cz> - 17.6.2006 15:48:23
Podivej se na http://www.elevatesoft.com/ databaze DBIsam
> Panove,
> znate nekdo Absolute database od Componentace? Ja jsem si to stahnul a
> vypada to docela dobre. Otazkou je, nez si to koupim a zacnu to pouzivat
> zda si nemam dat na neco pozor ve smyslu 'neco' co je v BDE tak chybi v
> absolute database atd...
> Rad si prectu vase nazory a negativni zkusenosti.
Viktor Marek
Absolute database - Componentace
[*] Vladimir Ponechal <vponecha(zv)email(tec)cz> - 17.6.2006 15:26:22
Panove,
znate nekdo Absolute database od Componentace? Ja jsem si to stahnul a vypada to docela dobre. Otazkou je, nez si to koupim a zacnu to pouzivat zda si nemam dat na neco pozor ve smyslu 'neco' co je v BDE tak chybi v absolute database atd...
Rad si prectu vase nazory a negativni zkusenosti.
Diky,
vl.
Ziskani informaci z existujici databaze (detaily t
[*] Vladimir Ponechal <vponecha(zv)email(tec)cz> - 17.6.2006 15:16:21
Ahoj vsichni,
Mam vytvorene tabulky v databazi MySQL nebo Microsoft Enterprise SQL server. Moje aplikace pracuje s temito tabulkami. Kazda tabulka ma nejake items a kazde item ma nastavene parametry jako: Type (integer, char...), size (delka stringu...), default (zadat default hodnotu pokud neni definovano jinak), Required (je nejaka hodnota pro item pozadovana), MinValue - MaxValue, Auto incremental (Yes, No).
Chci nejakym zpusobem tyto informace z tabulek ziskavat, abych je nemusel 'napevno' definovat v kodu. To znamena, ze pri vytvoreni DB objektu v aplikaci si zjistim:
1.) jake ma tabulka items? - navazu na DBEdits
2.) zjistim si typ item, pokud to bude byte tak z toho udelam napriklad DBCheck box
3.) pokud bude hodnota required, tak nedovolim ulozit driv nez se neco nezada
4.) pokud to bude autoincremental, DBEdit bude disablovan
5.) ...
Muzete me nekdo nakopnout? SQL s necim takovym pocita, pamatuji si to z treningu na Mic SQL, ale je to davno a nemam ideu jak na to.
Diky,
Vl.
Demo HTTPSEND a HTTP - Synapse
[*] Ludek <konference(zv)sales(tec)cz> - 17.6.2006 00:53:21
Zdravim,
Synapsi pouzivam jiz nejakou dobu, ale ted jsem poprve chtel vytvorit HTTP
server. Stahnul jsem posledni verzi (36) a chtel jsem nejrve rozbehnout
demo.
1) Problem s serverem:
Demo HTTPSERV po spusteni serveru spadne s hlaskou
"Project httpserv.exe raised exception class EThread with message 'Thread
Error: The handle is invalid (6)'. Process stopped. Use Step or Run to
continue."
V archivu konference jsem nasel ze se muze jednat o volani "inherited
create(false);" na spatnem miste.
prehodil jsem tedy volani inherited hned po create v procedurach
TTCPHttpDaemon.Create a TTCPHttpThrd.Create
Constructor TTCPHttpDaemon.Create;
begin
sock:=TTCPBlockSocket.create;
//presunuto
inherited create(false);
FreeOnTerminate:=true;
Priority:=tpNormal;
// inherited create(false);
end;
No a to pomohlo a server bezi, da se k nemu pripojit z IE, Firefoxu a z
nejakych demo u indy.
2) Problem s klientem:
Pomoci synapse httpdemo se pripojim kamkoliv ale jen k httpserv DEMU synapse
ne. To se to cele kousne a je nutno proces odstrelit.
Zkousel jsem to i na dvou ruznych strojich nejen na lokale.
Tak mi prijde ze jsem se z toho vedra zcvoknul. Uz dlouho se mi nestalo, ze
jsem nerozchodil podobne DEMO.
V cem by mohl byt problem.
Je nekdo komu dema httpserv a http ze synapse funguji proti sobe ?
Ludek ZITA
Obrazek z BLOB na formular
[*] Ing. Antonin Spurny <spurny(zv)kavlounky(tec)cz> - 16.6.2006 15:24:42
ahoj,
pokud nefunguje TDBImage pak pro zobrazeni obrazku v ruznych formatech
pouzivam knihovnu EDBImage
...
TEDBImage and TQREDBImage v1.6 (Enhaced TDBImage and TQRDBImage):
by Sebastian Mayora - Argentina - DelphiHelper(zv)yahoo.com.ar
...
da se sehnat na Torry nebo DSP
ahoj tonda...
----- Original Message -----
From: "Kalhous" <kalhous(zv)eu(tec)cz>
Subject: Obrazek z BLOB na formular
> Asi jednoduche ale zatim jsem nic takoveho nepotreboval takze nevim:
> Jak nejjednoduseji dostat obrazek ulozeny v zaznamu databaze IB/FB jako
> BLOB na formular D7 (treba do TImage) ?
> Jinak o tom obrazku nic nevim, je to cizi databaze (katalog) takze nevim
> jaky ma format, velikost, nic. Jen vim ze tam je :-)
>
> Z.Kalhous
Obrazek z BLOB na formular
[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 16.6.2006 15:20:42
On 16.6.2006 14:44 Kalhous wrote:
> Asi jednoduche ale zatim jsem nic takoveho nepotreboval takze nevim:
> Jak nejjednoduseji dostat obrazek ulozeny v zaznamu databaze IB/FB jako BLOB na formular D7 (treba do TImage) ?
Vydloubnes to jako stream a z toho to nactes do TImage.
> Jinak o tom obrazku nic nevim, je to cizi databaze (katalog) takze nevim jaky ma format, velikost, nic. Jen vim ze tam je :-)
No a vis aspon jake druhy jsou tam? Treba bmp, jpg, gif atp. nactes bez
problemu, kdyz mas dane unity v projektu a vicemene se o to nemusis starat,
jen nactes. Ale pokud tam muze byt fakt cokoli, tak si myslim, ze mas
vlastne pred sebou tvorbu maleho prohlizece obrazku.
--
Jiri Cincura
http://blog.vyvojar(tec)cz/jirka/ | http://photo.cincura.net
http://www.ID3renamer.com
Obrazek z BLOB na formular
[*] Kalhous <kalhous(zv)eu(tec)cz> - 16.6.2006 14:44:39
Asi jednoduche ale zatim jsem nic takoveho nepotreboval takze nevim:
Jak nejjednoduseji dostat obrazek ulozeny v zaznamu databaze IB/FB jako BLOB na formular D7 (treba do TImage) ?
Jinak o tom obrazku nic nevim, je to cizi databaze (katalog) takze nevim jaky ma format, velikost, nic. Jen vim ze tam je :-)
Z.Kalhous
UNICODE a IBX
[*] Tomas Krejzek <tomas.krejzek(zv)kpsys(tec)cz> - 16.6.2006 14:00:36
Ahoj nevite zda jdou pomoci IBX komponent zapsat do databaze i UNICODE znaky???
Tom
FindWindow
[*] Ing. Antonin Spurny <spurny(zv)kavlounky(tec)cz> - 16.6.2006 13:54:36
Ahoj,
dej 1. parameter (pointer to class name) hodnotu nil a ne prazdny string.
takto: Hwnd := FindWindow(nil,'Hodiny');
viz napoveda Windows SDK:
lpClassName
Points to a null-terminated string that specifies the class name or is an
atom that identifies the class-name string. If this parameter is an atom, it
must be a global atom created by a previous call to the GlobalAddAtom
function. The atom, a 16-bit value, must be placed in the low-order word of
lpClassName; the high-order word must be zero.
lpWindowName
Points to a null-terminated string that specifies the window name (the
window's title). If this parameter is NULL, all window names match.
----- Original Message -----
From: "Simek Pavel" <p.simek(zv)svscr(tec)cz>
Subject: FindWindow
> Preji dobry den vsem.
>
> Potrebuji v programu zjistit, zda jiz bezi jiny program a podle toho se
> zachovat. Delam to takto :
...
> Hwnd := FindWindow('','Hodiny');
...
> Lec mi to nenajde, nechapu onu FindWindow - co to ma za dva parametry?
FindWindow
[*] Simek Pavel <p.simek(zv)svscr(tec)cz> - 16.6.2006 12:22:29
Preji dobry den vsem.
Potrebuji v programu zjistit, zda jiz bezi jiny program a podle toho se
zachovat. Delam to takto :
procedure TForm1.Timer1Timer(Sender: TObject);
var Hwnd : THandle;
begin
Hwnd := FindWindow('','Hodiny');
if Hwnd = 0 then
begin
Label1.Caption := 'Nenasel';
end
else
begin
Label1.Caption := 'Nasel';
end;
end;
Lec mi to nenajde, nechapu onu FindWindow - co to ma za dva parametry?
S pozdravem Pavel Simek
porovnani IP adres - specialitka..
[*] David Kopecek <david.kopecek(zv)hacktrack(tec)com> - 20.6.2006 08:38:57
Zdravim konferenci
chci se zeptat jestli nekdo nemate funkci na porovnavani ip adres..
neco jako
if ((192.168.80.0/20)=192.168.85.123) then
tj zjistit jestli ip adresa splnuje povoleny rozsah.
Diky david..
runtime error 216
[*] Hlas <hlas(zv)inmail.sk> - 20.6.2006 08:38:57
v jednom projekte v D7 pri ukoncovani aplikacie my vyhadzuje chybu
runtime error 216.
dokazem sa jej zbavit tak ze pridam alebo uberiem akukolvek komponentu z
hlavneho formulara.
ak sa mi podari takto navodit stav ze mi tu chybu nevyhadzuje tak
aplikacia je funkcna.
ale mam jedno podozrenie.... uzivatelia mi hlasili nekorektne spravanie
sa aplikacia, ktore sa nikdy nedokazalo
opakovvane navodit a tak som to nedokazal ani opravit. po case sa toto
spravanie stratilo (bez toho ze by som podozrivu cast kodu opravil, danu
chybu mi uz uzivatelia nehlasia)
ale po mnohych inych upravach kodu a upgradoch programu mi opat hlasia
uplne inu nahodne sa vyskytujucu chybu
na inom mieste, ktoru opat nie je mozne opakovane navodit.
moze taketo spravanie programu sposobovat ta chyba runtime error 216?
mam a mal som rozrobenych mnoho projektov v Delphi 7 ale taketo problemy
s runtime error 216 a naslednymi
"bludivymi chybami" mam iba na jednom jedinom projekte. paradoxom je ze
sa jedna o nas interny software
a teda uzivatelmi su kolegovia a teda predpoklad ze by mi dokazali
presne identifikovat a navodit chybovy stav je dost
velka. napriek tomu sa nedari....
Znak prumeru v Editu
[*] vstuchl(zv)email(tec)cz - 20.6.2006 08:36:57
Ahoj,
potreboval bych v Editu nebo v Memo psat znak prumeru. Samozrejme
potrebuji zachovat i psani vsech ostatni beznych pismen a cislic.
Diky za kazdou radu
Vasek Stuchl
viacstrankovy TIFF
[*] delphinpp(zv)atlas(tec)cz - 19.6.2006 16:03:47
Zdar,
mam viacstrankovy TIFF a chcel by som postupne pristupovat k jednotlivym
strankam. Hladal som rozne komponenty, ale nebol som celkom uspesny.
Nasiel som kniznicu LibTiffDelphi, z TIFF-u nacitam a zobrazim prvu
stranku, avsak neviem ako pristupovat k dalsim..nemate niekto s tymto
skusenost, pripadne s nejakym inym riesenim. Pokial mozno, tak free.
Vdaka,
Miso
Funkce v dll
[*] Radek Cervinka <radek.cervinka(zv)technodat(tec)cz> - 19.6.2006 13:01:34
> pisu to ted z hlavy. V obou pripadech, at to je v aplikaci, nebo v knihovne,
> mi to pise, ze tato hodnota je nepristupna. Ale v kodu aplikace se podminka
> provede spravne, kdezto v knihovne nikoli. Kompilaci provadim s balickem
> rtl.
asi bych zkusil kompilaci s balickem vclxxx (resp. s tim ve kterem je TEedit)
nebo
takto
if objekty[i].ClassName=TEdit.ClassName then showmessage('Edit');Funkce v dll
[*] delphin(zv)post(tec)cz - 19.6.2006 12:47:33
> vyskytl se mi problem, se kterym si nevim rady. Mam funkci, ve ktere jako
> parametr predavam pole objektu(komponent), funkce pak ma vracet string.
> Vsechno funguje, kdyz mam funkce v kodu aplikace, ale kdyz ji dam do
> samostatne knihovny, tak proste nefunguje. Chci zjistit, jakeho typu je
> ten
> objekt, respektive komponenta. Pouzil jsem na to metodu ClassType? tusim,
> pisu to ted z hlavy. V obou pripadech, at to je v aplikaci, nebo v
> knihovne,
> mi to pise, ze tato hodnota je nepristupna. Ale v kodu aplikace se
> podminka
> provede spravne, kdezto v knihovne nikoli. Kompilaci provadim s balickem
> rtl. Dale jsem zkousel pridat i MemShare, nic nepomohlo.
Nelze predavat objekty mezi EXE a DLL. Bud misto DLL pouzijte BPL nebo do
DLL predavejte interface.
Tohle bude v DLL vzdycky False
> objekty[i].ClassType=TEdit
Funkce v dll
[*] Petr Berek <sojokl(zv)seznam(tec)cz> - 19.6.2006 12:31:32
Zdravim,
vyskytl se mi problem, se kterym si nevim rady. Mam funkci, ve ktere jako
parametr predavam pole objektu(komponent), funkce pak ma vracet string.
Vsechno funguje, kdyz mam funkce v kodu aplikace, ale kdyz ji dam do
samostatne knihovny, tak proste nefunguje. Chci zjistit, jakeho typu je ten
objekt, respektive komponenta. Pouzil jsem na to metodu ClassType? tusim,
pisu to ted z hlavy. V obou pripadech, at to je v aplikaci, nebo v knihovne,
mi to pise, ze tato hodnota je nepristupna. Ale v kodu aplikace se podminka
provede spravne, kdezto v knihovne nikoli. Kompilaci provadim s balickem
rtl. Dale jsem zkousel pridat i MemShare, nic nepomohlo.
Kod aplikace:
function getValidateValue(objekty:array of object):string;
var i:cardinal;
begin
for i:=0 to length(objekty) do
begin
if objekty[i].ClassType=TEdit then showmessage('Edit');
end;
end;
Jak rikam, v kodu aplikace to funguje, v samostatne knihovne nikoli.
Petr
Ziskani informaci z existujici databaze (detaily t
[*] Dalibor Faltynek <dalibor.faltynek(zv)orgrez(tec)cz> - 19.6.2006 11:59:30
> Mam vytvorene tabulky v databazi MySQL nebo Microsoft Enterprise SQL
> server. Moje aplikace pracuje s temito tabulkami. Kazda tabulka ma nejake
> items a kazde item ma nastavene parametry jako: Type (integer, char...),
> size (delka stringu...), default (zadat default hodnotu pokud neni
> definovano jinak), Required (je nejaka hodnota pro item pozadovana),
> MinValue - MaxValue, Auto incremental (Yes, No).
> Chci nejakym zpusobem tyto informace z tabulek ziskavat, abych je nemusel
> 'napevno' definovat v kodu. To znamena, ze pri vytvoreni DB objektu v
> aplikaci si zjistim:
Ahoj,
delal jsem si jednou vlastni prohlizec tabulek, fungovalo to na jeste s
DE - parodox. Snad Vam to k necemu bude.
Dalibor.
procedure TForm1.List2Click(Sender: TObject);
var i: integer;
begin
Table1.DatabaseName:=ComboBox1.Items[ComboBox1.ItemIndex];
Table1.TableName:=List2.Items[List2.itemindex];
Gr1.RowCount:=Table1.fielddefs.Count+1;
for i:= 1 to Table1.FieldDefs.Count do
begin
Gr1.cells[1,i]:=Table1.FieldDefs[i-1].Name;
if Table1.FieldDefs[i-1].Size<>0 then
Gr1.cells[3,i]:=inttostr(Table1.FieldDefs[i-1].Size) else
Gr1.cells[3,i]:='';
case Table1.Fielddefs[i-1].datatype of
ftUnknown: Gr1.cells[2,i]:='ftUnknown';
ftString: Gr1.cells[2,i]:='ftString';
ftSmallint: Gr1.cells[2,i]:='ftSmallint';
ftInteger: Gr1.cells[2,i]:='ftInteger';
ftWord: Gr1.cells[2,i]:='ftWord';
ftBoolean: Gr1.cells[2,i]:='ftBoolean';
ftFloat: Gr1.cells[2,i]:='ftFloat';
ftCurrency: Gr1.cells[2,i]:='ftCurrency';
ftBCD: Gr1.cells[2,i]:='ftBCD';
ftDate: Gr1.cells[2,i]:='ftDate';
ftTime: Gr1.cells[2,i]:='ftTime';
ftDateTime: Gr1.cells[2,i]:='ftDateTime';
ftBytes: Gr1.cells[2,i]:='ftBytes';
ftVarBytes: Gr1.cells[2,i]:='ftVarBytes';
ftAutoInc: Gr1.cells[2,i]:='ftAutoInc';
ftBlob: Gr1.cells[2,i]:='ftBlob';
ftMemo: Gr1.cells[2,i]:='ftMemo';
ftGraphic: Gr1.cells[2,i]:='ftGraphic';
ftFmtMemo: Gr1.cells[2,i]:='ftFmtMemo';
ftParadoxOle: Gr1.cells[2,i]:='ftParadoxOle';
ftDBaseOle: Gr1.cells[2,i]:='ftDBaseOle';
ftTypedBinary:Gr1.cells[2,i]:='ftTypedBinary';
ftCursor: Gr1.cells[2,i]:='ftCursor';
ftFixedChar: Gr1.cells[2,i]:='ftFixedChar';
ftWideString: Gr1.cells[2,i]:='ftWideString';
ftLargeint: Gr1.cells[2,i]:='ftLargeint';
ftADT: Gr1.cells[2,i]:='ftADT';
ftArray: Gr1.cells[2,i]:='ftArray';
ftReference: Gr1.cells[2,i]:='ftReference';
ftDataSet: Gr1.cells[2,i]:='ftDataSet';
ftOraBlob: Gr1.cells[2,i]:='ftOraBlob';
ftOraClob: Gr1.cells[2,i]:='ftOraClob';
ftVariant: Gr1.cells[2,i]:='ftVariant';
ftInterface: Gr1.cells[2,i]:='ftInterface';
ftIDispatch: Gr1.cells[2,i]:='ftIDispatch';
ftGuid: Gr1.cells[2,i]:='ftGuid';
end; //case
end;
end;
Absolute database - Componentace
[*] radek_456 radek_456 <radek 456(zv)seznam(tec)cz> - 19.6.2006 11:39:28
>znate nekdo Absolute database od Componentace?
kdysi davno (pred Firebirdem) jsem to pouzival hlavne jako nahradu BDE + paradox - detaily si uz moc nepamatuju ale vim ze to melo docela mizernou podporu SQL a nejake problemy s cestinou a indexy. Dnes v dobe plnohodnotnych SQL serveru "zadarmo" bych to uz nepouzil ani nahodou.
R.
Manual na ASQLite komponenty (Aducom)
[*] MaReK Penguin Olsavsky <orsm(zv)centrum(tec)cz> - 19.6.2006 11:01:25
MaReK Penguin Olsavsky napsal(a):
> Dobry den,
> potrebuji se poradit, jestli znate nekdo odkaz na pouziti Aducomackych
> (http://www.aducom.com/cen/news.php) komponent pro SQLite3. Idealne s
> priklady :-), ale to uz bych chtel asi moc. Strycek Google.com mi zatim
> moc nepomohl :-\.
>
> Dekuji
> MaReK Olsavsky
Zdravim,
tak na vetsinu veci jsem prisel, postacovalo stahnout
http://www.aducom.com/sqlite/download/SampleApp.zip , zbyvaji mi jen dva
problemy:
1. Nagenerorvani sloupecku, ktere chci pres TASQLite3Table + vybrani
potrebne tabulky, pri nacitani do gridu (zatim jsem nerozchodil ani jen
tu zmenu tabulky :-(), obecne by bylo zapotrebi predat nejak dotaz,
ktery nemusi byl elementarni, pokud potrebuju naplnit grid.
2. Mel jsem docela problem s prendanim dat do uzivatelskeho adresare,
pak jsem se dozvidal, ze neni mozne otevrit databazovy soubor v adresari
aplikace funguje v pohode, ale to povazuji za dost neciste reseni
(Uzivatel pak musi mit prava zapisu do patricneho adresare v program
files), tohle bude ale moje chyba, tak intenzivne jsem zatim nehledal ;-).
Komponenty se mi zatim jevi, jako skvele pouzitelne, jen ta dokumentace
k nim jaxi chybi :-(.
Budu rad, jestli mi nekdo poskytne jakesi howto, zejmena na prvni problem.
Dekuji a nashledanou
MaReK Olsavsky
--
- --
MaReK "Penguin" Olsavsky
PHP Voodoo
private mail: orsm(zv)centrum(tec)cz
private web: http://orsm.wz(tec)cz
ICQ#: 160 178 925; MSN: orsm(zv)centrum(tec)cz; Skype: Penguin_007
tel.: +420-603-519-650; +420-775-154-689 (775-1-LINUX)
Sipky a TabStop
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 28.5.2006 09:36:20
Ahoj,
> Z z Formu1 volam Form2 (form2.showmodal) a na formu2 je
> polozen Button1 a DBImage1. Button1 ma Default=false,
> TabStop=false a DBImage1 TabStop=false;
>
> Pri prvnim spusteni Formu2 neni focus na Buttonu ani na
> DBImage (na cem je tedy focus? a focus se pri pouzita
> kurzorovych sipek nemeni )
Nemuze to byt tim, ze ten form jednou vycreatujes a pak uz
zobrazujes jen tu jednu instanci? Proto by zustaval focus
tam, kde byl pri poslednim zavreni formu.
Zkus predefinovat na formu CMDialogKey, jak jsi jiz psal,
nejak takto:
procedure TForm.CMDialogKey(var Message:
TCMDialogKey);
var
ac: TWinControl;
begin
ac := ActiveControl;
inherited;
if Message.CharCode in [VK_LEFT, VK_RIGHT, VK_UP,
VK_DOWN] then
begin
SelectNext(ac,
(CharCode = VK_RIGHT) or (CharCode =
VK_DOWN), True);
Result := 1;
end;
end;
Je to jen nezkouseny nastrel. Problem je totiz u TFormu v
tom, ze v jeho CMDIALOGKEY se vola u sipek SelectNext s
poslednim parametrem False.
Treba tohle pomuze - nebo s nejakou modifikaci.
David Lebeda
Volna RAM
[*] Martin Dupal <mdupal(zv)vision(tec)cz> - 28.5.2006 09:16:19
BTW resil nekdo zjisteni volne/celkove RAM na stroji disponujicim vice nez
2GB RAM? Nize uvedena funkce pochopitelne vetsi cislo nez DWORD vratit
nemuze.
Martin
> Zkus :
> var
> MemoryStatus: TMemoryStatus;
> Begin
> MemoryStatus.dwLength := SizeOf(MemoryStatus) ;
> GlobalMemoryStatus(MemoryStatus) ;
Znak prumeru v Editu
[*] Kalhous <kalhous(zv)eu(tec)cz> - 20.6.2006 10:13:04
Coz o to, staci si takovej znak najit v mape znaku (a pri castem pouzivani z
klavesnice si zapamatovat Alt kod). Treba tam byva preskrtnute "O" ktere
treba v Arialu vypada jako prumer. Zrada ale muze byt v tom, ze ne kazda
znakova sada zobrazuje tyhle bizardni znaky stejne.
Z.Kalhous
> Ahoj,
> potreboval bych v Editu nebo v Memo psat znak prumeru.
> Vasek Stuchl
viacstrankovy TIFF
[*] delphinpp(zv)atlas(tec)cz - 20.6.2006 10:43:07
delphinpp(zv)atlas(tec)cz wrote:
>Zdar,
>
>mam viacstrankovy TIFF a chcel by som postupne pristupovat k jednotlivym
>strankam. Hladal som rozne komponenty, ale nebol som celkom uspesny.
>Nasiel som kniznicu LibTiffDelphi, z TIFF-u nacitam a zobrazim prvu
>stranku, avsak neviem ako pristupovat k dalsim..nemate niekto s tymto
>skusenost, pripadne s nejakym inym riesenim. Pokial mozno, tak free.
>
>
>
Takze, ak by to niekoho zaujimalo, tak :
- pocet stran v MultiPage TIFF sa da zistit cez TIFFNumberOfDirectories
- postupnym volanim TIFFReadDirectory sa da prejst na konkretnu stranku
- a potom uz staci zavolat pozmenenu funkciu ReadTIFFFileIntoBitmap z
http://www.asmail.be/msg0055535082.html pre nacitanie konkretnej stranky
Miso
runtime error 216
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 20.6.2006 15:57:28
Puvodni zprava ze dne 20.6.2006:
> v jednom projekte v D7 pri ukoncovani aplikacie my vyhadzuje chybu
> runtime error 216.
> dokazem sa jej zbavit tak ze pridam alebo uberiem akukolvek komponentu z
> hlavneho formulara.
A nemas tam EHK nebo jak se jmenuje ta komponenta na help?
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================
prace s INI v TP7
[*] Novy Lubos <lnovy(zv)unileasing(tec)cz> - 20.6.2006 16:01:28
Neexistuje pro TurboPascal7 nejaky unit pro praci s INI soubory?
Potrebujeme naprogramovat jistou konverzi a potrebujeme nacist v TP7 INI soubor...
Diky, Lubos Novy
runtime error 216
[*] Hlas <hlas(zv)inmail.sk> - 20.6.2006 16:57:32
par komponent samozrejme mam doinstalovanych ale
nic ohladom helpov
Petr Zahradnik wrote / napisal(a):
> A nemas tam EHK nebo jak se jmenuje ta komponenta na help?
>
>
porovnani IP adres - specialitka..
[*] Vlastik Bartos <bartos(zv)spsmvbr(tec)cz> - 20.6.2006 18:43:40
Pokud jde o standardni IP adresy, pouzivam komponentu IdNetworkCalculator,
ktera umi prevadet textovy tvar na DWord. V tomto tvaru je mozne tridit a
jinak testovat IP adresy bez ohledu na zpusob zadani (192.168.80.15 x
192.168.080.015). Pokud ti nevyresi ostatni tvoje pozadavky, tak si lehce
doprogramujes ;-))
Vlastik
> chci se zeptat jestli nekdo nemate funkci na porovnavani ip adres..
>Registre - skener
[*] Martin Kasman <mdelphi(zv)centrum.sk> - 20.6.2006 18:27:39
V registroch som nasiel vo vetve cestu k spusteniu skeneru:
vetva
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\StillImage\Registered Applications
kluc
Lexmark Photo Editor
hodnota
C:\Program Files\Lexmark X1100 Series\lxbkvb.exe /StiDevice:%1 /StiEvent:%2
Teraz chcem spustit program ku skeneru podla tejto hodnoty avsak neviem, co mam dat miesto %1 a miesto %2. Na domovskej stranke Lexmarku som nic o tom nenasiel.
Znak prumeru v Editu
[*] Martin Radvansky <delphiconf(zv)radvansky(tec)net> - 20.6.2006 17:51:36
Dobry den,
K> Coz o to, staci si takovej znak najit v mape znaku (a pri castem pouzivani z
K> klavesnice si zapamatovat Alt kod). Treba tam byva preskrtnute "O" ktere
K> treba v Arialu vypada jako prumer. Zrada ale muze byt v tom, ze ne kazda
K> znakova sada zobrazuje tyhle bizardni znaky stejne.
K> Z.Kalhous
>> Ahoj,
>> potreboval bych v Editu nebo v Memo psat znak prumeru.
>> Vasek Stuchl
Toto lze dosahnout pouze za pouziti UNICODE komponent. Jinak dostane
te presne tyto problemy co pise pan Kalhous. Problem je ze Delphi
standardni komponenty nepodporuji unicode a musite tedy sahnout po
alternativach a s obsahem pracovat jak widestring. V konferenci najde
ty komponenty co to podporuji. Nicmene musite stejne nejak vyresit to
zadani toho znaku.
-
S pozdravem,
Martin Radvansky
Jak nainstalovat delphi na NTB
[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 20.6.2006 17:13:33
Cau,
chci na NTB nainstalovat druhou kopii delphi (D7prof) abych byl obcas
i mobilni, ale zajima me jak je to pak s aktivaci?
Diky.
TR
Registre - skener
[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 20.6.2006 21:01:50
On 20.6.2006 18:27 Martin Kasman wrote:
> V registroch som nasiel vo vetve cestu k spusteniu skeneru:
>
> vetva
> HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\StillImage\Registered Applications
>
> kluc
> Lexmark Photo Editor
>
> hodnota
> C:\Program Files\Lexmark X1100 Series\lxbkvb.exe /StiDevice:%1 /StiEvent:%2
>
> Teraz chcem spustit program ku skeneru podla tejto hodnoty avsak neviem, co mam dat miesto %1 a miesto %2. Na domovskej stranke Lexmarku som nic o tom nenasiel.
>
>
To jsou pozicni parametry.
--
Jiri Cincura
http://blog.vyvojar(tec)cz/jirka/ | http://www.ID3renamer.com
Jak nainstalovat delphi na NTB
[*] Martin Burle <mburle2(zv)volny(tec)cz> - 21.6.2006 06:26:29
> chci na NTB nainstalovat druhou kopii delphi (D7prof) abych byl obcas
> i mobilni, ale zajima me jak je to pak s aktivaci?
Predpokladam, ze podobne jakou verze 6 ma i 7 omezeny pocet aktivaci. Me se
po par vymenach pocitacu podarilo limit vycerpat, a protoze Borland
nezareagoval na moji zadost o navyseni poctu povolenych aktivaci, nezbylo
mi nez najit si na netu keygen. :(
MB
pristup do OLE Field
[*] Jiri Baudys <konference(zv)baudys.name> - 20.6.2006 22:29:56
Zdravim,
potreboval bych poradit, jak ulozit pomoci ADO do DB MS Access (konkretne
format Accessu 2000) OLE field.
Jedna se o to, ze OLE field ma nejakou hlavicku a asi i paticku a nejsem sto
to nikde najit, nebo vydumat z dat. Potrebuji tam vkladat data ve formatu
rtf, coz je pro OLE typ WordPad.Document.
diky za kazdou radu
jirka
Jak nainstalovat delphi na NTB
[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 21.6.2006 09:12:41
Ahoj,
Martin Burle napsal(a):
> Me se po par vymenach pocitacu podarilo limit vycerpat, a protoze Borland
> nezareagoval na moji zadost o navyseni poctu povolenych aktivaci, nezbylo
> mi nez najit si na netu keygen. :(
no ja nevim, ale jiz nekolik let pouzivam Delphi 6 pro univerzalne
registrovane (unregistred). Nikdy jsem si nevsiml, ze by to necemu
vadilo. Pravda, posledni dobou mi tak jednou za tyden, mozna mene,
vyskoci pozadavek na registraci, ale uspesne ho ignoruji.
Peca
Jak nainstalovat delphi na NTB
[*] Martin Burle <mburle2(zv)volny(tec)cz> - 21.6.2006 09:42:44
> no ja nevim, ale jiz nekolik let pouzivam Delphi 6 pro univerzalne
> registrovane (unregistred). Nikdy jsem si nevsiml, ze by to necemu
> vadilo. Pravda, posledni dobou mi tak jednou za tyden, mozna mene,
> vyskoci pozadavek na registraci, ale uspesne ho ignoruji.
Ano, to je pravda, take jsem to tak chvili na jednom pocitaci mel. Ale
nedavno jsem upgradoval PC, a abych nemusel vse slozite instalovat a
nastavovat, naimportoval jsem prislusnou vetev registru z puvodni instalace,
a pak se Delphi odmitaly neregistrovane spustit.
MB
runtime error 216
[*] Vaclav Halik <spravasd(zv)suz.cvut(tec)cz> - 21.6.2006 10:24:47
Hlas napsal(a):
>v jednom projekte v D7 pri ukoncovani aplikacie my vyhadzuje chybu
>runtime error 216.
>
JJ, znam z D3, bohuzel si uz nevzpominam jak sem to vyresil.
Pamatuju si, ze sem se s tim trapil par dni. Matne si vzpominam,
ze hlavni problem byl ve spatne praci s formulari. Pri urcitem
(na zrovna cistem) postupu se toto delo.
Tehdy sem prepsal funkce pro otevirani a zavirani ruznych formu,
procistil sem projekt a zlikvidoval vetsinu zpetnych vazeb mezi
formulari, coz mnelo za nasledek odstraneni problemu.
Muj typ je, ze to asi dela jen v pripadech kdy nejakou
programatorskou chybou tomu "jaksi" vytvoris prostredi.
Protoze to byl jeden z mych prvnich vetsich projektu,
tak sem pak uz nikdy takto Aplikaci nepsal a problem nenarazil.
Jinak bych urcite prvne skusil vyhazet vsechny komponenty
tretich stran z projektu.
S pozdravem Vaclav Halik
Jak nainstalovat delphi na NTB
[*] Kalhous <kalhous(zv)eu(tec)cz> - 21.6.2006 10:20:46
Pred nejakou dobou jsem (i pres tuto konferenci) resil podobny problem
reinstalace a registrace D7 po umrti pocitace. Nejlepsi reseni nakonec bylo
to nejjednodussi - mail do Borlandu cz s vysvetlenim situace, jen jsem
klepnul na "odeslat" uz zvonil telefon, par slov a behem nekolika opravdu
malo hodin dorazil z USA registracni soubor. No problem.
RNDr Z.Kalhous
> > no ja nevim, ale jiz nekolik let pouzivam Delphi 6 pro univerzalne
> > registrovane (unregistred). Nikdy jsem si nevsiml, ze by to necemu
> > vadilo.
> Ano, to je pravda, take jsem to tak chvili na jednom pocitaci mel. Ale
> nedavno jsem upgradoval PC, a abych nemusel vse slozite instalovat a
> nastavovat, naimportoval jsem prislusnou vetev registru z puvodni
instalace,
> a pak se Delphi odmitaly neregistrovane spustit.
Jak nainstalovat delphi na NTB
[*] Pavel GRATZER <pavelg(zv)stbk.mcs(tec)cz> - 21.6.2006 11:40:53
Me po porade v Borlandu CZ poradili, ze vsechny licence a aktivace jsou v
souboru "borland.lic" v adresari ".borland", ktery se u XP nachazi na
"C:\Documents and Settings\<user name>\".
Stacilo tento adresar zazalohovat a po preinstalaci XP ho nahrat zpet. Vzdy
me to fungovalo.
PG
----- Original Message -----
From: "Martin Burle" <mburle2(zv)volny(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, June 21, 2006 6:26 AM
Subject: Re: Jak nainstalovat delphi na NTB
>> chci na NTB nainstalovat druhou kopii delphi (D7prof) abych byl obcas
>> i mobilni, ale zajima me jak je to pak s aktivaci?
>
> Predpokladam, ze podobne jakou verze 6 ma i 7 omezeny pocet aktivaci. Me
> se
> po par vymenach pocitacu podarilo limit vycerpat, a protoze Borland
> nezareagoval na moji zadost o navyseni poctu povolenych aktivaci, nezbylo
> mi nez najit si na netu keygen. :(
>
> MB
>
>
>
Jak nainstalovat delphi na NTB
[*] ivar(zv)ivar(tec)cz - 21.6.2006 11:38:52
Mam vyzkouseno (na nekolika pocitacich) toto: staci zkopirovat ze stareho
pocitace tyto dva soubory do noveho a je zaregistrovano
C:\Documents and Setting\user-name\.borladn\REGISTRY.DAT
C:\Documents and Setting\user-name\.borladn\REGISTRY.SLM
user-name dopln podle skutecnosti
Milan runtime error 216
[*] Petr Fejfar <development(zv)callnet(tec)cz> - 21.6.2006 12:06:56
>> v jednom projekte v D7 pri ukoncovani aplikacie my vyhadzuje chybu
>> runtime error 216.
Tahle chyba neni pricinou, ale dusledkem spatne spravy zivotniho cyklu
nejakeho objektu, ktery byl zrusen, ale nekde zustal odkaz na jim puvodne
zabranou pamet
a ten neplatny odkaz byl jeste pouzit.
V neprehlednem projektu pomuze zmenit destrukci objektu pomoci XXX.Free
na FreeAndNil(XXX).
---
Ale jinak se to IMHO da pomerne snadno najit trasovanim shut-down kodu
tj. procedurey System._Halt0.
Zachytne body jsou:
# jestli k chybe dojde pred dosazenim posledniho END v .dpr
(kdyz jo, tak je problem s objekty vytvarenymi dynamicky tj. v kontextu
Application.Run)
# kdyz ne, tak se zapnutou volbou Use Debug DCUs nastavit breakpoint
na posledni END v .dpr a trasovat "dovnitr" tj. to System._Halt0.
# Tam zjistit, jestli je chyba pred/po volani DestroyComponents
ve Forms.DoneApplication tj. v destruktorech statickych vytvarenych
formularu/datamodulu apod. pred Application.Run
# Kdyz po, tak se vratit do _Halt0 a protrasovat vsechny FINALIZATION sekce.
Samozrejme lze pomoci breakpointu a delenim chainu stylem pred/po
urychlit lokalizaci prislusne unit.
HTH, pf
MAPI a prepinani mezi ucty
[*] Sula Milos <milos.sula(zv)musumperk(tec)cz> - 21.6.2006 12:02:55
Ahoj,
Je mozne nejak pres MAPI fce pridat slozky nekolika uzivatelum na exchange server ? Vim jak vytvorit novou slozku, ale nevim jak se prepinat na ruzne uzivatele.Aplikace samozrejme pobezi pod uctem exchange administratora, ktery ma pristup ke vsem exchange schrankam uzivatelu.
Milos Sula
runtime error 216
[*] delphin(zv)post(tec)cz - 21.6.2006 12:24:57
> Ale jinak se to IMHO da pomerne snadno najit trasovanim shut-down kodu
> tj. procedurey System._Halt0.
>
> Zachytne body jsou:
>
> # jestli k chybe dojde pred dosazenim posledniho END v .dpr
> (kdyz jo, tak je problem s objekty vytvarenymi dynamicky tj. v kontextu
> Application.Run)
> # kdyz ne, tak se zapnutou volbou Use Debug DCUs nastavit breakpoint
> na posledni END v .dpr a trasovat "dovnitr" tj. to System._Halt0.
> # Tam zjistit, jestli je chyba pred/po volani DestroyComponents
> ve Forms.DoneApplication tj. v destruktorech statickych vytvarenych
> formularu/datamodulu apod. pred Application.Run
> # Kdyz po, tak se vratit do _Halt0 a protrasovat vsechny FINALIZATION
> sekce.
Pouzivam:
- Zapnout Use Debug DCUs
- Zapnout Stop on Delphi exceptions
- Build celeho projektu
- Run
Pri vyjimce je pak z callstacku obvykle videt, kde se stala chyba.