Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
Prechod mezi komponentami na ENTER
[*] Miroslav Suchy <suchy(zv)jplusj(tec)cz> - 17.10.2005 09:06:49
Jinak systemove pipnuti se da vypnout prikazem:
SystemParametersInfo(SPI_SETBEEP,0,NIL,SPIF_SENDWININICHANGE);
(viz Zive(tec)cz, Tipy a triky v Delphi dil 12)
Ahoj Mirek
> Resil jsem neco podobneho:
>
> procedure TFrmKody.kod1KeyDown(Sender: TObject; var Key: Word;
> Shift: TShiftState);
> begin
> if Key = vk_Return then kod2.SetFocus;
> end;
>
> Vim jiste ze to "nepipa" (pouzivam to ale jen na TEdit +- Btn)
>
> S pozdravem
>
> OndrejProkop
>
> delphi(zv)unileasing(tec)cz napsal(a):
>
>>Ahoj vsem,
>>
>>jak prechazet mezi komponentami (edit,combobox,listbox,...) nejenom
>>tabulatorem ale treba po kliknuti na Enter.
>>Samozrejme si muzu dat do udalosti OnKeyUp, nebo Down,... kontrolu Key=13
>>a prepnout activecontrol,
>>jenze pri tom dochazi k systemovemu zvuku, ktery neni vhodny..
>>K tomu kazda komponenta ten zvuk vyda na jine udalosti.
>>Mate nekdo postup jak se tomu vyhnout ?
>>
>>Dekuji, Lubos Novy
Prechod mezi komponentami na ENTER
[*] administrator(zv)novogear(tec)cz - 17.10.2005 08:08:44
Resil jsem neco podobneho:
procedure TFrmKody.kod1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key = vk_Return then kod2.SetFocus;
end;
Vim jiste ze to "nepipa" (pouzivam to ale jen na TEdit +- Btn)
S pozdravem
OndrejProkop
delphi(zv)unileasing(tec)cz napsal(a):
>Ahoj vsem,
>
>jak prechazet mezi komponentami (edit,combobox,listbox,...) nejenom tabulatorem ale treba po kliknuti na Enter.
>Samozrejme si muzu dat do udalosti OnKeyUp, nebo Down,... kontrolu Key=13 a prepnout activecontrol,
>jenze pri tom dochazi k systemovemu zvuku, ktery neni vhodny..
>K tomu kazda komponenta ten zvuk vyda na jine udalosti.
>Mate nekdo postup jak se tomu vyhnout ?
>
>Dekuji, Lubos Novy
>
>
>
>
--
Ond+AVk-ej Prokop
Novogear, spol. s r.o.
17.listopadu 2245
738 02 Fr+AP0-dek-M+AO0-stek
tel. 558 647 720
fax. 558 647 721
mob. 736 627 034
e-mail novogear(zv)novogear(tec)cz
Prechod mezi komponentami na ENTER
[*] Jiri Foldyna <jiri.f(zv)avizo(tec)cz> - 16.10.2005 23:14:08
> jak prechazet mezi komponentami (edit,combobox,listbox,...)
> nejenom tabulatorem ale treba po kliknuti na Enter.
> Samozrejme si muzu dat do udalosti OnKeyUp, nebo Down,...
> kontrolu Key=13 a prepnout activecontrol,
> jenze pri tom dochazi k systemovemu zvuku, ktery neni vhodny..
> K tomu kazda komponenta ten zvuk vyda na jine udalosti.
> Mate nekdo postup jak se tomu vyhnout ?
Ahoj,
do OnKeyDown:
procedure TD_PD_ItemF.ReturnLikeTabKeyDown(Sender : TObject; var Key : word;
Shift : TShiftState);
begin
if Key = VK_RETURN then
begin
if ssSHIFT in Shift then
begin
Perform(WM_NEXTDLGCTL, 1, 0);
end
else
begin
Perform(WM_NEXTDLGCTL, 0, 0);
end;
Key := 0;
end;
end;
a OnKeyPress:
procedure TD_PD_ItemF.ReturnLikeTabKeyPress(Sender : TObject; var Key :
char);
begin
if Key = #$0D then Key := #0;
end;
Zdravim
Jiri Foldyna
Prechod mezi komponentami na ENTER
[*] Jan Novak <delfin4(zv)volny(tec)cz> - 16.10.2005 21:03:57
> jak prechazet mezi komponentami (edit,combobox,listbox,...)
> nejenom tabulatorem ale treba po kliknuti na Enter.
Enter je odjakziva urceny pro klik na tlacitko s vlastnosti Default.
Tak si tam nejake takove tlacitko poloz (nemusi byt videt, kdyz bude
male) a OnClick muzes treba pomoci FindNextControl menit ten focus.
Ale je to nestandardni chovani, radeji bych se tomu vyhnul. Lepsi je
to tlacitko nazvat OK a na nem delat kontrolu, zda jsou vsechna
policka vyplnena a pripadne prenest fokus na prvni prazdne.
> jenze pri tom dochazi k systemovemu zvuku,
ke zvuku dojde jen kdyz ten znak 'nesezeres': Key := '';Prechod mezi komponentami na ENTER
[*] Ing. Pavel Zilinec <pavel.zilinec(zv)seznam(tec)cz> - 16.10.2005 20:19:54
Lze to definovat pri zdedeni tridy takto
procedure CNKeyDown(var Message: TWMKeyDown); message CN_KEYDOWN;
procedure CNKeyUp(var Message: TWMKeyUp); message CN_KEYUP;
Obsah vzdy stejny:
case Message.CharCode of
VK_RETURN: if FEnterIsTab then Message.CharCode:=VK_TAB;
end;
inherited;
Pokud nededis, ale jen to chces u kazde komponenty prepsat, tak to
muzes v OnKeyPress klidne prepsat na znak #9. Jinak, pokud to chces
provest tak, jak pises, tak na konci prirad Key := #0 a uz to nepipne
(aspon pokud se nepletu).
--
ing. Pavel Zilinec
MailTo:pavel.zilinec(zv)seznam(tec)cz
Prog-Soft s.r.o. Plzen
Informacni system pro vyrobce
a distributory napoju
Sunday, October 16, 2005, 7:17:49 PM, bylo napsano:
duc> Ahoj vsem,
duc> jak prechazet mezi komponentami (edit,combobox,listbox,...)
duc> nejenom tabulatorem ale treba po kliknuti na Enter.
duc> Samozrejme si muzu dat do udalosti OnKeyUp, nebo Down,...
duc> kontrolu Key=13 a prepnout activecontrol,
duc> jenze pri tom dochazi k systemovemu zvuku, ktery neni vhodny..
duc> K tomu kazda komponenta ten zvuk vyda na jine udalosti.
duc> Mate nekdo postup jak se tomu vyhnout ?
duc> Dekuji, Lubos Novy
Prechod mezi komponentami na ENTER
[*] Jan Fiala <jan.fiala(zv)wo(tec)cz> - 16.10.2005 20:13:53
16.10.2005 delphi(zv)unileasing(tec)cz:
> Ahoj vsem,
> jak prechazet mezi komponentami (edit,combobox,listbox,...) nejenom
> tabulatorem ale treba po kliknuti na Enter.
> Samozrejme si muzu dat do udalosti OnKeyUp, nebo Down,... kontrolu Key=13 a prepnout activecontrol,
> jenze pri tom dochazi k systemovemu zvuku, ktery neni vhodny..
> K tomu kazda komponenta ten zvuk vyda na jine udalosti.
> Mate nekdo postup jak se tomu vyhnout ?
Pokud to chces resit pres udalosti, tak pouzij OnKeyPress() a po
prechodu nastav parametr Key := #0;
Na prechod pouzij funkci SelectNext(), ktera sama najde povolenou
komponentu s nasledujicim TabOrder
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
Prechod mezi komponentami na ENTER
[*] delphi(zv)unileasing(tec)cz - 16.10.2005 19:17:49
Ahoj vsem,
jak prechazet mezi komponentami (edit,combobox,listbox,...) nejenom tabulatorem ale treba po kliknuti na Enter.
Samozrejme si muzu dat do udalosti OnKeyUp, nebo Down,... kontrolu Key=13 a prepnout activecontrol,
jenze pri tom dochazi k systemovemu zvuku, ktery neni vhodny..
K tomu kazda komponenta ten zvuk vyda na jine udalosti.
Mate nekdo postup jak se tomu vyhnout ?
Dekuji, Lubos Novy
Jak odstranit vetu z tabulky FireBird (a jak s cel
[*] Martin Burle <mburle2(zv)volny(tec)cz> - 15.10.2005 19:02:02
> Jako dataset pouzivam IBTable pod databazi IBDatabase, ta ma k sobe
pripojenou transakci(nastavenou na TAcommit). Cashed updates je false,
nepouzivam IBUpdate. Doufam ze to nebude potreba, protoze se jedna o
jednouzivatelskou aplikaci, ktera pobezi na pocitaci, na kterem bude
nainstalovan FireBird.
Kdyz se podivas do archivu konference, tak se myslim nejednou doctes, ze
TIBTable neni prilis doporucovany dataset ;). Spise bych pouzil TIBDataset,
kde mas moznost si nechat vygenerovat ci rucne napsat/upravit update,
refresh, delete ci insert SQLcommand, nebo nejaky clientdataset. Tvuj
problem s delete ale nejspis vyresi commit (mujDataset,Transaction.commit
nebo commitretaining), ktery zavolas bud po kazdem delete/update, nebo az
nakonec - pokud je to jednouzivatelska aplikace, nemela by dlouha bezici
transakce prilis vadit.
HTH,
MB
ZeosDBO a co nejjednodussi vyhledani radku a nasle
[*] Vaclav Halik <spravasd(zv)suz.cvut(tec)cz> - 15.10.2005 15:07:46
Zdravim,
> Zkousel jsem dat na form TZConnection,se kterou sem se i spojil s mysql
>serverem, na ni jsem napojil TZQuery, na kterou sem napojil TdataSource a
>na to pak TDBGrid.Odtud se mi uz data podarilo vytahnout do promenne,ale
>
>
neslo,
TZConnection potrebujes pro sdileni spojeni a vlastni spojeni na server,
TZQuery ti urci co vlastne chces (Umozni SELECTy, SQL, atd),
TDataSource ti zpristupni tato data pro ostatni komponenty.
Co by si chtel tedy vynechat ?
>neslo by to udelat uz nekde driv? Je opravdu notno mit tam tolik komponent?
>
>
TDBGrid nepotrebujes. Muzes data sosat primo z TZQuery.
Kukni do helpu na vlastnost Fields
Jinak treba takto:
var MyString : String;
MyString := qrObjednavky.Fields[0].AsString;
S pzdravem Vaclav Halik
Jak odstranit vetu z tabulky FireBird (a jak s cel
[*] Vlastislav Cilek <bigvlci(zv)seznam(tec)cz> - 15.10.2005 10:19:26
Zdravim
Mam dalsi FireBird zacatecnicky dotaz.
Otevru aplikaci, pridam radek do tabulky (append), nejaky udaj doplnim, pridam dalsi atd pro nekolik novych radku.
Nasledne chci udelat jednu prostou (alespon jsem si to nejakou dobu myslel ;-) ) vec, a to vymazat radek z tabulky. V predchozi aplikaci, ktera pracovala s FoxPro tabulkami, kdyz jsem dal delete, radek byl odstranen. Ne tak pri praci s FireBirdem (- snad je to i pochopitelne, i kdyz...).
DbGrid se sice tvari, ze veta je vymazana, to cele vsak do te doby, nez je napriklad aplikace spustena znovu. V tom pripade se zde objevi vsechny radky, tj. ty, ktere byly minule pridany a pak "odstraneny".
Tzn. odstraneni radku, ktere byly pri tomto spusteni aplikace pridany a pak hned "odstraneny" z tabulky neprobehlo. Kdyz odstranim radky v tomto okamziku, jiz jsou odstraneny spravne, tj. pri znovuspusteni aplikace jiz neexistuji.. Je snad nutne nejak odesilat transakce nebo neco jineho?
Jako dataset pouzivam IBTable pod databazi IBDatabase, ta ma k sobe pripojenou transakci(nastavenou na TAcommit). Cashed updates je false, nepouzivam IBUpdate. Doufam ze to nebude potreba, protoze se jedna o jednouzivatelskou aplikaci, ktera pobezi na pocitaci, na kterem bude nainstalovan FireBird.
Prosim o jednoduchy popis systemu, jak uspesne pracovat v Delphi s tabulkou pod FireBirdem, pripadne o nejaky zdroj (stranky, knihu apod.), kde jsou popsane tyto zalezitosti, abych nemusel postupovat krok vpred, dva kroky vzad :-).
Vlci.
bezdatabazova Sinea a Pages
[*] Vaclav Krmela <krmela(zv)ustinadorlici(tec)cz> - 14.10.2005 22:06:24
> From: MaReK Penguin Olsavsky
> >>Kde CMR a CIMCUV jsou sablony.
> ^^^Tak rikam tem *.pts (blbej webarskej zvyk rikat sablony tomu, co
> urcuje layout na strance (papire)), mel jsem za to, ze se prehazuji
tyto
> soubory.
Soubory *.PTS jsou soubory s "P"redlohou "T"iskove "S"estavay.
Tedy asi to, co by se dalo rozumet terminu Sablona.
V prvnim dotaze byl ale termin Sablona pouzit ve spojitosti s
komponentou TSestava, a to je nespravne..
Sinea pouziva terminologii:
TSestava je komponenta generatoru tiskovych sestav. Obvykle je napojena
na jeden zdroj dat a provadi tiskovy vystup jednoho typu tiskovych
sestav.
Pocet typu tiskovych sestav urcuje programator tim, jake datove zdroje
jsou k dispozici a tech je konecny, predem dany pocet.
Predloha tiskove sestavy urcuje konkretni vzhled tiskove sestavy z
daneho zdroje dat. Vzhled sestavy si urcuje koncovy uzivatel a k jednomu
zdroji dat = k jedne komponente TSestava si muze nadefinovat neomezeny
pocet predloh tiskove sestavy, tedy konkretnich tiskovych vystupu danych
sablonou PTS.
Vaclav Krmela
bezdatabazova Sinea a Pages
[*] MaReK Penguin Olsavsky <orsm(zv)centrum(tec)cz> - 14.10.2005 18:44:10
Vaclav Krmela napsal(a):
>>
>>Kde CMR a CIMCUV jsou sablony.
^^^Tak rikam tem *.pts (blbej webarskej zvyk rikat sablony tomu, co
urcuje layout na strance (papire)), mel jsem za to, ze se prehazuji tyto
soubory.
> Radky:
> tPrintButton1.Report.OnStepData := CMR.OnStepData;
> tPrintButton1.Report.OnGetData := CMR.OnGetData;
> jsou zbytecne, staci ten prvni radek:
> tPrintButton1.Report := CMR;
>
>
> A jsou na komponentach CMR a CIMCUV definovany obsluhy udalosti
> OnStepData a OnGetData? To je jedina podminka funkcnosti.
^^^Jsou definovany. Chybka byla, ze jsem se snazil prehazovat i ty
metody OnGetData a onStepData.
Zkusim a uvidim...
Dekuji moc
MaReK Olsavsky
ZeosDBO a co nejjednodussi vyhledani radku a nasle
[*] Ales Kresta <kresta.ales(zv)seznam(tec)cz> - 14.10.2005 18:06:06
Zdravim,
stahnul jsem a nainstaloval si komponenty ZeosDBO, examply tam nejak
nechapu, s databazemi v Delphi teprve zacinam, a tak bych vas chtel poprosit
zdali byste mi nemohli poradit nebo spise popsat jak udelat, kdyz mam
jednoduchou tabulku v mysql kde mam sloupecek id, sloupec1, sloupec2 jak
jednoduse dostat do promenne typu string retezec ze sloupec1 kdyz vim id.
Zkousel jsem dat na form TZConnection,se kterou sem se i spojil s mysql
serverem, na ni jsem napojil TZQuery, na kterou sem napojil TdataSource a
na to pak TDBGrid.Odtud se mi uz data podarilo vytahnout do promenne,ale
neslo by to udelat uz nekde driv? Je opravdu notno mit tam tolik komponent?
Budu vdecny za jakoukoliv radu, a hlavne za nejaky nazorny priklad
diiky moc
Naplneni XML cvicnymi daty dle sablony
[*] lelicek(zv)volny(tec)cz - 14.10.2005 16:31:59
Ahoj,
nevite zda neexistuje programek, ktery by vytvoril XML z sablony a
naplnil jej zkusebne daty, pouze podle typu ? Myslim, ze jsem neco
takoveho pred nejakou dobou nekde videl a snad i zde v konfere.
Diky Pavel
Problemek s licenci
[*] Pavel Troubil <mechzk(zv)cbeng(tec)cz> - 14.10.2005 14:25:47
Neni v licenci napsano, ze muzes mit Delphi doma, ale nesmis ho pouzivat pro
komercni ucely ? (Pouze pro studijni ucely, ... ?)
Pavel
----- Original Message -----
From: "MaReK Penguin Olsavsky" <orsm(zv)centrum(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Friday, October 14, 2005 10:07 AM
Subject: Problemek s licenci
> Dobry den,
> mam mensi dotaz na licenci Delphi.
> V praci mame radne zakoupene Delphi. Na nich (verte mi, ze doma by mi
> na kombinaci PowerPC + Linux a MacOS nejeli) jsem odvyvijel programek,
> ktery je urcen pro nekolik mych zakazniku. Potrebuji zvedet, jestli jej
> muzu prodat primo za sebe, nebo jestli jako autor musi byt uveden
> majitel licence, tj. muj zamestnavatel. Stejne jsem na tom i ve vztahu k
> Sinea komponentam, ktere tam jsou pouzity.
> Dekuji za odpoved a preji krasny den
> 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)
>
>Problemek s licenci
[*] Skalsky Milan <skalsky(zv)komercpoj(tec)cz> - 14.10.2005 14:07:46
Konkretne dil 2 (Autorstvi), ? 5
(1) Autorem je fyzicka osoba, ktera dilo vytvorila.
(2) Autorem dila souborneho jako celku je fyzicka osoba, ktera je tvurcim zpusobem vybrala nebo usporadala; tim nejsou dotcena prava autoru del do souboru zarazenych.
a DIL 7 (Zvlastni ustanoveni o nekterych dilech), ? 58
(1) Neni-li sjednano jinak, zamestnavatel vykonava svym jmenem a na svuj ucet autorova majetkova prava k dilu, ktere autor vytvoril ke splneni svych povinnosti vyplyvajicich z pracovnepravniho ci sluzebniho vztahu k zamestnavateli nebo z pracovniho vztahu mezi druzstvem a jeho clenem (zamestnanecke dilo). Zamestnavatel muze pravo vykonu podle tohoto odstavce postoupit treti osobe pouze se svolenim autora, ledaze se tak deje pri prodeji podniku nebo jeho casti.
(2) Smrti nebo zanikem zamestnavatele, ktery byl opravnen vykonavat majetkova prava k zamestnaneckemu dilu a ktery nema pravniho nastupce, nabyva opravneni k vykonu techto prav autor.
.....
(6) Neni-li sjednano jinak, ma autor zamestnaneckeho dila vuci zamestnavateli pravo na primerenou dodatecnou odmenu, jestlize se mzda nebo jina odmena vyplacena autorovi zamestnavatelem dostane do zjevneho nepomeru k zisku z vyuziti prav k zamestnaneckemu dilu a vyznamu takoveho dila pro dosazeni takoveho zisku; toto ustanoveni se nepouzije na dila uvedena v odstavci 7, at jsou dily zamestnaneckymi, ci se za ne povazuji, ledaze je sjednano jinak.
jinak doporucuju precit komplet hlavy 2 a 7, idealni by bylo cele ... cela dnesni debata se dala obejit rozeslanim linku ke stazeni autorskeho zakona: http://www.microsoft.com/cze/piratstvi/pravo/autorskyzakon.asp
Milan,
D7 Ent., WinXP SP2
P.S.
sorry za tu diakritiku v copyPaste textech ...
-----Original Message-----
Sent: Friday, October 14, 2005 1:54 PM
Proc si tedy nikdo neprecte ten autorsky zakon? Tam je to jasne
uvedeno, ta veta je tam jasna a srozumitelna.
Petr Zahradnik, pocitacovy expert
bezdatabazova Sinea a Pages
[*] Vaclav Krmela <krmela(zv)ustinadorlici(tec)cz> - 14.10.2005 13:57:45
> From: Martin Rocek
>
> zkusil bych napsat handler pro OnNactiPredlohu, tim si budete ridit
jaka
> sablona se ma nacist a zaroven se vyhnete dotazu na datovy zdroj.
Ne. OnNactiPredlohu zajistuje vlastni obsluhu nacitani predlohy tiskove
sestavy. To nijak nesouvisi se zdrojem dat pro sestavu.
Zdroj dat muze byt dvoji, nezavisle na zpusobu nacteni predlohy:
- napojeni pres datovy zdroj TDataSource
- vlastni plneni daty pomoci OnGetData a OnStepData.
Vaclav Krmela
bezdatabazova Sinea a Pages
[*] Vaclav Krmela <krmela(zv)ustinadorlici(tec)cz> - 14.10.2005 13:55:44
> From: MaReK Penguin Olsavsky
>
> Mam aplikaci, ktera tiskne pres Sinea komponenty.
> Je bez databaze, takze data do sablon zadavam pres metody
> onGetData a onSetData....
> Zkousel jsem toto navesit na tlacitko pro tisk ze Sineakomponent:
>
> procedure TForm1.tPrintButton1Click(Sender: TObject);
> begin
> if(PageControl1.ActivePage=TabSheet1) then begin
> //co se ma stat, kdyz jsem na page CMR
> tPrintButton1.Report := CMR;
> tPrintButton1.Report.OnStepData := CMR.OnStepData;
> tPrintButton1.Report.OnGetData := CMR.OnGetData;
> end else begin
> //Akce kdyz jsem na page CIM/CUV
> tPrintButton1.Report := CIMCUV;
> tPrintButton1.Report.OnStepData := CIMCUV.OnStepData;
> tPrintButton1.Report.OnGetData := CIMCUV.OnGetData;
> end;
> end;
>
> Kde CMR a CIMCUV jsou sablony.
Nevim, co myslis tim "Sablony".
Predpokladam, ze CMR a CIMCUV jsou komponenty TSestava.
Radky:
tPrintButton1.Report.OnStepData := CMR.OnStepData;
tPrintButton1.Report.OnGetData := CMR.OnGetData;
jsou zbytecne, staci ten prvni radek:
tPrintButton1.Report := CMR;
> Pri kliknuti na tlacitko obdrzim chybovou
> hlasku, ze neni definovan zdroj dat.
A jsou na komponentach CMR a CIMCUV definovany obsluhy udalosti
OnStepData a OnGetData? To je jedina podminka funkcnosti.
Vaclav Krmela
Problemek s licenci
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 14.10.2005 13:53:44
Puvodni zprava ze dne 14.10.2005:
> Toto je ale asi sporne, nebo jak to pak vlastne je ?
Proc si tedy nikdo neprecte ten autorsky zakon? Tam je to jasne
uvedeno, ta veta je tam jasna a srozumitelna.
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================
Problemek s licenci
[*] Vaclav Halik <spravasd(zv)suz.cvut(tec)cz> - 14.10.2005 13:47:44
Zdravim, jen by mne zajimalo ...
>2. Je jedno co jsi, mimo pracovni dobu si na zamestnavatelove pocitaci
>a software vyvines software, pak jsi autor a take muzes s dilem
>nakladat.
>
>
... zda tady neni jeste dulezity faktor to co ma konkretni zamestnanec v
pracovni naplni,
samozrejme za predpokladu ze ma definovanou a podepsanou pracovni napln.
Tedy, zda treba (pitomy priklad) pracovnik technicke pohotovosti, ktery
stejne
nema cely den co delat, ale je placen za to, ze je na pracovisti a v
pripade havarie
tuto ihned resi pise v tuto dobu vlastni SW. Toto je ale asi sporne,
nebo jak to pak
vlastne je ?
S pozdravem Vaclav Halik
bezdatabazova Sinea a Pages
[*] Martin Rocek <rocek(zv)dibaq(tec)cz> - 14.10.2005 13:37:43
Zdravim,
zkusil bych napsat handler pro OnNactiPredlohu, tim si budete ridit jaka
sablona se ma nacist a zaroven se vyhnete dotazu na datovy zdroj.
Martin
Problemek s licenci
[*] MaReK Penguin Olsavsky <orsm(zv)centrum(tec)cz> - 14.10.2005 13:09:40
Petr Zahradnik napsal(a):
> Puvodni zprava ze dne 14.10.2005:
>
>
>>Existuji hranice, do kterych nemusis dary danit - tusim 20000 od
>>jednoho cloveka v ramci roku.
^^^Dneska jsme se o tomto bavili, protoze jsme mzdova firma a jeden z
nasich zakazniku to potreboval vedet, tak mate tam nulu navic :-), je to
2000,- rocne a nesmi to byt penezite, ale treba kupony do hospody uz jo :-D.
> Navic, ted presne uplne nevim, ty mzdove zakony se meni kazdych 14
> dni, ale mam pocit, ze v pripade zamestnance by to musel zamestnavatel
> hezky vkladat do mzdy, aby se mu to hned pekne zdanovalo - jako
> ostatni takove podobne prispevky zamestnanci od zamestnavatele :-)
^^^Presne tak, nalitlo by to do mzdy i s odvody od zamestnavatele,
samozrejme, ze pak neni problem spocitat, ze musim dostat asi 74% z
prodejni ceny pridano k hrubemu, aby na to zamestnavatel nedoplatil.
Proste by se to nacetlo do nejakych mimoradnych odmen a po starostech.
Nastesti mam ZL, tak to pujde bokem firemniho ucetnictvi, jen jsem
potreboval vedet, jestli jsem se nedostal do rozporu s licencemi...
Dekuji vsem
MaReK
--
- --
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)
Problemek s licenci
[*] MaReK Penguin Olsavsky <orsm(zv)centrum(tec)cz> - 14.10.2005 12:47:39
Tyslic Jiri napsal(a):
> Licence Delphi umoznuje mit doma nainstalovanou dalsi kopii Delphi, protoze licence je vedena na vyvojare.
> Takze to co si doma naprogramujes to, si taky prodas :-)
^^^Doma nelze, PowerPC masinky tam mame a az s nima skonci Apple a budu
potrebovat novy HW, tak to vidim na PegasosPPC, vyhovujou mi, ze
nepotrebujou dalsi spotrebice v podobe vetraku :-). V linuxu jsem jednou
zkousel virtualni masinu, ale tam se zase narazi na emulaci hardware,
takze je to, takrikajic, nechutne ppoommaallee. Osobne se treba divim,
ze od Borlandu neznam portaci jejich prostredi ma MacOS, protoze v USA
nemaji tak zanedbatelnou penetraci, jako v Evrope a pokud by byla
prenosnost na urovni zdrojovych kodu, bylo by to krasne. Pravdou je, ze
na jednodussi veci mi postacuje Lazarus a ten je FOSS a multiplatformni.
Ono na kombinaci PPC a Linux je i sehnani javy trochu neprijemne, ale
treba mono (OSS .NET) bezi krasne, byt s omezenimi danymi castmi, ktere
si MS chrani, nebo ktere se zatim nepovedlo prenest. Zase na druhou
stranu, doma delam hlawne wwwyvoj s PHP a jsp, tak me to nejak nepali +
pisu clanky pro LinuxSoft(tec)cz.
Jinak vsem dekuji za odpovedi, ktere me potesily.
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)
Problemek s licenci
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 14.10.2005 12:25:36
Puvodni zprava ze dne 14.10.2005:
> Existuji hranice, do kterych nemusis dary danit - tusim 20000 od
> jednoho cloveka v ramci roku.
Ano, to je jasne. Nicmene ja to zduraznil hlavne z pohledu toho
zamestnavatele - totiz FU by nebyl nadseny, ze zamestnavatel vybavil
firmu pocitaci a softwarovym vybavenim, ktere pak nasledne pujcuje
zdarma svym zamestnancum.
Navic, ted presne uplne nevim, ty mzdove zakony se meni kazdych 14
dni, ale mam pocit, ze v pripade zamestnance by to musel zamestnavatel
hezky vkladat do mzdy, aby se mu to hned pekne zdanovalo - jako
ostatni takove podobne prispevky zamestnanci od zamestnavatele :-)
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================
Problemek s licenci
[*] Jan Fiala <jan.fiala(zv)wo(tec)cz> - 14.10.2005 11:59:34
14.10.2005 Petr Zahradnik:
> Kdyz zamestnavatel pujci nekomu vyrobni prostredek, tak
> by za to mel vzit penize a zdanit je, protoze jinak dava dar, a ten by
> zase mel zdanit zamestnanec, a zamestnavateli by se pak mohlo
> vytknout, ze nakup software tedy neni 100% vydajem na udrzeni prijmu.
Existuji hranice, do kterych nemusis dary danit - tusim 20000 od
jednoho cloveka v ramci roku.
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
Problemek s licenci
[*] Jan Fiala <jan.fiala(zv)wo(tec)cz> - 14.10.2005 11:55:33
14.10.2005 MaReK Penguin Olsavsky:
> Dobry den,
> mam mensi dotaz na licenci Delphi.
> V praci mame radne zakoupene Delphi. Na nich (verte mi, ze doma by mi
> na kombinaci PowerPC + Linux a MacOS nejeli) jsem odvyvijel programek,
> ktery je urcen pro nekolik mych zakazniku. Potrebuji zvedet, jestli jej
> muzu prodat primo za sebe, nebo jestli jako autor musi byt uveden
> majitel licence, tj. muj zamestnavatel. Stejne jsem na tom i ve vztahu k
> Sinea komponentam, ktere tam jsou pouzity.
> Dekuji za odpoved a preji krasny den
> MaReK Olsavsky
Pokud mas svoleni od zamestnavatele, ze muzes jeho prostredky pouzit
pro soukrome aktivity, nevidim duvod, proc bye nemohl byt jako autor
uveden ty.
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
Problemek s licenci
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 14.10.2005 11:49:33
Puvodni zprava ze dne 14.10.2005:
> Autorska prava jsou sice toho, kdo program napsal, ale majetkova
> prava jsou v tomto pripade temer jiste zamestnavatele. Jelikoz byl
> program vyvijen v zamestnani, na HW a SW zamestnavatele, je to zcela
> jiste tak. Proto licenci k uzivani tohoto programu muze opet
> prodavat pouze zamestnavatel.
To neni uplna pravda. Byla by to pravda v pripade, ze toto soucasne
delas v pracovni dobe v ramci pracovniho pomeru a dostavas za to
zaplacenu mzdu. Pokud tomu tak neni, pak NENI VYVIJEN V ZAMESTNANI,
ale pouze sis zapujcil vyrobni prostredky. A tim padem nedojde k
naplneni techto paragrafu autorskeho zakona, ale zcela jinych.
V prikladech:
1. Jsi zamestnanec - programator, v ramci sve prace vyvijis software,
pak jsi autorem dila, ale nakladat s dilem muze jen zamestnavatel,
pokud jste si smluvne neujednali jinak.
2. Je jedno co jsi, mimo pracovni dobu si na zamestnavatelove pocitaci
a software vyvines software, pak jsi autor a take muzes s dilem
nakladat.
A vyse uvedene priklady nezahrnuji danove zalezitosti, o kterych jsem
psal minule.
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================
Problemek s licenci
[*] Martin Pisarik <martin.pisarik(zv)seznam(tec)cz> - 14.10.2005 11:39:32
Nemas pravdu.
Pokud si pujcim michacku a postavim si barak, tak je ten barak muj a ne toho
komu patri ta michacka.
Autorska prava jsou autora a to je ten kdo dilo vytvoril - tedy programator.
Pokud zamestanavatel pujcil zamestnavateli HW a SW tak je treba se zamyslet
nad tim co psal Petr Zahradnik o daru, a o vydajech na udrzeni prijmu.
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Michal S.
> Sent: Friday, October 14, 2005 11:12 AM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: Re: Problemek s licenci
>
>
> Pozor na jednu vec.
> Autorska prava jsou sice toho, kdo program napsal, ale majetkova prava
> jsou v tomto pripade temer jiste zamestnavatele. Jelikoz byl program
> vyvijen v zamestnani, na HW a SW zamestnavatele, je to zcela jiste tak.
> Proto licenci k uzivani tohoto programu muze opet prodavat pouze
> zamestnavatel.
>
> Michal S.
>
>
>
>
>
> Martin Pisarik napsal(a):
> > Rekl bych, ze majitelem licence Delphi je podle toho cos napsal tvuj
> > zamestnavatel. Pokud ti on umoznil pouzit jeho HW a SW vybaveni
> k tomu aby
> > sis neco vytvoril a pak to prodaval, tak na tom nevidim nic nelegalniho.
> > Predpokladam, ze ta Delphi instalace byla jen na jednom PC.
> > Navic z hlediska autorskeho zakona je autorem dila ten, kdo ho vytvoril.
> > Takze je to vzdy programator (konkretni clovek) a ne jeho zamestnavatel.
> >
> > P.S. Taky bych chtel mit takoveho zamestnavatele.
> > P.P.S Nechtel bych mit takoveho zamestnance
> >
> >
> >>
> >> Dobry den,
> >>mam mensi dotaz na licenci Delphi.
> >> V praci mame radne zakoupene Delphi. Na nich (verte mi, ze
> >>doma by mi
> >>na kombinaci PowerPC + Linux a MacOS nejeli) jsem odvyvijel programek,
> >>ktery je urcen pro nekolik mych zakazniku. Potrebuji zvedet, jestli jej
> >>muzu prodat primo za sebe, nebo jestli jako autor musi byt uveden
> >>majitel licence, tj. muj zamestnavatel. Stejne jsem na tom i ve vztahu k
> >>Sinea komponentam, ktere tam jsou pouzity.
> >> Dekuji za odpoved a preji krasny den
> >> MaReK Olsavsky
> >>
> >
> >
> >
> >
> >
> >
> >
>
>
Problemek s licenci
[*] Michal S. <micsdelphi(zv)centrum(tec)cz> - 14.10.2005 11:11:30
Pozor na jednu vec.
Autorska prava jsou sice toho, kdo program napsal, ale majetkova prava
jsou v tomto pripade temer jiste zamestnavatele. Jelikoz byl program
vyvijen v zamestnani, na HW a SW zamestnavatele, je to zcela jiste tak.
Proto licenci k uzivani tohoto programu muze opet prodavat pouze
zamestnavatel.
Michal S.
Martin Pisarik napsal(a):
> Rekl bych, ze majitelem licence Delphi je podle toho cos napsal tvuj
> zamestnavatel. Pokud ti on umoznil pouzit jeho HW a SW vybaveni k tomu aby
> sis neco vytvoril a pak to prodaval, tak na tom nevidim nic nelegalniho.
> Predpokladam, ze ta Delphi instalace byla jen na jednom PC.
> Navic z hlediska autorskeho zakona je autorem dila ten, kdo ho vytvoril.
> Takze je to vzdy programator (konkretni clovek) a ne jeho zamestnavatel.
>
> P.S. Taky bych chtel mit takoveho zamestnavatele.
> P.P.S Nechtel bych mit takoveho zamestnance
>
>
>>
>> Dobry den,
>>mam mensi dotaz na licenci Delphi.
>> V praci mame radne zakoupene Delphi. Na nich (verte mi, ze
>>doma by mi
>>na kombinaci PowerPC + Linux a MacOS nejeli) jsem odvyvijel programek,
>>ktery je urcen pro nekolik mych zakazniku. Potrebuji zvedet, jestli jej
>>muzu prodat primo za sebe, nebo jestli jako autor musi byt uveden
>>majitel licence, tj. muj zamestnavatel. Stejne jsem na tom i ve vztahu k
>>Sinea komponentam, ktere tam jsou pouzity.
>> Dekuji za odpoved a preji krasny den
>> MaReK Olsavsky
>>
>
>
>
>
>
>
> Problemek s licenci
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 14.10.2005 11:07:29
Puvodni zprava ze dne 14.10.2005:
> Jak s pouzitim Delphi nevim, ale hlavne si dej pozor na
> zamestnavatele... protoze, tusim podle zakoniku prace nebo
> autorskeho zakona, to co vytvoris v praci(za kterou ti zamestnavatel
> samozrejme musi zaplatit),tak autorska prava k tomu prechazeji
> automaticky na zamestnavatele.
Autorska prava nikam neprechazeji. Kdyz jako zamestnanec vytvoris
dilo, tak jsi stale autor, ale pokud neni dohodnuto jinak, nakladat s
dilem muze zamestnavatel.
To neni tento pripad - kdyz si to zamestnanec dela ve svem volnem
case, nedostava zaplaceno, je to jeho dilo se vsim vsudy.
Naopak mohou tam ale vzniknout nektera nedorozumeni ze zakona o dani z
prijmu apod. Kdyz zamestnavatel pujci nekomu vyrobni prostredek, tak
by za to mel vzit penize a zdanit je, protoze jinak dava dar, a ten by
zase mel zdanit zamestnanec, a zamestnavateli by se pak mohlo
vytknout, ze nakup software tedy neni 100% vydajem na udrzeni prijmu.
Takze si to nejak preberte :-) A vemte v uvahu i to, ze zamestnavatel
vlastne pronajme zamestnanci licenci treba za 10 korun, a ted je
otazka, zda zase toto muze udelat v ramci licence, kde pronajimani
licenci neni umozneno...
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================
Problemek s licenci
[*] Ales Kresta <kresta.ales(zv)seznam(tec)cz> - 14.10.2005 10:55:28
Jak s pouzitim Delphi nevim, ale hlavne si dej pozor na zamestnavatele...
protoze, tusim podle zakoniku prace nebo autorskeho zakona, to co vytvoris v
praci(za kterou ti zamestnavatel samozrejme musi zaplatit),tak autorska
prava k tomu prechazeji automaticky na zamestnavatele.
Problemek s licenci
[*] MaReK Penguin Olsavsky <orsm(zv)centrum(tec)cz> - 14.10.2005 10:43:27
Martin Pisarik napsal(a):
> Rekl bych, ze majitelem licence Delphi je podle toho cos napsal tvuj
> zamestnavatel. Pokud ti on umoznil pouzit jeho HW a SW vybaveni k tomu aby
> sis neco vytvoril a pak to prodaval, tak na tom nevidim nic nelegalniho.
> Predpokladam, ze ta Delphi instalace byla jen na jednom PC.
^^^Podle toho, co jednou dostal byvaly kolega za vyjadreni, Delphi mohou
byt ve firme nainstalovany vickrat, nez je nakoupeno licenci, jen by
melo byt zajisteno, aby jelo soucasne nejvice tolik instalaci, kolik je
koupenych licenci (treba pracovni PC a notebook jednoho zamestnance
budou stezi soucasne pouzivany). Ale uz je to druhoruka informace.
> P.S. Taky bych chtel mit takoveho zamestnavatele.
^^^Radsi sedet v praci a delat neco mimo, nez doma koukat na TV :-)
BTW: Zlaty FOSS licence :-), na tyhle komercni aby si clovek zaplatil
pravnika, protoze programatorskym mozkem nejsem stonc odchytat jemne
niance, ktere maji zasadni vliv na prava a povinnosti... :-)
--
- --
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)
Problemek s licenci
[*] Tyslic Jiri <jiri.tyslic(zv)opp.tbggroup(tec)com> - 14.10.2005 10:37:26
> Dobry den,
> mam mensi dotaz na licenci Delphi.
> V praci mame radne zakoupene Delphi. Na nich (verte mi,
> ze doma by mi
> na kombinaci PowerPC + Linux a MacOS nejeli) jsem odvyvijel
> programek,
> ktery je urcen pro nekolik mych zakazniku. Potrebuji zvedet,
> jestli jej
> muzu prodat primo za sebe, nebo jestli jako autor musi byt uveden
> majitel licence, tj. muj zamestnavatel. Stejne jsem na tom i
> ve vztahu k
> Sinea komponentam, ktere tam jsou pouzity.
> Dekuji za odpoved a preji krasny den
> MaReK Olsavsky
Licence Delphi umoznuje mit doma nainstalovanou dalsi kopii Delphi, protoze licence je vedena na vyvojare.
Takze to co si doma naprogramujes to, si taky prodas :-)
Jirka
Problemek s licenci
[*] Martin Pisarik <martin.pisarik(zv)seznam(tec)cz> - 14.10.2005 10:21:25
Rekl bych, ze majitelem licence Delphi je podle toho cos napsal tvuj
zamestnavatel. Pokud ti on umoznil pouzit jeho HW a SW vybaveni k tomu aby
sis neco vytvoril a pak to prodaval, tak na tom nevidim nic nelegalniho.
Predpokladam, ze ta Delphi instalace byla jen na jednom PC.
Navic z hlediska autorskeho zakona je autorem dila ten, kdo ho vytvoril.
Takze je to vzdy programator (konkretni clovek) a ne jeho zamestnavatel.
P.S. Taky bych chtel mit takoveho zamestnavatele.
P.P.S Nechtel bych mit takoveho zamestnance
>
> Dobry den,
> mam mensi dotaz na licenci Delphi.
> V praci mame radne zakoupene Delphi. Na nich (verte mi, ze
> doma by mi
> na kombinaci PowerPC + Linux a MacOS nejeli) jsem odvyvijel programek,
> ktery je urcen pro nekolik mych zakazniku. Potrebuji zvedet, jestli jej
> muzu prodat primo za sebe, nebo jestli jako autor musi byt uveden
> majitel licence, tj. muj zamestnavatel. Stejne jsem na tom i ve vztahu k
> Sinea komponentam, ktere tam jsou pouzity.
> Dekuji za odpoved a preji krasny den
> MaReK Olsavsky
>
Problemek s licenci
[*] MaReK Penguin Olsavsky <orsm(zv)centrum(tec)cz> - 14.10.2005 10:07:24
Dobry den,
mam mensi dotaz na licenci Delphi.
V praci mame radne zakoupene Delphi. Na nich (verte mi, ze doma by mi
na kombinaci PowerPC + Linux a MacOS nejeli) jsem odvyvijel programek,
ktery je urcen pro nekolik mych zakazniku. Potrebuji zvedet, jestli jej
muzu prodat primo za sebe, nebo jestli jako autor musi byt uveden
majitel licence, tj. muj zamestnavatel. Stejne jsem na tom i ve vztahu k
Sinea komponentam, ktere tam jsou pouzity.
Dekuji za odpoved a preji krasny den
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)
Ukonceni aplikace
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 14.10.2005 10:05:24
> co to bude delat, ale kazdopadne, kdyz opakovane volam
> funkci v te knihovne, kterou nacitam implicitne, tak mi
> aplikace zatuhne. Ta funkce v te knihovne totiz upravuje
> objekty, ktere mam na formulari. Po prvnim volani je
> vsechno ok, ale pri druhem volani to vytuhne.
V tom pripade nebude problem s uvolnovanim DLL, ale v tom, ze DLL
dela neco, co nema. Zkusil bych test: veskere telo funkce v DLL
zakomentovat, volat tedy jen funkci z DLL, ktera nedela nic.
Dale by nebylo spatne, kdybys sem napsal deklaraci te funkce -
parametry, volaci konvence apod.
David Lebeda
SQL a jpeg
[*] Ing. Pavel Zilinec <pavel.zilinec(zv)seznam(tec)cz> - 14.10.2005 09:57:23
Na SQL je BinData typu Image
FBinData : TMemoryStream;
Ulozeni:
FBinData := TMemoryStream.Create;
FBinData.LoadFromFile('Obrazek.jpg');
... ParamByName('BinData').LoadFromStream(FBinData, ftBlob); ....
FBinData.Free;
Nacteni:
FBinData.Clear;
TBlobField(FieldByName('BinData')).SaveToStream(FBinData);
--
ing. Pavel Zilinec
MailTo:pavel.zilinec(zv)seznam(tec)cz
Prog-Soft s.r.o. Plzen
Informacni system pro vyrobce
a distributory napoju
Thursday, October 13, 2005, 5:58:03 PM, bylo napsano:
VZ> Zdravim,
VZ> muzete mi prosim poradit jak dokazu ulozit obrazej ve formatu jpeg(gif,...)
VZ> do databaze MS SQL?
VZ> Ulozeni bitmapy je v pohode.
VZ> Vlasta, D5Ent, MSSQL 2000
bezdatabazova Sinea a Pages
[*] MaReK Penguin Olsavsky <orsm(zv)centrum(tec)cz> - 14.10.2005 09:59:23
Dobry den,
resim drobny problemek. Mam aplikaci, ktera tiskne pres Sinea
komponenty. Je bez databaze, takze data do sablon zadavam pres metody
onGetData a onSetData. V aplikaci je neolik tabu (PageControl) a kazda
stranka ma prislusnou sablonu. Nektera data jsou spolecna a jsou mimo
tyto taby. Tak a ted problemek: Potrebuju mit na hlavnim formulari (tj.
mimo ty taby) tlacitko pro tisk a sablony se musi prepinat podle
aktualniho tabu. Zkousel jsem toto navesit na tlacitko pro tisk ze
Sineakomponent:
procedure TForm1.tPrintButton1Click(Sender: TObject);
begin
if(PageControl1.ActivePage=TabSheet1) then begin
//co se ma stat, kdyz jsem na page CMR
tPrintButton1.Report := CMR;
tPrintButton1.Report.OnStepData := CMR.OnStepData;
tPrintButton1.Report.OnGetData := CMR.OnGetData;
end else begin
//Akce kdyz jsem na page CIM/CUV
tPrintButton1.Report := CIMCUV;
tPrintButton1.Report.OnStepData := CIMCUV.OnStepData;
tPrintButton1.Report.OnGetData := CIMCUV.OnGetData;
end;
end;
Kde CMR a CIMCUV jsou sablony. Pri kliknuti na tlacitko obdrzim chybovou
hlasku, ze neni definovan zdroj dat. Sinea komponenty mam verze 5. Je
pro tento pripad nejaky obecny postup, ktery jsem nenase v dokumentaci?
Dekuji
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)
XML a XSD
[*] lelicek(zv)volny(tec)cz - 14.10.2005 09:47:22
Ahoj,
vytvarim XML dokument dle XSD schematu a potreboval bych zjist
"vlastnosti" elementu a atributu. Zejmena potrebuji znat minOccurs
a maxOccurs elementu a use atributu. Existuje nejaka jednoducha
cesta ?
Pavel
Ukonceni aplikace
[*] xxxx <sojokl(zv)seznam(tec)cz> - 14.10.2005 09:35:20
Zdravim,
diky za ten kod, az se dostanu k poradnymu kompiku, tak to vyzkousim. Jde tady o to, ze potrebuju tu knihovnu uvolnit asi driv nez pri zavreni aplikace. Nevim, sice co to bude delat, ale kazdopadne, kdyz opakovane volam funkci v te knihovne, kterou nacitam implicitne, tak mi aplikace zatuhne.
Ta funkce v te knihovne totiz upravuje objekty, ktere mam na formulari. Po prvnim volani je vsechno ok, ale pri druhem volani to vytuhne.
<
< Ahoj,
<
< u implicitniho zavadeni se knihovna zavadi automaticky jiz pri spousteni
< aplikace a pri neexistenci te DLL aplikaci nelze vubec spustit. Uvolneni
< probiha rovnez automaticky, patrne pri sjizdeni aplikace. Nicmene
< detaily o tomto moc neznam.
<
< Dynamicke zavadeni je pruznejsi - sam si muzes rict, kdy se ma DLL
< nacist a kdy uvolnit, je ale potreba napsat trosku kodu. Viz za chvilku.
< Jestli jsi ale dospel k zaveru, ze ti aplikace neuvolnuje DLL, tak bych
< cekal spis nejakou chybu v te DLL nebo v jejim pouziti. To se ale neda
< posuzovat naslepo. Jinak tedy prikladam ukazku dynamickeho pouziti
< DLL. V hlavni aplikaci je nize uvedena funkce exportuj, ktera vola funkci
< ExpNV z DLL. Predtim DLL nacte a pote hned zase uvolni.
<
< type
< pExpNV= function(CestaDB, Login, Password: PChar;
< Data: PNejakyRecord): integer; stdcall;
<
<
< function Exportuj(bNaklad: Boolean; prec: PRecRTWGlbNabidka):
< integer;
< var
< hDLL: THandle;
< ExpNV: pExpNV;
< begin
< //Natahneme DLL
< hDLL := LoadLibrary('mojelib.dll');
< if hDLL <= 0 then
< begin
< result := -1;//knihovna nenalezena
< exit;
< end;
< try
< (zv)ExpNV := GetProcAddress(hDLL, 'ExpNV');
< if not Assigned(ExpNV) then
< begin
< result := -2; //pozadovana funkce nenalezena
< exit;
< end;
< //Funkci jsme nasli uspesne v DLL, zavolame ji.
< result := ExpNV('1', '2', '3', prec);
< finally
< FreeLibrary(hDLL);
< end;
< end;
<
<
<
<
<
<
<
Databaze
[*] lelicek(zv)volny(tec)cz - 14.10.2005 09:33:20
Pokud se nad daty nebudou provadet jine operace nez vkladani a
vyhledani dle klice, docela bych uvazoval o ulozeni v nejake vhodne
strukture.
V te DB nebude ulozeni nijak efektivni, udaje tam budou prakticky
minimalne dvakrat (data+index). Zatridovani zaznamu bude znamenat
modifkaci indexu (vyvazeni stromu) a tak take nebude dvakrat
efektivni (to zavisi na "nahodnosti" vkladanych hodnot cim
nahodnejsi tim lepsi).
Pavel
Od: "Lukas Barton" <lukas(zv)cnawr(tec)cz>
Komu: delphi-l(zv)clexpert(tec)cz
>
> >Zdravim,
> > mam nasledujici porblem, potreboval bych ulozit a pouzivat
> > cca neco kolem
> >miliardy(??) zaznamu o velikosti kazdy cca 10-20B. Kazdy
> >zaznam bude
> >obsahovat cca 30 polozek kt. budou nabyvat hodnot "a","n" nebo
> >"c". A kazdy
> >zaznam bude temito 30 polozkami jednoznacne urcen.Plus tam
> >bude jedna
> >polozka typu varchar(string) o velikosti +-4B . V techto
> >zaznamech potrebuju
> >s co nejvetsi rychlosti najit dany zaznam(podle onech prvnich
> >30 poli) a co
> >nejrychleji zaznam vlozit(pomer hledani a vkladani cca
> >5:1).Jde opravdu o
> >rychlost. Chci se zeptat zda s necim takovym mate nekdo
> >zkusenosti. Zda by
> >stacila mysql databaze?Popripade jak tam mam udelat index-asi
> >slozeny,co? A
> >pujde to udelat slozeny index z 30 polozek?A jak
> >nejefektivneji komunikovat
> >Delphi-mysql?Popripade jeste jak efektivne nastavit mysql,tak
> >aby to
> >fungovalo co nejlip.
> >
> >
> >
> Zakodoval bych to do integeru. 3^30 se vleze v pohode do
> BIGINTu. Prevod z 3 do 10 soustavy a naopak je zrejme
> rychlejsi nez nacitani vice bajtu z disku. A udelat jen jeden
> index na takovym sloupcem.
>
> Pokud to chces prehledneji, uloz to do CHARu.
>
> V uvaze vychazim z obecnych znalosti ohledne implementace
> indexu a ukladani dat. Jeden sloupec bude zrejme vzdy
> rychlejsi, nez 30 sloupcu.
QuickReport 3.5 - sila car u TQRShape
[*] delphak(zv)centrum(tec)cz - 14.10.2005 09:23:19
Dobry den,
mam problem s tiskem QRShape. V preview je zobrazovano spravne - tedy pokud Pen.Width nastavim na nejakou hodnotu je sila cary odpovidajici.
Po vytisknuti (do FinePrint, primo na LaserJet, primo na inkoustovku) jsou vsak vsechny cary tisknuty jako width = 1.
Pokud ale zkusim nastavit nejake jine komponente frame se silou > 1, tiske se cara spravne siroka.
Netusite nekdo kde je problem?
Dik.Ukonceni aplikace
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 14.10.2005 08:15:10
> Omlouvam se, nejak se mi popletlo kodovani. Knihovnu nacitam implicitne
> - u deklarace je external. Nevim, jak se knihovna vola explicitne
> (dynamicky), ale v tomto pripade by se mi to zrejme hodilo.
Ahoj,
u implicitniho zavadeni se knihovna zavadi automaticky jiz pri spousteni
aplikace a pri neexistenci te DLL aplikaci nelze vubec spustit. Uvolneni
probiha rovnez automaticky, patrne pri sjizdeni aplikace. Nicmene
detaily o tomto moc neznam.
Dynamicke zavadeni je pruznejsi - sam si muzes rict, kdy se ma DLL
nacist a kdy uvolnit, je ale potreba napsat trosku kodu. Viz za chvilku.
Jestli jsi ale dospel k zaveru, ze ti aplikace neuvolnuje DLL, tak bych
cekal spis nejakou chybu v te DLL nebo v jejim pouziti. To se ale neda
posuzovat naslepo. Jinak tedy prikladam ukazku dynamickeho pouziti
DLL. V hlavni aplikaci je nize uvedena funkce exportuj, ktera vola funkci
ExpNV z DLL. Predtim DLL nacte a pote hned zase uvolni.
type
pExpNV= function(CestaDB, Login, Password: PChar;
Data: PNejakyRecord): integer; stdcall;
function Exportuj(bNaklad: Boolean; prec: PRecRTWGlbNabidka):
integer;
var
hDLL: THandle;
ExpNV: pExpNV;
begin
//Natahneme DLL
hDLL := LoadLibrary('mojelib.dll');
if hDLL <= 0 then
begin
result := -1;//knihovna nenalezena
exit;
end;
try
(zv)ExpNV := GetProcAddress(hDLL, 'ExpNV');
if not Assigned(ExpNV) then
begin
result := -2; //pozadovana funkce nenalezena
exit;
end;
//Funkci jsme nasli uspesne v DLL, zavolame ji.
result := ExpNV('1', '2', '3', prec);
finally
FreeLibrary(hDLL);
end;
end;
Ukonceni aplikace
[*] Petr Berek <sojokl(zv)seznam(tec)cz> - 14.10.2005 07:15:06
Omlouvam se, nejak se mi popletlo kodovani. Knihovnu nacitam implicitne
- u deklarace je external. Nevim, jak se knihovna vola explicitne
(dynamicky), ale v tomto pripade by se mi to zrejme hodilo.
Lebeda David napsal(a):
>>Tak te+AQ8- ur+AQ0-it+ARs- v+AO0-m, +AX4-e to
>>d+ARs-l+AOE- ta knihovna. Jen by m+ARs- zaj+AO0-malo,
>>jak se d+AOE- knihovna odstranit z pam+ARs-ti.
>>
>>
>
>Neumim sice martansky, ale zkusim odpovedet. IMHO zalezi na tom,
>jak tu knihovnu nacitas. Jestli staticky (u deklaraci funkci mas external)
>nebo dynamicky - sam volas nekde LoadLibrary a pak bys tedy mel tez
>sam zavolat FreeLibrary. Bez blizsi znalosti toho, jak to delas, asi nelze
>moc radit.
>
>David Lebeda
>
>
>
>SQL a jpeg
[*] Vlastimil Zdenek <vlastimil.zdenek(zv)seznam(tec)cz> - 13.10.2005 17:58:03
Zdravim,
muzete mi prosim poradit jak dokazu ulozit obrazej ve formatu jpeg(gif,...)
do databaze MS SQL?
Ulozeni bitmapy je v pohode.
Diky
Vlasta, D5Ent, MSSQL 2000 MSDE+ADO v Delphi
[*] Macko Martin <martin.macko(zv)m-pro(tec)cz> - 13.10.2005 15:57:54
jestli je IBExpert nastroj na spravu IB/FB, tak na MSDE s uspechem
pouzivame DbaMgr2k - http://www.asql.biz/DbaMgr/DownLoad2k.shtm
a na spojeni s MSSQL pres ado pouzivame ADONIS a logika je asi skoro
stejna jako u IB/FB - TADODatabase - TADOTable + TADOQuery +
TADOStoredProc ...
> -----Original Message-----
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Peter Ondras
> Sent: Thursday, October 13, 2005 1:08 PM
> Dobry den,
>
> mozete mi poradit nejake nastroje typu IBExport, ale pre MSDE
> (a najlepsie free ak existuje) a pripadne nejaku ukazku
> spojenia s touto databazou cez ADO v Delphi (5,6,7).
>
> Dakujem.
>
Indy verze 9. nebo 10.?
[*] koukal(zv)petrkoukal(tec)cz - 13.10.2005 14:41:48
-----Puvodni zprava-----
From: "Ing. Igor Vodicka" vodicka(zv)sagit(tec)cz
Date: Thu, 13 Oct 2005 11:15:44 +0200
To: delphi-l(zv)clexpert(tec)cz
Subject: Indy verze 9. nebo 10.?
Ahojky!
Programuji v D5Ent a potrebuji neco "maleho" udelat v oblasti komunikace po
internetu. Uvazuji, ze pouziji Indy. Muze mi prosim nekdo poradit jaky je
rozdil mezi verzemi, ktera je "lepsi". V teto oblasti programu jsem
zacatecnik, co bude jednoduzsi.
Diky
Ing. Igor Vodicka
informacni systemy
Nakladatelstvi Sagit
Tel.: 59 6786 001
HTTP://www.sagit(tec)cz/
Dobry den.
D2K - WIN XP/ Pouzival jsem nejdrive indy 9 pak jsem presel na Indy 10 - do verze 9 je to priblizne stejne - od verze 10 je tam mnoho zmen. cast kodu jsem musel prepsat. Jak a zda by fungovala Indy 10 pod D5ENT nevim.
Podivejte se na knihovny Synapse http://www.ararat(tec)cz/synapse/ - to mi pripada jedniodussi, nic se neinstaluje a je tam mnoho prikaldu.
Petr Koukal.Synapse a stazeni souboru pomoci TFTPSend
[*] Pavel Gazda <pavel_gazda(zv)datasw(tec)cz> - 13.10.2005 14:31:47
Jako obvykle chyba byla mezi hlavou a zidli.
Chyba byla v programu.
Diky
Pavel
>> Nedari se mi stahnout soubor z FTP serveru pomoci
>> TFTPSend.RetrieveFile. Vraci mi chybove hlaseni:
>>
>> 350 Restarting at 0. Send STORE or RETRIEVE to ini
>>
>
> Chyba bude patrne nekde uplne jinde.
>
Prihlaseni uzivatele na FB
[*] Tomas Krejzek <tomas.krejzek(zv)kpsys(tec)cz> - 13.10.2005 13:11:42
ahoj, mame problemy s kontrolou uzivatelu na FB, aplikace kontroluje
pocet soucasne pracujicich uzivatelu tim ze si pri spusteni spocita
pocet prihlasenych uzivatelu pomoci komponenty TIBInfo a vlastnosti
Users, ale jedna instituce ma neustale problemy s licenci, vypada to
jako by se jeden uzivatel neodpojil a zustal viset na serveru.
Nevite jak spravne ukoncovat spojeni pres TIBDatabase?? Ja zatim delam
jen Connected = false, a uvolnim databazi.
diky Tom
MSDE+ADO v Delphi
[*] Peter Ondras <konfery(zv)pse.sk> - 13.10.2005 13:07:41
Dobry den,
mozete mi poradit nejake nastroje typu IBExport, ale pre MSDE (a
najlepsie free ak existuje) a pripadne nejaku ukazku spojenia s touto
databazou cez ADO v Delphi (5,6,7).
Dakujem. Synapse a stazeni souboru pomoci TFTPSend
[*] Jan Fiala <jan.fiala(zv)wo(tec)cz> - 13.10.2005 13:01:41
13.10.2005 Lukas Gebauer:
>> Nedari se mi stahnout soubor z FTP serveru pomoci
>> TFTPSend.RetrieveFile. Vraci mi chybove hlaseni:
>>
>> 350 Restarting at 0. Send STORE or RETRIEVE to ini
>>
>> Nasel jsem, ze to ani neni chyba, ale co s tim ?
>> Je treba opustit funkci RetrieveFile ?
> Chyba bude patrne nekde uplne jinde.
> RetrieveFile vola serii FTP prikazu, a tohle je normalni reakce na
> jeden z nich. Patrne doslo v nasledujicich akcich k nejakemu selhani
> takoveho razu, ze se jiz dalsi hlaseni nenacetlo a tak tam zustalo
> viset prave tohle.
> Bez krokovani ci detailniho logu toho co teklo draty se tezko zjisti
> v cem je problem.
> Napady:
> - spatny rezim prenosu (pasivni/aktivni). To by ale nemelo fungovat
> posilani souboru, takze v tomto asi nebude problem.
> - pokud stahujes primo do souboru na disk, neni problem se zapisem
> tohoto souboru na disk?
> - nekeca do prenosu dat nejaky firewall?
Co treba kompatibilni rezim kvuli IPv6 ?
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
Synapse a stazeni souboru pomoci TFTPSend
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 13.10.2005 12:37:39
> Nedari se mi stahnout soubor z FTP serveru pomoci
> TFTPSend.RetrieveFile. Vraci mi chybove hlaseni:
>
> 350 Restarting at 0. Send STORE or RETRIEVE to ini
>
> Nasel jsem, ze to ani neni chyba, ale co s tim ?
> Je treba opustit funkci RetrieveFile ?
Chyba bude patrne nekde uplne jinde.
RetrieveFile vola serii FTP prikazu, a tohle je normalni reakce na
jeden z nich. Patrne doslo v nasledujicich akcich k nejakemu selhani
takoveho razu, ze se jiz dalsi hlaseni nenacetlo a tak tam zustalo
viset prave tohle.
Bez krokovani ci detailniho logu toho co teklo draty se tezko zjisti
v cem je problem.
Napady:
- spatny rezim prenosu (pasivni/aktivni). To by ale nemelo fungovat
posilani souboru, takze v tomto asi nebude problem.
- pokud stahujes primo do souboru na disk, neni problem se zapisem
tohoto souboru na disk?
- nekeca do prenosu dat nejaky firewall?
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.Predavani parametru z EnumWindows
[*] Milan Tomes <delphi(zv)haida(tec)cz> - 13.10.2005 11:27:34
procedure TForm1.MojeFce(WindowList: TList);
function GetWindow (Handle: HWND; LParam: longint): bool; stdcall;
begin
Result := true;
TList(LParam).Add(Pointer(Handle));
end;
begin
{ get all windows }
EnumWindows ((zv)GetWindow, LongInt(WindowList));
end;
S pozdravem
Milan Tomes
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of delphi(zv)spst(tec)cz
> Sent: Thursday, October 13, 2005 11:06 AM
>
> Mam nasledujici kod:
>
> procedure TForm1.MojeFce(WindowList: TList);
>
> function GetWindow (Handle: HWND; LParam: longint): bool;
> stdcall; begin
> Result := true;
> { add each handle to the list }
> //************************************************************
> **********
> // na nasledujicim radku to spadne, kdyz dam deklaraci
> WindowList: TList do globalnich promennych tak to funguje,
> ale ja to potrebuji prave takhle.
> WindowList.Add (Pointer(Handle));
> end;
>
> begin
> { get all windows }
> EnumWindows ((zv)GetWindow, 0);
> end;Indy verze 9. nebo 10.?
[*] Ing. Igor Vodicka <vodicka(zv)sagit(tec)cz> - 13.10.2005 11:15:33
Ahojky!
Programuji v D5Ent a potrebuji neco "maleho" udelat v oblasti komunikace po
internetu. Uvazuji, ze pouziji Indy. Muze mi prosim nekdo poradit jaky je
rozdil mezi verzemi, ktera je "lepsi". V teto oblasti programu jsem
zacatecnik, co bude jednoduzsi.
Diky
Ing. Igor Vodicka
informacni systemy
Nakladatelstvi Sagit
Tel.: 59 6786 001
HTTP://www.sagit(tec)cz/Predavani parametru z EnumWindows
[*] delphi(zv)spst(tec)cz - 13.10.2005 11:05:32
Zdravim,
Mam nasledujici kod:
procedure TForm1.MojeFce(WindowList: TList);
function GetWindow (Handle: HWND; LParam: longint): bool; stdcall;
begin
Result := true;
{ add each handle to the list }
//**********************************************************************
// na nasledujicim radku to spadne, kdyz dam deklaraci WindowList: TList do
globalnich promennych tak to funguje, ale ja to potrebuji prave takhle.
WindowList.Add (Pointer(Handle));
end;
begin
{ get all windows }
EnumWindows ((zv)GetWindow, 0);
end;
inicializaci a uvolneni provadim pred (po) zavolani MojeFce
{ initialize list }
MyList := TList.Create;
Moherce(MyList);
......... tady provadim zpracovani
MyList.Free;
Muzete mne nekdo postrcit.
Predem vsem dekuji
Jirka
Jak ziskat id vygenerovane pres GEN_ID z tabulky v
[*] Franta Flinta <jarek2(zv)centrum(tec)cz> - 13.10.2005 10:51:31
toto muzes pouzit v procedure, standardne se toto pouziva v triggeru pro
automaticky zvysujici se ID s parametrem 1 misto 0. pokud bys tam mel 1,
tak by ti vratil hodnotu pro dalsi ID a zaroven by si interne zvedl
hodnotu generatoru, 0 vraci aktualni stav generatoru.
posledni_ID = GEN_ID("NAZEV_GENERATORU",0);
jarek
Vlastislav Cilek napsal(a):
>Zdravim
>Mam jednu zacatecnickou otazku. V databazi Firebird 1.5 mam generator ID, k nemu triger before insert.
>
>Kdyz dam pridat vetu, v dbgridu (nebo jine db komponente) se mi nezobrazi vygenerovane ID.
>Pokud aplikaci ukoncim, a spustim znova, tak je jiz id zobrazeno.
>
>Tak se ptam: kdy se generuje id? Jak docilit toho, aby se mi id nacetlo do dbgridu? Zkousel jsem vsechny mozne refreshe, ale problem je asi jinde.
>
>Pracuji s komponentami Interbase.
>
>Diky za odpoved.
>Vlci.
>
>
>
>
>Ukonceni aplikace
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 13.10.2005 08:17:15
> Tak te+AQ8- ur+AQ0-it+ARs- v+AO0-m, +AX4-e to
> d+ARs-l+AOE- ta knihovna. Jen by m+ARs- zaj+AO0-malo,
> jak se d+AOE- knihovna odstranit z pam+ARs-ti.
Neumim sice martansky, ale zkusim odpovedet. IMHO zalezi na tom,
jak tu knihovnu nacitas. Jestli staticky (u deklaraci funkci mas external)
nebo dynamicky - sam volas nekde LoadLibrary a pak bys tedy mel tez
sam zavolat FreeLibrary. Bez blizsi znalosti toho, jak to delas, asi nelze
moc radit.
David Lebeda
Jak ziskat id vygenerovane pres GEN_ID z tabulky v
[*] pilifs <pilifs(zv)seznam(tec)cz> - 13.10.2005 07:13:10
SELECT gen_id(nejaky_generator,1) FROM RDB$Database
>Zdravim
>Mam jednu zacatecnickou otazku. V databazi Firebird 1.5 mam generator ID, k nemu triger before insert.
>
>Kdyz dam pridat vetu, v dbgridu (nebo jine db komponente) se mi nezobrazi vygenerovane ID.
>Pokud aplikaci ukoncim, a spustim znova, tak je jiz id zobrazeno.
>
>Tak se ptam: kdy se generuje id? Jak docilit toho, aby se mi id nacetlo do dbgridu? Zkousel jsem vsechny mozne refreshe, ale problem je asi jinde.
>
>Pracuji s komponentami Interbase.
>
>Diky za odpoved.
>Vlci.
>
>
>
>Databaze
[*] Vaclav Halik <spravasd(zv)suz.cvut(tec)cz> - 12.10.2005 22:26:31
Ahoj,
za prve: Neumis quotovat. Neposilej prosim zbytecny balast
do konfery ! Precti si pravidla. A neber to jako pruzeni.
> A jeste jsem se chtel zeptat jak je pak nejefektivnejsi z delphi k mysql
>pristupovat? Pres ODBC???
>
>
>Diiiky moc a sorry za asi hloupe otazky
>
Za druhe:
Hloupa otazka to urcite neni i kdyz odpoved na ni je v archivu.
Pristup pres ODBC je asi to nejhorsi co muzes pouzit.
Rozhodne nedoporucuju. Skus se radej podivat na ZeosDBO
konponenty. Pouzivaji skoro primy pristup na MySQL jen pres
klientskou knihovnu MySQL. Toho kodu je tam celkem rozumne
minimum.
Sam pouzivam uz par let cca od verze tusim 5 beta a maximum
spokojenosti.
S pozdravem Vaclav Halik
Databaze
[*] Ales Kresta <kresta.ales(zv)seznam(tec)cz> - 12.10.2005 21:26:27
Nad tim uz sem taky uvazoval, uvazoval jsem sice nad varcharem, ale tohle je
taky dobry napad(pripada mi to jako lepsi kodovani s vetsi usporou
mista).Jeste jsem se chtel zeptat jestli nevis kolik je teda limit toho
bigint? Protoze do budoucna mozna planuji jeste databazi na stejnem principu
akorat s 64 (popripade potom jeste s 175) takovymi polozkami-tam uz je to
prekodovavani asi jasne...to mate pravdu(nebyl jsem si jisty jestli to je
spravna cesta)-tam bych to ovsem musel prekodovavat asi do varcharu neli
primo do textu. A jde mi o to jak to udelat abych maximalne usporil
misto(jde o to jestli to muzu prekodovavat i na specialni znaky jako
napriklad &' a podobne vcetne entru a tak) coz je ten hlavni problem ktereho
se "bojim" a ktery jsem myslel ze za me udela databaze.
A jeste jsem se chtel zeptat jak je pak nejefektivnejsi z delphi k mysql
pristupovat? Pres ODBC???
Diiiky moc a sorry za asi hloupe otazky
----- Original Message -----
From: "Lukas Barton" <lukas(zv)cnawr(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, October 12, 2005 9:08 PM
Subject: Re: Databaze
> Ales Kresta wrote:
>
> >Zdravim,
> > mam nasledujici porblem, potreboval bych ulozit a pouzivat cca neco
kolem
> >miliardy(??) zaznamu o velikosti kazdy cca 10-20B. Kazdy zaznam bude
> >obsahovat cca 30 polozek kt. budou nabyvat hodnot "a","n" nebo "c". A
kazdy
> >zaznam bude temito 30 polozkami jednoznacne urcen.Plus tam bude jedna
> >polozka typu varchar(string) o velikosti +-4B . V techto zaznamech
potrebuju
> >s co nejvetsi rychlosti najit dany zaznam(podle onech prvnich 30 poli) a
co
> >nejrychleji zaznam vlozit(pomer hledani a vkladani cca 5:1).Jde opravdu o
> >rychlost. Chci se zeptat zda s necim takovym mate nekdo zkusenosti. Zda
by
> >stacila mysql databaze?Popripade jak tam mam udelat index-asi slozeny,co?
A
> >pujde to udelat slozeny index z 30 polozek?A jak nejefektivneji
komunikovat
> >Delphi-mysql?Popripade jeste jak efektivne nastavit mysql,tak aby to
> >fungovalo co nejlip.
> >
> >
> >
> Zakodoval bych to do integeru. 3^30 se vleze v pohode do BIGINTu. Prevod z
3 do 10 soustavy a naopak je zrejme rychlejsi nez nacitani vice bajtu z
disku. A udelat jen jeden index na takovym sloupcem.
>
> Pokud to chces prehledneji, uloz to do CHARu.
>
> V uvaze vychazim z obecnych znalosti ohledne implementace indexu a
ukladani dat. Jeden sloupec bude zrejme vzdy rychlejsi, nez 30 sloupcu.
>
> Lukas
>
>
>
>
Databaze
[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 12.10.2005 21:10:25
Ahoj,
nebylo by jednodussi ty jednoznakovy polozky zretezit do 30zn retezce
a ten ukladat v kuse? IMHO si usetris dost operaci jednotlivymi sloupci.
Peca
Databaze
[*] Lukas Barton <lukas(zv)cnawr(tec)cz> - 12.10.2005 21:08:25
Ales Kresta wrote:
>Zdravim,
> mam nasledujici porblem, potreboval bych ulozit a pouzivat cca neco kolem
>miliardy(??) zaznamu o velikosti kazdy cca 10-20B. Kazdy zaznam bude
>obsahovat cca 30 polozek kt. budou nabyvat hodnot "a","n" nebo "c". A kazdy
>zaznam bude temito 30 polozkami jednoznacne urcen.Plus tam bude jedna
>polozka typu varchar(string) o velikosti +-4B . V techto zaznamech potrebuju
>s co nejvetsi rychlosti najit dany zaznam(podle onech prvnich 30 poli) a co
>nejrychleji zaznam vlozit(pomer hledani a vkladani cca 5:1).Jde opravdu o
>rychlost. Chci se zeptat zda s necim takovym mate nekdo zkusenosti. Zda by
>stacila mysql databaze?Popripade jak tam mam udelat index-asi slozeny,co? A
>pujde to udelat slozeny index z 30 polozek?A jak nejefektivneji komunikovat
>Delphi-mysql?Popripade jeste jak efektivne nastavit mysql,tak aby to
>fungovalo co nejlip.
>
>
>
Zakodoval bych to do integeru. 3^30 se vleze v pohode do BIGINTu. Prevod z 3 do 10 soustavy a naopak je zrejme rychlejsi nez nacitani vice bajtu z disku. A udelat jen jeden index na takovym sloupcem.
Pokud to chces prehledneji, uloz to do CHARu.
V uvaze vychazim z obecnych znalosti ohledne implementace indexu a ukladani dat. Jeden sloupec bude zrejme vzdy rychlejsi, nez 30 sloupcu.
Lukas
Databaze
[*] Ales Kresta <kresta.ales(zv)seznam(tec)cz> - 12.10.2005 20:52:23
Zdravim,
mam nasledujici porblem, potreboval bych ulozit a pouzivat cca neco kolem
miliardy(??) zaznamu o velikosti kazdy cca 10-20B. Kazdy zaznam bude
obsahovat cca 30 polozek kt. budou nabyvat hodnot "a","n" nebo "c". A kazdy
zaznam bude temito 30 polozkami jednoznacne urcen.Plus tam bude jedna
polozka typu varchar(string) o velikosti +-4B . V techto zaznamech potrebuju
s co nejvetsi rychlosti najit dany zaznam(podle onech prvnich 30 poli) a co
nejrychleji zaznam vlozit(pomer hledani a vkladani cca 5:1).Jde opravdu o
rychlost. Chci se zeptat zda s necim takovym mate nekdo zkusenosti. Zda by
stacila mysql databaze?Popripade jak tam mam udelat index-asi slozeny,co? A
pujde to udelat slozeny index z 30 polozek?A jak nejefektivneji komunikovat
Delphi-mysql?Popripade jeste jak efektivne nastavit mysql,tak aby to
fungovalo co nejlip.
Budu vdecen za jakykoliv nazor,navrh ci radu, popripade odkaz na nejaky
example nebo clanek
Diiiiiiky moc
Ukonceni aplikace
[*] Petr Berek <sojokl(zv)seznam(tec)cz> - 12.10.2005 19:38:12
Tak te+AQ8- ur+AQ0-it+ARs- v+AO0-m, +AX4-e to d+ARs-l+AOE- ta knihovna. Jen by m+ARs- zaj+AO0-malo, jak se
d+AOE- knihovna odstranit z pam+ARs-ti.
Petr Berek napsal(a):
>Zdravim,
>mam problem s ukoncenim aplikace. Pouzivam MDIChild okno a komponenty v
>nem upravuju pomoci dll knihovny. Problem je v tom, ze kdyz to okno
>neotevru a aplikaci ukoncim, ukonci se normalne. Pokud ovsem okno
>otevru, cimz se provede uprava knihovnou, tak pri zavreni cele aplikace
>dojde k tomu, ze to zustene viset. Zmizi hlavni okno, ale aplikace porad
>bezi. Totez se stane, pokud to okno otevru a zavru - Child a pote
>ukoncim aplikaci.
>Myslim, ze to dela to, ze v pameti zustane viset dll knihovna, ale
>nejsem si jisty.
>Diky za mozne rady.
>
>
>
Jak ziskat id vygenerovane pres GEN_ID z tabulky v
[*] Lauko Stefan <laukosw(zv)naex.sk> - 12.10.2005 18:38:08
Ahoj,
ja pouzivam IBDataset a tam je mozne toto zautomatizovat v obj.inspectore
polozka GeratorField.
Lauko
----- Original Message -----
From: "Vlastislav Cilek" <bigvlci(zv)seznam(tec)cz>
> Tak se ptam: kdy se generuje id? Jak docilit toho, aby se mi id nacetlo do
> dbgridu? Zkousel jsem vsechny mozne refreshe, ale problem je asi jinde.Jak ziskat id vygenerovane pres GEN_ID z tabulky v
[*] Martin Burle <mburle2(zv)volny(tec)cz> - 12.10.2005 17:12:00
> Zdravim
> Mam jednu zacatecnickou otazku. V databazi Firebird 1.5 mam generator ID,
> k nemu triger before insert.
>
> Kdyz dam pridat vetu, v dbgridu (nebo jine db komponente) se mi nezobrazi
> vygenerovane ID.
> Pokud aplikaci ukoncim, a spustim znova, tak je jiz id zobrazeno.
>
> Tak se ptam: kdy se generuje id? Jak docilit toho, aby se mi id nacetlo do
> dbgridu? Zkousel jsem vsechny mozne refreshe, ale problem je asi jinde.
ID generuje server pred ulozenim zaznamu. IMHO mas dve moznosti - bud po
ulozeni udelas refreshrecord, nebo si ID dotahnes z generatoru na klienta a
novy zaznam posles serveru uz s doplnenym ID, ev. budes pouzivat jako ID
nikoli hodnotu z generatoru, ale GUID generovany v aplikaci.
ID ziskas takto: 'SELECT GEN_ID('+GenName+',1) FROM RDB$DATABASE'
MB Jak ziskat id vygenerovane pres GEN_ID z tabulky v
[*] Vlastislav Cilek <bigvlci(zv)seznam(tec)cz> - 12.10.2005 16:43:56
Zdravim
Mam jednu zacatecnickou otazku. V databazi Firebird 1.5 mam generator ID, k nemu triger before insert.
Kdyz dam pridat vetu, v dbgridu (nebo jine db komponente) se mi nezobrazi vygenerovane ID.
Pokud aplikaci ukoncim, a spustim znova, tak je jiz id zobrazeno.
Tak se ptam: kdy se generuje id? Jak docilit toho, aby se mi id nacetlo do dbgridu? Zkousel jsem vsechny mozne refreshe, ale problem je asi jinde.
Pracuji s komponentami Interbase.
Diky za odpoved.
Vlci.
Ukonceni aplikace
[*] Petr Berek <sojokl(zv)seznam(tec)cz> - 12.10.2005 14:31:44
Zdravim,
mam problem s ukoncenim aplikace. Pouzivam MDIChild okno a komponenty v
nem upravuju pomoci dll knihovny. Problem je v tom, ze kdyz to okno
neotevru a aplikaci ukoncim, ukonci se normalne. Pokud ovsem okno
otevru, cimz se provede uprava knihovnou, tak pri zavreni cele aplikace
dojde k tomu, ze to zustene viset. Zmizi hlavni okno, ale aplikace porad
bezi. Totez se stane, pokud to okno otevru a zavru - Child a pote
ukoncim aplikaci.
Myslim, ze to dela to, ze v pameti zustane viset dll knihovna, ale
nejsem si jisty.
Diky za mozne rady.
Synapse a stazeni souboru pomoci TFTPSend
[*] Pavel Gazda <pavel_gazda(zv)datasw(tec)cz> - 12.10.2005 13:57:42
Zdravim,
Nedari se mi stahnout soubor z FTP serveru pomoci TFTPSend.RetrieveFile.
Vraci mi chybove hlaseni:
350 Restarting at 0. Send STORE or RETRIEVE to ini
Nasel jsem, ze to ani neni chyba, ale co s tim ?
Je treba opustit funkci RetrieveFile ?
Prosim o nakopnuti. ( funkce TFTPSend.StoreFile funguje ).
Diky
Pavel
QuickReport 3.5.0 - tisk car
[*] Ing. Petr Kejval <petr.kejval(zv)worldonline(tec)cz> - 12.10.2005 12:45:35
Dobry den,
vim ze to je mimo, ale presto. Prave z techto duvodu jsem uz pred delsim
casem presel na FreeReport.
Petr Kejval
> Dobry den,
>
> netusite nekdo, kterak tisknout Qreportem vodorovne a svisle cary?
> Pokousel jsem se pro tento ucel pouzit TQRShape, bohuzel se me nedari
> udelat caru visualne shodnou s carou, ktera je pouzita jako frame nejake
> QR komponenty.
> (Style i width jsou nastaveny shodne).
>
> I v pripade e u qrshape nastavim sirku na 2, tak je visualne tenci nez
> cara vytvorena jako frame se sirkou 1
>
>
> QuickReport 3.5.0 - tisk car
[*] delphak(zv)centrum(tec)cz - 12.10.2005 12:29:33
Dobry den,
netusite nekdo, kterak tisknout Qreportem vodorovne a svisle cary? Pokousel jsem se pro tento ucel pouzit TQRShape, bohuzel se me nedari udelat caru visualne shodnou s carou, ktera je pouzita jako frame nejake QR komponenty.
(Style i width jsou nastaveny shodne).
I v pripade e u qrshape nastavim sirku na 2, tak je visualne tenci nez cara vytvorena jako frame se sirkou 1
pripojeni k Visual fox pro
[*] MaReK Penguin Olsavsky <orsm(zv)centrum(tec)cz> - 12.10.2005 12:19:33
Tomas Krejzek napsal(a):
> Diky moc, to ADO jede dobre, to nastaveni v datovych zdrojich neni
> nutne, staci MS ODBC driver pro visual foxpro.
> Tom
^^^Muze vyt, dekuji za tuto informaci, ja jsem zatim Visual FoxPro
nepotreboval, takze jsem ten ODBC nainstalovany nemel.
--
- --
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)
pripojeni k Visual fox pro
[*] Tomas Krejzek <tomas.krejzek(zv)kpsys(tec)cz> - 12.10.2005 11:55:31
Diky moc, to ADO jede dobre, to nastaveni v datovych zdrojich neni
nutne, staci MS ODBC driver pro visual foxpro.
Tom
MaReK Penguin Olsavsky napsal(a):
>Tomas Krejzek napsal(a):
>
>
>>Ahoj, nekolik novych zakazniku prechazi potrebuje prevest data z visual
>>fox pro do naseho programu, bohuzel jsem nevykoumal jiny zpusob nez
>>pouzit BDE, nevite o necem jinem??
>>Pokud vim BDE se musi pokazde instalovat na klientske stanici a to je
>>dost opruz.
>>
>>Diky moc, Tom
>>
>>
>
>Pracoval jsem s nimi pres ADO, stacilo mi jen ve vlastnostech Windows
>nastavit datove zdroje (Ovladaci panely -> Nastroje pro spravu -> Datove
>zdroje (ODBC)). Protoze je to docela davno, nevzpomenu si, jestli toto
>nastaveni bylo nutne i na stanici, kde toto melo bezet. Nicmene mi to
>prislo, jako schudnejsi cesta, nez pokazde instalovat BDE.
> S pozdravem
> MaReK
>
>
>Volne siritelne databaze
[*] delphin(zv)post(tec)cz - 12.10.2005 11:31:29
> Muze mi nekdo poradit jaka databaze ma volne siritelnou variantu k
> zakaznikovi a jaka by to melo omezeni?
> Co MySQL? Slysel jsem, ze i MSSQL server existuje v bezplatne variante.
> Kdyz bude SW v Delphi, jak je to s Interbase nebo
> FireBird? Odkazy kde se dovim podrobnosti? Diky za nasmerovani.
> JB
Kazdy si muze pouzivat co se mu libi, muj favorit je Microsoft SQL Server
Express 2005 (MSDE). Zakladni omezeni je 1 pouzivany procesor, 1 GB pouzite
ram a 4GB velikost databaze.
Podrobnosti zde:
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dnsse/html/sseoverview.asp aplikace s balicky
[*] Milan Hora <ivar(zv)ivar(tec)cz> - 12.10.2005 11:23:28
Ahoj,
mam aplikaci prelozenou s balicky. Na jednom pocitaci se vyskytl problem
(drive na nem aplikace bez problemu fungovala, problem se udajne objevil po
nejakem update windows). Pri spusteni aplikace vypise hlasku
Application failed to initialize properly (0xc0000142)
a ukonci se. Pokud ji zkompiluji bez balicku, tak jde bez problemu spustit.
Metodou pokus omyl jsem zjistil, ze problem zrejme vznikne, kdyz se
inicializuje balicek JVCL200_R70.bpl. Otazka zni - jak mohu presneji urcit,
kde vznika problem (co presne se mu nepovedlo)?
Milan
Volne siritelne databaze
[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 12.10.2005 11:11:27
Ahoj,
FireBird je absolutne bez problemu.
Peca
Volne siritelne databaze
[*] Jiri Bouchala <bouchala(zv)starmon(tec)cz> - 12.10.2005 11:01:26
Muze mi nekdo poradit jaka databaze ma volne siritelnou variantu k zakaznikovi a jaka by to melo omezeni?
Co MySQL? Slysel jsem, ze i MSSQL server existuje v bezplatne variante. Kdyz bude SW v Delphi, jak je to s Interbase nebo FireBird? Odkazy kde se dovim podrobnosti? Diky za nasmerovani.
JB
Breakpointy
[*] Ing. Dubsky Jan <dubsky(zv)s-palava(tec)cz> - 12.10.2005 10:19:23
Souvisly velky blok konstant tam je (jestli ma 64k nevim) ale asi to bude ta
chyba, protoze nic jineho jsem nikde nanastavoval a v ostatnich unitach to
funguje OK, takze je to problem pouze teto jedne unity. Musim to nejprve
vyzkouset, ale s pravdepodobnosti 90% povazuji touto radou problem za
vyreseny. Pokud ne, tak se jeste ozvu.
DIKY MOC
> Neni v tom unitu souvisly blok konstant o fyzicke velikosti vetsi nez 64k
> Tohle je totiz chyba v generovani debug informaci (TD32 format).
> </cituji>>> udelam na nejakem
>> radku sintaktickou chybu, tak pri kompilaci tuto chybu najde
>> a vysviti. Kdyz
>> na tomtez tadku dam breakpoint, tak jej oznaci jako neaktivni a chod
>> programu neprerusi.Synapce - TCP/IP prenos
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 12.10.2005 10:13:22
> predelal jsem vsechno nizkourovnove, pouzivam tedy CanRead,
> WaitingData a RecvBuffer (predelat to na high level funkce bych
> musel predelat strukturu celeho programu). Problem ale nezmizel
> ovsem trosku jsem ho lokalizoval, nastava jenom v pripade ze se data
> posilaji obousmerne. Pro vysvetleni pouzivam to na vzdalene volani
> procedur. Pokud volam metodu ktera vraci vysledek pak nastava chyba.
> Pokud posilam jenom data z klienta na servr pak je vsechno v
> poradku. Pomoci Etherealu (monitoruje komunikaci na siti), jsem
> zjistil ze nektere data pres sit vubec nedojdou. Musi zustavat nekde
> na klientu a poslou se az pri dalsim volani. Pro upresneni
na tohel ti nikdo uz vic nedokaze poradit, protoze:
1. nerekl jsi o jaky se jedna protokol... TCP, UDP ci neco jineho?
2. Nekde patrne delas botu, ale tezko rict jestli na strane serveru
ci klienta. Bez znalosti tveho konkretniho kodu ale opravdu nelze
rict kde.
> >Ostatne podivej se jak jsou implemetovany ty hromady komunikacnich
> >protokolu v Synapsi, to je dost velka studnice prikladu jak na to.
>
> Hledal jsem nejake priklady, ale v demu jsem nasel jen priklad Echo,
> ktery toho tolik neobsahuje. Jestli je nekde priklad na obousmernou
> TCP/IP komunikaci, prosim rekni kde rad se kouknu.
Synapse sama je priklad... od toho je to opensource! Podivej se na
protokolu SMTP, POP3, IMAP4, LDAP, HTTP, FTP,... vsechny pochopitene
posilaji data obema smery, vsechny prece pracuji tak ze neco poslou
na server a cekaji na jeho odpoved. Ostatne i ten Echo server
komunikuje obousmerne... prijima data a zase je posila zpet.
Komplexnejsi priklady snad uz ani existovat nemohou.
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.Synapce - TCP/IP prenos
[*] Petr Daricek <petr.daricek(zv)seznam(tec)cz> - 12.10.2005 09:57:20
>Bud pracujes nizkourovnove, pak pouzivej Canread, Waitingdata a
>RecvBuffer.. ale nic vic!
>Nebo pracujes se ctenim dat na vyssi urovni, pak pouzivas jen
>recvbufferex, recvstring ci jakekoliv jine cteci funkce ktere maji
>jako jeden ze svych parametru timeout.
Ahoj,
predelal jsem vsechno nizkourovnove, pouzivam tedy CanRead, WaitingData a RecvBuffer (predelat to na high level funkce bych musel predelat strukturu celeho programu).
Problem ale nezmizel ovsem trosku jsem ho lokalizoval, nastava jenom v pripade ze se data posilaji obousmerne. Pro vysvetleni pouzivam to na vzdalene volani procedur. Pokud volam metodu ktera vraci vysledek pak nastava chyba. Pokud posilam jenom data z klienta na servr pak je vsechno v poradku.
Pomoci Etherealu (monitoruje komunikaci na siti), jsem zjistil ze nektere data pres sit vubec nedojdou. Musi zustavat nekde na klientu a poslou se az pri dalsim volani.
Pro upresneni
1) Z klienta poslu data1
2) Na servru prijmu data 1
3) Ze servru poslu odpoved 1
4) Na klinetu zpracuji odpoved 1
5) Z klienta poslu data 2
6) Na servru prijmu data 2
7) Ze servru poslu odpoved 2
8) Na klinetu zpracuji odpoved 2
9) Z klienta poslu data 3
- Zde se vola sendBuffer, ktery vraci spravny pocet odeslanych dat, ale podle Etherealu pres sit nic neproslo. Dal ceka klient na odpoved a nikdy se pochopitelne nedocka.
10 ) Z klienta poslu data 4
11) Na servr dojdou data 3
12) Ze servru poslu odpoved 3
12) Na servr dojdou data 4
...
>Ostatne podivej se jak jsou implemetovany ty hromady komunikacnich
>protokolu v Synapsi, to je dost velka studnice prikladu jak na to.
Hledal jsem nejake priklady, ale v demu jsem nasel jen priklad Echo, ktery toho tolik neobsahuje. Jestli je nekde priklad na obousmernou TCP/IP komunikaci, prosim rekni kde rad se kouknu.
Diky za odpoved Petr
pripojeni k Visual fox pro
[*] MaReK Penguin Olsavsky <orsm(zv)centrum(tec)cz> - 12.10.2005 09:55:20
Tomas Krejzek napsal(a):
> Ahoj, nekolik novych zakazniku prechazi potrebuje prevest data z visual
> fox pro do naseho programu, bohuzel jsem nevykoumal jiny zpusob nez
> pouzit BDE, nevite o necem jinem??
> Pokud vim BDE se musi pokazde instalovat na klientske stanici a to je
> dost opruz.
>
> Diky moc, Tom
Pracoval jsem s nimi pres ADO, stacilo mi jen ve vlastnostech Windows
nastavit datove zdroje (Ovladaci panely -> Nastroje pro spravu -> Datove
zdroje (ODBC)). Protoze je to docela davno, nevzpomenu si, jestli toto
nastaveni bylo nutne i na stanici, kde toto melo bezet. Nicmene mi to
prislo, jako schudnejsi cesta, nez pokazde instalovat BDE.
S pozdravem
MaReK
--
- --
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)
pripojeni k Visual fox pro
[*] Jan Fiala <jan.fiala(zv)wo(tec)cz> - 12.10.2005 09:41:19
12.10.2005 Tomas Krejzek:
> Ahoj, nekolik novych zakazniku prechazi potrebuje prevest data z visual
> fox pro do naseho programu, bohuzel jsem nevykoumal jiny zpusob nez
> pouzit BDE, nevite o necem jinem??
> Pokud vim BDE se musi pokazde instalovat na klientske stanici a to je
> dost opruz.
Zkus nativni komponenty ODBCe od LuboFule a pripojeni pomoci ODBC,
ktere je stejne na kazdem pocitaci jiz instalovano.
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
pripojeni k Visual fox pro
[*] Tomas Krejzek <tomas.krejzek(zv)kpsys(tec)cz> - 12.10.2005 09:31:18
Ahoj, nekolik novych zakazniku prechazi potrebuje prevest data z visual
fox pro do naseho programu, bohuzel jsem nevykoumal jiny zpusob nez
pouzit BDE, nevite o necem jinem??
Pokud vim BDE se musi pokazde instalovat na klientske stanici a to je
dost opruz.
Diky moc, Tom
Breakpointy
[*] Ing. Jan Dvorak <dvorak(zv)szu(tec)cz> - 12.10.2005 09:17:17
Podobny problem jsem jiz zde jednou resil. Pricinou byla v deklaraci velkeho
poctu promenych s prednastavenou hodnotou (mohou to zpusobovat i konstanty),
kdy souvisly blok jimi zabirany presahl 64 kB. Tenkrat to vyresila oprava
chybicky, jinak stoji za uvazeni presunout deklarace do jine unity oddelene
od kodu.
Snad to pomuze.
Jan Dvorak
>
> Uz si fakt nevim rady
>
> Honza
>
> >> pokud se nejdna o unitu Delphi (controls, windows atd.),
> pak zkontroluj
> >> ze unita kterou chces krokovat je opravdu ta kterou mas
> otevrenou. Je
> >> treba mozne, ze Delphi bere nejake stare zapomenute *.dcu.
> >> Pokud se jedna o unitu Delphi, pak musis v nastaveni
> projektu na zalozce
> >> compile zaskrtnout "use debug dcus", pak to bude krokovat
> vsechny unity.
Breakpointy
[*] horky(zv)cominn(tec)cz - 12.10.2005 08:55:15
> From: Ing. Dubsky Jan [mailto:dubsky(zv)s-palava(tec)cz]
> udelam na nejakem
> radku sintaktickou chybu, tak pri kompilaci tuto chybu najde
> a vysviti. Kdyz
> na tomtez tadku dam breakpoint, tak jej oznaci jako neaktivni a chod
> programu neprerusi.
Petr Vones se jeste neozval, proto posilam jeho radu na podobny problem:
<cituji>
From: "Ing. Jan Dvorak" <dvorak(zv)szu(tec)cz>
> Pri debugovani programu se v jedne unit neda nastavit breakpoint, resp.
> nastaveny brakpoint se pri spusteni programu zmeni na neplatny. Nazev unity
Neni v tom unitu souvisly blok konstant o fyzicke velikosti vetsi nez 64k ?
Tohle je totiz chyba v generovani debug informaci (TD32 format).
</cituji>
--
S pozdravem Karel Horky, D7, FB 1.5.2, IBX 7.08, WXP SP2
[mailto:horky(zv)cominn(tec)cz]
Breakpointy
[*] Jan Fiala <jan.fiala(zv)wo(tec)cz> - 12.10.2005 08:45:14
12.10.2005 Ing. Dubsky Jan:
> Nejedna se o unutu delphi, unita je spravna, kdyz ji smazu, tak se pri
> kompilaci na tom stejnem miste objevi nove dcu, "use debug dcus", je
> zaskrtnute a dokonce to funguje tak, ze kdyz v souboru pas udelam na nejakem
> radku sintaktickou chybu, tak pri kompilaci tuto chybu najde a vysviti. Kdyz
> na tomtez tadku dam breakpoint, tak jej oznaci jako neaktivni a chod
> programu neprerusi.
> Dela to pouze na teto jedne jedine unite z celeho projektu.
Nejsou v te unite definovany nejake prepinace, ktere by debug
informace vypinaly, popr. vlozeni nejakeho INC ve kterem ty prepinace
jsou ?
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
Breakpointy
[*] Ing. Dubsky Jan <dubsky(zv)s-palava(tec)cz> - 12.10.2005 08:35:13
Nejedna se o unutu delphi, unita je spravna, kdyz ji smazu, tak se pri
kompilaci na tom stejnem miste objevi nove dcu, "use debug dcus", je
zaskrtnute a dokonce to funguje tak, ze kdyz v souboru pas udelam na nejakem
radku sintaktickou chybu, tak pri kompilaci tuto chybu najde a vysviti. Kdyz
na tomtez tadku dam breakpoint, tak jej oznaci jako neaktivni a chod
programu neprerusi.
Dela to pouze na teto jedne jedine unite z celeho projektu.
Uz si fakt nevim rady
Honza
>> pokud se nejdna o unitu Delphi (controls, windows atd.), pak zkontroluj
>> ze unita kterou chces krokovat je opravdu ta kterou mas otevrenou. Je
>> treba mozne, ze Delphi bere nejake stare zapomenute *.dcu.
>> Pokud se jedna o unitu Delphi, pak musis v nastaveni projektu na zalozce
>> compile zaskrtnout "use debug dcus", pak to bude krokovat vsechny unity. ActionMainMenuBar, ActionManager
[*] Zapletal Martin <zapletal(zv)inoma(tec)cz> - 12.10.2005 07:30:47
pravdepodobne akce neobsahuje zadny kod. Napis neco do OnExecute a bude
aktivni.
Martin
> mam problem s komponentou TActionMainMenuBar a TActionManager.
> Vytvorim akce v man., propojim ActionBar s MenuBarem a pridam polozku
> menu.
> Ale polozka menu je po spusteni neaktivni.
> Jednou se mi povedlo, ze byla aktivni, zacal jsem pridavat dalsi polozky
> menu a znovu byly vsechny neaktivni.
> Zajimave je, ze kdyz pridam v Manag. standardni akci, ta se zobrazi
> spravne.
> Dela to same i v ActionToolMenu.
> Nevite nekdo, cim je tohle zpusobeno?ActionMainMenuBar, ActionManager
[*] Dusan Vrazel <d.vrazel(zv)centrum(tec)cz> - 12.10.2005 00:24:18
Ahoj,
mam problem s komponentou TActionMainMenuBar a TActionManager.
Vytvorim akce v man., propojim ActionBar s MenuBarem a pridam polozku menu.
Ale polozka menu je po spusteni neaktivni.
Jednou se mi povedlo, ze byla aktivni, zacal jsem pridavat dalsi polozky
menu a znovu byly vsechny neaktivni.
Zajimave je, ze kdyz pridam v Manag. standardni akci, ta se zobrazi spravne.
Dela to same i v ActionToolMenu.
Nevite nekdo, cim je tohle zpusobeno?
Diky moc,
Dusan Vrazel
amatersky programator TransferDatabase
[*] Ing. Keder Vladimir <vkeder(zv)iol.sk> - 12.10.2005 00:22:17
Ahoj
Potrebujem nakopnut kde najst a ako volat prikaz
TransferDatabase(acLink,...); Pouzivam Ado pre pristup do MS Access databaz.
Potrebujem pripojit tabulky pocas behu programu. Nasiel som 1000+1 prikazov
ako pouzit vo VB, VisualStudio, ale ani jeden v Delphi :-(
Za kazdu radu vopred dakujem
Ing. Keder Vladimir
P.S. Delphi 2005 Arch SP3, ADO dbGo, WinXP Pro SP2, MS Access 2K Synapse - priloha PDF, nazev souboru
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 11.10.2005 20:58:04
> Tak je to problem. Lotus zobrazi tu druhou "boundary" jako text zpravy.
Tak to je jasne... Lotusy nejak naivne nepredokladaji, ze textova cast
dopisu muze byt prazdna, tedy ze muze obsahovat 0 radek.. a tak patrne
vubec nepredpokladaji, ze by jako hned prvni radek za oddelovacem
hlavicek od tela mohl byt boundary dalsi casti dopisu.
A tak misto aby dalsi cast dopisu zpracovali, pouze jej zobrazi jako
text. (pripomina mi to Cimrmana... Misto aby mu pomohl z luzka, vetu
pouze zapsal. ;-)))
> Predpokladam ale, ze MIME email vygenerovany SYNAPSI je v poradku a ze
> problem ma skutecne Lotus, protoze ostatni ho nemaji. Nebo to neni v
> poradku? Uvadim to zde hlavne proto, kdyby nekdo resil podobny problem,
> muze to usetrit cas pri jeho identifikaci.
Podle mne to je v poradku. Jakykoliv text v dopisu, ci jakykoliv
prilozeny soubor muze mit preci delku 0 bytu. Kdyby to v poradku nebylo,
nebylo by vubec mozne napriklad poslat prazdny soubor.
> Ty emaily, co jsou odesialany, obcas nemivaji text zpravy, proto je
> nekdy prazdny a to je pak prave problem. Zatim si stezoval jen jeden
> clovek, prave s temi Lotus Notes.
>
> Je to samozrejme snadno odstranitelne, domluvili jsme se, ze pokud bude
> text zpravy prazdny, tak tam automaticky doplnime subject. Sam nemam rad,
> kdyz mi chodi emaily naprosto bez textu jen s prilohou.
V tomto pripade bych to resil velmi jednoduse... pokud bych zjistil, ze
text je prazdny, pridal bych k nemu jeden prazdny radek. Pro uzivatele to
bude vypadat stejne jako kdyz tam skutecne zadny text neni, ale lotus by
to mohl konecne spravne sezrat.
> Diky za pomoc. Synapsi mam cim dal tim radeji :-) Pracuje se mi s ni lepe
> a radostneji nez s INDY :-)
To rad slysim. To je ostatne ucel Synapse a je to i duvod proc ji stale
jeste delam, ackoliv tu je preci tak 'skvele' Indy ;-)
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
WEB: http://www.ararat(tec)cz/synapse - Synapse Delphi and Kylix TCP/IP
Library
DLL a objekty formulare
[*] Petr Berek <sojokl(zv)seznam(tec)cz> - 11.10.2005 19:59:44
Ja se divil, odkud vzit tu TForm, a pak me( napadlo, zkopirovat unity do
sekce uses. Mohlo me( to taky napadnout hned. Jinak diky, funguje to
dobr(e.
Bc. Jiri Cincura napsal(a):
>procedure Jirka(MyForm: TForm);
>begin
> MyForm.Height := 100;
>end;
>
>
>DLL a objekty formulare
[*] Bc. Jiri Cincura <diskuze(zv)cincura(tec)net> - 11.10.2005 18:25:35
Petr Berek wrote:
> Mohl bys prosim uvest ne(jaky pr(iklad? Diky
>
> Bc. Jiri Cincura napsal(a):
>
>
>>Petr Berek wrote:
>>
>>
>>
>>>Tak jsem si to zkous(el napsat. Problem je v tom:
>>>Kdyz( fci napis(u do unity aplikace, tak znam tr(idu Tform1, ktera
>>>obsahuje vlastnosti formular(e.
>>>Kdyz( ale tu samou fci pr(evedu do unity dll, tak neznam tr(idu Tform1.
>>>Leda bych ji ne(jak zavolal, ale nevim jak.
>>>
>>>
>>
>>Staci kdyz to bude TForm, ze ktereho TForm1 dedi.
>>
>>
>>
>>
>
>
>
>
>
procedure Jirka(MyForm: TForm);
begin
MyForm.Height := 100;
end;
--
Bc. Jiri Cincura
http://www.ID3renamer.com/
http://www.x2develop.com/
ICQ: 314711544 | Yahoo!: x2develop
http://photo.cincura.net/
DLL a objekty formulare
[*] Petr Berek <sojokl(zv)seznam(tec)cz> - 11.10.2005 17:35:30
Mohl bys prosim uvest ne(jaky pr(iklad? Diky
Bc. Jiri Cincura napsal(a):
>Petr Berek wrote:
>
>
>>Tak jsem si to zkous(el napsat. Problem je v tom:
>>Kdyz( fci napis(u do unity aplikace, tak znam tr(idu Tform1, ktera
>>obsahuje vlastnosti formular(e.
>>Kdyz( ale tu samou fci pr(evedu do unity dll, tak neznam tr(idu Tform1.
>>Leda bych ji ne(jak zavolal, ale nevim jak.
>>
>>
>
>Staci kdyz to bude TForm, ze ktereho TForm1 dedi.
>
>
>Synapse - priloha PDF, nazev souboru
[*] Zdenek Sedlak <konf(zv)seus(tec)cz> - 11.10.2005 16:35:25
Ahoj,
tak uz dnes vim vic nez vcera. Skutecne pouzivaji Lotus Notes 4.5.
A problem neni s nazvem souboru (resp. jeho zapisem ve QP) ani s
"content-type: application/PDF" vs "application/octet-stream".
Problem je v tom, pokud poslu jen prilohu a text zpravy je prazdny, tak
to lotus nerozlusti :(
Pokud jsem to zkousel na Outlook Expres, Outlook, Thunderbird, i webova
rozhrani centrum(tec)cz, email(tec)cz, atlas(tec)cz tak to bylo v poradku.
Takze pokud je email (po odstraneni hlavicek) takovyto:
----------------------------
--0120BFAD_4E64DC6F_Synapse_boundary
Content-type: text/plain; charset=ISO-8859-2
Content-Transfer-Encoding: Quoted-printable
Content-Disposition: inline
Content-Description: Message text
Standardni priloha soubor Test.pdf (bez podtrzitka)
jeste maly test cestiny:
P=F8=EDli=B9 =BElu=BBou=E8k=FD k=F9=F2 =FAp=ECl =EF=E1belsk=E9 =F3dy.
--0120BFAD_4E64DC6F_Synapse_boundary
Content-type: application/PDF; name="Test.pdf"
Content-Transfer-Encoding: Base64
Content-Disposition: attachment; FileName="Test.pdf"
Content-Description: Attached file: Test.pdf
-----------
Tak je to v poradku.
Pokud je email takovyto:
--------------------------------------
--013AFB9E_45DE9449_Synapse_boundary
Content-type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: Quoted-printable
Content-Disposition: inline
Content-Description: Message text
--013AFB9E_45DE9449_Synapse_boundary
Content-type: application/PDF; name="=?ISO-8859-1?Q?Test=5F1.pdf?="
Content-Transfer-Encoding: Base64
Content-Disposition: attachment; FileName="=?ISO-8859-1?Q?Test=5F1.pdf?="
Content-Description: Attached file: Test_1.pdf
---------------------------
Tak je to problem. Lotus zobrazi tu druhou "boundary" jako text zpravy.
Predpokladam ale, ze MIME email vygenerovany SYNAPSI je v poradku a ze
problem ma skutecne Lotus, protoze ostatni ho nemaji. Nebo to neni v
poradku?
Uvadim to zde hlavne proto, kdyby nekdo resil podobny problem, muze to
usetrit cas pri jeho identifikaci.
Ty emaily, co jsou odesialany, obcas nemivaji text zpravy, proto je
nekdy prazdny a to je pak prave problem. Zatim si stezoval jen jeden
clovek, prave s temi Lotus Notes.
Je to samozrejme snadno odstranitelne, domluvili jsme se, ze pokud bude
text zpravy prazdny, tak tam automaticky doplnime subject. Sam nemam
rad, kdyz mi chodi emaily naprosto bez textu jen s prilohou.
Diky za pomoc. Synapsi mam cim dal tim radeji :-) Pracuje se mi s ni
lepe a radostneji nez s INDY :-)
Zdenda
Lukas Gebauer napsal(a):
>>Vypada to, ze skutecne je problem s tim nazvem, resp. s jeho kodovanim.
>>
>>Nevedel jsem, ze i podtrzitko je potreba kodovat a neni soucasti ASCII
>>(resp. 7bitoveho textu).
>
>
> Ono je to trosku jinak... naprosto jakykoliv znak muze byt zakodovan!
> Kdybych se rozhodl a zakodoval uplne vsechny znaky, tak to bude v souladu
> s MIME a postovni program to musi umet spravne dekodovat.
>
> Dale si uvedom fakt, ze v pripade QP kodovani (ktere je v tomto pripade
> pouzite), znak '_' neznamena podtrzitko, ale mezeru! Takze chces-li, aby
> vysedek byl interpretovan jako podtrzitko, musis jej zakodovat. (viz. RFC-
> 2047, odstavec 4.2.)
>
> Zminovany odstavec v MIME standardu vyslovne pravi, ze znaky '=', '?' a
> '_' musi byt vzdy zakodovany, prestoze jsou to zakladni ASCII znaky. To
> proto, ze tyto tri znaky maji v hlavickovem MIME kodovani svoje specielni
> funkce.
>
>
>>>Mimochodem, o jakem postovnim programu se bavime?
>>
>>Pouzivaji pry Lotus Notes. Ale vypada to, ze si to u sebe nechavaji
>>preposilat na lokalni adresy, takze od nas (kolegy) dostanou jeden email a
>>ten se u nich preposle na vice adres.
>>
>>Prave me napada, jestli Lotus Notes nemuzou mit problem, kdyz je tam ten
>>nazev kodovany, resp. podtrzitko je uvedeno prepisem...
>
>
> Ajajaj... musim z vlastni zkusenosti rict, ze jsem zazil uz mnoho
> postovnich problemu s Lotusy. Vetsinou to ale napravil upgrade Lotusu.
> Takze bych se nedivil, kdyby to skutecne byl problem na strane Lotusu.
>
>
>>Proto bych se chtel zeptat, slo by nejak "jednoduse" (tj. bez upravy
>>vygenerovaneho textu zpravy) rict synapsi, aby ten nazev nekodovala?
>
>
> Pak by ale vysledek odporoval MIME standardu. (viz. vyse...) Tedy
> presneji: vysledek bude interpretovan jinak nez ocekavas...
>
> Kdyz to podrtrzitko nezakodujes, pak by to postovni klient mel dekodovat
> jako mezeru a ne jako podtrzitko. Tedy ve vysledku ziskas jiny nazev
> souboru nez jaky jsi posilal. To uz rovnou muzes zmenit posilany nazev
> souboru tak, aby to podtrzitko neobsahoval, ne?
>
>
> --
> Lukas Gebauer.
>
> E-mail: gebauerl(zv)mlp(tec)cz
> WEB: http://www.ararat(tec)cz/synapse - Synapse Delphi and Kylix TCP/IP
> Library
>
>
>
>
>
>
Oddelovac desetinnych mist
[*] Milan Lucka <mlucka(zv)foxconn(tec)cz> - 11.10.2005 15:55:22
> > Odtud si ji berou delfini do DecimalSeparator v SysUtils
> jako default
> > hodnotu, kterou muzes menit, takze win a delphi muzou mit
> nastaveno ruzne.
>
> Jen bych upresnil, ze Delphi "nelezou" do registru, ale slusne
> pouzivaji API funkci GetLocaleInfo()
>
a ja by som len upozornil, ze pokial chcete mat v Delphi pod plnou kontrolou tieto lokalne nastavenia, nestaci zmenit v Delphi ich hodnoty, ale je nutne aj nastavit Application.UpdateFormatSettings:= FALSE pretoze defaultne je na TRUE (vid help) a co to moze sposobit skuste domysliet :-)
Milan
DLL a objekty formulare
[*] Bc. Jiri Cincura <diskuze(zv)cincura(tec)net> - 11.10.2005 15:47:21
Petr Berek wrote:
> Tak jsem si to zkous(el napsat. Problem je v tom:
> Kdyz( fci napis(u do unity aplikace, tak znam tr(idu Tform1, ktera
> obsahuje vlastnosti formular(e.
> Kdyz( ale tu samou fci pr(evedu do unity dll, tak neznam tr(idu Tform1.
> Leda bych ji ne(jak zavolal, ale nevim jak.
Staci kdyz to bude TForm, ze ktereho TForm1 dedi.
--
Bc. Jiri Cincura
http://www.ID3renamer.com/
http://www.x2develop.com/
ICQ: 314711544 | Yahoo!: x2develop
http://photo.cincura.net/
DLL a objekty formulare
[*] Petr Berek <sojokl(zv)seznam(tec)cz> - 11.10.2005 15:35:20
Tak jsem si to zkous(el napsat. Problem je v tom:
Kdyz( fci napis(u do unity aplikace, tak znam tr(idu Tform1, ktera
obsahuje vlastnosti formular(e.
Kdyz( ale tu samou fci pr(evedu do unity dll, tak neznam tr(idu Tform1.
Leda bych ji ne(jak zavolal, ale nevim jak.
Bc. Jiri Cincura napsal(a):
>Petr Berek wrote:
>
>
>>Zdravim,
>>zdarne jsem se naucil programovat DLL knihovny, ale narazil jsem na
>>takovy problem. A sice, nevite nekdo, jestli je mozne pomoci DLL
>>knihovny a jeji funkce menit treba velikost formulare, nebo jeho barvu.
>>Diky Petr
>>
>>
>>
>>
>>
>>
>
>Ahoj,
>
>nejsem si ted jist, jestli to u formulare projde, ale kdyz udelas fci,
>ktera ma jako param. nejaky formular, tak prece muzes lehce zmenit jeho
>velikost, ne?. Stejne tak jako jakokaoli jina fce.
>
>PS: Nezkousel jsem, varim z vody.
>
>
>Obnovenie riadku po zmene PK
[*] Pavel Malinsky <malinsky(zv)pmcom(tec)cz> - 11.10.2005 14:59:17
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Ondrej Kelle
Ahoj,
> Mohol by si pri navrhu tabulky pouzit tzv. "surrogate primary
> key", ktory
> nema z hladiska aplikacie ziadny vyznam, takze sa nebude nikdy menit.
> Uzivatelovi ju potom ani netreba ukazovat. Skratka primarny
> kluc, ktory bude
> sluzit len na identifikaciu viet a referencnu integritu.
> Hodnoty si mozes
> nechat generovat, v Interbase su na to generatory.
MEL by pouzivat jako klic bezvyznamnou polozku! Zakladni chyba
v navrhu DB!
S pozdravem a dikem
=====================================
> Pavel Malinsky; malinsky(zv)pmcom(tec)cz <
=====================================
> GSM: 602 652 203 | ICQ: 322015967 <
=====================================
Obnovenie riadku po zmene PK
[*] Ondrej Kelle <o.kelle(zv)digitalpublishing.de> - 11.10.2005 14:45:16
> IBDataSet ma v RefreshSQL toto:
>
> select KOD, TEXT1, TEXT2 from c_texty where KOD = :KOD
>
> Ak sa zmeni TEXT1 alebo TEXT2 tak je to v pohode, riadok sa obnovi a
> v gride vidim nove hodnoty. Problem nastava, ked zmenim KOD. Vtedy
> sa riadok neobnovi, v gride nevidim vykonanu zmenu. Musim dat
> close/open dataset ale to trva dlho pri velkych tabulkach.
>
> Poradte, prosim, ako toto vyriesit. Dik moc.
Mohol by si pri navrhu tabulky pouzit tzv. "surrogate primary key", ktory
nema z hladiska aplikacie ziadny vyznam, takze sa nebude nikdy menit.
Uzivatelovi ju potom ani netreba ukazovat. Skratka primarny kluc, ktory bude
sluzit len na identifikaciu viet a referencnu integritu. Hodnoty si mozes
nechat generovat, v Interbase su na to generatory.
HTH
TOndrej
Synapce - TCP/IP prenos
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 11.10.2005 14:41:16
> > Proto se ptam, jak ta data ctes, protoze podle mne je tam zakopan
> >tvuj pes. Zcela bezne pres Synapsi posilam velke mnozstvu dat, aniz
> >bych musel kamkoliv vrazet sleepy, a problem nemam.
>
> Ve vlakne cekam na socketu pomoci waitingdata, ale to mi vraci stale
> 0.
> Jako prvni udaj si posilam velikost bloku ktery jsem poslal a na ktery
> potom cekam pomoci RecvBufferEx.
No tak to je prave spatne!
Bud pracujes nizkourovnove, pak pouzivej Canread, Waitingdata a
RecvBuffer.. ale nic vic!
Nebo pracujes se ctenim dat na vyssi urovni, pak pouzivas jen
recvbufferex, recvstring ci jakekoliv jine cteci funkce ktere maji
jako jeden ze svych parametru timeout.
Kombinace obou zpusobu je chyba a vede k podobnym problemum. To proto
ze komunikace na vyssi urovni pracuje s internim bufferem v Synapsi,
zatimco nizkourovnove funkce pracuji primo se sockety a buffer
ignoruji. Pravdepodobne ocekavana data jsou jiz ze socketu prectena a
cekaji v bufferu, takze se jich na socketu nedockas. Kazda cteci
funkce na vyssi urovni nejdrive cerpa data z bufferu, a az pak ze
socketu.
Ve tvem pripade nevolej zadne canread, zadne waitingdata, volej jen
RecvBufferEx (pripadne RecvInteger). Nic vic nepotrebujes.
Ostatne podivej se jak jsou implemetovany ty hromady komunikacnich
protokolu v Synapsi, to je dost velka studnice prikladu jak na to.
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.Obnovenie riadku po zmene PK
[*] Milos Veselovsky <mivedelphi(zv)seznam(tec)cz> - 11.10.2005 14:01:12
Zdravim,
mam DBGrid napojeny na IBDataSet. V nom zobrazujem data.
Po kliknuti na riadok sa otvori novy form, kde su TEdit-y (nie db-aware).
Po editacii a stlaceni OK sa udaje zapisu do databazy cez IBSQL, form sa zavrie
a zavolam Refresh;
IBDataSet ma v RefreshSQL toto:
select KOD, TEXT1, TEXT2 from c_texty where KOD = :KOD
Ak sa zmeni TEXT1 alebo TEXT2 tak je to v pohode, riadok sa obnovi a
v gride vidim nove hodnoty. Problem nastava, ked zmenim KOD. Vtedy
sa riadok neobnovi, v gride nevidim vykonanu zmenu. Musim dat
close/open dataset ale to trva dlho pri velkych tabulkach.
Poradte, prosim, ako toto vyriesit. Dik moc.
Milan
----------------
FB 1.5.1, D7
Synapce - TCP/IP prenos
[*] Petr Daricek <petr.daricek(zv)seznam(tec)cz> - 11.10.2005 13:21:07
> Proto se ptam, jak ta data ctes, protoze podle mne je tam zakopan
>tvuj pes. Zcela bezne pres Synapsi posilam velke mnozstvu dat, aniz
>bych musel kamkoliv vrazet sleepy, a problem nemam.
Ve vlakne cekam na socketu pomoci waitingdata, ale to mi vraci stale 0.
Jako prvni udaj si posilam velikost bloku ktery jsem poslal a na ktery potom cekam pomoci RecvBufferEx.
Ted jsem vypozoroval, ze problem nastava pri oboustrane komunikaci. Pokud poslu data a necekam na zadnou odpoved, pak je vse OK, pokud ocekavam na stejnem socketu odpoved (jiny jsem zatim nezkousel), pak nastava ten pripad ktery jsem popsal.
Petr
Oddelovac desetinnych mist
[*] Jan Fiala <jan.fiala(zv)wo(tec)cz> - 11.10.2005 13:21:07
11.10.2005 Jaroslav Pivonka:
> Registry HKCU\Control Panel\International\sDecimal
> Odtud si ji berou delfini do DecimalSeparator v SysUtils jako default
> hodnotu, kterou muzes menit, takze win a delphi muzou mit nastaveno ruzne.
Jen bych upresnil, ze Delphi "nelezou" do registru, ale slusne
pouzivaji API funkci GetLocaleInfo()
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
QuickReport 3.5 - tisk tabulek
[*] Martin Cajbik <cajbik(zv)sct.sk> - 11.10.2005 13:08:51
Zdravim,
tie okraje som riesil pridanim medzery do textu na zaciatok alebo koniec
v zavislosti od zarovnania. Pokial je to plnene priamo z datasetu, tak
bude nutne pouzit expresion, ja data obvykle plnim v BeforePrint takze z
tym nemam problem.
delphak(zv)centrum(tec)cz wrote:
> Pouziti Frame jsem zkousel, ale problem je v tom, ze pokud to neni zarovnane na stred, tak zobrazeny text se dotyka hranicni cary a nevypada to hezky.
> A vetsinu toho clovek nakonec stejne musi resit pomoci shape ...
> A tam je nehorsi to rozmistovat, a hlavne aby navazovali :-(
>
> ----- Original Message -----
> From: "Macko Martin" <martin.macko(zv)m-pro(tec)cz>
> To: <delphi-l(zv)clexpert(tec)cz>
> Sent: Tuesday, October 11, 2005 11:02 AM
> Subject: Re: QuickReport 3.5 - tisk tabulek
>
>
>
>>Kdysi jsem si delal jednoduchou komponentu, ktere se dal pocet sloupcu a
>>pocet radku a ona je vykreslila.
>>Omezeni bylo v tom, ze vsechny sloupce byli stejne siroke a vsechny
>>radky stejne vysoke.
>>Ale mozna pro inspiraci by se ti hodila ...
>>
>>Jinak (skoro) kazdy prvek v QuickReportu ma vlastnost FRAME - tzn. u
>>bandu muzes mit ramecek nahore, dole, vlevo i vpravo a cary oddelujici
>>sloupce poresit TQRShape ...
>>
>>M.M.
>>
>>
>>
>>>-----Original Message-----
>>>From: delphi-l-owner(zv)clexpert(tec)cz
>>>[mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of delphak(zv)centrum(tec)cz
>>>Sent: Tuesday, October 11, 2005 10:35 AM
>>>To: delphi-l(zv)clexpert(tec)cz
>>>Subject: QuickReport 3.5 - tisk tabulek
>>>
>>>Dobry den,
>>>
>>>snazim se v QuickReportu generovat sestavy ktere maji podobu
>>>tabulek .. tedy radky a sloupce jsou oddeleny vodorovnyma a
>>>svislyma carama.
>>>Jediny zpusob na ktery jsem prisel je ze poskladam potrebny
>>>tvar pomoci car TQRShape - ale prace je s tim znacne
>>>nepohodlna a jeste k tomu u svislych car je problem s
>>>navaznosti .. vznikaji tam sem tam (nahodne) mezery 1 - 2
>>>pixely - na vytisknute sestave je to viditelne ...
>>>
>>>Mate nekdo nejaky napad nebo radu jak toto delat lepe?
>>>Podminky:
>>>1) MUSI to byt QuickReport
>>>2) sestava MUSI vypadat tak jak vypada (tedy tabulky)
>>>
>>>Dekuji za kazdy napad ...
>>>
>>>
>>>
>>>
--
Martin Cajbik
SCT s.r.o. Kosice
Oddelovac desetinnych mist
[*] Jaroslav Pivonka <jpivonka(zv)centrum(tec)cz> - 11.10.2005 12:32:48
Registry HKCU\Control Panel\International\sDecimal
Odtud si ji berou delfini do DecimalSeparator v SysUtils jako default
hodnotu, kterou muzes menit, takze win a delphi muzou mit nastaveno ruzne.
> From: "Kalhous" <kalhous(zv)eu(tec)cz>
> Kterak snadno a rychle zjistim z Delf jak je nastaven oddelovac
> desetinnych mist ve Woknech? Dik.Synapce - TCP/IP prenos
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 11.10.2005 12:28:48
DD,
On Tuesday, October 11, 2005 11:18 AM ,
Petr Daricek <petr.daricek(zv)seznam(tec)cz> wrote:
> Ahoj,
> mam nasledujici problem se synapsi. Pri prenosu pres TCP pouzivam
> funkci SendBuffer, na jednom TCP spojeni (server a client po jednom
> socketu). V normalnich pripadech to vypada takto: 1] Na clientu
> Zavolam SendBuffer (data1) 2] Na servru prijmu data a zpracuji
> (data1)
> 3] Na clientu Zavolam SendBuffer (data2)
> 4] Na servru prijmu data a zpracuji (data2)
> ...
>
> V jistych pripadech ovsem nastane toto
> 1] Na clientu Zavolam SendBuffer (data1)
> 2] Na servru prijmu data a zpracuji (data1)
> 3] Na clientu Zavolam SendBuffer (data2)
>
> 4] Server ceka neprisli zadne data
>
> 5] Na clientu Zavolam SendBuffer (data3)
> 6] Na servru prijmu data a zpracuji (data2)
> 7] Na servru prijmu data a zpracuji (data3)
>
> Tento pripad nastava, kdyz data posilam rychle za sebou, pokud treba
> vlozim sleep(100), tak vse probehne jak ma. Zkousel jsem nastavovat
> SetMaxChunk na velikost posilanych dat i na jeden byte, ale chovani
> se nezmenilo.
>
zrejme proto, ze Ti uniklo, ze pokud se zavola 2 krat odesilani data
nutne neznamena, ze na druhe strane musim take 2x volat prijem dat.
Nagle mechanismus zpusobi, ze data odesilana po sobe po malych
kouscich budou slepena do jednoho vetsiho bloku (je efektivnejsi
posilat po siti vetsi kusy dat nez male bloky, kdy rezie protokolu
neni proti delce uzitecnych data zanedbatelna.)
PS: pokud volas funkci pro prijem dat na socketu v blokovacim modu
(recv() rutina Windows API) tak muzes dostat bud presne tolik dat
kolik jsi zadal nebo cokoliv mensiho a zaroven > 0)
D. Toman
Synapce - TCP/IP prenos
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 11.10.2005 12:16:47
> mam nasledujici problem se synapsi. Pri prenosu pres TCP pouzivam
> funkci SendBuffer, na jednom TCP spojeni (server a client po jednom
> socketu). V normalnich pripadech to vypada takto:
Dulezite je ani ne tak jak data posilas, ale jak je ctes. Zde dela
opradu mnoho programatoru chyby. Jestlize odesles pomoci SendBuffer
nejake mnozstvi dat, nelze predpokladat, ze stejne mnozstvi dat na
druhe strane prectes! Ten blok dat muzes cist naprosto jakkoliv
rozkouskovany, teoreticky treba i po jednom bytu...
Proto se ptam, jak ta data ctes, protoze podle mne je tam zakopan
tvuj pes. Zcela bezne pres Synapsi posilam velke mnozstvu dat, aniz
bych musel kamkoliv vrazet sleepy, a problem nemam.
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.OT: Licence Delphi
[*] Radek KALA <kala(zv)betacontrol(tec)cz> - 11.10.2005 12:14:47
Nema nekdo prosim zbytecnou licenci Delphi 6 Prof.
Nabidky na kala(zv)Betacontrol(tec)cz
dekuji
S pozdravem Radek KALA
BetaControl, s.r.o.
Cerneho 58/60, 635 00
tlf. : + 420 5 4622 3491
fax : + 420 5 4622 3470
GSM : + 420 603 85 75 15
OT: kupim D7Enterprise
[*] Robert Fujak <robof(zv)inmail.sk> - 11.10.2005 11:40:44
Ospravedlnujem sa za OT.
Kupim D7Ent. (vratane licencie)
Ponuku prosim na robof(zv)inmail.sk
S pozdravom
Robert Fujak
Synapce - TCP/IP prenos
[*] Petr Daricek <petr.daricek(zv)seznam(tec)cz> - 11.10.2005 11:18:42
Ahoj,
mam nasledujici problem se synapsi. Pri prenosu pres TCP pouzivam funkci SendBuffer, na jednom TCP spojeni (server a client po jednom socketu).
V normalnich pripadech to vypada takto:
1] Na clientu Zavolam SendBuffer (data1)
2] Na servru prijmu data a zpracuji (data1)
3] Na clientu Zavolam SendBuffer (data2)
4] Na servru prijmu data a zpracuji (data2)
...
V jistych pripadech ovsem nastane toto
1] Na clientu Zavolam SendBuffer (data1)
2] Na servru prijmu data a zpracuji (data1)
3] Na clientu Zavolam SendBuffer (data2)
4] Server ceka neprisli zadne data
5] Na clientu Zavolam SendBuffer (data3)
6] Na servru prijmu data a zpracuji (data2)
7] Na servru prijmu data a zpracuji (data3)
Tento pripad nastava, kdyz data posilam rychle za sebou, pokud treba vlozim sleep(100), tak vse probehne jak ma. Zkousel jsem nastavovat SetMaxChunk na velikost posilanych dat i na jeden byte, ale chovani se nezmenilo.
Za odpoved predem dekuji Petr
QuickReport 3.5 - tisk tabulek
[*] delphak(zv)centrum(tec)cz - 11.10.2005 11:18:42
Pouziti Frame jsem zkousel, ale problem je v tom, ze pokud to neni zarovnane na stred, tak zobrazeny text se dotyka hranicni cary a nevypada to hezky.
A vetsinu toho clovek nakonec stejne musi resit pomoci shape ...
A tam je nehorsi to rozmistovat, a hlavne aby navazovali :-(
----- Original Message -----
From: "Macko Martin" <martin.macko(zv)m-pro(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, October 11, 2005 11:02 AM
Subject: Re: QuickReport 3.5 - tisk tabulek
> Kdysi jsem si delal jednoduchou komponentu, ktere se dal pocet sloupcu a
> pocet radku a ona je vykreslila.
> Omezeni bylo v tom, ze vsechny sloupce byli stejne siroke a vsechny
> radky stejne vysoke.
> Ale mozna pro inspiraci by se ti hodila ...
>
> Jinak (skoro) kazdy prvek v QuickReportu ma vlastnost FRAME - tzn. u
> bandu muzes mit ramecek nahore, dole, vlevo i vpravo a cary oddelujici
> sloupce poresit TQRShape ...
>
> M.M.
>
>
> > -----Original Message-----
> > From: delphi-l-owner(zv)clexpert(tec)cz
> > [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of delphak(zv)centrum(tec)cz
> > Sent: Tuesday, October 11, 2005 10:35 AM
> > To: delphi-l(zv)clexpert(tec)cz
> > Subject: QuickReport 3.5 - tisk tabulek
> >
> > Dobry den,
> >
> > snazim se v QuickReportu generovat sestavy ktere maji podobu
> > tabulek .. tedy radky a sloupce jsou oddeleny vodorovnyma a
> > svislyma carama.
> > Jediny zpusob na ktery jsem prisel je ze poskladam potrebny
> > tvar pomoci car TQRShape - ale prace je s tim znacne
> > nepohodlna a jeste k tomu u svislych car je problem s
> > navaznosti .. vznikaji tam sem tam (nahodne) mezery 1 - 2
> > pixely - na vytisknute sestave je to viditelne ...
> >
> > Mate nekdo nejaky napad nebo radu jak toto delat lepe?
> > Podminky:
> > 1) MUSI to byt QuickReport
> > 2) sestava MUSI vypadat tak jak vypada (tedy tabulky)
> >
> > Dekuji za kazdy napad ...
> >
> >
> >
> >
>
>
>
> chybove hlaseni FB kod -107
[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 11.10.2005 11:08:41
Zdar,
Pavel Cisar napsal(a):
> petr palicka wrote:
>> "Dynamic SQL Error, SQL error code -107,
>> Invalid expresion in the select, number of
>> page buffers for cache required."
> Tak to teda fakt netusim, protoze chyba -107 jako takova vubec
> neexistuje :-) Chybova hlaska je rovnez zajimava. Sice existuje, ale ve
> skutecnosti se jedna o dve hlaseni k dvoum odlisnym chybam.
moc prima :-)
jinak se jedna o server FB 1.5.2.4731
databazi mi poslou zabalenou, zkusim se na ni mrknout.
Dam pa kvedet, jestli jsem neco vykoukal.
Peca
QuickReport 3.5 - tisk tabulek
[*] Macko Martin <martin.macko(zv)m-pro(tec)cz> - 11.10.2005 11:02:41
Kdysi jsem si delal jednoduchou komponentu, ktere se dal pocet sloupcu a
pocet radku a ona je vykreslila.
Omezeni bylo v tom, ze vsechny sloupce byli stejne siroke a vsechny
radky stejne vysoke.
Ale mozna pro inspiraci by se ti hodila ...
Jinak (skoro) kazdy prvek v QuickReportu ma vlastnost FRAME - tzn. u
bandu muzes mit ramecek nahore, dole, vlevo i vpravo a cary oddelujici
sloupce poresit TQRShape ...
M.M.> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of delphak(zv)centrum(tec)cz
> Sent: Tuesday, October 11, 2005 10:35 AM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: QuickReport 3.5 - tisk tabulek
>
> Dobry den,
>
> snazim se v QuickReportu generovat sestavy ktere maji podobu
> tabulek .. tedy radky a sloupce jsou oddeleny vodorovnyma a
> svislyma carama.
> Jediny zpusob na ktery jsem prisel je ze poskladam potrebny
> tvar pomoci car TQRShape - ale prace je s tim znacne
> nepohodlna a jeste k tomu u svislych car je problem s
> navaznosti .. vznikaji tam sem tam (nahodne) mezery 1 - 2
> pixely - na vytisknute sestave je to viditelne ...
>
> Mate nekdo nejaky napad nebo radu jak toto delat lepe?
> Podminky:
> 1) MUSI to byt QuickReport
> 2) sestava MUSI vypadat tak jak vypada (tedy tabulky)
>
> Dekuji za kazdy napad ...
>
>
>
>
Oddelovac desetinnych mist
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 11.10.2005 10:58:40
> Kterak snadno a rychle zjistim z Delf jak je nastaven
> oddelovac desetinnych mist ve Woknech? Dik.
Promenna DecimalSeparator z unity SysUtils.
David Lebeda
Oddelovac desetinnych mist
[*] Kalhous <kalhous(zv)eu(tec)cz> - 11.10.2005 10:48:39
Kterak snadno a rychle zjistim z Delf jak je nastaven oddelovac desetinnych mist ve Woknech? Dik.
Z.Kalhous
QuickReport 3.5 - tisk tabulek
[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 11.10.2005 10:40:39
delphak(zv)centrum(tec)cz dne 11 Oct 2005 v 10:34:
> snazim se v QuickReportu generovat sestavy ktere maji podobu tabulek
> .. tedy radky a sloupce jsou oddeleny vodorovnyma a svislyma carama.
> Jediny zpusob na ktery jsem prisel je ze poskladam potrebny tvar
> pomoci car TQRShape - ale prace je s tim znacne nepohodlna a jeste k
> tomu u svislych car je problem s navaznosti .. vznikaji tam sem tam
> (nahodne) mezery 1 - 2 pixely - na vytisknute sestave je to viditelne
Objekty maji vlastnost Frame, tak snad s jeji pomoci... Ze si to uzijes i tak, o tom ale
nepochybuju :)
Karel Rys
QuickReport 3.5 - tisk tabulek
[*] delphak(zv)centrum(tec)cz - 11.10.2005 10:34:38
Dobry den,
snazim se v QuickReportu generovat sestavy ktere maji podobu tabulek .. tedy radky a sloupce jsou oddeleny vodorovnyma a svislyma carama.
Jediny zpusob na ktery jsem prisel je ze poskladam potrebny tvar pomoci car TQRShape - ale prace je s tim znacne nepohodlna a jeste k tomu u svislych car je problem s navaznosti .. vznikaji tam sem tam (nahodne) mezery 1 - 2 pixely - na vytisknute sestave je to viditelne ...
Mate nekdo nejaky napad nebo radu jak toto delat lepe?
Podminky:
1) MUSI to byt QuickReport
2) sestava MUSI vypadat tak jak vypada (tedy tabulky)
Dekuji za kazdy napad ...chybove hlaseni FB kod -107
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 11.10.2005 09:32:34
Haj hou!
petr palicka wrote:
> Ahoj,
>
> zakaznik mi nahlasil, ze mu program hlasi tuto chybu: "Dynamic SQL
> Error, SQL error code -107, Invalid expresion in the select, number of
> page buffers for cache required."
>
> Netusite nekdo, cim by to mohlo byt zpusobeno, pripadne jak to odstranit?
Tak to teda fakt netusim, protoze chyba -107 jako takova vubec
neexistuje :-) Chybova hlaska je rovnez zajimava. Sice existuje, ale ve
skutecnosti se jedna o dve hlaseni k dvoum odlisnym chybam. Prvni cast
je zajimavou variaci na chybu kompilace prikazu s agregacni funkci
(definovany format je hlaseni "Invalid expresion in the %s"), protoze
nechapu, jak se tam ocitlo slovo select. Druha cast (number of..)
pochazi z chyby gfixu.
S pozdravem
Pavel Cisar
IBPhoenix
chybove hlaseni FB kod -107
[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 11.10.2005 09:06:32
Ahoj,
zakaznik mi nahlasil, ze mu program hlasi tuto chybu: "Dynamic SQL
Error, SQL error code -107, Invalid expresion in the select, number of
page buffers for cache required."
Netusite nekdo, cim by to mohlo byt zpusobeno, pripadne jak to odstranit?
Dik
Peca
Synapse - chyba pri TFTPSend
[*] Pavel Gazda <pavel_gazda(zv)datasw(tec)cz> - 11.10.2005 08:04:27
Velmi se omlouvam za zcestne informace a dekuji za postrceni.
Uz vim kde mam hledat chybu. Pouzil jsem unit ftptsend.pas ( zduraznuji
ftp-T-send.pas )
Asi pod vlivem dema FTPClient,FTPServer
Diky.
Pavel
> TTFTPSend.SendPacket neexistuje a zaroven nechapu co myslis tim
> 'cmd=2'?
Breakpointy
[*] Petr Daricek <petr.daricek(zv)seznam(tec)cz> - 11.10.2005 07:34:25
Ahoj,
pokud se nejdna o unitu Delphi (controls, windows atd.), pak zkontroluj ze unita kterou chces krokovat je opravdu ta kterou mas otevrenou. Je treba mozne, ze Delphi bere nejake stare zapomenute *.dcu.
Pokud se jedna o unitu Delphi, pak musis v nastaveni projektu na zalozce compile zaskrtnout "use debug dcus", pak to bude krokovat vsechny unity.
Petr
Breakpointy
[*] Ing. Dubsky Jan <dubsky(zv)s-palava(tec)cz> - 11.10.2005 07:10:23
Mam projekt, ktery obsahuje nekolik unit. Ve vsech unitach funguji
breakpointy tak, jak maji, ale v jedne neni mozne breakpoint nikam umistit,
presneji receno na kteremkoliv miste je breakpoint nefunkcni. Nejsem si
vedomy toho, ze bych nekde neco nastavoval, ale je fakt, ze tuto unitu
nejsem schopen odkrokovat a odladit. Dokonce nefunguje ani to, kdyz program
breaknu v jine casti (unite). Pokud dojde program do unity, ktera nejde
breaknout, nefunguje ani krokovani - probehnou vsechny prikazy bez moznosti
zastaveni.
Chyba v unite je vypocetni - pocita nesmysly, ale syntakticky je OK, takze
bez krokovani a vypisu hodnot jednotlivych promennych se nejsem schopen
dobrat vysledku.
Pomozte prosim, kde by mohla byt chyba.
Honza
dotaz SQL
[*] Ing. Keder Vladimir <vkeder(zv)iol.sk> - 10.10.2005 23:35:51
Ahoj
Potrebujem prekopirovat zaznamy z jednej tabulky do druhej ale v inom
subore. Kopirujem takto
ADOCommandConfig.CommandText:= 'INSERT INTO Konstrukcia ('+ poliaDst+ ') IN
"'+ OpenDialog1.FileName+ '" SELECT '+ poliaSrc+ ' FROM Konstrukcia WHERE
Kod_level1= "'+ kod_level1+ '"';
ADOCommandConfig.Execute;
Pokial subory nie su chranene heslo, ide to bez problemov. Problem nastane
ked subory zaheslujem. Ako kopirovat zo zaheslovanych suborov ? Pouzivam MS
Access databazu, ADO dbGo, Delphi 2005 Arch SP3, WinXP Pro SP2
Dakujem za pomoc
Ing. Keder Vladimir atributy souboru na netu
[*] Jan Fiala <jan.fiala(zv)wo(tec)cz> - 10.10.2005 22:35:46
10.10.2005 Vlastimil Zdenek:
> Ahoj,
> poradte mi prosim, jak zjistim atributy souboru na internetu. Chci provadet
> automatickou aktualizaci moji app a porebuji porovnat datum a cas verze
> souboru na netu s tou co mam v pc...
> Nebo je nejake elagantnejsi zjisteni novejsi verze na netu....?
Mit na netu malicky TXT soubor, ve kterem bude verze a datum.
Stahnes jej pomoci HTTP
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
atributy souboru na netu
[*] Vlastimil Zdenek <vlastimil.zdenek(zv)seznam(tec)cz> - 10.10.2005 21:25:39
Ahoj,
poradte mi prosim, jak zjistim atributy souboru na internetu. Chci provadet
automatickou aktualizaci moji app a porebuji porovnat datum a cas verze
souboru na netu s tou co mam v pc...
Nebo je nejake elagantnejsi zjisteni novejsi verze na netu....?
Diky
Vlasta, D5
Synapse - priloha PDF, nazev souboru - doplnek
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 10.10.2005 17:55:23
> Ahoj jen bych chtel dodat, ze jsem se pokusil poslat si nejaky soubor
> (take PDF), ktery ma v nazvu podtrzitko, prostrednictvim Outlook Expres a
> Thunderbird a ani jeden z nich ten nazev, resp. to podtrzitko, nekodoval.
Abychom si rozumneli...
Pokud to nezakodoval vubec, pak je to v poradku.
Pokud pouzil kodovani ale nezakodoval to podtrzitko, pak je to chyba.
Je pravdou, ze v otazce kodovani je Synapse dosti defenzivni, a radeji
koduje vice nez je nezbytne nutne, aby se predeslo pripadnym problemum,
coz v pripade techto konkretnich Lotusu paradoxne zpusobuje problem.
Zkus v mimeinln.pas najit proceduru NeedInline. V ni najdes radek:
if Value[n] in (SpecialChar + NonAsciiChar) then
a ten zkus zmenit na:
if Value[n] in (SpecialChar + NonAsciiChar - ['_']) then
Tim bys mel zpusobit, ze pokud se bude kodovat, tak se podtrzitko
zakoduje, nicmene existence podtrzitka nezposobi zakodovani.
Zkus a uvidis, jestli to povede ke kyzenemu vysledku.
Je to ale jen obejiti tohoto konkretniho problemu s tvym konkretnim
podtrzitkem. Velmi pravdepodobne bude problem s jakymkoliv zakodovanym
znakem, takze je to na strane synapse obecne nezazaplatovatelne. Jakmikle
by se v nazvu souiboru ocitlo cokoliv dalsiho oskliveho, budes zase tam
kde jsi.
Spravne reseni by bylo opravit postovni system na strane prijemce,
protoze to co leze ze Synapse neni nijak v rozporu s MIME standardy.
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
WEB: http://www.ararat(tec)cz/synapse - Synapse Delphi and Kylix TCP/IP
Library
Synapse - priloha PDF, nazev souboru
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 10.10.2005 17:41:21
> Vypada to, ze skutecne je problem s tim nazvem, resp. s jeho kodovanim.
>
> Nevedel jsem, ze i podtrzitko je potreba kodovat a neni soucasti ASCII
> (resp. 7bitoveho textu).
Ono je to trosku jinak... naprosto jakykoliv znak muze byt zakodovan!
Kdybych se rozhodl a zakodoval uplne vsechny znaky, tak to bude v souladu
s MIME a postovni program to musi umet spravne dekodovat.
Dale si uvedom fakt, ze v pripade QP kodovani (ktere je v tomto pripade
pouzite), znak '_' neznamena podtrzitko, ale mezeru! Takze chces-li, aby
vysedek byl interpretovan jako podtrzitko, musis jej zakodovat. (viz. RFC-
2047, odstavec 4.2.)
Zminovany odstavec v MIME standardu vyslovne pravi, ze znaky '=', '?' a
'_' musi byt vzdy zakodovany, prestoze jsou to zakladni ASCII znaky. To
proto, ze tyto tri znaky maji v hlavickovem MIME kodovani svoje specielni
funkce.
> > Mimochodem, o jakem postovnim programu se bavime?
>
> Pouzivaji pry Lotus Notes. Ale vypada to, ze si to u sebe nechavaji
> preposilat na lokalni adresy, takze od nas (kolegy) dostanou jeden email a
> ten se u nich preposle na vice adres.
>
> Prave me napada, jestli Lotus Notes nemuzou mit problem, kdyz je tam ten
> nazev kodovany, resp. podtrzitko je uvedeno prepisem...
Ajajaj... musim z vlastni zkusenosti rict, ze jsem zazil uz mnoho
postovnich problemu s Lotusy. Vetsinou to ale napravil upgrade Lotusu.
Takze bych se nedivil, kdyby to skutecne byl problem na strane Lotusu.
> Proto bych se chtel zeptat, slo by nejak "jednoduse" (tj. bez upravy
> vygenerovaneho textu zpravy) rict synapsi, aby ten nazev nekodovala?
Pak by ale vysledek odporoval MIME standardu. (viz. vyse...) Tedy
presneji: vysledek bude interpretovan jinak nez ocekavas...
Kdyz to podrtrzitko nezakodujes, pak by to postovni klient mel dekodovat
jako mezeru a ne jako podtrzitko. Tedy ve vysledku ziskas jiny nazev
souboru nez jaky jsi posilal. To uz rovnou muzes zmenit posilany nazev
souboru tak, aby to podtrzitko neobsahoval, ne?
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
WEB: http://www.ararat(tec)cz/synapse - Synapse Delphi and Kylix TCP/IP
Library
Drag&Drop mimo aplikaci
[*] Mirek Mrakota <mirek(zv)mrakota(tec)cz> - 10.10.2005 16:39:15
> nemate nekdo kousek kodu jak lze realizovat pretazeni urciteho objektu
> mimo
> aplikaci? Napriklad mam v listboxu seznam souboru a jeden z nich chci
> pretahnout treba na plochu pro jeho ulozeni. Na opacny smer (dropnuti
> souboru do aplikace) je prikladu vsude mraky, ale toto jsem nikde nenasel.
Zrovna o vikendu jsem to resil a jedine free co jsem nasel je
http://www.angusj.com/delphi/ - Drag & Drop Component Suite - Version 3.7. V
roce 1999 delal jeste s Andersem Melanderem www.melander.dk, ktery udelal
verzi 4, ale jeho stranky jsou uz kdovijak dlouho nedostupne. Navic s verzi
4 jsem mel trosku problemy, takze jsem s uspechem pouzil v.3.7. Hezke
povidani o OLE drag&drop je na
http://www.grahamwideman.com/gw/tech/Delphi/dragdrop/index.htm.
Mirek Vstupni dialog pro Password
[*] Jiri Bouchala <bouchala(zv)starmon(tec)cz> - 10.10.2005 16:21:13
Jo, jasne! Jen me napadlo, ze je to jiste nekde nachystany. Dik.
> Je v Delphi nejaka komponenta ci funkce jako InputQuery nebo InputBox pro
> vstup hesla (tedy * nebo neco podobneho) - s utajenim zadanych znaku?
*File/New/Duialogs/Password dialog
;-)
S pozdravom
Ivan Dulgerov
Synapse - priloha PDF, nazev souboru - doplnek
[*] Zdenek Sedlak <konf(zv)seus(tec)cz> - 10.10.2005 16:17:13
Ahoj jen bych chtel dodat, ze jsem se pokusil poslat si nejaky soubor
(take PDF), ktery ma v nazvu podtrzitko, prostrednictvim Outlook Expres
a Thunderbird a ani jeden z nich ten nazev, resp. to podtrzitko, nekodoval.
Zdenda
>
> Proto bych se chtel zeptat, slo by nejak "jednoduse" (tj. bez upravy
> vygenerovaneho textu zpravy) rict synapsi, aby ten nazev nekodovala?
>
> Ale jak rikam, jeste nevim uplne jiste, zda je problem v tom nazvu.
> Synapse - priloha PDF, nazev souboru
[*] Zdenek Sedlak <konf(zv)seus(tec)cz> - 10.10.2005 16:13:13
Ahoj,
dekuji za radu.
Je to trochu komplikovanejsi, protoze s tou slecnou nekomunikuji primo
ja, ale pres kolegu... a ona tomu moc nerozumi.>
> Mozne to je. Na druhou stranu takto zakodovany nazev je zcela v
> souladu s MIME standardem, takze pokud jej nejaky klient nedekoduje
> spravne, je chyba v tom klientu.
>
> Schvalne zkus to poslat s nejakym jednoduchym nazvem souboru, ktery
> neobsahuje '_', takze by jej Synapse nemela zakodovavat. Pokud to u
> te slecny najednou pujde, tak je zcela jiste problem v jejim
> postovnim klientu.
Vypada to, ze skutecne je problem s tim nazvem, resp. s jeho kodovanim.
Nevedel jsem, ze i podtrzitko je potreba kodovat a neni soucasti ASCII
(resp. 7bitoveho textu).
>
> Mimochodem, o jakem postovnim programu se bavime?
>
Pouzivaji pry Lotus Notes. Ale vypada to, ze si to u sebe nechavaji
preposilat na lokalni adresy, takze od nas (kolegy) dostanou jeden email
a ten se u nich preposle na vice adres.
Prave me napada, jestli Lotus Notes nemuzou mit problem, kdyz je tam ten
nazev kodovany, resp. podtrzitko je uvedeno prepisem...
Proto bych se chtel zeptat, slo by nejak "jednoduse" (tj. bez upravy
vygenerovaneho textu zpravy) rict synapsi, aby ten nazev nekodovala?
Ale jak rikam, jeste nevim uplne jiste, zda je problem v tom nazvu.
>
>>Takze hlavni rozdil je v nazvu toho souboru. Synapse pridava kodovani.
>>Jinak je tu rozdil, ze synapse pise content-type: application/PDF a
>>indy psal application/octet-stream
>
>
> To by nemel byt problem,ale tezko rict, nekteri postovni klienti
> dokazi delat divy! Chtelo by to vyzkouset... nejjednoduseji proste
> vygenerovat v Synapsi ten mail, pak v tom vygenerovanem textu zmenit
> ten content-type a zkusit poslat te slecne... opet, kdyz ji to
> najednou pujde, mame vinika.
>
Na vysledky tohoto zkouseni musim pockat do zitrka. Pak budu vedet vic.
>
> ... leda kdyby to nejak pomrsilo zpracovavany mail... nejlepe ziskat
> mail v jeho surove podobe tak jak dorazil k te slecne, a porovnat ho
> s tim co jsi odeslal.
Bohuzel k tomuto zdroji emailu se nedostanu :-(
---
Dekuji za rady
Zdenda
Delphi 2006, C++Builder 2006, C#Builder 2006
[*] rkubat(zv)email(tec)cz - 10.10.2005 15:59:11
Novy produkt Borland Developer Studio, tiskova zprava na webu NASDAQ:
http://news.nasdaq.com/aspxcontent/newsHeadlines.aspx?symbol=BORL%60&selected=BORL%60
-- Richard Kubat, Borland
Vstupni dialog pro Password
[*] Jaroslav Pivonka <jpivonka(zv)centrum(tec)cz> - 10.10.2005 14:57:06
tEdit.PaswordChar nestaci?
From: "Jiri Bouchala" <bouchala(zv)starmon(tec)cz>> Je v Delphi nejaka komponenta ci funkce jako InputQuery nebo InputBox pro
> vstup hesla (tedy * nebo neco podobneho) - s utajenim zadanych znaku?Drag&Drop mimo aplikaci
[*] David Liska <davidliska.konf(zv)seznam(tec)cz> - 10.10.2005 14:55:06
ahoj,
nemate nekdo kousek kodu jak lze realizovat pretazeni urciteho objektu mimo
aplikaci? Napriklad mam v listboxu seznam souboru a jeden z nich chci
pretahnout treba na plochu pro jeho ulozeni. Na opacny smer (dropnuti
souboru do aplikace) je prikladu vsude mraky, ale toto jsem nikde nenasel.
Diky za rady, pokud nejake budou ;-)
David
Synapse - chyba pri TFTPSend
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 10.10.2005 14:49:05
> Nedari se mi odeslat soubor na server pomoci TFTPSend.SendFile.
> Trasovanim jsem zjistil, ze to skonci procedure TTFTPSend.SendPacket.
> ( je to pri Cmd = 2 ) a FSock.LastError je 10054.
TTFTPSend.SendPacket neexistuje a zaroven nechapu co myslis tim
'cmd=2'?
Dival ses treba pres ethereal co se tam skutecne deje?
> P.S. Pri prihlaseni stejnym jmenem a heslem ve WinCommanderu dokazu
> soubor na server zkopirovat.
Pri stejnem modu prenosu? (pasivni/aktivni)
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.Vstupni dialog pro Password
[*] Ivan Dulgerov <idulgerov(zv)stonline.sk> - 10.10.2005 14:49:05
> Je v Delphi nejaka komponenta ci funkce jako InputQuery nebo InputBox pro
> vstup hesla (tedy * nebo neco podobneho) - s utajenim zadanych znaku?
*File/New/Duialogs/Password dialog
;-)
S pozdravom
Ivan Dulgerov
Delphi5 Prof+ SP1, Delphi 4 St, Win XP Porf. + SP1, Win98 SE
mail : idulgerov(zv)smware.sk
Synapse - chyba pri TFTPSend
[*] Pavel Gazda <pavel_gazda(zv)datasw(tec)cz> - 10.10.2005 14:43:05
Zdravim vsechny a predevsim Lukase G.
Nedari se mi odeslat soubor na server pomoci TFTPSend.SendFile.
Trasovanim jsem zjistil, ze to skonci procedure TTFTPSend.SendPacket.
( je to pri Cmd = 2 ) a FSock.LastError je 10054.
Muze me nekdo nakopnout co dal.
Diky
Pavel
P.S. Pri prihlaseni stejnym jmenem a heslem ve WinCommanderu dokazu soubor
na server zkopirovat.
duplikace (synchronizace) databaze v MySQL
[*] Ludek <konference(zv)sales(tec)cz> - 10.10.2005 14:41:04
---- Original Message -----
From: "likeapear" <likeapear(zv)centrum(tec)cz>
> mam aplikaci pracujici s MySQL (pouzivam komponenty Zeos 6.5.1-alpha).
> Aplikace si zalozi databazi, tabulky (obsahuji autoinkrementalni
> polozky) a pracuje (hezky a pekne). Ted bych potreboval na zaklade uziv.
> akce zkopirovat celou databazi nekam na vzaleny server (nekde na
> internetu). Jak to udelat? Je na to nejaky prikaz specialni pro MySQL?
> Nebo je nutne vzdalenou databazi rucne zalozit a data tam postupne
> nahrnout? Jak zajistim aby se mi zachovaly hodnoty autoinkrementalnich
> polozek?
Ahoj,
Mrkni na mysqldump.
Ludek
Vstupni dialog pro Password
[*] Jiri Bouchala <bouchala(zv)starmon(tec)cz> - 10.10.2005 14:15:02
Je v Delphi nejaka komponenta ci funkce jako InputQuery nebo InputBox pro vstup hesla (tedy * nebo neco podobneho) - s utajenim zadanych znaku?
Chyba DB Firebird
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 10.10.2005 13:24:59
Haj hou!
Tomas Krejzek wrote:
> Mas poskozeny databazovy soubor (ocekava ze stranka bude datova, a on je
> tam index)
Jen drobna korekce, je to presne obracene :-)
Jinak k podobny problemum dochazi jak uz bylo receno pri tvrdem padu
serveru, obcas i pri kopirovani otevrene databaze. Riziko poskozeni pri
padu serveru lze znacne minimalizovat zapnutim Forced Writes na ON (viz
parametr -w[rite] sync).
S pozdravem
Pavel Cisar
IBPhoenix
Treti Mezinarodni Firebird Konference
Praha, 13.-15. listopad 2005
vice na www.ibphoenix(tec)cz
Chyba DB Firebird
[*] Tomas Krejzek <tomas.krejzek(zv)kpsys(tec)cz> - 10.10.2005 13:06:58
Mas poskozeny databazovy soubor (ocekava ze stranka bude datova, a on je
tam index)
Jak predchazet, to ti asi uplne presne nereknu, ale pokud jsi napriklad
zkopiroval bazi(jako zalohu, nebo abys ji pouzil jinde) standardnimi
prostredky
OS, tak musis mit vypnuty FB, nebo aspon zajistit ze nikdo neni
pripojen, protoze windows pracuji mimo transakcni kontrolu :-)
Nejlepsi je pry udelat vzdy backup - task backupu pracuje v ramci transakce
Tom
Dalibor napsal(a):
>Ahoj, nevite nekdo co tato chyba znamena a jak ji predchazet?
>
>database file appears corrupt ()
>wrong page type
>page 47994 is of wrong type (expected 7, found 5)
>
>Firebird 1.5.2, Win
>
>
>
>
>
>Chyba DB Firebird
[*] Bc. Jiri Cincura <diskuze(zv)cincura(tec)net> - 10.10.2005 12:54:56
Dalibor wrote:
> Ahoj, nevite nekdo co tato chyba znamena a jak ji predchazet?
>
> database file appears corrupt ()
> wrong page type
> page 47994 is of wrong type (expected 7, found 5)
>
> Firebird 1.5.2, Win
>
>
>
>
Nekdo/neco ti poskodilo soubor databaze. Staci aby ti pri zapisu spadl
server a je to hned.
gfix a gbak pomuze (doufejme).
--
Bc. Jiri Cincura
http://www.ID3renamer.com/
http://www.x2develop.com/
ICQ: 314711544 | Yahoo!: x2develop
http://photo.cincura.net/
Synapse - kodovani cestiny
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 10.10.2005 12:52:56
> Jen pro poradek se ptam, jestli tedy jde synapsi nejak "vnutit" v
> jakem kodovani je text zpravy, nebo to pokazde sama zjistuje? Neni to
> zatim muj pripad, jen me napadlo, pokud by to nekdo musel provozovat
> na "agnlickem" stroji, tak by s tim byl problem. A jestli to jde nejak
> osetrit.
Podivej se na TMimePart.TargetCharset property.
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.Synapse - priloha PDF, nazev souboru
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 10.10.2005 12:50:56
> Chci se zeptat, jestli nemuze byt problem v tom, ze jeji postovni
> klient, spravne nepozna nazev souboru, pokud je tam jeho jmeno uvedeno
> vcetne kodovani, tedy takto:
> =?ISO-8859-1?Q?Dokument=5F20051007-1.PDF?=
Mozne to je. Na druhou stranu takto zakodovany nazev je zcela v
souladu s MIME standardem, takze pokud jej nejaky klient nedekoduje
spravne, je chyba v tom klientu.
Schvalne zkus to poslat s nejakym jednoduchym nazvem souboru, ktery
neobsahuje '_', takze by jej Synapse nemela zakodovavat. Pokud to u
te slecny najednou pujde, tak je zcela jiste problem v jejim
postovnim klientu.
Mimochodem, o jakem postovnim programu se bavime?
> Takze hlavni rozdil je v nazvu toho souboru. Synapse pridava kodovani.
> Jinak je tu rozdil, ze synapse pise content-type: application/PDF a
> indy psal application/octet-stream
To by nemel byt problem,ale tezko rict, nekteri postovni klienti
dokazi delat divy! Chtelo by to vyzkouset... nejjednoduseji proste
vygenerovat v Synapsi ten mail, pak v tom vygenerovanem textu zmenit
ten content-type a zkusit poslat te slecne... opet, kdyz ji to
najednou pujde, mame vinika.
> a indy navic pridaval text: "This
> is a multi-part message in MIME format"
To zcela urcite nevadi, to je proste jen blabol navic, kery ukazuji
postovni klientui, kterui vubec neum pracovat s MIME... takove snad
uz dneska opavdu nikdo nepouziva.
> Myslite, ze muze byt problem treba v nejake antivirove kontrole u
> uzivatele, kteremu je to posilano?
... leda kdyby to nejak pomrsilo zpracovavany mail... nejlepe ziskat
mail v jeho surove podobe tak jak dorazil k te slecne, a porovnat ho
s tim co jsi odeslal.
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.OT: DALLAS KLICE
[*] Dalibor <dalibor(zv)torola(tec)cz> - 10.10.2005 12:46:56
Ahoj,
nemate nekdo nejake priklady na nacitani klicu DALLAS pod .NET c# ?
Dik
Synapse - kodovani cestiny
[*] Zdenek Sedlak <konf(zv)seus(tec)cz> - 10.10.2005 12:44:55
Ahoj,
jeste bych se rad zeptal na kodovani cestiny. V diskusi jsem si prosel,
jak sestavit email i s prilohou a je to vsechno v poradku.
Vim, ze synapse nastavi kodovani do ISO-8859-2 a sama si ho tam prevede
z WIN_1250. Jenze pro toto prevedeni si sama zjistuje "jazyk prostredi".
Mame odesilani jako sluzbu (nt service) na serveru (Windows 2003
Server). A je tam nastaveno ceske prostredi, takze je vse v poradku.
Text pro odesiani se bere z databaze.
Ovsem pokud na tom serveru nenastavime ceske prostredi, tak to nespravne
rozpozna jazyk... a spatne zakoduje... take to nastavi ISO-8859-2 ale
nektere znaky nejsou spravne cesky.
Jen pro poradek se ptam, jestli tedy jde synapsi nejak "vnutit" v jakem
kodovani je text zpravy, nebo to pokazde sama zjistuje? Neni to zatim
muj pripad, jen me napadlo, pokud by to nekdo musel provozovat na
"agnlickem" stroji, tak by s tim byl problem. A jestli to jde nejak osetrit.
Dekuji za info.
Zdenda
Synapse - priloha PDF, nazev souboru
[*] Zdenek Sedlak <konf(zv)seus(tec)cz> - 10.10.2005 12:38:54
Ahoj,
pomoci synapse rozesilame emaily s prilohami PDF.
Jeden clovek se mi ozval, ze mu ty emaily nejdou otevrit, resp. ze mu to
zadnou prilohu neukaze. (bohuzel je to celkem nezkusena slecna a vice
informaci z ni nemam). Pokud mi to preposle zpatky, tak to vypada, ze
jeji klient spravne nerozdelil MIME casti emailu.
Drive jsme to posilali pomoci INDY 9, jenze tam jsme meli hodne problemu
se spravnym sestavenim emialu a bylo to krkolomne, ovsem s timhle
problemy nebyly.
Proste synapse, je mnohem lepsi :-) A velmi za ni dekuji. :-)
Cast emailu poslaneho pres synapsi vypada takto (ano textova cast je
skutecne prazdna, vetsinou se zadny text neposila, nicmene nekdy ano,
pokud je poslan text, tak je take spravne identifikovan):
-------------------------------------------------------
--12B7199B_6EE9B50D_Synapse_boundary
Content-type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: Quoted-printable
Content-Disposition: inline
Content-Description: Message text
--12B7199B_6EE9B50D_Synapse_boundary
Content-type: application/PDF;
name="=?ISO-8859-1?Q?Dokument=5F20051007-1.PDF?="
Content-Transfer-Encoding: Base64
Content-Disposition: attachment;
FileName="=?ISO-8859-1?Q?Dokument=5F20051007-1.PDF?="
Content-Description: Attached file: Dokument_20051007-1.PDF
JVBERi0xLjMKJeLjz9MKNTYwIDAgb2JqCjw8Cj4+CmVuZG9iago1NjIgMCBvYmoKPDwKL0xl
bmd0aCAxNzUKL0ZpbHRlciAvRmxhdGVEZWNvZGUKL0MgMTkxCi9PIDE3NQovUyA0MAo+Pgpz
dHJlYW0KphlZ0SFJ1f+76ZrNWg+uvgwwLsxU8tHOgXIvgwi6MCmbl3n2qYAhEGCryMxP/rnB
...
----------------------------------------------------------
Chci se zeptat, jestli nemuze byt problem v tom, ze jeji postovni
klient, spravne nepozna nazev souboru, pokud je tam jeho jmeno uvedeno
vcetne kodovani, tedy takto: =?ISO-8859-1?Q?Dokument=5F20051007-1.PDF?=
Pokud jsme posilali pres INDY tak email vypadal takto
---------------------------------------------------------
This is a multi-part message in MIME format
--=_NextPart_2rfkindysadvnqw3nerasdf
Content-Type: text/plain
Content-Transfer-Encoding: 7bit
--=_NextPart_2rfkindysadvnqw3nerasdf
Content-Type: application/octet-stream;
name="Dokument_20050920-1.PDF"
Content-Transfer-Encoding: base64
Content-Disposition: attachment;
filename="Dokument_20050920-1.PDF"
JVBERi0xLjMKJeLjz9MKNjQxIDAgb2JqCjw8Cj4+CmVuZG9iago2NDMgMCBvYmoKPDwKL0xlbmd0
aCAxODQKL0ZpbHRlciAvRmxhdGVEZWNvZGUKL0MgMjEyCi9PIDE5NgovUyA0MAo+PgpzdHJlYW0K
uIGokhh7CYlDUMtHyvm4a8ozA9KhZe5aQ9XDK+/f8kZdyx3zeCKBjbNZDRNQEFBdYEx5fqtl9Zqq
----------------------------------------------------------
Takze hlavni rozdil je v nazvu toho souboru. Synapse pridava kodovani.
Jinak je tu rozdil, ze synapse pise content-type: application/PDF a indy
psal application/octet-stream
a indy navic pridaval text: "This is a multi-part message in MIME format"
Vyzkousel jsem si to na nekolika emailovych klientech (Outlook, Outlook
expres, Thunderbird) a vsude to je v poradku.
Myslite, ze muze byt problem treba v nejake antivirove kontrole u
uzivatele, kteremu je to posilano?
Dekuji za kazdy napad...
Zdenda
Chyba DB Firebird
[*] Dalibor <dalibor(zv)torola(tec)cz> - 10.10.2005 12:28:53
Ahoj, nevite nekdo co tato chyba znamena a jak ji predchazet?
database file appears corrupt ()
wrong page type
page 47994 is of wrong type (expected 7, found 5)
Firebird 1.5.2, Win
DLL a record
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 10.10.2005 10:50:47
> > Co by kdo kde alokoval? Navratova hodnota typu record se
> > predava jako skryty VAR argument, takze volani
> >
> > var Rec:TRec;
> > ...
> > Rec := FunctionXY(.....);
> >
> > prekladac prelozi v podstate jako
> >
> > FunctionXY(...., Rec);
> >
> > A nikde se nemusi nic alokovat ani uvolnovat. viz take help
> > Object Pascal Reference | Program Control | Parameters and
> > function results | Function results
Presto si myslim, ze pripominka M.T. neni hloupa. V Delphi je vse sice
v poradku, ale jak to bude, kdyby chtel nekdo tu DLL volat z programu
napsaneho v jinem jazyce? Bude vedet, jak fci zavolat a spravne z ni
prevzit navratovou hodnotu? Ne ze by to ted hrozilo, ale proc na to
dlabat? Proto jsem to opravdu predelal tak, ze fce dostane pointer na
TRec a vraci jen typ Bool. Cimz snad kazdemu v jakemkoli
programovacim jazyce bude na prvni pohled jasne, jak to s temi
parametry je.
Samozrejme dekuji vsem zucastnenym za vysvetleni a podane namety.
David Lebeda