Archív konference Delphi

Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.

Alt + F4 a Ctrl + Alt + Del

[*] delphin(zv)post(tec)cz - 16.10.2004 10:40:45

> Jde o to, ze by aplikaci smel vypnout jen admin. A to pres form, ktery
> je zaheslovany a obsahuje administracni nastaveni. Od jinud bych
> potreboval, aby aplikace vypnout nesla.

Tohle jde resit v OnCloseQuery, ale stejne z TaskManageru aplikace pujde
sestrelit.

Dalsi moznost je cast aplikace, ktera ma bezet porad, prepsat jako sluzbu.
Bezny User nema k rizeni sluzeb pristup, administrator ano.

Alt + F4 a Ctrl + Alt + Del

[*] Petr Cafourek <petr.cafourek.d7(zv)seznam(tec)cz> - 16.10.2004 10:16:43

Dobry den,
15. listopadu 2004, 8:32:46, napsal jste:

> Petr Cafourek wrote:
>> V postate to, co potrebuji je to, aby uzivatel nemohl vypnout aplikaci
>> jinak, nez mnou povolenou metodou. Da se to udelat nejak jinak?
>>

> A co je tebou povolena metoda?

> Nejde vse zakazat. Aby treba system mohl app. vypnout, nebo se o to aspon
> pokusit.


Jde o to, ze by aplikaci smel vypnout jen admin. A to pres form, ktery
je zaheslovany a obsahuje administracni nastaveni. Od jinud bych
potreboval, aby aplikace vypnout nesla.

--
S pozdravem,
Petr Cafourek
mailto:petr.cafourek.d7(zv)seznam(tec)cz


Licence GPL a uzavreny software

[*] Petr Fejfar <development(zv)callnet(tec)cz> - 16.10.2004 09:18:38

Ludek ZITA wrote:

> Puvodni dotaz byl na to, zda jeho produkt muze volat DLL rozhrani
> jineho programu (v tomto pripade anitiviru, ktery je siren pod
> licenci GPL), ktery budem mit ten uzivatel normalne nainstalovan a
> bude ho normalne pouzivat. S tim, ze v autoruv produkt bude mit i
> moznost podobne volat a vyuzivat jiny komercni produkt (AVG).
> Pokud prijmu predpoklad, ze autoruv SW neni primarne urcen pro
> antivirovou ochranu, pak autor muze tuto knihovnu volat naprosto bez
> jakehokoliv omezeni. Dulezity je v tomhle pohled zda koncovy uzivatel
> uziva ten produkt legalne. Pokud by tomu tak nebylo, pak by na Linuxu
> nesmel byt spusten jediny SW pod neGPL licenci, coz je jiste nesmysl.
> V tomto pripade se IMHO nejedna o soucast dila.

Ano, uzivatel at si spousti co chce - v tom mu GPL nebrani.

Ale co kdybyste si precetli tech 50 nebo kolik otazek&odpovedi
na strankach FSF, abyste zjistili, ze FSF nemela nikdy umysl
prostrednictvim licence GPL umoznit komukoli jakoli volat cokoli
pod GPL licenci z non GPL software s vyjimkou "kernel" knihoven,
ktere jsou soucasti OS popr. prekladace
- to aby se daly psat ty non GPL aplikace treba pod Linux ;-))

A to, ze aplikace pouziva GPL software jako alternativu ke komercnimu
software, je vhledem k GPL irelevantni.

To plativalo treba o mySQL, kdyz meli zajem na co nejvetsi penetraci,
ale nechteli to pustit uplne ze retezu. Ale taky takovou moznost
explicitne deklarovali. A podivej se na jejich licensing policy dnes
- dokonce se odvolavaji nejen na text vlastni GPL, ale primo na mnou
zminovane vyklady ve FAQ, aby predesli chytraceni chytraku....


pf


Zjisteni lokalni IP

[*] l. vlcek <l.vlcek(zv)noel-plus(tec)cz> - 16.10.2004 07:24:27

Jakub Cermak napsal(a):
> No prave ze tech sitovek je vic. To ze loopback je 127.0.0.1 vim :).
>
jo,
tyhle informace si drzi datova struktura vazana k socketu. Pristup k nim
se muze lisit v "urovni konfortu", nebo jak bych to rekl.
Kazda socketova knihovna obvykle tyto data kopiruje ve svych vlastnich
strukturach (indy (tusim) v objektech bind nebo neco podobneho...). Lze
to najit v dokumentaci prislusne knihovny. Dobre byva podivat se i na
doprovodne priklady. U indy i (treba) u synapse od L.Gebauera jsou
pomerne primocare....

Jako (obvykle) "posledni pomoc" lze pouzit:
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/winsock/winsock/sockaddr_storage_2.asp

>>--
>>L.V.
>>jezevec
>>
>>
>>
>
>
>
>

Alt + F4 a Ctrl + Alt + Del

[*] Jakub Cermak <cermiforum(zv)centrum(tec)cz> - 15.10.2004 19:37:37

Nebo zkusit pouzit spywarove metody - 2 aplikace, kdy kazda kontroluje stav
te druhe, a kdyztak ji znova spusti :) Neni to nejlepsi reseni ale aspon
neco.

Jakub Cermak
ja.cermi(zv)centrum(tec)cz

----- Original Message -----
From: "Petr Cafourek" <petr.cafourek.d7(zv)seznam(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, November 15, 2004 8:14 AM
Subject: Re: Alt + F4 a Ctrl + Alt + Del


>V postate to, co potrebuji je to, aby uzivatel nemohl vypnout aplikaci
> jinak, nez mnou povolenou metodou. Da se to udelat nejak jinak?
>
>> On 12 Nov 2004 at 16:18, Petr Cafourek wrote:
>
>>> D6 Pro, Win2K a WinXP
>>>
>>> Zdravim vsechny,
>>> vim, ze je to banalita, ale nevite nekdo prosim, jak zakazat v
>>> aplikaci stisk klave Alt + F4 a Ctrl + Alt + Del?
>
>> Alt+F4 bych vedel
>> v OnCreate:
>
>> var
>> hMenuHandle: HMENU;
>> begin
>> inherited;
>> // disabled crossbutton
>> hMenuHandle := GetSystemMenu(Handle, FALSE);
>> if (hMenuHandle <> 0) then
>> EnableMenuItem (hMenuHandle, SC_CLOSE,MF_BYCOMMAND or
>> MF_GRAYED);
>
>> end;
>
>> Takto resime edit. formy, aby user muset pouzit jen tlacika
>> OK/Cancel.
>
>> Jarek Uher
>
>
>
> --
> S pozdravem,
> Petr Cafourek
> mailto:petr.cafourek.d7(zv)seznam(tec)cz
>
>
>
>

Zjisteni lokalni IP

[*] Jakub Cermak <cermiforum(zv)centrum(tec)cz> - 15.10.2004 19:31:37

No prave ze tech sitovek je vic. To ze loopback je 127.0.0.1 vim :).

Jakub Cermak
ja.cermi(zv)centrum(tec)cz

----- Original Message -----
From: "l. vlcek" <l.vlcek(zv)noel-plus(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, November 15, 2004 10:10 AM
Subject: Re: Zjisteni lokalni IP


> Jakub Cermak napsal(a):
>> Vim, ze je to zacatecnicky dotaz, ale nejak na to nemuzu prijit. Mam
>> otevreny a funkcni serverovy UDP socket (nemyslim listening) a potrebuju
>> nejak zjistit lokalni IP adresu rozhrani, pres kterou pozadavek prisel.
> ???
> lokalni adresa je typicky: 127.0.0.1, zvany loopback....
>
> Jestli mas na mysli adresu spojeni, ktere jsi otevrel proti jinemu
> stroji, tak to "obvykle" byva adresa sitovky (pokud jich nemas vic).
> :-)
>
> --
> L.V.
> jezevec
>
>
>

Chyba Socket Error 10054 a IdHTTP

[*] Milos Jircik <m.jircik(zv)mjsoft(tec)cz> - 15.10.2004 16:45:24

Zdravim,

v programu pouzivam ke stazeni stranek z internetu komponentu
IdHTTP. U nekterych uzivatelu dojde pri stahovani k chybe "Socket Error
#10054 - Connection reset by peer". V prohlizeci se stejna stranka
zobrazi bez problemu. Nevite nekdo co s tim? Muze byt problem ve
firewallu? Stahovani nespadne hned, ale az po delsi dobe (25 s).

Zdrojak:

var
Http1: TIdHTTP;
begin
Http1 := TIdHTTP.Create(nil);
try
strRead := Http1.Post(strWww,strData);
finally
Http1.Free;
end;
end;

Pouzivam Delphi 7 Professional.

Milda.


OT: Seminar "Belohrad 2005"

[*] Jan Sebelik <honza(zv)haes(tec)cz> - 15.10.2004 14:31:15

7. ROCNIK TRADICNIHO SEMINARE
"BELOHRAD 2005".
Lazne Belohrad, 23.-24.2.2005

Co je noveho?
Microsoft nam dozajista zase rekne, co nas ceka a co nas nemine, Borland ma "Delphi 2005".
Krome obecneji ladenych prednasek se budeme zase soustredovat na .NET, urcite si to zasluhuje.
Byl bych rad, kdyby se na seminari objevila konkretni reseni konkretnich problemu, aby bylo vsem zrejme, o co tady jde.

Prihlaste svoje vlastni prispevky - program jeste zdaleka neni uzavren.
Podrobnejsi informace o seminari naleznete na
http://www.haes(tec)cz/ws_pozv.asp?r=workshop.

Letos novinka:
Se Zbyskem Hlinkou jsme pro vas pripravili diskusni forum, ktere by se melo venovat predevsim priprave a konkretizaci programu seminare, ale i dalsim, predevsim organizacnim, zalezitostem. Vyjadrete svoje nazory.
http://www.hlinka(tec)cz/belohrad

Tesim se na vas
a jsem s pozdravem

Jan Sebelik
P.S.
Nase kurzy nyni doporucuje i Microsoft
http://msdn.microsoft(tec)cz/promo/.
====================================
= RNDr. Jan Sebelik - HAES
= Skolici a konzultacni stredisko pro vyvoj SW
= www.haes(tec)cz
= Vojtiskova 321
= 507 81 Lazne Belohrad
= tel. 493 792 931 (mobil 776 347 735)
====================================

aplikacia s runtime balikmi a focus

[*] Peter Svetlik <peternal(zv)seznam(tec)cz> - 15.10.2004 12:33:07

Mam nasledovny problem:
Aplikacia s runtime balikmi beziaca na win98 a win2000 straca focus a to v tejto situacii:
Z lubovolneho formu aplikacie vyvolany dialog na vyber suboru (TOpenDialog) sposobuje to,
ze po vybere suboru (resp. po zatvoreni formu dialogu) aplikacia, z ktorej bol dialog
vyvolany nedostane naspat focus.
Aplikacia je bez focusu a jedine, co sa s nou da urobit, je zhodit ju.
Rovnaky problem nastava aj pri ukladani suboru.
Problem sa neprejavuje na winXP.
Problem sa na win2000 neprejavuje pri aplikacii bez runtime balikov.

Stretol sa niekto z vas s podobnym problemom?

peter svetlik, D5, win2000

Delphineroapi

[*] Kratochvil Milan <mkratochvil(zv)farmtec(tec)cz> - 15.10.2004 11:31:02

Zjistil jsem ze nema cenu z delphi ovladat nerocmd je to takovej ukazkovaj vystup od Aheadu ale bohuzel v C. Jinak jsem pokrocil jen do toho ze vypaluju ( nebo dopaluju ) na cd pouze jeden soubor (jakmile chci vic souboru najednou tak hodi chybu) a nesmi byt v zadnem podadresari (jinak to zase vyhlasi chybu). Pouzivam verzi 0.41a ale nemam ji nainstalovanou jako komponentu pouze jen pouzivam soubory (uses Un_NeroApi, Un_NeroUserDialog, Un_NeroIsoTrack) a vyvolani vypalovani jsem prevzal z dema ktere je prilozeno, akorat jsem z nej odstanil oznamovaci dialogy a nahradil je logama do souboru. Nijak vice jsem s tim zatim nedelal protoze to pro moje potreby zatim staci. Momentalne jsem mimo domov takze nemam moznost se presne podivat ale pokud budes mit zajem tak se na to lepe mrknu az dorazim domu (cca asi za tyden).

Milan

>> Ahoj,
>> pokrocil jsi nejak v %subj%, trapim se nyni alespon s NeroCMD
>> Ludek

Chyba pri ukonceni Delphi7

[*] Kalhous <kalhous(zv)eu(tec)cz> - 15.10.2004 11:13:01

D7, WinXP
Od nejake doby znaji delfy pouze jediny zpusob ukonceni a to
Access violation at address 019A1C10. Read of address 019A1C10.
Tato chyba je naprosto neodstrelitelna - pomuze jen fyzicky vypnout pocitac.
Netusite nekdo o co jde?
Z.Kalhous
ToWare s.r.o.

Licence GPL a uzavreny software

[*] Ludek ZITA <konference(zv)sales(tec)cz> - 15.10.2004 10:12:57

On Behalf Of Petr Fejfar
>
> Slavomir Skopalik wrote:
>
> > Opet rikam, zamenovat linkovani s dynamickym linkovanim
> > nelze
>
> Priste uz to snad prelozim do cestiny ;-)
>
> If a library is released under the GPL (not the LGPL),
> does that mean
> that any program which uses it has to be under the GPL?
>
> * Yes, because the program as it is actually run includes
> the library *
>
> Proc se porad ohanis nejakym linkovanim, formou knihovny a
> dalsimi irelevantnostmi, kdyz licensor ve vykladu GPL jasne
> mluvi o jejim *uziti*
> a to primo v *run-time*?

Ahoj,
Puvodni dotaz byl na to, zda jeho produkt muze volat DLL rozhrani jineho
programu (v tomto pripade anitiviru, ktery je siren pod licenci GPL),
ktery budem mit ten uzivatel normalne nainstalovan a bude ho normalne
pouzivat. S tim, ze v autoruv produkt bude mit i moznost podobne volat a
vyuzivat jiny komercni produkt (AVG).
Pokud prijmu predpoklad, ze autoruv SW neni primarne urcen pro
antivirovou ochranu, pak autor muze tuto knihovnu volat naprosto bez
jakehokoliv omezeni. Dulezity je v tomhle pohled zda koncovy uzivatel
uziva ten produkt legalne. Pokud by tomu tak nebylo, pak by na Linuxu
nesmel byt spusten jediny SW pod neGPL licenci, coz je jiste nesmysl. V
tomto pripade se IMHO nejedna o soucast dila.

Jina situace je, pokud by slo napriklad o nejaky jiny antivirovy system,
treba s lepsim rozhranim apod. coz by byl SW, jehoz beh je primo zalozen
na knihovne sirene pod GPL a tak je tedy skutecne jedno jestli tu
knihovnu volam dynamicky nebo staticky.Proste ji do uzavreneho SW v
tomto smyslu pouzit nesmim. Totez samozrejme plati i pokud by doslo k
jakymkoliv upravam knihovny.

Ludek


Zjisteni lokalni IP

[*] l. vlcek <l.vlcek(zv)noel-plus(tec)cz> - 15.10.2004 10:10:56

Jakub Cermak napsal(a):
> Vim, ze je to zacatecnicky dotaz, ale nejak na to nemuzu prijit. Mam
> otevreny a funkcni serverovy UDP socket (nemyslim listening) a potrebuju
> nejak zjistit lokalni IP adresu rozhrani, pres kterou pozadavek prisel.
???
lokalni adresa je typicky: 127.0.0.1, zvany loopback....

Jestli mas na mysli adresu spojeni, ktere jsi otevrel proti jinemu
stroji, tak to "obvykle" byva adresa sitovky (pokud jich nemas vic).
:-)

--
L.V.
jezevec

Alt + F4 a Ctrl + Alt + Del

[*] Tomas Krejzek <tomas.krejzek(zv)kpsys(tec)cz> - 15.10.2004 09:38:54


Taky si myslim ze je tohle lepsi reseni, system neni zas takovy nasilnik
jak si myslis, nejdriv posle tve aplikaci zpravu ze ma byt uzavrena,
pokud tva aplikace neni v nejakem kvazistavu, muzes tuhle zpravu
odchytit a bez dotazu oznamit ze nechces skoncit. Ale stoprocentni
obrana to neni, to by byly ty Windows uplne na prd kdyby ti nemohli
sestrelit aplikaci kdyby se trebas nekde zacyklila
Tom

>co takhle osetrit si to v OnCloseQuery?
>
>Peca
>
>
>
>
>

Alt + F4 a Ctrl + Alt + Del

[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 15.10.2004 08:52:50

Petr Cafourek wrote:

> V postate to, co potrebuji je to, aby uzivatel nemohl vypnout aplikaci
> jinak, nez mnou povolenou metodou. Da se to udelat nejak jinak?

co takhle osetrit si to v OnCloseQuery?

Peca

FB embeded

[*] dphi_forum(zv)proces.sk - 15.10.2004 08:18:44


kedysi som pisal takyto email ....

skuste http://www.stadas.sk - program Matrika farskeho uradu

alebo


http://heanet.dl.sourceforge.net/sourceforge/firebird/Firebird-1.5.0.4290
_embed_win32.zip

fbembed.dll som premenoval na gds32.dll

a postupoval som dalej podla navodu

? c:\my_app\app.exe
? c:\my_app\gds32.dll
? c:\my_app\ib_util.dll
? c:\my_app\firebird.conf
? c:\my_app\firebird.msg
? c:\my_app\intl\fbintl.dll
? c:\my_app\udf\fbudf.dll

ide o zachovanie struktury suborov.

Stano


IB/FB Admin Console

[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 15.10.2004 08:36:47

Dobry den,
muzu se zeptat, co pouzivate pro administraci IB/FB (nejlepe aby umelo
oboje) databazi (jak local tak remote)? Pokud mozno free.

Ja pouzivam IBConsole (nic moc, ale ja si vystacim s SQL tak staci, ale pro
FB nic moc) a IBAccess (umi oboje celkem dobre).

--
Jiri Cincura
e-mail: mailto:jiri(zv)cincura.net; | http://www.cincura.net/
mailto:xcincura(zv)informatics.muni(tec)cz | http://photo.cincura.net/
ICQ#: 314711544 | http://phorum.cincura.net/
---
And if our times are difficult and perplexing,
so are they challenging and filled with opportunity.
-Robert F. Kennedy, 1961

prosim pomozte s mysql

[*] Lahoda Radek <lahodar(zv)uniplet(tec)cz> - 15.10.2004 08:34:46

diky, funguje

----- Puvodni zprava -----
Od: <jharman(zv)volny(tec)cz>
Komu: <delphi-l(zv)clexpert(tec)cz>
Odeslano: 12. listopadu 2004 9:21
Predmet: Re: prosim pomozte s mysql


> SELECT clanky.DATUM, clanky.ID,NAZEV,AUTOR, cl_hit.HIT
> FROM clanky
> left join cl_hit on (cl_hit.id = clanky.id)
> WHERE VEREJNY='Ano'
> ORDER BY clanky.DATUM Desc
> LIMIT 5
>
> Zkus toto. Snad by to mohlo fungovat.
> Honza

Alt + F4 a Ctrl + Alt + Del

[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 15.10.2004 08:32:46

Petr Cafourek wrote:
> V postate to, co potrebuji je to, aby uzivatel nemohl vypnout aplikaci
> jinak, nez mnou povolenou metodou. Da se to udelat nejak jinak?
>

A co je tebou povolena metoda?

Nejde vse zakazat. Aby treba system mohl app. vypnout, nebo se o to aspon
pokusit.

--
Jiri Cincura
e-mail: mailto:jiri(zv)cincura.net; | http://www.cincura.net/
mailto:xcincura(zv)informatics.muni(tec)cz | http://photo.cincura.net/
ICQ#: 314711544 | http://phorum.cincura.net/
---
And if our times are difficult and perplexing,
so are they challenging and filled with opportunity.
-Robert F. Kennedy, 1961

like, case insensitive, cestina

[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 15.10.2004 08:30:45

Kalhous wrote:
> psal tak ke svemu zdeseni jsem zjistil ze nektere verze serveru nesnaseji

No na FB 1.5.1 mi to jede.

A na IB (verze co je s D7 ;)) taky.

Tak jinak uz pak nevim.

--
Jiri Cincura
e-mail: mailto:jiri(zv)cincura.net; | http://www.cincura.net/
mailto:xcincura(zv)informatics.muni(tec)cz | http://photo.cincura.net/
ICQ#: 314711544 | http://phorum.cincura.net/
---
And if our times are difficult and perplexing,
so are they challenging and filled with opportunity.
-Robert F. Kennedy, 1961

Registrace D6

[*] horky(zv)cominn(tec)cz - 15.10.2004 08:18:44

> From: Ing. Dubsky Jan [mailto:dubsky(zv)s-palava(tec)cz]
> Sent: Monday, November 15, 2004 8:05 AM
>
> preinstalaci). Po teto akci se ztratila registrace Delphi u
> Borlandu a to se
> odmita spustit. Provedl jsem opakovanou registraci - na
> obrazovce vyskoci
> okno s hlasenim
> Congratulations - Your software has been successfully registered.
> A pak delphi zahlasi chybu registrace a odmita se rozjet.

Kdyz jsem mel problemy s registraci D6, pomohlo mi toto:

-----------------------------------------------------------------------------
A Better Way to End the Endless Registration Loop when Trying to
Register Delphi 6 - by Borland Developer Support Staff

Abstract:
Synopsis: Delphi is prompting to register the product. After registering
the product the an error message is displayed to register the product again.
Further attempts to register the product are unsuccessful.

Solution: There is an alternative method to resolving the registration loop,
which doesn't require D6RegClean and a repair of Delphi. Instead you can
preserve your current installation by removing three registry keys
and registering once more.

The registry keys can be removed using the RegEdit tool, Start | Run | RegEdit.
The Keys to remove are listed below:

HKEY_CURRENT_USER\Software\Borland\Delphi\ 6.0\LM
HKEY_CURRENT_USER\Software\Borland\Delphi\ 6.0\LMLIC
HKEY_CURRENT_USER\Software\Borland\Delphi\ 6.0\LMKEY
-----------------------------------------------------------------------------
--
S pozdravem Karel Horky, D7, FB 1.0.3, IBX 7.08, WXP SP1
[mailto:horky(zv)cominn(tec)cz]

like, case insensitive, cestina

[*] Kalhous <kalhous(zv)eu(tec)cz> - 15.10.2004 08:04:43

No to jsem prave presvedceny ze to musi byt napsano takto:
...where UPPER(OBSAH COLLATE PXW_CSY) LIKE '%TOTO JE TREBA NAJIT%'
a prekvapuje me ze to nefunguje. Mozna je to verzi serveru, jak jsem uz psal
tak ke svemu
zdeseni jsem zjistil ze nektere verze serveru nesnaseji treba UPPER v ORDER
BY zatimco
jinym to nevadi.
----- Original Message -----
>> tom 'select * from tab_archiv where UPPER(OBSAH) LIKE '%TOTO JE TREBA
>> NAJIT%'' to UPPER(OBSAH)prevadi na velka pismena jen znaky bez
> diakritiky -


Alt + F4 a Ctrl + Alt + Del

[*] Petr Cafourek <petr.cafourek.d7(zv)seznam(tec)cz> - 15.10.2004 08:14:44

V postate to, co potrebuji je to, aby uzivatel nemohl vypnout aplikaci
jinak, nez mnou povolenou metodou. Da se to udelat nejak jinak?> On 12 Nov 2004 at 16:18, Petr Cafourek wrote:

>> D6 Pro, Win2K a WinXP
>>
>> Zdravim vsechny,
>> vim, ze je to banalita, ale nevite nekdo prosim, jak zakazat v
>> aplikaci stisk klave Alt + F4 a Ctrl + Alt + Del?

> Alt+F4 bych vedel
> v OnCreate:

> var
> hMenuHandle: HMENU;
> begin
> inherited;
> // disabled crossbutton
> hMenuHandle := GetSystemMenu(Handle, FALSE);
> if (hMenuHandle <> 0) then
> EnableMenuItem (hMenuHandle, SC_CLOSE,MF_BYCOMMAND or
> MF_GRAYED);

> end;

> Takto resime edit. formy, aby user muset pouzit jen tlacika
> OK/Cancel.

> Jarek Uher

--
S pozdravem,
Petr Cafourek
mailto:petr.cafourek.d7(zv)seznam(tec)cz


Registrace D6

[*] Ing. Dubsky Jan <dubsky(zv)s-palava(tec)cz> - 15.10.2004 08:04:43

Z duvodu s Delphi nesouvosejicich jsem musel provest obnovu systemu pomoci
instalacni dislety windowsu - Windows XP Home (obnovu, nikoliv
preinstalaci). Po teto akci se ztratila registrace Delphi u Borlandu a to se
odmita spustit. Provedl jsem opakovanou registraci - na obrazovce vyskoci
okno s hlasenim
Congratulations - Your software has been successfully registered.
A pak delphi zahlasi chybu registrace a odmita se rozjet. Poradte, co se s
tim da delat?

like, case insensitive, cestina

[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 14.10.2004 23:16:05

Teda tohle mi jede:

select * from pokus where upper(id collate PXW_CSY) like '%C%';


--
Jiri Cincura
e-mail: mailto:jiri(zv)cincura.net; | http://www.cincura.net/
mailto:xcincura(zv)informatics.muni(tec)cz | http://photo.cincura.net/
ICQ#: 314711544 | http://phorum.cincura.net/
---
And if our times are difficult and perplexing,
so are they challenging and filled with opportunity.
-Robert F. Kennedy, 1961

like, case insensitive, cestina

[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 14.10.2004 23:10:05

ing. Petr Borkovec wrote:
> Dekuji za odpovedi Jirkovi, Tomasovi a Kalhousovi - nic ale nepomohlo.

Hele tohle funguje!!!!!!!!!!!!!!!!!!!!!!!!!!
select upper(id collate PXW_CSY) from pokus;

i diakritiku mi to prevedlo



--
Jiri Cincura
e-mail: mailto:jiri(zv)cincura.net; | http://www.cincura.net/
mailto:xcincura(zv)informatics.muni(tec)cz | http://photo.cincura.net/
ICQ#: 314711544 | http://phorum.cincura.net/
---
And if our times are difficult and perplexing,
so are they challenging and filled with opportunity.
-Robert F. Kennedy, 1961

like, case insensitive, cestina

[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 14.10.2004 23:08:04

No ale to nam porad neresi to, ze UPPER(sloupec) kde sloupec obsahuje
diakritiku neudela z ceskych znaku velke.

--
Jiri Cincura
e-mail: mailto:jiri(zv)cincura.net; | http://www.cincura.net/
mailto:xcincura(zv)informatics.muni(tec)cz | http://photo.cincura.net/
ICQ#: 314711544 | http://phorum.cincura.net/
---
And if our times are difficult and perplexing,
so are they challenging and filled with opportunity.
-Robert F. Kennedy, 1961

like, case insensitive, cestina

[*] Ing. Miroslav Vopalecky <m.vopalecky(zv)tiscali(tec)cz> - 14.10.2004 22:46:03

Ahoj.
Pro mlhave vyhledavani pouzivam ve spojeni s FireBirdem nasledujici kod
obsahujici NazevUdaje CONTAINING HledanyText:

procedure TfrmGrid.PodTextClick(Sender: TObject);
var st,st1,st2,st3,st4,st5,st6:string;
va1:variant;
begin
try
st:= InputBox('Zadani podmnoziny', 'Zadej hledany text:', '');
st1:=SQLKod;
st2:=DBGrid1.SelectedField.FieldName;
va1:=st;
if VarIsNull(va1) then
begin st4:='('+st2+' is null)'; end else begin st4:=va1; st4:='('+st2+'
CONTAINING '''+st4+''''+')'; end;
if SQLVyber<>'' then
begin st5:=' WHERE '+SQLVyber+' AND '+st4; SQLVyber:=SQLVyber+' AND
'+st4; end
else begin st5:=' WHERE '+st4; SQLVyber:=st4; end;
if SQLOrder<>'' then begin st6:=' ORDER BY '+SQLOrder; end else begin
st6:=''; end;
st3:=st1+st5+st6;
panel1.Caption:=st5+st6;
panel1.Repaint;
DM1.IBQZP01.SQL.Text:=st3;
DM1.IBQZP01.Close;
DM1.IBQZP01.Open;
repaint;
DM1.IBQZP01.fields.FindField(st2).FocusControl;
except
showmessage(self.Name+' Chyba podmnoziny.');
end;
end;
S pozdravem Mirek Vopalecky, D7 W2000

|-----Original Message-----
|From: delphi-l-owner(zv)clexpert(tec)cz
|[mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of ing. Petr Borkovec
|Sent: Sunday, November 14, 2004 10:00 PM
|To: delphi-l(zv)clexpert(tec)cz
|Subject: Re: like, case insensitive, cestina
|
|
|Dekuji za odpovedi Jirkovi, Tomasovi a Kalhousovi - nic ale
|nepomohlo. Mozna take neni muj dotaz jasny. Potrebuji
|prohledat pole tabulky typu varchar(1000), vyskyt nikoli jen
|na zacatku ale i uprostred retezce, v cestine (character set
|WIN1250), aby to bylo case insensitive.
|
|
|> Zkusil jsem, co napsal Tomas - to nepomohlo. Problem je
|zrejme v tom,
|> ze
|v
|> tom 'select * from tab_archiv where UPPER(OBSAH) LIKE '%TOTO
|JE TREBA
|> NAJIT%'' to UPPER(OBSAH)prevadi na velka pismena jen znaky bez
|diakritiky -
|> ale nevim, jak to vyresit.
|
|> Musis si udelat upper uz nad tim textem v aplikaci, tj. v
|C++ Builderu
|> hodnota1.text.UpperCase() predpokladam ze v Delphi je to to
|samy Tomas
|
|> > Delphi 7, InterBase WI - 06.0.1.6.
|> > Potrebuji prohledat pole tabulky, aby hledani bylo case
|insensitive
|> > a fungovalo v cestine. Pole je varchar(10000). Tabulku ctu
|> > komponentou IBQuery, pro hledani vkladam do jeji vlastnosti SQL
|> > 'select * from tab_archiv where UPPER(OBSAH) LIKE
|> > upper(_WIN1250'hodnota1.Text')',do
|> > hodnota1.text davam '%toto je treba najit%'.Takto je
|vysledek hledani
|case
|> > insensitive pro vsechna pismena s vyjimkou pismen s
|diakritikou, kde
|> > to zustava case sensitive. Mohl by nekdo poradit?

spusteni programu bez prihlaseni uzivatele

[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 14.10.2004 22:04:00

Matejcek Petr wrote:
> DD
>
> potreboval bych spustit svuj program po spusteni windows i kdyz se
> neprihlasi zadny uzivatel
>
> poradil by pls nekdo jak na to ?

Myslim, ze Service by ti mohla vyhovovat.

--
Jiri Cincura
e-mail: mailto:jiri(zv)cincura.net; | http://www.cincura.net/
mailto:xcincura(zv)informatics.muni(tec)cz | http://photo.cincura.net/
ICQ#: 314711544 | http://phorum.cincura.net/
---
And if our times are difficult and perplexing,
so are they challenging and filled with opportunity.
-Robert F. Kennedy, 1961

like, case insensitive, cestina

[*] ing. Petr Borkovec <petrborkovec(zv)volny(tec)cz> - 14.10.2004 21:59:59

Dekuji za odpovedi Jirkovi, Tomasovi a Kalhousovi - nic ale nepomohlo. Mozna
take neni muj dotaz jasny. Potrebuji prohledat pole tabulky typu
varchar(1000), vyskyt nikoli jen na zacatku ale i uprostred retezce, v
cestine (character set WIN1250), aby to bylo case insensitive.> Zkusil jsem, co napsal Tomas - to nepomohlo. Problem je zrejme v tom, ze
v
> tom 'select * from tab_archiv where UPPER(OBSAH) LIKE '%TOTO JE TREBA
> NAJIT%'' to UPPER(OBSAH)prevadi na velka pismena jen znaky bez
diakritiky -
> ale nevim, jak to vyresit.

> Musis si udelat upper uz nad tim textem v aplikaci, tj. v C++ Builderu
> hodnota1.text.UpperCase() predpokladam ze v Delphi je to to samy
> Tomas

> > Delphi 7, InterBase WI - 06.0.1.6.
> > Potrebuji prohledat pole tabulky, aby hledani bylo case insensitive a
> > fungovalo v cestine. Pole je varchar(10000). Tabulku ctu komponentou
> > IBQuery, pro hledani vkladam do jeji vlastnosti SQL 'select * from
> > tab_archiv where UPPER(OBSAH) LIKE upper(_WIN1250'hodnota1.Text')',do
> > hodnota1.text davam '%toto je treba najit%'.Takto je vysledek hledani
case
> > insensitive pro vsechna pismena s vyjimkou pismen s diakritikou, kde to
> > zustava case sensitive. Mohl by nekdo poradit?

spusteni programu bez prihlaseni uzivatele

[*] Matejcek Petr <konference(zv)crhov.komfi(tec)cz> - 14.10.2004 20:15:52

DD

potreboval bych spustit svuj program po spusteni windows i kdyz se
neprihlasi zadny uzivatel

poradil by pls nekdo jak na to ?

diky PM

Zjisteni lokalni IP

[*] Jakub Cermak <cermiforum(zv)centrum(tec)cz> - 14.10.2004 15:03:30

Vim, ze je to zacatecnicky dotaz, ale nejak na to nemuzu prijit. Mam
otevreny a funkcni serverovy UDP socket (nemyslim listening) a potrebuju
nejak zjistit lokalni IP adresu rozhrani, pres kterou pozadavek prisel.
Trochu sem hledal a nasel clanek "Getsockname() Returns IP Address 0.0.0.0
for UDP" http://support.microsoft.com/default.aspx?scid=kb;en-us;129065 na
MSDN, kde je napsany ze to nejde, coz se mi nezda, protoze jak se rika
vsechno jde kdyz se chce. Nevite nekdo jak na to??

Jakub Cermak
ja.cermi(zv)centrum(tec)cz


Mazani uzivatelskych nastaveni

[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 13.10.2004 23:00:24

Jiri Cincura wrote:
> Ahoj,
> jak resite, to, ze pri odinstalaci programu by melo byt vse smazano,
> tj. i to co je v po aplikaci v %appdata% (na NT+). Nechavate to tam?
> Smazete bez kecu vse/current usera? Nebo zobrazujete dotaz? << Jde toto
> nejak v InnoSetup (pro cureent zser by to snad slo, ale pro vsechny nevim
> jak)?

To to nikdo neresi??? :o

--
Jiri Cincura
e-mail: mailto:jiri(zv)cincura.net; | http://www.cincura.net/
mailto:xcincura(zv)informatics.muni(tec)cz | http://photo.cincura.net/
ICQ#: 314711544 | http://phorum.cincura.net/
---
And if our times are difficult and perplexing,
so are they challenging and filled with opportunity.
-Robert F. Kennedy, 1961

Vzdalena konfigurace programu

[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 13.10.2004 22:58:24

Michal Kuncl wrote:
> Zdravim,
> potrebuju nejak udelat vzdalenou konfiguraci jednoho sveho programu pres
> sit.
> Asi podle me nejlepsi reseni by bylo pres webovy browser - muj program by
> si na nejakem portu otevrel neco jako webovy server a cela konfigurace by
> se dela pres html stranky.
> Problem ovsem je, jak na to. Chci se tedy zeptat, jake mam pouzit
> komponenty pro vytvoreni serveru (pokud mozno free, ale to neni
> podminka), jaky mam pouzit port a jak zjistim, jestli na tom porte uz
> nebezi neco jineho?

Pekny priklad na webovy server je primo v distribuci Synapse
(www.ararat(tec)cz/synapse).

Co se tyka portu, pokud to je rozumna app. dal bych jako pozadavek, ze
nejaky port musi byt volny. Aby si pak admin vybral jen z nejaky treba 10
preddefinovanych. A sam zajistil, aby byl free. Take se mu to bude lepe
pamatovat nakonfiguraci.

A jinak i na jednoduchou konfiguraci bych doporucil metodu POST, lepe se s
tim bude pracovat a nebudes pro dalsi rozvoj omezovan. (I kdyz ja delal neco
podobneho pro kamarada a tam slo o nastaveni nekolika param., tak to
fungovalo tak, ze to bylo parametr.htm?hodnota a ja to jen jednoduse
parsoval, ale zadne HTML tam nebyly, musel to psat rucne).

--
Jiri Cincura
e-mail: mailto:jiri(zv)cincura.net; | http://www.cincura.net/
mailto:xcincura(zv)informatics.muni(tec)cz | http://photo.cincura.net/
ICQ#: 314711544 | http://phorum.cincura.net/
---
And if our times are difficult and perplexing,
so are they challenging and filled with opportunity.
-Robert F. Kennedy, 1961

Vzdalena konfigurace programu

[*] Michal Kuncl <spider_x(zv)quick(tec)cz> - 13.10.2004 22:42:23


Zdravim,
potrebuju nejak udelat vzdalenou konfiguraci jednoho sveho programu pres
sit.
Asi podle me nejlepsi reseni by bylo pres webovy browser - muj program
by si na nejakem portu otevrel
neco jako webovy server a cela konfigurace by se dela pres html stranky.
Problem ovsem je, jak na to. Chci se tedy zeptat, jake mam pouzit
komponenty pro vytvoreni
serveru (pokud mozno free, ale to neni podminka), jaky mam pouzit port a
jak zjistim,
jestli na tom porte uz nebezi neco jineho?


dik za radu / pomoc.

--
Zdravi Michal.

Licence GPL a uzavreny software

[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 13.10.2004 18:02:03

Myslim, ze po tomto vyroku, je pod moji uroven nadale pokracovat v
debate.

Slavek


>
> "stejne ti to ukradnu - mas si napsat lepsi licenci...."
>
>
> k tomu nemam co dodat....

Licence GPL a uzavreny software

[*] Petr Fejfar <development(zv)callnet(tec)cz> - 13.10.2004 17:52:03

Slavomir Skopalik wrote:

> Dobrym prikladem muze mysql, nebo interbase.

Nevim jak je to s licenci u IB/FB, ale MySQL je z tve strany hodne spatny
priklad: na http://www.mysql.com/company/legal/licensing/ je to receno
jasne:

If you distribute a proprietary application in any way, and you are not
licensing and distributing your source code under GPL,
you need to purchase a commercial license of MySQL.> Ale opravdu NIKDE v GPL nevidim, ze program (treba windows DLL) nesmi
> byt pouzit jinym programem.

Kdyz se ti nehodi do kramu knihovna, tak z knihovny udelas program
- fakt dobry... Ale i k pouziti programu existuje ve FAQ vyklad licensora:

I'd like to incorporate GPL-covered software in my proprietary system.
Can I dothis?

You cannot incorporate GPL-covered software in a proprietary system.
The goal of the GPL is to grant everyone the freedom to copy,
redistribute, understand, and modify a program.
If you could incorporate GPL-covered software into a non-free system,
it would have the effect of making the GPL-covered software non-free
too.

A system incorporating a GPL-covered program is an extended version
of that program. The GPL says that any extended version of the program
must be released under the GPL if it is released at all.
[...]
atd.atd.> Mimo jine, takova pravni perlicka, extenzivni vyklad prava je zakazan,
> tj. co neni explicitne zakazano, je povoleno.

O.K.

Takze ty, prestoze se zivis prodejem licenci k vlastnimu SW,
nejspis take vis, jake je poslani FSF a znas jeho vyklady
k vagnimu textu GPL a je ti asi jasne, ze kdyby ti chtel licensor uvolnit
DLL
k tebou obhajovanemu zpusobu pouziti, ze by tak ucinil licenci LGPL,
tak presto ses zakopal na pozici:

"stejne ti to ukradnu - mas si napsat lepsi licenci...."


k tomu nemam co dodat....


pf

Licence GPL a uzavreny software

[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 13.10.2004 14:27:41

> Proc se porad ohanis nejakym linkovanim, formou knihovny a
> dalsimi irelevantnostmi, kdyz licensor ve vykladu GPL jasne
> mluvi o jejim *uziti*
> a to primo v *run-time*?

Jenze to je prave ten problem. Ty jako autor SW nevis pod jakou licenci
BUDE
ta DLL, ktera bude pouzita. V tom je prave ten hacek.
Kdyz vezme delphi unitu, tak ji proste zakomponujes primo do programu,
tam je to jasne.
Ale kdyz napises, ze tvuj program pouziva knihovnu KOMPATIBILNI s necim,
tak to neco nemuze ovlivnit tvuj typ licence.

Jak ja mohu v run-time vedet, pod jakou licenci to DLL zrovna bude ?
Dobrym prikladem muze mysql, nebo interbase.

Napriklad:
V roce 1999 jsem napsal aplikace, ktere pouzivaly gds32.dll pod licenci
borlandu,
pak se zmenil server a zacal pouzivat FB, ale stejnou gds32.dll (stejny
nazev, stejne rohrani, jina licence).
Predstavme si, ze by byla pod GPL, znamena to, ze ten admin, co zmenil
server
me musi donit zverejnit SC a ze toho se muze soudne domoci (ma na to
pravo)?

Nedokazu si dost dobre predstavit, ze by nejaky pug in mohl menit
licenci neciho
dila BEZ souhlasu autora toho dila!

Tj. musel by text obsahovat neco na tento zpusob:
Uziti funkcionality je zakazano v techto pripadech ....

nebo Uziti funkcionality je povoleno v techto pripadech ....

Ale opravdu NIKDE v GPL nevidim, ze program (treba windows DLL) nesmi
byt pouzit jinym programem.

Takze:
Vsechny zdrojove kody, ktere jsou pouzity k vytvoreni tohoto programu
(teto DLL) musi by pod GPL.
O tom, kdo a jak tento program (DLL, pripona muze byt ruzna) smi
pouzivat zde neni nijak omezeno.

Jedinne, co by mohl byt problem, pokud by zalinkoval do sve aplikace
header pod licenci GPL, to by zcela
menilo situaci, ale jelikoz zrejme pouziva delphi, tak podobna vec
nehrozi.

Mimo jine, takova pravni perlicka, extenzivni vyklad prava je zakazan,
tj. co neni
explicitne zakazano, je povoleno.

Pokud bychom pokracovali v extensivnim vykladu GPL, tak bychom mohli
rici, ze kniohovna je cokoliv, co poskytuje
sluzby (funkce) a tudiz, kdyz pristoupim pomoci wgetu na stranky
kohokoliv, tak zadat o zverejneni zdrojovych kodu,
jelikoz mi umoznil pristoupuit z GPL produktu na ne GPL produkt.

Tohle by v normalnim pravnim state nemelo projit (to neznamena, ze to
neprojde, zvlaste u nas, kde je mozne opravdu vse).
Napriklad jsem na vlastni oci videl, jak soudce padelal pred myma ocima
chybejici dokumenty a ani mu to neprislo divne
(a zbavil me tim naroku na proplaceni usle mzdy).
Ale to je jina kapitola :(((

Slavek

Licence GPL a uzavreny software

[*] Petr Fejfar <development(zv)callnet(tec)cz> - 13.10.2004 13:25:36

Slavomir Skopalik wrote:

> Opet rikam, zamenovat linkovani s dynamickym linkovanim
> nelze

Priste uz to snad prelozim do cestiny ;-)

If a library is released under the GPL (not the LGPL), does that mean
that any program which uses it has to be under the GPL?

* Yes, because the program as it is actually run includes the library *

Proc se porad ohanis nejakym linkovanim, formou knihovny a dalsimi
irelevantnostmi, kdyz licensor ve vykladu GPL jasne mluvi o jejim *uziti*
a to primo v *run-time*?

pf

Licence GPL a uzavreny software

[*] Winsoft <winsoft(zv)netkosice.sk> - 13.10.2004 13:07:35

> Jenze pokud si autor NEPRAL, aby takto byl jeho kod pouzit, tak
> mohl vydat *.lib, nebo *.obj nebo neco podobneho.

IMHO to nie je tak. Priania autora su vyjadrene GPL licenciou
a nie typom kniznice.

Pozrel som do GPL licencie a moj pohlad na vec je taky:

1. GPL sa nevztahuje na pouzitie softwaru:

"Activities other than copying, distribution and modification are not
covered by this License; they are outside its scope. The act of
running the Program is not restricted, and the output from the Program
is covered only if its contents constitute a work based on the
Program (independent of having been made by running the Program).
Whether that is true depends on what the Program does."

2. GPL limituje obmedzenia odvodeneho softwaru ("work based
n the Program"), pricom odvodeny software vznikne modifikaciou
povodneho:

"You may modify your copy or copies of the Program or any portion
of it, thus forming a work based on the Program"...

Vtedy musi byt vsetko pod GPL-kom:

"b) You must cause any work that you distribute or publish, that in
whole or in part contains or is derived from the Program or any
part thereof, to be licensed as a whole at no charge to all third
parties under the terms of this License."

Takisto dalsi odstavec GPL-ka by mohol potvrdzovat, ze na iny
ako odvodeny softwar, sa GPL nijako nevztahuje:

"In addition, mere aggregation of another work not based on the Program
with the Program (or with a work based on the Program) on a volume of
a storage or distribution medium does not bring the other work under
the scope of this License."


Vychadza mi teda, ze POUZITIE nejakej GPL kniznice aj v komercnom
softwari by mohlo byt OK, akurat do tej kniznice netreba babrat
(v sirsom vyzname, teda inom ako "pouzitie") aby nevznikol "work
based on the Program". A takisto sa treba vyhnut distribucii. Samozrejme
to je len moje laicke a mozno aj nespravne vysvetlenie si tej licencie,
mozno je to inak. Urcite najlepsie bude opytat sa priamo autora
prislusneho softwaru a s nim vsetky sporne veci dohodnut.

Erik


Licence GPL a uzavreny software

[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 13.10.2004 12:03:31

Jenze pokud si autor NEPRAL, aby takto byl jeho kod pouzit, tak
mohl vydat *.lib, nebo *.obj nebo neco podobneho.

Pokud autor vyda program (byt s priponou DLL), tak nevidim jedinny
duvod se ptat, jelikoz bych to jako autor povazoval za obtezovani
(stacil mi jeden "zakaznik", ktery se takto dozadoval informaci
o jednom s produktu, ktere mam volne ke stazeni, kdyby tohle
udelal kazdy, tak bych asi prestal davat cokoliv volne ke stazeni).

Neco jineho je, pokud by autor licenci pozmenil a ZAKAZAL jakekoliv
uziti kodu jakymkoliv zpusobem v komernim projektu, nebo ji nejak
omezil.

Opet rikam, zamenovat linkovani s dynamickym linkovanim
nelze a proto je treba zkontrolovat licenci, jestli nebrani
uziti dila jako takoveho (napriklad Eagle ma licenci, kde
je mozne bezplatne uziti dila pouze pokud neslouzi k generovani
zisku v opacnem pripade je treba zakoupit licenci) v placenem
a/nebo uzavrenem produktu.

V kazdem pripade je vsak nutno od sebe oddelovat vlastni program
a prislusnou DLL (jiny produkt), aby nemohl dojit k zamene.
Napriklad tak, ze se bude kazda cast instalovat samostatne, nebo
uzivatel bude schvalovat DVE licence a bude informovan, ze tento
produkt pro svoji cinnost vyuziva GPL produktu xxxxx.

Napriklad ja takto resim spolupraci meho programu s PHP (php.exe),
kdy v about boxu je uvedeno, ze program pro svoji cinnost vyuziva
.....

Pokud si chce byt tazatel uplne jist, zapouzdri prislusnou DLL
do webove sluzby, nebo podobne veci (COM,DCOM, ...)
a zdrojaky zverejni (prida k projektu) a ma uplny klid.

Podle meho soukromeho nazoru by ale bylo pro projekt mnohem prinosnejsi,
kdyby misto investovani casu do uklidnovani prava tento cas investoval
do zlepsovani produktu.

Slavek

> Za vsemi nazory obhajujicimi legalnost takoveho pouziti je
> IMO jediny argument, a to ze existuje sance, ze licensor vzhledem
> k vagnosti textu GPL nebude schopen sva prava obhajit,
> pripadne se o to ani nebude pokouset,
> pricemz ignoruji podstatu GNU projektu:
>
> 1. GPL byla vydana za ucelem zajistit svobodny SW.
> Tim, ze postavis non GPL program na GPL knihovne, odeberes nektere
> svobody jeho uzivatelum a tim IMO porusujes licenci resp.
> umysl licensora
>
> 2. Kdyby GPL umoznovala pouziti knihovny v non GPL programu,
> tak proc by FSF vydavala jeste LGPL, ktera bezpochyby
> resi tyto pripady?
>
> 3. Text GPL je sice vagni, ale autor textu v jeho vykladu
> (viz vyse) *jasne* rika, ze takove pouziti je ilegalni.

filtr podle numericke hodnoty

[*] Jan Novak <delfin4(zv)volny(tec)cz> - 13.10.2004 11:51:29

> '(Castka LIKE :p4) Order by Datum, Firma');

> IBQuery1.ParamByName('p4').AsString := editCastka.Text + '%';

> v DB je pole 'Castka' typu Numeric(6,2)

Bud ten parametr davej .AsFloat, nebo v SQL prikazu hodnotu pole
'Castka' explicitne preved na retezec. Umi tvuj databazovy stroj
pouzit LIKE na Numeric?

Licence GPL a uzavreny software

[*] Petr Fejfar <development(zv)callnet(tec)cz> - 13.10.2004 10:43:24

Pospisil Jan wrote:

> Distribuj jen svuj kod s upozornenim, ze pro svou fci potrebuje
> nejake dalsi proprietalni reseni a pak muzes vse hodit dohromady a
> nebude to GPL odporovat.

Uz se opakuji: na to jsi prisel jak?

FSF (Free Software Foundation - autor GPL licence)
ve FAQ (http://www.fsf.org/licenses/gpl-faq.html)
o pouziti knihovny publikovane pod GPL pise:

If a library is released under the GPL (not the LGPL), does that mean
that any program which uses it has to be under the GPL?

* Yes, because the program as it is actually run includes the library ****

Za vsemi nazory obhajujicimi legalnost takoveho pouziti je IMO jediny
argument, a to ze existuje sance, ze licensor vzhledem
k vagnosti textu GPL nebude schopen sva prava obhajit,
pripadne se o to ani nebude pokouset,
pricemz ignoruji podstatu GNU projektu:

1. GPL byla vydana za ucelem zajistit svobodny SW.
Tim, ze postavis non GPL program na GPL knihovne, odeberes nektere
svobody jeho uzivatelum a tim IMO porusujes licenci resp.
umysl licensora

2. Kdyby GPL umoznovala pouziti knihovny v non GPL programu,
tak proc by FSF vydavala jeste LGPL, ktera bezpochyby
resi tyto pripady?

3. Text GPL je sice vagni, ale autor textu v jeho vykladu
(viz vyse) *jasne* rika, ze takove pouziti je ilegalni.***

Proto vnimam pouziti GPL kodu v non GPL projektu bez souhlasu jeho autora
(bez ohledu na formu) prinejmensim za nemravne.


pf

Alt + F4 a Ctrl + Alt + Del

[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 13.10.2004 00:36:40

Bronislav Klucka wrote:
> To nejde, jediny prepsat si gina.dll a to neni zrovna sranda... takze to
> nejde.

Ja to zkousel. A nahodou je to velka sranda. ;-) Ale chce to jeste jeden
stroj na testovani.

No a muj vysledek byl zadny. Nic moc se mi nepodarilo rozchodit. :) A hlavni
problem je s tim, ze ne kazdy chce mit potecialni diru v systemu.

--
Jiri Cincura
e-mail: mailto:jiri(zv)cincura.net; | http://www.cincura.net/
mailto:xcincura(zv)informatics.muni(tec)cz | http://photo.cincura.net/
ICQ#: 314711544 | http://phorum.cincura.net/
---
And if our times are difficult and perplexing,
so are they challenging and filled with opportunity.
-Robert F. Kennedy, 1961

Alt + F4 a Ctrl + Alt + Del

[*] Bronislav Klucka <bronislav.klucka(zv)pro2-soft(tec)com> - 12.10.2004 18:22:14

To nejde, jediny prepsat si gina.dll a to neni zrovna sranda... takze to
nejde.

Brona

>D6 Pro, Win2K a WinXP
>
>Zdravim vsechny,
> vim, ze je to banalita, ale nevite nekdo prosim, jak zakazat v
>aplikaci stisk klave Alt + F4 a Ctrl + Alt + Del?
> Nasel jsem neco na internetu, ale vubec to nefunguje.
>
>S pozdravem,
> Petr Cafourek
> mailto:petr.cafourek.d7(zv)seznam(tec)cz
>
>
>
>

Alt + F4 a Ctrl + Alt + Del

[*] Jaroslav Uher <jarek(zv)iuher(tec)cz> - 12.10.2004 18:22:14

On 12 Nov 2004 at 16:18, Petr Cafourek wrote:

> D6 Pro, Win2K a WinXP
>
> Zdravim vsechny,
> vim, ze je to banalita, ale nevite nekdo prosim, jak zakazat v
> aplikaci stisk klave Alt + F4 a Ctrl + Alt + Del?

Alt+F4 bych vedel
v OnCreate:

var
hMenuHandle: HMENU;
begin
inherited;
// disabled crossbutton
hMenuHandle := GetSystemMenu(Handle, FALSE);
if (hMenuHandle <> 0) then
EnableMenuItem (hMenuHandle, SC_CLOSE,MF_BYCOMMAND or
MF_GRAYED);

end;

Takto resime edit. formy, aby user muset pouzit jen tlacika
OK/Cancel.

Jarek Uher

Licence GPL a uzavreny software

[*] Ludek ZITA <konference(zv)sales(tec)cz> - 12.10.2004 18:32:15

On Behalf Of Tomas Rosa
> Jinymi slovy, pokud tedy nekdo napise sebelepsi sw, ale pod
> licenci GPL, je
> vpodstate pro jakekoliv dalsi vyuziti mrtvej.Takze i presto
> ze ja delam
> svuj sw, ktery nehci distribuovat i se zdrojakama, tak nemuzu
> vpodstate
> nabidnout uzivatelum rozsirit moznost tohoto meho SW o nejake
> dalsi fce z
> dilny opensource, protoze to autor pohrbil pod GPL.
>
> Typicky konkretni puvodni dotaz byl na pouziti antiviroveho
> programu ClamAV
> v mem SW, jako alternativa k AVG API. Takze tedy uzivatele
> nutme k pouziti
> dalsiho placeneho SW, i presto ze existuje kvalitni nahrada
> pro tyto ucely,
> ale BOHUZEL pod GPL.

Ahoj.
IMHO volani nejakeho jineho programu pres jeho rozhrani
neni_soucast_tveho_dila.
Pokud uzivatel legalne nabyde ClamAV a ty budes volat jeho DLL melo by
to byt v poradku.

Ludek


Alt + F4 a Ctrl + Alt + Del

[*] Petr Cafourek <petr.cafourek.d7(zv)seznam(tec)cz> - 12.10.2004 16:18:04

D6 Pro, Win2K a WinXP

Zdravim vsechny,
vim, ze je to banalita, ale nevite nekdo prosim, jak zakazat v
aplikaci stisk klave Alt + F4 a Ctrl + Alt + Del?
Nasel jsem neco na internetu, ale vubec to nefunguje.

S pozdravem,
Petr Cafourek
mailto:petr.cafourek.d7(zv)seznam(tec)cz


efektivni prace se souborem

[*] Karel Kral <kralkonf(zv)purus(tec)cz> - 12.10.2004 16:14:03

TFileStream nebo BlockRead vyjde vykonove nastejno. TFileStream je
"modernejsi".

david.kopecek(zv)hacktrack.com napsal(a):
> Dobry den,
> LG> A proc to neukladas rovnou do filestreamu?
>
> hmm skusim to bude asi nejlespi... co by se stalo vprpade ze vlakno
> spadne zustanou ulozena data ve file streamu /
>
> nebylo by lepsi pouzivat beznej file a pres blockread a blockwrite s
> nim pracovat ?
>
>
>


--
______________________________________________________
Karel Kral, vedouci odd. IT / IT manager
Purus, s.r.o., Cezavy 627, 664 56 Blucina, CZ
Tel: 547 235 000, 602 552 432, Fax: 547 231 203
E-Mail: mailto:kral(zv)purus(tec)cz, WWW: http://www.purus(tec)cz
______________________________________________________


Licence GPL a uzavreny software

[*] Bronislav Klucka <bronislav.klucka(zv)pro2-soft(tec)com> - 12.10.2004 15:18:00

Jak svuj kod? ja to DLL ko nehodlam nijak menit, ja ho hodlam rovnou
vyuzit a zdrojaky, ktere ho budou vyuzivat sdilet prozatim neminim.

Brona

>Distribuj jen svuj kod s upozornenim, ze pro svou fci potrebuje nejake dalsi proprietalni reseni a pak muzes vse hodit dohromady a nebude to GPL odporovat.
>
>
>

Firebird a cas/datum v SQL dotazu

[*] Jiri Rocnak <rocnak(zv)admiscz(tec)net> - 12.10.2004 15:05:59

No, uz jsem zjistil vo co go.
V te databazi (strukturu jsem nevytvarel ja) byla polozka, ve ktere je
ulozeno datum typu Numeric(x,y) a proto nejelo to 'now' - nesoulad typu.
Bohuzel z chybove hlasky mi to nebylo zcela jasne.
Jinak dekuji za napady.

J.

Licence GPL a uzavreny software

[*] Pospisil Jan <j.pospisil(zv)aquasoft(tec)cz> - 12.10.2004 14:55:58

> Zdar,
> mam zdrojaky v C++ (to bych si prelozil) k dllku licencovane
> jako GPL,
> je nejaka moznost, jak to zamontovat do uzavreneho (a placeneho)
> software? Nejaka cesticka?

Distribuj jen svuj kod s upozornenim, ze pro svou fci potrebuje nejake dalsi proprietalni reseni a pak muzes vse hodit dohromady a nebude to GPL odporovat.

Licence GPL a uzavreny software

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 12.10.2004 14:27:56

On Friday, November 12, 2004 11:55 AM [CET], Petr Fejfar
<development(zv)callnet(tec)cz> wrote:

> Slavomir Skopalik wrote:
>
>> Jenze tohle se tyka statickeho linkovani,
>> nebo primeho pouziti zdrojovych kodu.
>> Jenze DLL je dynamicky linkovana a proto ji lze takto pouzit.
>
> A na to jsi prisel jak? AFAIK, GPL zadne takove ustanoveni
neobsahuje

kdyby nebylo mozne sdilene knihovny pouzit v komercni aplikaci, zadne
komercni/non-GPL aplikce (napriklad Kylix) by na Linuxu existovat
nemohly. Nebo jsou vsechny .so pod non-GPL licenci?

Dalibor Toman

AVG rozhrani (Re: Licence GPL a uzavreny software)

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 12.10.2004 14:23:55

DD,

On Friday, November 12, 2004 11:43 AM [CET], Lukas Gebauer
<gebylist(zv)mlp(tec)cz> wrote:

>> spatna licence, nejhorsi, co snad existuje. Pokud bych si to mohl
>> koupit, koupim (uz jednam s grisoftem, AVG misto ClamAV), ale toto
si
>
> Mimochodem.. ziskat rozhrani od Grisoftu neni problem. Ovsem to
> jejich silene rozhrani pouzivat z Delphi, to uz problem je! :-(

AVG6kove rozhrani v Delphi chodi relativne bez problemu (po rozebehani
:-) , je nutne prepsat par C headeru do Delphi) - pouziva COMy. AVG7 v
Delphi nikdo nativne nerozebeha, protoze veskere objekty (pokud tam
jeste jsou) jsou nyni zapouzdreny a totalne pohrbeny uvnitr .LIB
knihoven, ktere je nutno prilinkovat k aplikaci/DLLku. Jelikoz se
jedna o Microsoft COFF format objektu neni mozne je do Delphi kodu
prilinkovat (resp. nenasel jsem zadny zpusob). Cili bud je nutne
napriklad napsat v MS VC++ DLL, kterou bude teprve Delphi kod volat.
Mimochodem p. Prazak z Grisoftu mi nabizel, ze by Grisoft mohl
zapouzdrit ty .LIB pomoci COM objektu (podobne jako je to v AVG6) -
pokud by bylo vice zajemcu, mozna by do toho meli vice chuti :-)

Btw: AVG6 API funguje i s AVG7 (ma par DLL pro zajisteni zpetne
kompatibility) a AVG7 API zase umi pracovat i s AVG6 :-)

Zdravi
Dalibor Toman

Licence GPL a uzavreny software

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 12.10.2004 14:15:55

On Friday, November 12, 2004 11:37 AM [CET], Vaclav Halik
<spravasd(zv)suz.cvut(tec)cz> wrote:

> Zdravim,
>
>> Ahoj,
>> tim se dostavame zpet k ememu puvodnimu problemu:
>> pokud si tedy vezmu zdrojaky ClamAV, zkompiluju si
>> je do DLL a Delphi si napisu sadu funkci pro volani tohoto
>> DLL, tak to mohu pouzit?
>>
>> Brona
>
> ne toto nejde. DLL je soucasti tveho programu.
> Samotna DLL je k nicemu. Funkcni hodnotu ziskava az ve tvoji
> aplikaci. Tedy bez poruseni GPL NEJDE pouzit.

tu DLL lze pouzit v jakemokoliv dalsim programu, ktery zna jeji
rozhrani

> Udelej si frontend pro tuto knihovnu, ten vydej pod GPL.
> Tak aby to byl samostatny SW, a pak jej muzes treba pres
> prikaz nebo nejakou formu komunikace ovladat z tveho
> komercniho SW. GPL nezakazuje koexistenci takovychto
> celku, ale rika ze nesmis pouzivat GPL do ne GPL SW.

ten frontend na tom je stejne jako ta knihovna taky jde/nejde pouzit
mimo aplikaci pokud znam/neznam jeho komunikacni protokol.

Cili pokud je obaleni funkce napriklad do GPL serveru poslouchajiciho
na TCP portu prijatelne reseni, pak musi byt podle teto logiky i ta
DLL. Muzu ji kdykoliv vydavat za samostatny balik, ktery neni nedilnou
soucasti me aplikace (muzu mit dalsi DLL/plugin pro komunikaci s
dalsim antivirem).
Zdravi
Dalibor Toman

Firebird a cas/datum v SQL dotazu

[*] Jaroslav Uher <jarek(zv)iuher(tec)cz> - 12.10.2004 14:11:54

On 12 Nov 2004 at 11:11, Jiri Rocnak wrote:

> Nejak se mi nedari.
> Uz jsem z toho volaaky zmeteny.
> Dospel jsem tak daleko, ze bych se spokojil i s casem stanice,

za prve: proc stanice?
Tam si muze kazdy nastavit, co chce.
S tim si moc nepomuzes :-)
Rozhodne doporucuji DateTime ze serveru (SP nebo trigger).

> jal jsem se tedy pridat do dotazu parametr a ejhle, zase nic:
>
> with DSet.Params.CreateParam(ftDate,'Datum',ptInput) do asDate :=
> Date; nebo with DSet.Params.CreateParam(ftDateTime,'Datum',ptInput) do
> asDateTime := Now;
>
> Vypisuje chybu: Conversion error from string "2004-11-12"
>
> Typy jsou prece spravne. ?????

co je DSet ?

u TIBSQL :
IBSQL1.Params[2].AsDateTime := Now;

neni problem

Jarek Uher

FB embeded

[*] Dalibor <dalibor(zv)torola(tec)cz> - 12.10.2004 13:41:52

Jsi celkem skoupy na informace. Jake komponenty napriklad pouzivas pro
pristup k databazi.
Pokud IBX, tak knihovnu fbembed.dll budes muset prejmenovat na
gds32.dll.(Mozna se daji opravit zdrojace, ale to jsem netestoval)
Pokud FibPlus, tak u komponenty pFibDatabase nastav propery LibraryName na
fbclient.dll.> Moc se omlouvam,
> asi jsem uplne blbej, ale uz nekolik dnu hledam jak zprovoznit FB embeded,
> ale nejak se mi to nedari najit a nemuzu se zbavit pocitu, ze to je uplne
> trivialni.
> Poprosim Vas o ukazani smeru.
>
> Diky
>
> Jirka
> D7 prof, WinXP
>
>
>

Licence GPL a uzavreny software

[*] Jiri Fait <develop(zv)lmss(tec)cz> - 12.10.2004 13:13:50

> Proc kazdy radeji vymysli, jak kdeco a kdekoho ocurat, misto
> aby sam neco vyvinul nebo zaplatil?

Pak ti co si software legelne plati, nestaci koukat jak jde "konkurence" pod
cenu..........

Licence GPL a uzavreny software

[*] Petr Fejfar <development(zv)callnet(tec)cz> - 12.10.2004 13:07:48

Slavomir Skopalik wrote:

> This General Public License does not permit incorporating your program
> into proprietary programs. If your program is a subroutine library,
> you may consider it more useful to permit linking proprietary
> applications with the library. If this is what you want to do, use
> the GNU Lesser General Public License instead of this License.
>
> Opravdu zde nevidim nic, co by branilo DYNAMICKEMU linkovani, jelikoz

Nejak ti stale unika to sluvko LESSER ;-)

pf


Licence GPL a uzavreny software

[*] Ondrej Kelle <o.kelle(zv)digitalpublishing.de> - 12.10.2004 12:41:47

> Jinak, jestli se pouziva dynamicke linkovani, tak dilo NENI odvozeno.
> To by pak mohlo byt odvozeno cokoliv od cehokoliv.

Zda sa, ze na toto existuju rozne nazory:
"Should programs that link to GPL'ed DLLs from GnuWin32 also be released
under the GPL?"
http://gnuwin32.sourceforge.net/faq.html#faq9

HTH
TOndrej

Licence GPL a uzavreny software

[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 12.10.2004 12:33:46

Staci si precist root(tec)cz :)).

Jinak, jestli se pouziva dynamicke linkovani, tak dilo NENI odvozeno.
To by pak mohlo byt odvozeno cokoliv od cehokoliv.

Dynamicke linkovani znamena, ze autor ani NEMUSI znat v okamziku
likovani jaka DLL bude pouzita.
Proste muze dat do ini nazev knihovny jaka se ma pouzit.

Vsechny spory ohledne poruseni GPL, ktere jsem zatim zaznamenal, byly
pouze v pripadech STATICKEHO linkovani GPL kodu do proprietarni
aplikace.

Proste na DLL je treba pohlizet jako na samostatny program (a to take
je).

Slavek

> > Jenze tohle se tyka statickeho linkovani,
> > nebo primeho pouziti zdrojovych kodu.
> > Jenze DLL je dynamicky linkovana a proto ji lze takto pouzit.
>
> A na to jsi prisel jak? AFAIK, GPL zadne takove ustanoveni neobsahuje
>

Licence GPL a uzavreny software

[*] Jiri Foldyna <jiri.f(zv)avizo(tec)cz> - 12.10.2004 12:27:45

Zajimavy problem. Celkem vzato si myslim, ze klicove sluvko v licenci je
CONTAINS. Pokud ma aplikace NEOBSAHUJE ZADNY kod publikovany pod GLP
licenci, GPL licenci ani neobchazim, ani nezneuzivam. Jestlize ze sveho
programu volam API OS, parsuju vystupy nejakeho frontenda nebo volam API
libovolne DLL, pak si nemyslim, ze by moje aplikace OBSAHOVALA OS, frontend
nebo DLL. Z toho odvozuji, ze volani (=vyuzivani) funkci jakekoli dostupne
DLL instalovane na pocitaci neni porusenim GPL licence. Pak staci zajistit,
aby se potrebna DLL knihovna vyskytovala v pocitaci na mi znamem miste a je
vymalovano.
Hnidopich by mohl namitnout, ze je tam jeste slovicko DERIVED, ale to je
IMHO na jednoznacne soudy prilis mlzive, jelikoz takhle bych nemohl pouzit
ani soucet dvou integeru, aniz by nekdo nezacal namitat, ze to publikoval
pod GPL licenci v nejakem programu...

Zdravim

Jiri Foldyna

> > > Jenze DLL je dynamicky linkovana a proto ji lze takto pouzit.
> >
> > A na to jsi prisel jak? AFAIK, GPL zadne takove ustanoveni
> neobsahuje
>
> Pridavam se. Taky by mne to zajimalo.
> IMHO GPL je unixova licence a i kdyby to tam bylo jak definujes DLL ?
>
> Je v aplikaci nalinkovano staticky ? Tedy aplikace pocita s konkretni
> verzi knihovny a odkazuje primo na misto v knihovne,
>
> nebo dynamicky a pak odkazuje jen na urcitou mnozinu funkci nekde
> v nejake knihovne ?
>
> Uvazim-li ze pouzivas konkretni knihovnu a konkretni funkce pak sem
> trochu na vazkach a nejsem si upne jisty tou dynamicnosti z toho
> unixoveho/GPL pohledu.

Licence GPL a uzavreny software

[*] Vaclav Halik <spravasd(zv)suz.cvut(tec)cz> - 12.10.2004 11:49:42

> jenze uznej sam, ze pokud existuje k tomu programu DLL ktere je rychle a
> nenarocne a zvladne desitky operaci / sec, pak je to dobre. A pokud pouziju
> temp. soubory, volani konzole, parsovani vystupu,... ...pak me to pripada
> jako "zpatky na sromy a do jeskyni". Takze stale trvam na tom, ze udelat

Naprosty souhlas.

> btw: nejsem proti "opensource" - ba naopak, ale povazuji GPL za dost
> nestatny krok pokud se jedna o knihovny, komponenty,...

Tak tak. Ono je to spise o autorech nez o samotnem opensource.
Soudny autor nepouzije uz z principu na knihovnu GPL ale sahne
po LGPL nebo nejake licenci z rodiny BSD.

Vaclav Halik

NULL vo FastReport

[*] Matej Sukenik <mtssoftware(zv)orangemail.sk> - 12.10.2004 11:53:42

Ale ako? Hm... To som tiez skusal ale nepomohlo.
Mozno som to spravil zle...
Proste ak jedna tabulka je prazdna nepomaha nic...

Diky za info este to nejako skusim

-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz] On
Behalf Of Miso
Sent: Friday, November 12, 2004 9:15 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: NULL vo FastReport

----- Original Message -----
From: "Matej Sukenik" <mtssoftware(zv)orangemail.sk>> Nastavil som convertnull na true aj tak to nepomohlo.
> Ako prinutit FR aby bral NULL ako 0?
>

..skus sa pohrat s "formatom premennej" daneho TfrMemoView..
M.

Licence GPL a uzavreny software

[*] Vaclav Halik <spravasd(zv)suz.cvut(tec)cz> - 12.10.2004 12:09:44

> > Jenze DLL je dynamicky linkovana a proto ji lze takto pouzit.
>
> A na to jsi prisel jak? AFAIK, GPL zadne takove ustanoveni neobsahuje

Pridavam se. Taky by mne to zajimalo.
IMHO GPL je unixova licence a i kdyby to tam bylo jak definujes DLL ?

Je v aplikaci nalinkovano staticky ? Tedy aplikace pocita s konkretni
verzi knihovny a odkazuje primo na misto v knihovne,

nebo dynamicky a pak odkazuje jen na urcitou mnozinu funkci nekde
v nejake knihovne ?

Uvazim-li ze pouzivas konkretni knihovnu a konkretni funkce pak sem
trochu na vazkach a nejsem si upne jisty tou dynamicnosti z toho
unixoveho/GPL pohledu.

Vaclav Halik

FB embeded

[*] Jiri Baudys <konference(zv)baudys.name> - 12.10.2004 11:57:43

Moc se omlouvam,
asi jsem uplne blbej, ale uz nekolik dnu hledam jak zprovoznit FB embeded,
ale nejak se mi to nedari najit a nemuzu se zbavit pocitu, ze to je uplne
trivialni.
Poprosim Vas o ukazani smeru.

Diky

Jirka
D7 prof, WinXP

Licence GPL a uzavreny software

[*] Petr Fejfar <development(zv)callnet(tec)cz> - 12.10.2004 11:55:43

Slavomir Skopalik wrote:

> Jenze tohle se tyka statickeho linkovani,
> nebo primeho pouziti zdrojovych kodu.
> Jenze DLL je dynamicky linkovana a proto ji lze takto pouzit.

A na to jsi prisel jak? AFAIK, GPL zadne takove ustanoveni neobsahuje

pf


Licence GPL a uzavreny software

[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 12.10.2004 11:45:41

Jenze,
tohle se tyka statickeho linkovani, nebo primeho pouziti zdrojovych
kodu.
Jenze DLL je dynamicky linkovana a proto ji lze takto pouzit.
Takze pokud udelam nejakou upravu teto DLL, tak ji MUSIM zverejnit.
Ale pokud tuto DLL budu volat ze sve aplikace (aplikace NEMUSI
v okamziku kompilace vedet, ze se jedna o tuto konkretni dll), tak je
vse v poradku.
Napriklad pokud by jsi misto DLL linkoval obj, tak uz MUSIS zverejnit.

Slavek

> b) Musite umoznit, aby jakekoliv vami publikovane ci
> rozsirovane dilo, ktere obsahuje zcela nebo zcasti program
> nebo jakoukoli jeho cast, popripade je z programu nebo jeho
> casti odvozeno, mohlo byt jako celek bezplatne poskytnuto
> kazde treti osobe v souladu s ustanovenimi teto licence.
>
> Takze IMHO vsechno co na GPL postavis musis pulbikovat zase
> jen pod GPL v duchu myslenky svobodneho SW, viz treba www.gnu(tec)cz
>
> pf
>

Licence GPL a uzavreny software

[*] Bronislav Klucka <bronislav.klucka(zv)pro2-soft(tec)com> - 12.10.2004 11:45:41

Ahoj,
cili musim napsat aplikaci, ktera bude pouzivat ClamAV
(proste nejakej antivir), ty aplikaci vydat pod GPL
a udelat z ni nejaka API volani, ktera budou verejne dostupna
a dalsi program (proprietarni) si je muze volat a potom tedy budu volat
tato API ze sveho programu.
???? tak to je?

Brona

>
> ne toto nejde. DLL je soucasti tveho programu.
> Samotna DLL je k nicemu. Funkcni hodnotu ziskava az ve tvoji
> aplikaci. Tedy bez poruseni GPL NEJDE pouzit.
>
> Udelej si frontend pro tuto knihovnu, ten vydej pod GPL.
> Tak aby to byl samostatny SW, a pak jej muzes treba pres
> prikaz nebo nejakou formu komunikace ovladat z tveho
> komercniho SW. GPL nezakazuje koexistenci takovychto celku,
> ale rika ze nesmis pouzivat GPL do ne GPL SW.
>
> Jine reseni mne nenapada. Jak uz pasl Petr je to ale jen jina
> forma obchazeni licence.
>
> Vaclav Halik
>
>
>
>
>

Licence GPL a uzavreny software

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 12.10.2004 11:21:39

Puvodni zprava ze dne 12.11.2004:

> Pozor, tady vznika casty omyl. Samozrejme muzes pouzit ve sve
> aplikaci/baliku GPL software. Zalezi, ale na zpusobu jak jej
> zaclenis. Tedy pokud vezmes treba gunzip a zclenis ho do svoji
> aplikace tak, ze tvoje aplikace vola konzolovy gunzip. A ty tento
> gunzip v podstate jenom ovladas pres svuj frontend pak muzes tento
> SW pouzit. Nemuzes ho ale pouzit tak ze by jsi natvrdo nalinkoval do
> sveho SW nejakou knihovnu gunzipu.

> Rozdil je doufam zrejmy. Tento zpusob v podstate obchazeni GPL je
> pomerne casty na unixu. Je bezne ze mas treba palici SW pod GPL
> (frontend) a vlastni driver pod nejakou uzavrenou licenci.
> Samozrejme i opacne kdy mas treba komercni zalohovaci SW ale pouziva
> pro zalohovani na pasku radkovy program tar.

Proc kazdy radeji vymysli, jak kdeco a kdekoho ocurat, misto aby sam
neco vyvinul nebo zaplatil?

Petr Zahradnik, pocitacovy expert

==========================================================
Petr Zahradnik, Computer Laboratory


web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz

==========================================================

ANSI vs. ASCII

[*] Ivan Kozak <ivan(zv)boucek(tec)cz> - 12.10.2004 11:21:38

NEviete mi niekto poradit v tejto pravdepodobne jednoduchej veci?

Exportujem z Interbase ('lc_ctype=WIN1250') do textoveho suboru.
Vynasa mi to v ANSI kode, ale ja by som to potreboval ulozit v ASCII kode.

Dik. Ivan KOzak

AVG rozhrani (Re: Licence GPL a uzavreny software)

[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 12.10.2004 11:43:41

> spatna licence, nejhorsi, co snad existuje. Pokud bych si to mohl
> koupit, koupim (uz jednam s grisoftem, AVG misto ClamAV), ale toto si

Mimochodem.. ziskat rozhrani od Grisoftu neni problem. Ovsem to
jejich silene rozhrani pouzivat z Delphi, to uz problem je! :-(

Otazka do plena... povedlo se to nekomu? Me to pripadlo tak silene,
ze jsem to radeji vzdal.


--
Lukas Gebauer.

E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.

Licence GPL a uzavreny software

[*] Vaclav Halik <spravasd(zv)suz.cvut(tec)cz> - 12.10.2004 11:37:40

Zdravim,

> Ahoj,
> tim se dostavame zpet k ememu puvodnimu problemu:
> pokud si tedy vezmu zdrojaky ClamAV, zkompiluju si
> je do DLL a Delphi si napisu sadu funkci pro volani tohoto
> DLL, tak to mohu pouzit?
>
> Brona

ne toto nejde. DLL je soucasti tveho programu.
Samotna DLL je k nicemu. Funkcni hodnotu ziskava az ve tvoji
aplikaci. Tedy bez poruseni GPL NEJDE pouzit.

Udelej si frontend pro tuto knihovnu, ten vydej pod GPL.
Tak aby to byl samostatny SW, a pak jej muzes treba pres
prikaz nebo nejakou formu komunikace ovladat z tveho
komercniho SW. GPL nezakazuje koexistenci takovychto
celku, ale rika ze nesmis pouzivat GPL do ne GPL SW.

Jine reseni mne nenapada. Jak uz pasl Petr je to ale jen jina
forma obchazeni licence.

Vaclav Halik

Licence GPL a uzavreny software

[*] Bronislav Klucka <bronislav.klucka(zv)pro2-soft(tec)com> - 12.10.2004 11:33:40

Pri vsi ucte si myslim, ze Tvoje zprava ma pro me nulovou informacni hodnotu
(jako pro kazdeho jineho), takze do konference nepatri...
Ale dobra, ano, snazim se obejit licenci, protoze si myslim,
ze GPL je spatna licence, nejhorsi, co snad existuje. Pokud bych si
to mohl koupit, koupim (uz jednam s grisoftem, AVG misto ClamAV),
ale toto si nemuzu ani koupit, ani nic. A ja proste nechci uvolnovat
zdrojaky
a nehodlam produkt v plne verzi davat zadarmo, takze pokud je cesta, jak
GPL obejit, obejdu ji (je to TA licence).

Bronislav Klucka

BTW. me prosim vynech, neznas me, takze me vynech ze svych
pripominek, ja se Ti take nesveruji co si o Tobe myslim.>
> Jinak vidim, ze vymyslis, jak obejit licenci. To jsi jako programator?
> Jak by se ti libilo, kdyby tobe nekdo obchazel licence
> podobnym zpusobem? Uvedom si vzdycky v prvnim pripade, co si
> preje autor... a pripadne se ho zeptej...
>
> Petr Zahradnik, pocitacovy expert


Licence GPL a uzavreny software

[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 12.10.2004 10:59:36

jenze uznej sam, ze pokud existuje k tomu programu DLL ktere je rychle a
nenarocne a zvladne desitky operaci / sec, pak je to dobre. A pokud pouziju
temp. soubory, volani konzole, parsovani vystupu,... ...pak me to pripada
jako "zpatky na sromy a do jeskyni". Takze stale trvam na tom, ze udelat
jednoucelovou knihovnu pod GPL licenci je jeji pohrbeni v obrovskem
mnozstvi SW ktery by ji jinak vyuzil a propagoval. Takze sice je to
"opensource", ale vysledkem je to, ze namisto masoveho rozsireni to pouzije
jen dalsich par skupinek co opet dela GPL aplikace.

btw: nejsem proti "opensource" - ba naopak, ale povazuji GPL za dost
nestatny krok pokud se jedna o knihovny, komponenty,...>Pozor, tady vznika casty omyl. Samozrejme muzes pouzit ve sve aplikaci/baliku
>GPL software. Zalezi, ale na zpusobu jak jej zaclenis. Tedy pokud vezmes treba
>gunzip a zclenis ho do svoji aplikace tak, ze tvoje aplikace vola
>konzolovy gunzip.
>A ty tento gunzip v podstate jenom ovladas pres svuj frontend pak muzes tento
>SW pouzit. Nemuzes ho ale pouzit tak ze by jsi natvrdo nalinkoval do sveho SW
>nejakou knihovnu gunzipu.
>
>Rozdil je doufam zrejmy. Tento zpusob v podstate obchazeni GPL je pomerne
>casty na unixu. Je bezne ze mas treba palici SW pod GPL (frontend) a vlastni
>driver pod nejakou uzavrenou licenci. Samozrejme i opacne kdy mas treba
>komercni zalohovaci SW ale pouziva pro zalohovani na pasku radkovy program
>tar.
>
>Vaclav Halik


S pozdravem
Tomas Rosa

------------------------=[ pinknet on every screen]=-----------------------
Tomas Rosa
Tomas.Rosa(zv)PinkNet(tec)cz http://www.pnws.org
+420 602 860 704
PinkNet Web Server for Win32 - FREEWARE www.pnws.org
---------------------------------------------------------------------------

Licence GPL a uzavreny software

[*] Petr Fejfar <development(zv)callnet(tec)cz> - 12.10.2004 11:11:38

Tomas Rosa wrote:

> btw: nejsem proti "opensource" - ba naopak, ale povazuji GPL za dost
> nestatny krok pokud se jedna o knihovny, komponenty,...

Tim spis bych se zeptal autora, co tim myslel ;-)

pf


Dodatok k ANSI vs. ASCII

[*] Ivan Kozak <ivan(zv)boucek(tec)cz> - 12.10.2004 11:23:39

NEviete mi niekto poradit v tejto pravdepodobne jednoduchej veci?

Exportujem z Interbase ('lc_ctype=WIN1250') do textoveho suboru. Vynasam to
Delphi programom s vyuzitim Writeln.
Vynasa mi to v ANSI kode, ale ja by som to potreboval ulozit v ASCII kode.

Dik. Ivan KOzak

Firebird a cas/datum v SQL dotazu

[*] Jiri Rocnak <rocnak(zv)admiscz(tec)net> - 12.10.2004 11:11:38

Nejak se mi nedari.
Uz jsem z toho volaaky zmeteny.
Dospel jsem tak daleko, ze bych se spokojil i s casem stanice,
jal jsem se tedy pridat do dotazu parametr a ejhle, zase nic:

with DSet.Params.CreateParam(ftDate,'Datum',ptInput) do asDate := Date;
nebo
with DSet.Params.CreateParam(ftDateTime,'Datum',ptInput) do asDateTime :=
Now;

Vypisuje chybu: Conversion error from string "2004-11-12"

Typy jsou prece spravne. ?????

> pouzij literal 'NOW'.
> select cast('NOW' as datetime)... /* nebo jaky je to spravne typ :o) */
>
> peca

cast('NOW' as date) taky nejak chybuje :-(

Licence GPL a uzavreny software

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 12.10.2004 11:09:37

Puvodni zprava ze dne 12.11.2004:

> tim se dostavame zpet k ememu puvodnimu problemu: pokud si tedy
> vezmu zdrojaky ClamAV, zkompiluju si je do DLL a Delphi si napisu
> sadu funkci pro volani tohoto DLL, tak to mohu pouzit?

DLL neni stredniho rodu, ale zenskeho rodu - Dynamic Link Library,
dynamicky linkovana knihovna, tedy ta knihovna.

Jinak vidim, ze vymyslis, jak obejit licenci. To jsi jako programator?
Jak by se ti libilo, kdyby tobe nekdo obchazel licence podobnym
zpusobem? Uvedom si vzdycky v prvnim pripade, co si preje autor... a
pripadne se ho zeptej...

Petr Zahradnik, pocitacovy expert

==========================================================
Petr Zahradnik, Computer Laboratory


web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz

==========================================================

Licence GPL a uzavreny software

[*] Petr Fejfar <development(zv)callnet(tec)cz> - 12.10.2004 10:59:36

Tomas Rosa wrote:

> Typicky konkretni puvodni dotaz byl na pouziti antiviroveho programu
> ClamAV v mem SW, jako alternativa k AVG API. Takze tedy uzivatele
> nutme k pouziti dalsiho placeneho SW, i presto ze existuje kvalitni
> nahrada pro tyto ucely, ale BOHUZEL pod GPL.

I kdyz obchodnici rikaji, ze je jednodussi se omluvit nez zadat o svoleni,
zkus se zeptat primo vlastnika prav na jeho stanovisko - za to nic nedas.

Ja to delam vzdy, kdyz mam pochybnosti a to i u komercniho SW
a mam s tim dobre zkusenosti - vzdy mi slusne odpovedeli
a obcas to usetrilo i nakup nejake licence ;-)

pf


Licence GPL a uzavreny software

[*] Vaclav Halik <spravasd(zv)suz.cvut(tec)cz> - 12.10.2004 10:41:35

Zdarvim,

> Jinymi slovy, pokud tedy nekdo napise sebelepsi sw, ale pod licenci GPL, je
> vpodstate pro jakekoliv dalsi vyuziti mrtvej.Takze i presto ze ja delam
> svuj sw, ktery nehci distribuovat i se zdrojakama, tak nemuzu vpodstate
> nabidnout uzivatelum rozsirit moznost tohoto meho SW o nejake dalsi fce z
> dilny opensource, protoze to autor pohrbil pod GPL.

vim presne jak si to myslel. Ale vyzniva to docela zavadejicim zpusobem.

> Typicky konkretni puvodni dotaz byl na pouziti antiviroveho programu ClamAV
> v mem SW, jako alternativa k AVG API. Takze tedy uzivatele nutme k pouziti
> dalsiho placeneho SW, i presto ze existuje kvalitni nahrada pro tyto ucely,
> ale BOHUZEL pod GPL.

Pozor, tady vznika casty omyl. Samozrejme muzes pouzit ve sve aplikaci/baliku
GPL software. Zalezi, ale na zpusobu jak jej zaclenis. Tedy pokud vezmes treba
gunzip a zclenis ho do svoji aplikace tak, ze tvoje aplikace vola konzolovy gunzip.
A ty tento gunzip v podstate jenom ovladas pres svuj frontend pak muzes tento
SW pouzit. Nemuzes ho ale pouzit tak ze by jsi natvrdo nalinkoval do sveho SW
nejakou knihovnu gunzipu.

Rozdil je doufam zrejmy. Tento zpusob v podstate obchazeni GPL je pomerne
casty na unixu. Je bezne ze mas treba palici SW pod GPL (frontend) a vlastni
driver pod nejakou uzavrenou licenci. Samozrejme i opacne kdy mas treba
komercni zalohovaci SW ale pouziva pro zalohovani na pasku radkovy program
tar.

Vaclav Halik

Licence GPL a uzavreny software

[*] Bronislav Klucka <bronislav.klucka(zv)pro2-soft(tec)com> - 12.10.2004 10:53:36

Ahoj,
tim se dostavame zpet k ememu puvodnimu problemu:
pokud si tedy vezmu zdrojaky ClamAV, zkompiluju si
je do DLL a Delphi si napisu sadu funkci pro volani tohoto
DLL, tak to mohu pouzit?

Brona

>
> Pozor, tady vznika casty omyl. Samozrejme muzes pouzit ve sve
> aplikaci/baliku GPL software. Zalezi, ale na zpusobu jak jej
> zaclenis. Tedy pokud vezmes treba gunzip a zclenis ho do
> svoji aplikace tak, ze tvoje aplikace vola konzolovy gunzip.
> A ty tento gunzip v podstate jenom ovladas pres svuj frontend
> pak muzes tento SW pouzit. Nemuzes ho ale pouzit tak ze by
> jsi natvrdo nalinkoval do sveho SW nejakou knihovnu gunzipu.
>
> Rozdil je doufam zrejmy. Tento zpusob v podstate obchazeni
> GPL je pomerne casty na unixu. Je bezne ze mas treba palici
> SW pod GPL (frontend) a vlastni driver pod nejakou uzavrenou
> licenci. Samozrejme i opacne kdy mas treba komercni
> zalohovaci SW ale pouziva pro zalohovani na pasku radkovy program tar.
>
> Vaclav Halik
>
>
>

Licence GPL a uzavreny software

[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 12.10.2004 10:07:32

Jinymi slovy, pokud tedy nekdo napise sebelepsi sw, ale pod licenci GPL, je
vpodstate pro jakekoliv dalsi vyuziti mrtvej.Takze i presto ze ja delam
svuj sw, ktery nehci distribuovat i se zdrojakama, tak nemuzu vpodstate
nabidnout uzivatelum rozsirit moznost tohoto meho SW o nejake dalsi fce z
dilny opensource, protoze to autor pohrbil pod GPL.

Typicky konkretni puvodni dotaz byl na pouziti antiviroveho programu ClamAV
v mem SW, jako alternativa k AVG API. Takze tedy uzivatele nutme k pouziti
dalsiho placeneho SW, i presto ze existuje kvalitni nahrada pro tyto ucely,
ale BOHUZEL pod GPL.

>Pokud to neni pod Lesser GPL (LGPL), tak to IMHO v poradku neni, viz
>odstavec 2:
>
>b) You must cause any work that you distribute or publish, that in whole or
>in part contains or is derived from the Program or any part thereof, to be
>licensed as a whole at no charge to all third parties under the terms of
>this License.
>
>nebo jeho cesky preklad
>
>b) Musite umoznit, aby jakekoliv vami publikovane ci rozsirovane dilo, ktere
>obsahuje zcela nebo zcasti program nebo jakoukoli jeho cast, popripade je z
>programu nebo jeho casti odvozeno, mohlo byt jako celek bezplatne poskytnuto
>kazde treti osobe v souladu s ustanovenimi teto licence.
>
>Takze IMHO vsechno co na GPL postavis musis pulbikovat zase jen pod GPL
>v duchu myslenky svobodneho SW, viz treba www.gnu(tec)cz
>
>pf


S pozdravem
Tomas Rosa

------------------------=[ pinknet on every screen]=-----------------------
Tomas Rosa
Tomas.Rosa(zv)PinkNet(tec)cz http://www.pnws.org
+420 602 860 704
PinkNet Web Server for Win32 - FREEWARE www.pnws.org
---------------------------------------------------------------------------

Licence GPL a uzavreny software

[*] Petr Fejfar <development(zv)callnet(tec)cz> - 12.10.2004 09:33:29

Tomas Rosa wrote:

> Pokud tedy napisu rekneme wrapper v C++, ktery vezme tuto DLL a
> upravi jeji volani tak, aby bylo pouzitelne i pro Delphi a tento
> wrapper zkompiluju jako DLL pod licenci GPL je to vporadku. Pokud pak
> jiz k tomuto (vlastnimu) wraperu napisu hlavicky v Delphi a ty
> pouzuji ve svem (placenem) programu, je to OK?

Pokud to neni pod Lesser GPL (LGPL), tak to IMHO v poradku neni, viz
odstavec 2:

b) You must cause any work that you distribute or publish, that in whole or
in part contains or is derived from the Program or any part thereof, to be
licensed as a whole at no charge to all third parties under the terms of
this License.

nebo jeho cesky preklad

b) Musite umoznit, aby jakekoliv vami publikovane ci rozsirovane dilo, ktere
obsahuje zcela nebo zcasti program nebo jakoukoli jeho cast, popripade je z
programu nebo jeho casti odvozeno, mohlo byt jako celek bezplatne poskytnuto
kazde treti osobe v souladu s ustanovenimi teto licence.

Takze IMHO vsechno co na GPL postavis musis pulbikovat zase jen pod GPL
v duchu myslenky svobodneho SW, viz treba www.gnu(tec)cz

pf


prosim pomozte s mysql

[*] jharman(zv)volny(tec)cz - 12.10.2004 09:21:29

> SELECT clanky.ID,NAZEV,AUTOR, cl_hit.HIT
> FROM clanky, cl_hit
> WHERE VEREJNY='Ano' AND EXIST (SELECT ID FROM cl_hit )
> ORDER BY clanky.DATUM Desc
> LIMIT 5
>
> jak to sql, aby z tabulky clanky nacetl vsechny
> a z tab cl_hit pole HIT jen tech co se rovnaji id=id (obe tab
> jsou podle id
> indexovane, pro jistotu), jinak aby HIT byl 0
>
> cl_hit obsahuje jen zaznamy, kde HIT >0

SELECT clanky.DATUM, clanky.ID,NAZEV,AUTOR, cl_hit.HIT
FROM clanky
left join cl_hit on (cl_hit.id = clanky.id)
WHERE VEREJNY='Ano'
ORDER BY clanky.DATUM Desc
LIMIT 5

Zkus toto. Snad by to mohlo fungovat.
Honza

--
A za kolik kupujete ELEKTRO Vy?
http://www.MALL(tec)cz/penezenka
Overte si pres SMS, kolik se da USETRIT!

NULL vo FastReport

[*] Miso <delphinpp(zv)atlas(tec)cz> - 12.10.2004 09:15:28

----- Original Message -----
From: "Matej Sukenik" <mtssoftware(zv)orangemail.sk>> Nastavil som convertnull na true aj tak to nepomohlo.
> Ako prinutit FR aby bral NULL ako 0?
>

..skus sa pohrat s "formatom premennej" daneho TfrMemoView..
M.

Je hodnota generatoru behem ruznych triggeru stejn

[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 12.10.2004 09:03:26

generator neni pod transakcni kontrolou a proto se jeho zmena ihned
projevi v jinych (i snapshot) transakcich a operacich s nim.

peca

Je hodnota generatoru behem ruznych triggeru stejn

[*] little_bobes(zv)centrum(tec)cz - 12.10.2004 09:01:26

Zdravim,

potreboval bych ujistit v nasledujici veci:
Vkladam data do view pricemz se mi pomoci triggeru vkladaji data do ruznych
tabulek.
Behem tohoto vkladani radku si v jednom z triggeru zvysim hodnotu generatoru
GEN_ID (ZMENY_G, 1) a vyslednou hodnotu potrebuji pouzit i v jinych
triggerech, ktere se mi spusti.

Nyni ta otazka:
Kdyz behem meho vkladani vlozi jiny uzivatel jiny radek a vytvori si tim
vlastne novou hodnotu generatoru, bude hodnota GEN_ID (ZMENY_G, 0) ta moje
hodnota generatoru nebo ta jeho?

Diky

Bob
(D4 C/S, FB 1.5)

Licence GPL a uzavreny software

[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 12.10.2004 08:51:25

Pokud tedy napisu rekneme wrapper v C++, ktery vezme tuto DLL a upravi jeji
volani tak, aby bylo pouzitelne i pro Delphi a tento wrapper zkompiluju
jako DLL pod licenci GPL je to vporadku. Pokud pak jiz k tomuto (vlastnimu)
wraperu napisu hlavicky v Delphi a ty pouzuji ve svem (placenem) programu,
je to OK?>myslim ze jde o to, ze DLL je samostatny program a jeho volani z tveho
>programu nebude nijak licencne kolidivat. Jedine problematicke misto je,
>ze ve svem programu musim pouzit headry pro volani funkci z toho dll a
>pokud i ty jsou pod GPL, musis si napsat svoje vlastni headry. S pozdravem
Tomas Rosa

------------------------=[ pinknet on every screen]=-----------------------
Tomas Rosa
Tomas.Rosa(zv)PinkNet(tec)cz http://www.pnws.org
+420 602 860 704
PinkNet Web Server for Win32 - FREEWARE www.pnws.org
---------------------------------------------------------------------------

NULL vo FastReport

[*] Matej Sukenik <mtssoftware(zv)orangemail.sk> - 12.10.2004 07:15:18

Zdravim vsetkych

Mam jeden velky problem. Ako spravim vo FastReporte nasledovne:
Mam jeden report kde je jedna tabulka a ako master a 2 detailne.
Na konci reportu vzdy vypisuje chcem spocitat sumar z detail1 a detail2.
Lenze ak napriklad detail2 neobsahuje ziaden zaznam tak mi to vrati Invalid
variant operation.
Nastavil som convertnull na true aj tak to nepomohlo.
Ako prinutit FR aby bral NULL ako 0?


Diky....

Mazani uzivatelskych nastaveni

[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 12.10.2004 00:36:51

Ahoj,
jak resite, to, ze pri odinstalaci programu by melo byt vse smazano, tj. i
to co je v po aplikaci v %appdata% (na NT+). Nechavate to tam? Smazete bez
kecu vse/current usera? Nebo zobrazujete dotaz? << Jde toto nejak v
InnoSetup (pro cureent zser by to snad slo, ale pro vsechny nevim jak)?

--
Jiri Cincura
e-mail: mailto:jiri(zv)cincura.net; | http://www.cincura.net/
mailto:xcincura(zv)informatics.muni(tec)cz | http://photo.cincura.net/
ICQ#: 314711544 | http://phorum.cincura.net/
---
And if our times are difficult and perplexing,
so are they challenging and filled with opportunity.
-Robert F. Kennedy, 1961

prechod na Delphi7

[*] Vaclav Krmela <krmela(zv)ustinadorlici(tec)cz> - 11.10.2004 22:26:42

> From: Jiri Kratochvil
>
> Prechazim na Delphi 7 architec a snazim se zakompilovat Sineu pro D7.
Pri
> kompilaci hlasi ze chybi sestvyst.pas. nevite nekdo proc to dela a jak
to
> lze vyresit.

Trial verze Delphi pouzivaji nekompatibilni format DCU, takze do nich
nelze doinstalovat komponenty prelozene v ostrych verzich. Resenim tedy
je:
- pouzit zdrojove texty a provest si vlastni preklad
- pouzit ostrou verzi Delphi

Vaclav Krmela

prosim pomozte s mysql

[*] Lahoda Radek <lahodar(zv)uniplet(tec)cz> - 11.10.2004 19:32:22

zdravim,
nejak me to uz nemysli, potrebuju vytahnout ze 2 tabulek data..

SELECT clanky.ID,NAZEV,AUTOR, cl_hit.HIT
FROM clanky, cl_hit
WHERE VEREJNY='Ano' AND EXIST (SELECT ID FROM cl_hit )
ORDER BY clanky.DATUM Desc
LIMIT 5

jak to sql, aby z tabulky clanky nacetl vsechny
a z tab cl_hit pole HIT jen tech co se rovnaji id=id (obe tab jsou podle id
indexovane, pro jistotu), jinak aby HIT byl 0

cl_hit obsahuje jen zaznamy, kde HIT >0

napr.
clanky:
id nazev
1 ahoj
2 cau
3 nazdar

cl_hit:
id hit
2 1

chci vysledek:
id nazev ... hit
1 ahoj 0
2 cau 1
3 nazdar 0

diky za nakopnuti
R.Lahoda

FB - jak na casto se menici tabulky

[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 11.10.2004 18:30:18

Pavel Cisar dne 21 Oct 2004 v 13:09:

> > na FB jsem pro export zmen v zasobe pouzival tento postup:
> >
> > - dve tabulky: Zasoba, ZasobaEx
> > 1. pri exportu se odeslou rozdily mezi Zasoba a ZasobaEx
> > 2. provede se DELETE FROM ZasobaEx
> > 3. provede se INSERT INTO ZasobaEx SELECT * FROM Zasoba
> >
> > Coz samozrejme nelze delat prilis casto, jinak vznikne spousta
> > "smeti", o kterem se tu diskutovalo nedavno. Nyni by vsak zakaznik
> > rad, aby se export castio delal.
>
> Ono ani tak nejde o vznik smeti (ktereho neni zas tak moc, protoze
> verze radku pro zruseny zaznam je velmi mala), ale o jeho odstraneni.
> Pokud se data odsouvaji z tabulky, ktera je velmi casto vyuzivana pro
> dulezite operace, je vhodne hned po commitnuti vymazu vetsiho mnozstvi
> dat provest SELECT COUNT(*) z dane tabulky (pokud s ni ovsem nepracuje
> jina transakce v rezimu snapshot, pak to nema vyznam), aby se co
> nejrychleji provedl garbage collection (neni nutne provadet primo
> sweep).

Jen pro ostatni, pokud by to nekdy resili, bych rad potvrdil, ze uvedena metoda skutecne funguje a
jiz zadne problemy se spoustou starych verzi nemame. Testovano zhruba 20 dni v ostrem provozu.
Dekuju! :-D

Karel Rys


co je page faults

[*] Jiri Foldyna <jiri.f(zv)avizo(tec)cz> - 11.10.2004 17:56:14

> JF> Ahoj,
> JF> nevim, jestli oba myslime totez, ale page fault = chyba
> stranky vznika pri
> JF> pozadavku na pristup k nenamapovane strance. Pro memory
> manager je to signal
> JF> k nacteni stranky bud ze swapu nebo ze souboru a je to
> normalni provozni
> JF> stav memory manazeru. Jejich pocet zavisi mimo jine i na
> celkove velikosti
> JF> pameti a na dobe, po kterou aplikace bezi. Obecne lze
> rici, ze cim vice
> JF> pameti alokujes, tim vetsi je sance na page fault, pokud
> alokujes (a
> JF> pristupujes k ni) vice nez je fyzicka velikost, pak page
> faults prudce
> JF> pribyvaji. Snadno to otestujes tak, ze si vyvoris velkou
> matici - treba
> JF> array [0..1000000,0.1000000] of integer (pozor, potrebuje
> cca 4 GB virtualni
> JF> pameti !) , do kazde bunky zapises jine cislo a pak je
> nahodne ctes. Pokud
> JF> mas treba 1 GB fyzicke pameti, pak statisticky kazde 3-4
> cteni vyvola page
> JF> fault.
>
> a da se tomu nejak efektivne branit ?

Jedine nepouzivat virtual memory management :-). Page fault neni chyba v
beznem slova smyslu, je to prostredek, kterym procesor upozornuje OS na
potrebu zavest do pameti prislusnou cast kodu/dat z disku. Nazev je trochu
matouci, proto se spise pouziva preklad "vypadek stranky".

Zdravim

Jiri Foldyna

prechod na Delphi7

[*] Jiri Kratochvil <kratochvil(zv)3a(tec)cz> - 11.10.2004 17:16:11

Prechazim na Delphi 7 architec a snazim se zakompilovat Sineu pro D7. Pri kompilaci hlasi ze chybi sestvyst.pas. nevite nekdo proc to dela a jak to lze vyresit.

dekuji

Jiri Kratochvil

Jina barva fontu v radku v TMemo

[*] Ivan Dulgerov <idulgerov(zv)stonline.sk> - 11.10.2004 16:20:07


Zdravim.
> nevite nekdo, jak zmenit barvu fontu v radku Mema, ktere obsahuje
> urcite slovo? A muze se to opakovat i ve vice radcich.
*Na toto by som radsej pouzil komponentu SynEdit.
*malo by to byt niekde na www.sourceforge.net

S pozdravom
Ivan Dulgerov
Delphi5 Prof+ SP1, Delphi 4 St, Win XP Porf. + SP1, Win98 SE
mail : idulgerov(zv)stonline.sk


efektivni prace se souborem

[*] david.kopecek(zv)hacktrack(tec)com - 11.10.2004 15:52:03

Dobry den,
11. listopadu 2004, 14:59:58, napsal jste:

>> jak lze efektivnim spusobem ukladat data do souboru.. Mam napriklad
>> aplikaci ktera po siti prijima 50M dat a zapisuje si to do
>> memorystream. jenze to mi v prubehu naalokuje cca 50MB pameti a kdyz
>> mi tam nabehne 5 vlaken tak zaflakam celou pamet a muze to skoncit i
>> heap overflow...

LG> A proc to neukladas rovnou do filestreamu?

hmm skusim to bude asi nejlespi... co by se stalo vprpade ze vlakno
spadne zustanou ulozena data ve file streamu /

nebylo by lepsi pouzivat beznej file a pres blockread a blockwrite s
nim pracovat ?
--
S pozdravem,
david
david.kopecek(zv)hacktrack.com

Prohlizec souboru pres IE

[*] Jiri DAVID <david(zv)csh(tec)cz> - 11.10.2004 15:48:02


> Chtel bych to udelat pres komponentu TWebBrowser. Mam ji normalne
> placnutou na formu a volam jeji metodu navigate.
>
> postup:
> button2onclick...
> WebBrowser1.Navigate('file://X:\soubor.pdf');
> button4onclick...
> WebBrowser1.Navigate('file://X:\soubor2.pdf'); <---- tady to zatuhne
>
>
> ale po otevreni pdf souboru mi jiz zadny dalsi pdf soubor nejde otevrit,
> aplikace zatuhne a v pameti visi AcrobatReader, i kdyz moji aplikaci
> odstrelim.
>
Presne to same mi dela samotny explorer (Win XP). Tak mozna nebude problem v
tvem programku ale ve volani Acrobatu pres Explorer.

Jirka


Prohlizec souboru pres IE

[*] Ing. Petr Sikola <developer(zv)efg(tec)cz> - 11.10.2004 15:36:01

Jeste jsem zapomel dodat, ze je to v Delphi5 a navic bych to otevirani
dokumentu potreboval jen pro cteni :(

Petr Sikola

Prohlizec souboru pres IE

[*] Ing. Petr Sikola <developer(zv)efg(tec)cz> - 11.10.2004 15:28:00

Zdravim konferenci, chci si do aplikace implementovat prohlizec vice
typu souboru.
Chtel bych to udelat pres komponentu TWebBrowser. Mam ji normalne
placnutou na formu a volam jeji metodu navigate.

postup:

button1onclick...
WebBrowser1.Navigate('http://www.seznam(tec)cz');

button2onclick...
WebBrowser1.Navigate('file://X:\soubor.pdf');

button3onclick...
WebBrowser1.Navigate('file://X:\soubor.xls');

button4onclick...
WebBrowser1.Navigate('file://X:\soubor2.pdf'); <---- tady to zatuhne


ale po otevreni pdf souboru mi jiz zadny dalsi pdf soubor nejde otevrit,
aplikace zatuhne a v pameti visi AcrobatReader, i kdyz moji aplikaci
odstrelim.

Mezi jednotlivymi otevirani souboru nedelam zadnou akci, soubory
oteviram na onclick na buttonu.

Diky za nakopnuti :)
Petr Sikola

efektivni prace se souborem

[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 11.10.2004 14:59:58

> jak lze efektivnim spusobem ukladat data do souboru.. Mam napriklad
> aplikaci ktera po siti prijima 50M dat a zapisuje si to do
> memorystream. jenze to mi v prubehu naalokuje cca 50MB pameti a kdyz
> mi tam nabehne 5 vlaken tak zaflakam celou pamet a muze to skoncit i
> heap overflow...

A proc to neukladas rovnou do filestreamu?


--
Lukas Gebauer.

E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.

efektivni prace se souborem

[*] david.kopecek(zv)hacktrack(tec)com - 11.10.2004 14:53:58

Zdravim konferenci

jak lze efektivnim spusobem ukladat data do souboru.. Mam napriklad
aplikaci ktera po siti prijima 50M dat a zapisuje si to do
memorystream. jenze to mi v prubehu naalokuje cca 50MB pameti a kdyz
mi tam nabehne 5 vlaken tak zaflakam celou pamet a muze to skoncit i
heap overflow...

--
S pozdravem,
david
david.kopecek(zv)hacktrack.com

co je page faults

[*] david.kopecek(zv)hacktrack(tec)com - 11.10.2004 14:51:57

Dobry den,
11. listopadu 2004, 10:47:39, napsal jste:

>> mam aplikaci psanou v delphi a podle task manageru ma asi 6000000 page
>> faults objektu ?. nevite cim vznikaji v delphi aplikacich a jak je
>> odstranovat

JF> Ahoj,
JF> nevim, jestli oba myslime totez, ale page fault = chyba stranky vznika pri
JF> pozadavku na pristup k nenamapovane strance. Pro memory manager je to signal
JF> k nacteni stranky bud ze swapu nebo ze souboru a je to normalni provozni
JF> stav memory manazeru. Jejich pocet zavisi mimo jine i na celkove velikosti
JF> pameti a na dobe, po kterou aplikace bezi. Obecne lze rici, ze cim vice
JF> pameti alokujes, tim vetsi je sance na page fault, pokud alokujes (a
JF> pristupujes k ni) vice nez je fyzicka velikost, pak page faults prudce
JF> pribyvaji. Snadno to otestujes tak, ze si vyvoris velkou matici - treba
JF> array [0..1000000,0.1000000] of integer (pozor, potrebuje cca 4 GB virtualni
JF> pameti !) , do kazde bunky zapises jine cislo a pak je nahodne ctes. Pokud
JF> mas treba 1 GB fyzicke pameti, pak statisticky kazde 3-4 cteni vyvola page
JF> fault.

a da se tomu nejak efektivne branit ?

--
S pozdravem,
david
david.kopecek(zv)hacktrack.com

IB/FB - zjisteni pridani zaznamu v tabulce bez eve

[*] Petr Kralik <kralik(zv)tebodin(tec)cz> - 11.10.2004 13:55:53

Pokud jde jen o posledni ID, lze to velice jednoduse

SELECT GEN_ID("nazev_generatoru", 0) FROM RDB$DATABASE;

Jestli bys pozadoval od event dalsi data, jako kdo to zapsal a
blablabla, ta externi tabulka by, dle meho nazoru, byla nejjdednodussim
resenim...

-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz] On
Behalf Of Richard Kejval
Sent: Thursday, November 11, 2004 12:42 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: IB/FB - zjisteni pridani zaznamu v tabulce bez eventu -
velke vytizeni procesoru


Petr Kralik pise :
> Co kdybys mel dalsi tabulku, kam bys triggerem zapisoval nove ulozene
> ID's. Vlastni aplikaci bys pak cetl jen tuhle kratjou tabulku a
> zjistene ID's bys po sebe mazal...

Neni treba zadnou vytvaret, protoze uz existuje v RDB$Generators

S pozdravem
ing. Richard Kejval
mobil: 602477679
http://www.icsoftware(tec)cz


FB Embed zaloha databazy

[*] dphi_forum(zv)proces.sk - 11.10.2004 12:41:48



A mozem vediet ako si to robil?

****************************************************************************************************
Nazdar,

mam urobenu aplikaciu, ktora robi backup/restore. Funguje
aj na embedded verzii FB. Da sa volne stiahnut na www.seko.sk

milos


IB/FB - zjisteni pridani zaznamu v tabulce bez eve

[*] Richard Kejval <kejval.delphi(zv)centrum(tec)cz> - 11.10.2004 12:41:48

Petr Kralik pise :
> Co kdybys mel dalsi tabulku, kam bys triggerem zapisoval nove ulozene
> ID's.
> Vlastni aplikaci bys pak cetl jen tuhle kratjou tabulku a zjistene ID's
> bys po sebe mazal...

Neni treba zadnou vytvaret, protoze uz existuje v RDB$Generators

S pozdravem
ing. Richard Kejval
mobil: 602477679
http://www.icsoftware(tec)cz

IB/FB - zjisteni pridani zaznamu v tabulce bez eve

[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 11.10.2004 12:31:47

> Mam naprosto trivialni problem, ale nejak se mi nedari
> vyresit. Mam tabulku, v te tabulce mam sloupec ID, nad kterym
> mam i index, a potrebuju v aplikaci zjistit, ze v teto
> tabulce doslo k pridani zaznamu. Protoze pouzivam FB server
> 1.5.1, o kterem se tady psalo, ze ma jeste nejake problemy s

Proc nezkusis FB 1.5.2 (zatim sice pouze RC, ale asi bude prohlasen za
final) ?

> eventama, chci tento ukol resit v aplikaci. Tabulka ma za cca
> 3 mesice provozu uz okolo 450.000 -> za rok bude cca
> 1.800.000. Lze predpokladat, ze si zakaznici budou chtit v
> datech uchovavat dva posledni roky -> musim to vyresit tak,
> aby to bezproblemu slapalo alespon pri 3.600.000 zaznamech...
> Myslel jsem si, ze mi bude stacit zobrazit posledni zaznam a
> z nej si vytahnu hodnotu ze sloupce ID. prikaz jsem mel
> napsan dobre, fungovalo to, ale ja to potrebuju proklepavat
> tak cca 2/s - coz Firebirdovi zpusobi vytizeni na 90 a vic

2x za sekundu, neprehanis to trochu ?

> procent :( Tak jsem si rikal, ze ma problem s tim, prejit na
> ten posledni zaznam. Tak jsem zkusil zmenit prikaz z
> vyhledavani "last" na "max(id)", ale vysledek - vytizeni FB
> serveru je porad nad 90%. Muzete mi nekdo, prosim, poradit? Diky Jirka

A neni jednodussi si udelat aplikacni server + UDF ?
Tohle periodicky dotazovani by mohlo serveru pekne zavarit.
Navic si dokazu predstavit situaci, kdy to selze.
Treba:
mas dva klienty (predpokladam, zi vice).
Kazdy z nich s vyzvedne cislo z generatoru, ale ten z vissim cislem ho
tam zapise
drive a ten z nizsim ho tam zapise pozdeji.
-> po ten druhy pripad NEVZNIKNE udalost.

Slavek


Firebird a cas/datum v SQL dotazu

[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 11.10.2004 12:19:45



Jiri Rocnak wrote:

> Ahoj.
>
> Asi lama dotaz, ale potreboval bych ve firebirdu do sql dotazu dostat cas na
> serveru.
> Pred casem jsem to resil nejakym NOW(), ale to bylo asi na nejakem jinem
> serveru.

pouzij literal 'NOW'.
select cast('NOW' as datetime)... /* nebo jaky je to spravne typ :o) */

peca


dynamicka pole

[*] delphin(zv)post(tec)cz - 11.10.2004 12:17:45

> jednotlive objekty TIcon rusit nemuzu ....... mam neco uvolnovat ?

Delphi samo zajisti zruseni dynamickych poli, takze neni nutno se o to
starat.

Firebird a cas/datum v SQL dotazu

[*] Milan Tomes <delphi(zv)haida(tec)cz> - 11.10.2004 12:11:44

Select 'NOW' from RDB$DATABASE

S pozdravem

Milan Tomes

> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Jiri Rocnak
> Sent: Thursday, November 11, 2004 12:02 PM
>
> Asi lama dotaz, ale potreboval bych ve firebirdu do sql dotazu
> dostat cas na
> serveru.

Firebird a cas/datum v SQL dotazu

[*] Jiri Rocnak <rocnak(zv)admiscz(tec)net> - 11.10.2004 12:01:44

Ahoj.

Asi lama dotaz, ale potreboval bych ve firebirdu do sql dotazu dostat cas na
serveru.
Pred casem jsem to resil nejakym NOW(), ale to bylo asi na nejakem jinem
serveru.
Na netu hledam jak sileny, ale asi uz nedokazu zadat ani dotaz do
vyhledavace.
Tlaci me totiz cas. Poradte, pls.

Diky, Jiri.

dynamicka pole

[*] Vlastimil Burian <vlastax.b(zv)seznam(tec)cz> - 11.10.2004 11:59:43

pouzivam v programu z jisteho duvodu jednu globalni promennou dynamikeho pole ....
typ je definovan asi takto

type
TTypIkon = (I16 = 16, I32 = 32, I48 = 48);
TPoleIkon = array of TIcon;
TPoleVsechIkon = array[TTypIkon] of TPoleIkon;

var
Ikony : TPoleVsechIkon;


tuto promennou pak predavam jako konstantni parametr konstruktoru dalsiho formulare.... Delphi nepouzivaji u dynamickych poli metodu kopirovani pri zapisu cili toto pole pri tom predani fyzicky existuje pouze na jednom miste pokud to chapu spravne ... (?) ... pak mi jenom vyvstava otazka jestli "po sobe mam neco uklizet" kdyz tento formular ukoncim ... jednotlive objekty TIcon rusit nemuzu ....... mam neco uvolnovat ?

IB/FB - zjisteni pridani zaznamu v tabulce bez eve

[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 11.10.2004 11:13:38

Ing. Jiri Sokol dne 11 Nov 2004 v 11:05:

> Ahoj panove!
> Mam naprosto trivialni problem, ale nejak se mi nedari vyresit.
> Mam tabulku, v te tabulce mam sloupec ID, nad kterym mam i index, a
> potrebuju v aplikaci zjistit, ze v teto tabulce doslo k pridani
> zaznamu. Protoze pouzivam FB server 1.5.1, o kterem se tady psalo, ze
> ma jeste nejake problemy s eventama, chci tento ukol resit v aplikaci.
> Tabulka ma za cca 3 mesice provozu uz okolo 450.000 -> za rok bude cca
> 1.800.000. Lze predpokladat, ze si zakaznici budou chtit v datech
> uchovavat dva posledni roky -> musim to vyresit tak, aby to
> bezproblemu slapalo alespon pri 3.600.000 zaznamech... Myslel jsem si,
> ze mi bude stacit zobrazit posledni zaznam a z nej si vytahnu hodnotu
> ze sloupce ID. prikaz jsem mel napsan dobre, fungovalo to, ale ja to
> potrebuju proklepavat tak cca 2/s - coz Firebirdovi zpusobi vytizeni
> na 90 a vic procent :( Tak jsem si rikal, ze ma problem s tim, prejit
> na ten posledni zaznam. Tak jsem zkusil zmenit prikaz z vyhledavani
> "last" na "max(id)", ale vysledek - vytizeni FB serveru je porad nad
> 90%. Muzete mi nekdo, prosim, poradit? Diky Jirka

Ahoj,

nesel by pouzit trigger after insert, ktery by do nejake jine, pomocne tabulky zapsal
datum/cas/id, kdy doslo k te posledni zmene? aplikace by si tak datum/cas/id posledniho zaznamu
vytahla primitivnim selectem skoro okamzite.

Karel Rys


IB/FB - zjisteni pridani zaznamu v tabulce bez eve

[*] Petr Kralik <kralik(zv)tebodin(tec)cz> - 11.10.2004 11:13:37

Hmmm,
Co kdybys mel dalsi tabulku, kam bys triggerem zapisoval nove ulozene
ID's.
Vlastni aplikaci bys pak cetl jen tuhle kratjou tabulku a zjistene ID's
bys po sebe mazal...
*krz

-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz] On
Behalf Of Ing. Jiri Sokol
Sent: Thursday, November 11, 2004 11:06 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: IB/FB - zjisteni pridani zaznamu v tabulce bez eventu - velke
vytizeni procesoru


Ahoj panove!
Mam naprosto trivialni problem, ale nejak se mi nedari vyresit. Mam
tabulku, v te tabulce mam sloupec ID, nad kterym mam i index, a
potrebuju v aplikaci zjistit, ze v teto tabulce doslo k pridani zaznamu.
Protoze pouzivam FB server 1.5.1, o kterem se tady psalo, ze ma jeste
nejake problemy s eventama, chci tento ukol resit v aplikaci. Tabulka ma
za cca 3 mesice provozu uz okolo 450.000 -> za rok bude cca 1.800.000.
Lze predpokladat, ze si zakaznici budou chtit v datech uchovavat dva
posledni roky -> musim to vyresit tak, aby to bezproblemu slapalo
alespon pri 3.600.000 zaznamech... Myslel jsem si, ze mi bude stacit
zobrazit posledni zaznam a z nej si vytahnu hodnotu ze sloupce ID.
prikaz jsem mel napsan dobre, fungovalo to, ale ja to potrebuju
proklepavat tak cca 2/s - coz Firebirdovi zpusobi vytizeni na 90 a vic
procent :( Tak jsem si rikal, ze ma problem s tim, prejit na ten
posledni zaznam. Tak jsem zkusil zmenit prikaz z vyhledavani "last" na
"max(id)", ale vysledek - vytizeni FB serveru je porad nad 90%. Muzete
mi nekdo, prosim, poradit? Diky Jirka

P.S.:
"last":
select first (1) cas from tabulka order by id desc

"max(id)":
select max(id) from tabulka

K provedeni tech SQL dotazu pouzivam kompenentu IBSQL - udelam si
prepare a pak v timeru uz jenom provadim "ExecQuery".
--------------------------------------------------
Ing. Jiri Sokol; jiri.sokol(zv)seznam(tec)cz; 972 231 187
D6Prof+SP3; WinXPProf+SP1; FB 1.5.1
programator amater


FB Embed zaloha databazy

[*] mivedelphi(zv)seznam(tec)cz - 11.10.2004 11:15:39

Nazdar,

mam urobenu aplikaciu, ktora robi backup/restore. Funguje
aj na embedded verzii FB. Da sa volne stiahnut na www.seko.sk

milos

dps> neviem prosim vas niekto ako by sa dala spravit zaloha databazy vo Firebird
dps> Embed? GBAK.EXE mi funguje pokial ma nainstalovany FB ako server.

ini versus netypovy soubor

[*] Petr Fejfar <development(zv)callnet(tec)cz> - 11.10.2004 11:13:37

vponecha(zv)volny(tec)cz wrote:

> Sorry, ze se stejnym vopruzuji znova, ale zkusim to radeji jeste
> jednou nez zacnu vymyslet neco jineho.
>
> Tak pokud nekdo vite, prosim nakopnete.

Pokud je zaruka, ze s tim INI souborem nikdo nepracuje a v nedavne dobe
nepracoval jako s regulernim INI filem (jestli si to pamatuju,
tak write-back delay byvalo 5 sekund), tak by o takovem postupu slo uvazovat
treba pro ucely archivovani apod. Jinak je to dost nestastna myslenka
- proc - o tom tu bylo napsano uz hodne.

Ovsem v kazdem pripade bych doporucil zapomenouit na archaismus
netypoveho souboru - snad uz D1 mel TFileStream.

BTW, jestli to nefunguje, tak to urcite hlasi nejakou chybu, ze ktere se da
poznat proc.


pf

IB/FB - zjisteni pridani zaznamu v tabulce bez eve

[*] Daniel Frantik <frantik(zv)telpro(tec)cz> - 11.10.2004 11:15:38

Co treba udelat trigger nad tou tabulkou, ktery to nekam zapise?

Danik

> -----Original Message-----
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Ing. Jiri Sokol
> vyresit. Mam tabulku, v te tabulce mam sloupec ID, nad kterym
> mam i index, a potrebuju v aplikaci zjistit, ze v teto
> tabulce doslo k pridani zaznamu. Protoze pouzivam FB server

FB Embed zaloha databazy

[*] Milos Veselovsky <mivedelphi(zv)seznam(tec)cz> - 11.10.2004 11:23:40

> nevie prosim vas niekto ako by sa dala spravit zaloha databazy vo Firebird
> Embed? GBAK.EXE mi funguje pokial ma nainstalovany FB ako server.

Nazdar,

mam urobenu aplikaciu, ktora robi backup/restore. Funguje
aj na embedded verzii FB. Da sa volne stiahnut na www.seko.sk

milos

IB/FB - zjisteni pridani zaznamu v tabulce bez eve

[*] Tomas Michalik <michalik(zv)proca(tec)cz> - 11.10.2004 11:19:40

Ing. Jiri Sokol wrote:

> Ahoj panove!
> Mam naprosto trivialni problem, ale nejak se mi nedari vyresit.
> Mam tabulku, v te tabulce mam sloupec ID, nad kterym mam i index, a potrebuju v aplikaci zjistit, ze v teto tabulce doslo k pridani zaznamu. Protoze pouzivam FB server 1.5.1, o kterem se tady psalo, ze ma jeste nejake problemy s eventama, chci tento ukol resit v aplikaci.
> Tabulka ma za cca 3 mesice provozu uz okolo 450.000 -> za rok bude cca 1.800.000. Lze predpokladat, ze si zakaznici budou chtit v datech uchovavat dva posledni roky -> musim to vyresit tak, aby to bezproblemu slapalo alespon pri 3.600.000 zaznamech...
> Myslel jsem si, ze mi bude stacit zobrazit posledni zaznam a z nej si vytahnu hodnotu ze sloupce ID. prikaz jsem mel napsan dobre, fungovalo to, ale ja to potrebuju proklepavat tak cca 2/s - coz Firebirdovi zpusobi vytizeni na 90 a vic procent :(
> Tak jsem si rikal, ze ma problem s tim, prejit na ten posledni zaznam. Tak jsem zkusil zmenit prikaz z vyhledavani "last" na "max(id)", ale vysledek - vytizeni FB serveru je porad nad 90%.
> Muzete mi nekdo, prosim, poradit?

Pri hledani maximalni hodnoty potrebujes descending index.
To by melo pomoct.

Tom

> Diky
> Jirka
>
> P.S.:
> "last":
> select first (1) cas from tabulka order by id desc
>
> "max(id)":
> select max(id) from tabulka

========================
Tomas Michalik
vyvoj IS

ProCA, spol. s r.o.
V Luzich 818
Praha 4 - Libus
140 00, Czech Republic

tel: +420 234646446
fax: +420 234646120

michalik(zv)proca(tec)cz
http://www.proca(tec)cz

Instalace driveru

[*] delphin(zv)post(tec)cz - 11.10.2004 11:17:40

> Chci se zeptat, zda nekdo vi proc se nekdy pri instalaci noveho zarizeni
> ukaze pruvodce instalaci rozpoznaneho hardware a nekdy ne.
>
> Je to diky strukture INF nebo podpisu ovladace nebo neceho uplne jineho.
> Pritom v mem pripade staci dat pouze dalsi a zarizeni se nainstaluje. Je
> mozne pripadne nejak nastavit, aby tento pruvodce pracoval bez zasahu
> uzivatele?

Jednoduchy postup instalace ovladace je pouzit SetupCopyOEMInf. Pote po
pripojeni hardware se ovladac nainstaluje sam. Na WXP ovsem zustava dialog o
podpisu ovladace, takze je nutna interakce uzivatele.

IB/FB - zjisteni pridani zaznamu v tabulce bez eve

[*] Ing. Jiri Sokol <js-delphi(zv)email(tec)cz> - 11.10.2004 11:05:36

Ahoj panove!
Mam naprosto trivialni problem, ale nejak se mi nedari vyresit.
Mam tabulku, v te tabulce mam sloupec ID, nad kterym mam i index, a potrebuju v aplikaci zjistit, ze v teto tabulce doslo k pridani zaznamu. Protoze pouzivam FB server 1.5.1, o kterem se tady psalo, ze ma jeste nejake problemy s eventama, chci tento ukol resit v aplikaci.
Tabulka ma za cca 3 mesice provozu uz okolo 450.000 -> za rok bude cca 1.800.000. Lze predpokladat, ze si zakaznici budou chtit v datech uchovavat dva posledni roky -> musim to vyresit tak, aby to bezproblemu slapalo alespon pri 3.600.000 zaznamech...
Myslel jsem si, ze mi bude stacit zobrazit posledni zaznam a z nej si vytahnu hodnotu ze sloupce ID. prikaz jsem mel napsan dobre, fungovalo to, ale ja to potrebuju proklepavat tak cca 2/s - coz Firebirdovi zpusobi vytizeni na 90 a vic procent :(
Tak jsem si rikal, ze ma problem s tim, prejit na ten posledni zaznam. Tak jsem zkusil zmenit prikaz z vyhledavani "last" na "max(id)", ale vysledek - vytizeni FB serveru je porad nad 90%.
Muzete mi nekdo, prosim, poradit?
Diky
Jirka

P.S.:
"last":
select first (1) cas from tabulka order by id desc

"max(id)":
select max(id) from tabulka

K provedeni tech SQL dotazu pouzivam kompenentu IBSQL - udelam si prepare a pak v timeru uz jenom provadim "ExecQuery".
--------------------------------------------------
Ing. Jiri Sokol; jiri.sokol(zv)seznam(tec)cz; 972 231 187
D6Prof+SP3; WinXPProf+SP1; FB 1.5.1
programator amater

Jina barva fontu v radku v TMemo

[*] Petr Cafourek <petr.cafourek.d7(zv)seznam(tec)cz> - 11.10.2004 10:55:40

Zdravim,

nevite nekdo, jak zmenit barvu fontu v radku Mema, ktere obsahuje
urcite slovo? A muze se to opakovat i ve vice radcich.

S pozdravem,
Petr Cafourek
mailto:petr.cafourek.d7(zv)seznam(tec)cz


co je page faults

[*] Jiri Foldyna <jiri.f(zv)avizo(tec)cz> - 11.10.2004 10:47:39

> mam aplikaci psanou v delphi a podle task manageru ma asi 6000000 page
> faults objektu ?. nevite cim vznikaji v delphi aplikacich a jak je
> odstranovat

Ahoj,
nevim, jestli oba myslime totez, ale page fault = chyba stranky vznika pri
pozadavku na pristup k nenamapovane strance. Pro memory manager je to signal
k nacteni stranky bud ze swapu nebo ze souboru a je to normalni provozni
stav memory manazeru. Jejich pocet zavisi mimo jine i na celkove velikosti
pameti a na dobe, po kterou aplikace bezi. Obecne lze rici, ze cim vice
pameti alokujes, tim vetsi je sance na page fault, pokud alokujes (a
pristupujes k ni) vice nez je fyzicka velikost, pak page faults prudce
pribyvaji. Snadno to otestujes tak, ze si vyvoris velkou matici - treba
array [0..1000000,0.1000000] of integer (pozor, potrebuje cca 4 GB virtualni
pameti !) , do kazde bunky zapises jine cislo a pak je nahodne ctes. Pokud
mas treba 1 GB fyzicke pameti, pak statisticky kazde 3-4 cteni vyvola page
fault.

Zdravim

Jiri Foldyna

ini versus netypovy soubor

[*] vponecha(zv)volny(tec)cz - 11.10.2004 10:23:02

Sorry, ze se stejnym vopruzuji znova, ale zkusim to radeji jeste
jednou nez zacnu vymyslet neco jineho.

Tak pokud nekdo vite, prosim nakopnete.

Vl.

----- PUVODNI ZPRAVA -----
Od: vponecha(zv)volny(tec)cz
Komu: delphi-l(zv)clexpert(tec)cz
Predmet: ini versus netypovy soubor
Datum: 11.11.2004 - 0:22:27

> Ahoj vsichni,
>
> Muzu pracovat s ini souborem jako s netypovym souborem?
Potrebuji > nacpat nekolik souboru do jednoho netypoveho. Narazil
jsem vsak
> na
> ini file, nedari se mi ho tam nacpat, protoze ho nemuzu otevrit
> jako netypovy.
>
> Nakopne me nekdo?
>
> Dik...
>
> Vl.
>
> Mel jsem nasledujici predstavu, ale tak to nejde.
> Nejdriv ho chci otevrit jako netypovy soubor:
> assignfile(inifile, cesta k ini file) // Tady nastane chyba
> nemuze ini file otevrit jako netypovy reset (inifile);
>
> Potom ho nakopiruji do jineho netypoveho souboru:
> for i := 0 to FileSize(inifile) do
> begin
> BlockRead(inifile, Buf, Sizeof(Buf), Precteno);
> BlockWrite(NovyNetypovyFile, Buf, Precteno, Zapsano);
> end;
>
> --
> A za kolik kupujete ELEKTRO Vy?
> http://www.MALL(tec)cz/penezenka
> Overte si pres SMS, kolik se da USETRIT!
>
>
>
>

--
A za kolik kupujete ELEKTRO Vy?
http://www.MALL(tec)cz/penezenka
Overte si pres SMS, kolik se da USETRIT!

like, case insensitive, cestina

[*] Tomas Krejzek <tomas.krejzek(zv)kpsys(tec)cz> - 11.10.2004 08:18:46

A jak mas nadefinovane ty polozky v databazich, mas je v CP-1250 a v
PXW_CSY, protoze ja jsem si to zkousel u sebe a tam to tu cestinu zvlada
naprosto bez problemu.
Tom

ing. Petr Borkovec napsal(a):

>Zkusil jsem, co napsal Tomas - to nepomohlo. Problem je zrejme v tom, ze v
>tom 'select * from tab_archiv where UPPER(OBSAH) LIKE '%TOTO JE TREBA
>NAJIT%'' to UPPER(OBSAH)prevadi na velka pismena jen znaky bez diakritiky -
>ale nevim, jak to vyresit.
>
>
>
>>Musis si udelat upper uz nad tim textem v aplikaci, tj. v C++ Builderu
>>hodnota1.text.UpperCase() predpokladam ze v Delphi je to to samy
>>Tomas
>>
>>
>
>
>
>>>Delphi 7, InterBase WI - 06.0.1.6.
>>>Potrebuji prohledat pole tabulky, aby hledani bylo case insensitive a
>>>fungovalo v cestine. Pole je varchar(10000). Tabulku ctu komponentou
>>>IBQuery, pro hledani vkladam do jeji vlastnosti SQL 'select * from
>>>tab_archiv where UPPER(OBSAH) LIKE upper(_WIN1250'hodnota1.Text')',do
>>>hodnota1.text davam '%toto je treba najit%'.Takto je vysledek hledani
>>>
>>>
>case
>
>
>>>insensitive pro vsechna pismena s vyjimkou pismen s diakritikou, kde to
>>>zustava case sensitive. Mohl by nekdo poradit?
>>>
>>>
>
>
>
>
>
>
>
>
>

InnoSetup a PATH

[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 11.10.2004 07:54:44

> Instalujem takto Oracle klienta, kde sice v adresari mojej app, mam
> podadresar oracle a v nom podadresar bin, na kt. potrebujem nastavit cestu

Bud si dej potrebana DLL do slozky se svym exe, nebo si dej cestu do
volani knihoven. Zmena PATH mi nepripadna zrovna jako idealni reseni.

Peca

OT: Instalace driveru

[*] delphi(zv)spst(tec)cz - 11.10.2004 07:46:44

Dobry den.



Chci se zeptat, zda nekdo vi proc se nekdy pri instalaci noveho zarizeni
ukaze pruvodce instalaci rozpoznaneho hardware a nekdy ne.

Je to diky strukture INF nebo podpisu ovladace nebo neceho uplne jineho.
Pritom v mem pripade staci dat pouze dalsi a zarizeni se nainstaluje. Je
mozne pripadne nejak nastavit, aby tento pruvodce pracoval bez zasahu
uzivatele?



Predem moc dekuji Jirka


InnoSetup a PATH

[*] mstevlik(zv)gamo.sk - 11.10.2004 07:34:43

> > Ano chcem zmenit enviroment variable Path a to tak ze chcem nakoniec
> > doplnit cestu do adresara mnou nainstalovanej app Co podla mna velka
> > zvrhlost nieje, zda sa mi to mensie zlo ako kopirovat dllka kt.
> > potrebujem niekam do systemovych adresarov Ale uz to mam vyriesene cez
> > app napisanu v delphi, kt. mi zapise cestu na patricne miesto v
> > registroch (este raz vdaka P.Gratzer)
>
> A proc ta DLL nedas do stejne slozky, jako svoji aplikaci?
>
> Karel Rys

Instalujem takto Oracle klienta, kde sice v adresari mojej app, mam
podadresar oracle a v nom podadresar bin, na kt. potrebujem nastavit cestu

Stevlik Marian
ISYS programator

GAMO a.s.
Kyjevske nam. 6
974 04 Banska Bystrica
mail: mstevlik(zv)gamo.sk
tel: +421 48 4137935, 4372111
ip-tel: 421 48 4372098
mobil: +421 905 462010
icq: 38493645

Licence GPL a uzavreny software

[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 11.10.2004 07:20:42

Bronislav Klucka wrote:

> No, mam zdrojaky v C++ i s headrama a celej balik
> je pod GPL, to mam ty headry vzit a opsat si je sam?
> Vystupem toho celeho, kdyz to prekompiluju je
> dll a to presne chci
>
> Brona

myslim ze jde o to, ze DLL je samostatny program a jeho volani z tveho
programu nebude nijak licencne kolidivat. Jedine problematicke misto je,
ze ve svem programu musim pouzit headry pro volani funkci z toho dll a
pokud i ty jsou pod GPL, musis si napsat svoje vlastni headry.

Peca

vlastnik dokumentu pri tisku

[*] Marek <marek.rakowski(zv)trz(tec)cz> - 11.10.2004 06:52:39

Ahoj,

mam naistalovanou tiskarnu kterou sdilim v siti.
je to APF Fax Printer z TurboPower Async Professional

potreboval bych odchytit IP adresu nebo nazev PC z ktereho, probiha tisk.
Marek


Licence GPL a uzavreny software

[*] Bronislav Klucka <bronislav.klucka(zv)pro2-soft(tec)com> - 11.10.2004 06:42:39

No, mam zdrojaky v C++ i s headrama a celej balik
je pod GPL, to mam ty headry vzit a opsat si je sam?
Vystupem toho celeho, kdyz to prekompiluju je
dll a to presne chci

Brona

> Psals, ze mas DLL se zdrojakama pod GPL
> licenci. Je to pravda ?
>
> Abys mohl dll nekde pouzit potrebujes i headry.
> Ty headry jsou pod GPL ?
>
> Nebo jsem nepochopil, co vlastne chces.
>
> Slavek
>

like, case insensitive, cestina

[*] Kalhous <kalhous(zv)eu(tec)cz> - 11.10.2004 05:52:35

> ing. Petr Borkovec wrote:
>> NAJIT%'' to UPPER(OBSAH)prevadi na velka pismena jen znaky bez diakritiky
>> - ale nevim, jak to vyresit.
Nezachytil jsem puvodni dotaz ale pokud se jedna o IB nebo FB tak prevod
znaku s diakritikou na velka funguje takto
UPPER(OBSAH COLLATE PXW_CSY)
samozrejme kdyz je to cestina, pro jine jazyky jiny collate. A drobnost -
nektere IB/FB nesnaseji kdyz je UPPER v ORDER BY frazi.

filtr podle numericke hodnoty

[*] Lada <lada.xt(zv)volny(tec)cz> - 11.10.2004 02:24:21

Lada napsal(a):

>Zdravim vsechny,
>
>zejmena ty kdoz mi kdy pomohli.. mam problem..
>Po delsi dobe jsem se opet dostal k ponekud zacatecnickemu badani a
>nemuzu za boha prijit na to, jak v tabulce efektivne filtrovat podle
>ciselne hodnoty..
>Potrebuju nastavit dotaz tak, abych pri zadani ciselne hodnoty v
>'editCastka' dostal v pripade zadani napr.
>
>'25' - pouze hodnoty v radu desitek (vcetne desetinnych mist)
>'250' - pouze hodnoty v radu stovek (vcetne desetinnych mist) atd...
>
>muj kod filtruje zaznamy pouze na vyskyt znaku.. tudiz samozrejme
>ignoruje rady... Nicmene more pokusu s
>'IBQuery1.ParamByName('p4').AsInteger:= ...' jsem podniknul.. zkratka uz
>nevim.. Muj kod:
>(jde mi o parametr p4...)
>
>procedure TForm1.editCastkaChange(Sender: TObject);
>begin
>
> IBQuery1.SQL.Clear;
> IBQuery1.SQL.Add('Select Datum, Firma, VS, Castka, Cislouctu, Banka,
>NV_VP,'+
> 'ID from Vypisy');
> IBQuery1.SQL.Add('Where (UPPER (Firma Collate PXW_CSY) LIKE :p1) and'+
> '(UPPER (VS Collate PXW_CSY) LIKE :p2) and'+
> '(UPPER (Cislouctu Collate PXW_CSY) LIKE :p3) and'+
> '(Castka LIKE :p4) Order by Datum, Firma');
>
> IBQuery1.ParamByName('p1').AsString :=
>'%'+AnsiUpperCase(editFirma.Text)+'%';
> IBQuery1.ParamByName('p2').AsString := '%'+AnsiUpperCase(editVS.Text)+'%';
> IBQuery1.ParamByName('p3').AsString := '%'+AnsiUpperCase(editCU.Text)+'%';
> IBQuery1.ParamByName('p4').AsString := editCastka.Text + '%';
>
> IBQuery1.Active := true;
>
>end;
>
>Za kazdou radu moc dekuju a podle situace preju dobrou noc, nebo krasnej
>den!
>
>Lada
>

Moc se omlouvam za pokracovani meho mikroproblemu.. ale zapomel jsem
dodat, ze v DB je pole 'Castka' typu Numeric(6,2)

a hraju si s FB1.5 v D6

Diky,

Lada

filtr podle numericke hodnoty

[*] Lada <lada.xt(zv)volny(tec)cz> - 11.10.2004 02:02:19

Zdravim vsechny,

zejmena ty kdoz mi kdy pomohli.. mam problem..
Po delsi dobe jsem se opet dostal k ponekud zacatecnickemu badani a
nemuzu za boha prijit na to, jak v tabulce efektivne filtrovat podle
ciselne hodnoty..
Potrebuju nastavit dotaz tak, abych pri zadani ciselne hodnoty v
'editCastka' dostal v pripade zadani napr.

'25' - pouze hodnoty v radu desitek (vcetne desetinnych mist)
'250' - pouze hodnoty v radu stovek (vcetne desetinnych mist) atd...

muj kod filtruje zaznamy pouze na vyskyt znaku.. tudiz samozrejme
ignoruje rady... Nicmene more pokusu s
'IBQuery1.ParamByName('p4').AsInteger:= ...' jsem podniknul.. zkratka uz
nevim.. Muj kod:
(jde mi o parametr p4...)

procedure TForm1.editCastkaChange(Sender: TObject);
begin

IBQuery1.SQL.Clear;
IBQuery1.SQL.Add('Select Datum, Firma, VS, Castka, Cislouctu, Banka,
NV_VP,'+
'ID from Vypisy');
IBQuery1.SQL.Add('Where (UPPER (Firma Collate PXW_CSY) LIKE :p1) and'+
'(UPPER (VS Collate PXW_CSY) LIKE :p2) and'+
'(UPPER (Cislouctu Collate PXW_CSY) LIKE :p3) and'+
'(Castka LIKE :p4) Order by Datum, Firma');

IBQuery1.ParamByName('p1').AsString :=
'%'+AnsiUpperCase(editFirma.Text)+'%';
IBQuery1.ParamByName('p2').AsString := '%'+AnsiUpperCase(editVS.Text)+'%';
IBQuery1.ParamByName('p3').AsString := '%'+AnsiUpperCase(editCU.Text)+'%';
IBQuery1.ParamByName('p4').AsString := editCastka.Text + '%';

IBQuery1.Active := true;

end;

Za kazdou radu moc dekuju a podle situace preju dobrou noc, nebo krasnej
den!

Lada


ini versus netypovy soubor

[*] vponecha(zv)volny(tec)cz - 11.10.2004 00:22:12

Ahoj vsichni,

Muzu pracovat s ini souborem jako s netypovym souborem? Potrebuji
nacpat nekolik souboru do jednoho netypoveho. Narazil jsem vsak na
ini file, nedari se mi ho tam nacpat, protoze ho nemuzu otevrit
jako netypovy.

Nakopne me nekdo?

Dik...

Vl.

Mel jsem nasledujici predstavu, ale tak to nejde.
Nejdriv ho chci otevrit jako netypovy soubor:
assignfile(inifile, cesta k ini file) // Tady nastane chyba
nemuze ini file otevrit jako netypovy reset (inifile);

Potom ho nakopiruji do jineho netypoveho souboru:
for i := 0 to FileSize(inifile) do
begin
BlockRead(inifile, Buf, Sizeof(Buf), Precteno);
BlockWrite(NovyNetypovyFile, Buf, Precteno, Zapsano);
end;

--
A za kolik kupujete ELEKTRO Vy?
http://www.MALL(tec)cz/penezenka
Overte si pres SMS, kolik se da USETRIT!

like, case insensitive, cestina

[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 10.10.2004 22:58:06

ing. Petr Borkovec wrote:
> NAJIT%'' to UPPER(OBSAH)prevadi na velka pismena jen znaky bez diakritiky
> - ale nevim, jak to vyresit.

Presne tak. Kdysi jsem to resil a na nic jineho jsem neprisel. Laboroval
jsem s SQL (nic) s nastavenim DB (nic, ale na tohle bych sazel) s nastavenim
komponent (nic, uz jsem byl zoufaly).

Ja to vyresil tak, ze - vzhledem k tomu, ze se nic nezobrazovalo, jen
hledalo jako vazebna relace - jsem to do DB cpal rovnou vsechno velke. Dost
divne, ale jedine co znam.

Mozna Pavel Cisar bude neco vedet.

--
Jiri Cincura
e-mail: mailto:jiri(zv)cincura.net; | http://www.cincura.net/
mailto:xcincura(zv)informatics.muni(tec)cz | http://photo.cincura.net/
ICQ#: 314711544 | http://phorum.cincura.net/
---
And if our times are difficult and perplexing,
so are they challenging and filled with opportunity.
-Robert F. Kennedy, 1961

Licence GPL a uzavreny software

[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 10.10.2004 22:00:02

Psals, ze mas DLL se zdrojakama pod GPL
licenci. Je to pravda ?

Abys mohl dll nekde pouzit potrebujes i headry.
Ty headry jsou pod GPL ?

Nebo jsem nepochopil, co vlastne chces.

Slavek

> No pockej,
> ja mam samozrejme zdrojaky i s headrama... takze kdybych je
> prepsal a pouzil GPL cpp soubory, tak by to bylo ok?
>
> Brona
>
> > Slavomir Skopalik wrote:
> > dll je samostatny program, takze pokud nepouzijes headry,
> > ale napises si vlastni, tak je to OK.
> > Jinak si ale over, zda ta dll neni jako LGPL, nebo alespon
> ten header
> > neni LGPL, to by ti praci hodne usetrilo.

like, case insensitive, cestina

[*] ing. Petr Borkovec <petrborkovec(zv)volny(tec)cz> - 10.10.2004 21:36:00

Zkusil jsem, co napsal Tomas - to nepomohlo. Problem je zrejme v tom, ze v
tom 'select * from tab_archiv where UPPER(OBSAH) LIKE '%TOTO JE TREBA
NAJIT%'' to UPPER(OBSAH)prevadi na velka pismena jen znaky bez diakritiky -
ale nevim, jak to vyresit.

> Musis si udelat upper uz nad tim textem v aplikaci, tj. v C++ Builderu
> hodnota1.text.UpperCase() predpokladam ze v Delphi je to to samy
> Tomas

> > Delphi 7, InterBase WI - 06.0.1.6.
> > Potrebuji prohledat pole tabulky, aby hledani bylo case insensitive a
> > fungovalo v cestine. Pole je varchar(10000). Tabulku ctu komponentou
> > IBQuery, pro hledani vkladam do jeji vlastnosti SQL 'select * from
> > tab_archiv where UPPER(OBSAH) LIKE upper(_WIN1250'hodnota1.Text')',do
> > hodnota1.text davam '%toto je treba najit%'.Takto je vysledek hledani
case
> > insensitive pro vsechna pismena s vyjimkou pismen s diakritikou, kde to
> > zustava case sensitive. Mohl by nekdo poradit?

Opravneni procesu - castecne vyreseno

[*] Milan Tomes <delphi(zv)haida(tec)cz> - 10.10.2004 21:07:58

Diky moc za pomoc...

Pokud bude zajem, tak muzu zverejnit vysledek meho snazeni... :)

S pozdravem

Milan Tomes

> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Petr Fejfar
> Sent: Wednesday, November 10, 2004 6:34 PM
>
> Milan Tomes wrote:
>
> > Ano - tohle v D7 je a dusledek je absolutne stejny jako direktiva
> > kompilatoru $ALIGN nebo $A.
>
> Nedalo mi to a zkousel jsem tu direktivu $Z: chybne jsem se domnival,
> ze ovlivnuje promennou daneho typu. Ovlivnuje jeho definici,
> takze kdyz jsem si vytahal definice TRUSTEE_TYPE, TRUSTEE_FORM
> a MULTIPLE_TRUSTEE_OPERATION do sve unit a pred ne dal $Z4,
> tak to vyrobilo packed record o velikosti 20, ktery potrebujes.

co je page faults

[*] david.kopecek(zv)hacktrack(tec)com - 10.10.2004 20:55:57

Zdravim

mam aplikaci psanou v delphi a podle task manageru ma asi 6000000 page
faults objektu ?. nevite cim vznikaji v delphi aplikacich a jak je
odstranovat

--
S pozdravem,
david
david.kopecek(zv)hacktrack.com

Checked vice CheckBoxu do Mema

[*] Josef Straka <strakajosef(zv)seznam(tec)cz> - 10.10.2004 20:27:52

Co treba takhle, probrat vsechny komponenty na formulari a kdyz to bude
CheckBox, zapsat jeho jmeno a stav.

procedure TForm1.Button1Click(Sender: TObject);
var A: Integer;
Jmeno: String;
begin
Memo1.Clear;
for A := 0 to Form1.ComponentCount -1 do
begin
if Form1.Components[A] is TCheckBox then
begin
Jmeno := TCheckBox(Form1.Components[A]).Name;
if TCheckBox(Form1.Components[A]).Checked then
Memo1.Lines.Add(Jmeno + ' 1') else Memo1.Lines.Add(Jmeno + ' 0');
end;
end;
end;

Straka Josef


----- Original Message -----
> D6, WinXP Pro, SP2
>
> Zdravim vsechny,
> mam takovy drobny problem, potreboval bych do Mema dostat hodnoty 0
> nebo 1 z vice CheckBoxu podle toho, jestli je zaskrtly, ci nikoliv.
> nevite nekdo jak na to?
>
> S pozdravem,
> Petr Cafourek
> mailto:petr.cafourek.d7(zv)seznam(tec)cz

DeleteFile - jak vymazu celou slozku

[*] konf_delphi(zv)centrum(tec)cz - 10.10.2004 20:19:52

Muzes zkusit tohle - nasel jsem to nekde na netu, bohuzel uz nevim kde,
takze autor snad promine :(

uses FileCtrl;

procedure SmazDir(Cesta: String);
var
sr: TsearchRec;
r: Integer;
begin
if Cesta[Length(Cesta)] <> '\' then Cesta := Cesta + '\';
r := Findfirst(cesta+'*.*',faAnyFile,sr);
while r = 0 do begin
if copy(sr.name,1,1) <> '.' then begin
if sr.attr and faDirectory <> 0 then begin
SmazDir(Cesta+sr.name);
Application.ProcessMessages;
end else begin
DeleteFile(cesta+sr.name)
end;
END;
Application.ProcessMessages;
r := FindNext(sr);
end;
findclose(sr);
RemoveDirectory(Pchar(copy(cesta,1,Length(cesta)-1)));
end;

A pak volas: SmazDir( cesta k adresari );

> ahoj,
>
> pri behu programu vytvarim soubory ve slozce
> extractfilepath(application.exename) +'\temp\Page' + IntToHex(PageNum, 2)+
>
>, ktere bych chtel smazat najednou, je na to nejaka fce.
>
> Marek


Licence GPL a uzavreny software

[*] Bronislav Klucka <bronislav.klucka(zv)pro2-soft(tec)com> - 10.10.2004 18:35:44

No pockej,
ja mam samozrejme zdrojaky i s headrama... takze kdybych je prepsal a
pouzil GPL cpp soubory, tak by to bylo ok?

Brona

> Slavomir Skopalik wrote:
> dll je samostatny program, takze pokud nepouzijes headry,
> ale napises si vlastni, tak je to OK.
> Jinak si ale over, zda ta dll neni jako LGPL, nebo alespon ten header
> neni LGPL, to by ti praci hodne usetrilo.
>
> Slavek
>

Opravneni procesu - castecne vyreseno

[*] Petr Fejfar <development(zv)callnet(tec)cz> - 10.10.2004 18:33:43

Milan Tomes wrote:

> Ano - tohle v D7 je a dusledek je absolutne stejny jako direktiva
> kompilatoru $ALIGN nebo $A.

Nedalo mi to a zkousel jsem tu direktivu $Z: chybne jsem se domnival,
ze ovlivnuje promennou daneho typu. Ovlivnuje jeho definici,
takze kdyz jsem si vytahal definice TRUSTEE_TYPE, TRUSTEE_FORM
a MULTIPLE_TRUSTEE_OPERATION do sve unit a pred ne dal $Z4,
tak to vyrobilo packed record o velikosti 20, ktery potrebujes.


HTH, pf

Licence GPL a uzavreny software

[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 10.10.2004 18:29:43

dll je samostatny program, takze pokud nepouzijes headry,
ale napises si vlastni, tak je to OK.
Jinak si ale over, zda ta dll neni jako LGPL, nebo alespon ten header
neni LGPL, to by ti praci hodne usetrilo.

Slavek

> Zdar,
> mam zdrojaky v C++ (to bych si prelozil) k dllku licencovane
> jako GPL,
> je nejaka moznost, jak to zamontovat do uzavreneho (a placeneho)
> software? Nejaka cesticka?
>
>
>
> s pozdravem
> Bronislav Klucka
>

Antivirus

[*] Bronislav Klucka <bronislav.klucka(zv)pro2-soft(tec)com> - 10.10.2004 18:19:42

Zdar,
potreboval bych nejaky antivirus do aplikace (nejlepe dll nebo neco
takoveho), nejlepe pod licenci MPL (neplaceny, ne GPL). Aby byl schopen
kontrolovat soubory i maily.

Nevite o necem?
s pozdravem
Bronislav Klucka


----------=[ pro2-soft.com ]=----------
http://pro2-soft.com
Bronislav Klucka(zv)pro2-soft.com
+420 605 58 29 22

* webove aplikace
* software na zakazku
* skoleni PC
---------------------------------------

InnoSetup a PATH

[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 10.10.2004 17:51:38

> Ano chcem zmenit enviroment variable Path a to tak ze chcem nakoniec
> doplnit cestu do adresara mnou nainstalovanej app Co podla mna velka
> zvrhlost nieje, zda sa mi to mensie zlo ako kopirovat dllka kt.
> potrebujem niekam do systemovych adresarov Ale uz to mam vyriesene cez
> app napisanu v delphi, kt. mi zapise cestu na patricne miesto v
> registroch (este raz vdaka P.Gratzer)

A proc ta DLL nedas do stejne slozky, jako svoji aplikaci?

Karel Rys


Opravneni procesu - castecne vyreseno

[*] Milan Tomes <delphi(zv)haida(tec)cz> - 10.10.2004 17:45:37

Ano - tohle v D7 je a dusledek je absolutne stejny jako direktiva
kompilatoru $ALIGN nebo $A.

S pozdravem

Milan Tomes

> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Martin Pisarik
> Sent: Wednesday, November 10, 2004 4:07 PM
>
> Project/Options/Advanced compiler/Data alignment ?
>
> >Jak donutit Delphi aby pouzili mnou upravenou unitu AccCtrl resp. aby
> >vsechny prvky recordu zarovnal na 4 byte ??? Nakopirovani do adresare
> >projektu nepomaha...

Opravneni procesu - castecne vyreseno

[*] Petr Fejfar <development(zv)callnet(tec)cz> - 10.10.2004 17:09:34

Milan Tomes wrote:

> tak je porad celkova velikost vracena funkci SizeOf(_TRUSTEE_A) = 12.
> Pokud pridam packed, tak je 11.

Sice nevim, proc stale zminujes 11, kdyz potrebujes strukturu o velikosti
5*4=20
:-), ale mas pravdu v tom, ze Delphi ji tvrdosijne odmita vygenerovat,
alespon ten muj shit D6.02prof.

Ty enumerated polozky by mely jit roztahnout na DWORD jeste pomoci direktivy
$Z4,
ale me D6 zrejme prdi jak na direktivu $Z, tak na $A, coz bude nejspis i
tvuj pripad.

Takze vic ti neporadim. Snad jen jeste poznamka k jinemu prispevku:
ja v D6 zadne Project Options | Advanced Compiler | Data alignment nemam.

pf


© Delphi.cz, program netcode.cz, 2008-9.