Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
Precteni poslednich X radku dokumentu
[*] lynx01(zv)tiscali(tec)cz - 19.1.2007 21:14:21
Zdravim,
Potreboval bych precist poslednich 10-20 radku textoveho souboru, ktery je
nekolik set MB velky. Jedna se o log soubor ze serveru. Jde mi o to, ze nechci
nacitat vzdy cely textovy soubor, protoze tim vytezuji zbytecne moc systemovych
prostredku, ktere bych opetovne musel znovu uvolnovat, slysel jsem, ze na
Unixu je prikaz, ktery vraci posledni radky souboru, bez nutnosti nacitat
cely soubor. Mate nekdo zkusenosti s timto pod Win?
Predem dekuji za odpoved.
Petr Holub
______________________________________
Superrychly internet ADSL 512 od TISCALI jiz od 295 Kc mesicne !
http://sluzby.tiscali(tec)cz/domacnosti/adsl/adsl-512-promo.php?r=pb
Zmena stavu v ActionList
[*] Petr Svejda <petr(zv)svejda(tec)cz> - 21.1.2007 17:41:30
info(zv)drnholec(tec)cz napsal(a):
> Kde a jak mam podchytit zmenu stavu jako je ENABLED/DISABLED a VISIBLE
> u jakekoliv z Action v konktretnim ActionList.
>
> Vytvarim totiz stromove menu (pouzivam VirtualTreeview) z hlavniho menu
> a potrebuji ho aktualizovat stavy nodes (enabled,visible) podle
> okamziteho stavu Actio
>
udalost OnUpdate komponenty ActionList. Napriklad:
procedure TForm1.ActionList1Update(Action: TBasicAction;
var Handled: Boolean);
begin
Action1.Enabled := Edit1.Text = 'povoluji';
end;
Petr
www.znalosti(tec)cz
www.isoft(tec)cz
Potvrzovani pridavani zaznamu do databaze
[*] Jan Sebelik <honza(zv)haes(tec)cz> - 20.1.2007 09:39:23
> Pokud v totmto kontextu pouzijes Abort ma to tu vyhodu, ze
> uzivatel odklikne hlasku a pokracuje tam kde prestal
teda nevim, soudim, ze
MessageDlg;
Abort
cosi...
ma na prubeh kodu aplikace stejny dopad, jako
raise
cosi...
Abort je taky vyjimka, akorat ji neprovazi hlaska pres nejaky exceptrion handler
Na "cosi" se stejne nedostanes.
Honza
====================================
= RNDr. Jan Sebelik - HAES
= Skolici a konzultacni stredisko pro vyvoj SW
= www.haes(tec)cz
= Vojtiskova 321
= 507 81 Lazne Belohrad
====================================
ExpressMasterView a poradie stlpcov
[*] Ivan Dulgerov <ivan.dulgerov(zv)sazp.sk> - 22.1.2007 09:04:32
Zdravim.
Pouzivav komponentu ExpressMasterView, a potrebujem
upravit poradie zobrazenych stlpcov .
Ked si v Desingeri zmenim poradie podla svojich potrieb,
pri spusteni aplikacie zostane bez zmeny.
Pokial tuto komponentu niekto pouzivate, poradte
co mozem mat zle nastavene? :-)
--
S pozdravom
Ivan Dulgerov CEI SAZP Programator
Tajovskeho 28
97590 Banska Bystrica
tel: 048 4374144
ICQ : 190698607
mail : ivan.dulgerov(zv)sazp.sk
Firebird Verbose pri backup
[*] aldik(zv)quick(tec)cz - 22.1.2007 09:58:36
Hoj ahoj, tak jsem zjistil zajimavou vec pokud mam parametr verbose pri backupu
firebirdu, tak se nejak nekorektne vyuziva pamet a zustava v ni vypis obrazovky
viset, co ty na to HajHou, mate jeste nekdo podobnou zkusenost?
Ales
Firebird Verbose pri backup
[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 22.1.2007 11:08:40
A delas zalohu pres gbak nebo pres service_mgr?
--
Jiri {x2} Cincura
http://blog.vyvojar(tec)cz/jirka/ | http://www.ID3renamer.com
knihovna ikon
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 22.1.2007 12:18:45
Koukam se po nejake bohate kolekci ikon pouzitelnych na tlacitka,
tedy 16x16 BMP. Netusite nekdo o nejake, co by byla free a volne k
pouziti?
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://synapse.ararat(tec)cz/ - Ararat Synapse - TCP/IP Lib.
Skryti DOS okna
[*] Ondrej Kelle <o.kelle(zv)digitalpublishing.de> - 22.1.2007 12:34:46
> poradi nekdo, prosim, jak skryt z listy
> okno dosovske aplikace, kterou z me apl. vyvolam pres
> CreateProcess ?
>
> Poustim pres:
>
> Win32Check(CreateProcess(nil, PChar(cCmdLine), nil, nil, True, 0,
> nil, PChar(cWorkDir), StartupInfo, ProcessInfo));
Malo by to ist cez StartupInfo:
// hide console window
StartupInfo.wShowWindow := SW_HIDE;
StartupInfo.dwFlags := STARTF_USESHOWWINDOW;
HTH
TOndrej
Skryti DOS okna
[*] Pavel Malinsky <malinsky(zv)pmcom(tec)cz> - 22.1.2007 12:28:46
Ahoj,
poradi nekdo, prosim, jak skryt z listy
okno dosovske aplikace, kterou z me apl. vyvolam pres
CreateProcess ?
Poustim pres:
Win32Check(CreateProcess(nil, PChar(cCmdLine), nil, nil, True, 0,
nil, PChar(cWorkDir), StartupInfo, ProcessInfo));
Dekuji predem
PM
Env: XPPro, D7Pro;program pracujici po admin uctem
[*] Franta Flinta <jarek2(zv)centrum(tec)cz> - 22.1.2007 12:44:47
dobry den vespolek.
resim nasledujici problem. potrebuji, aby aplikace mela pristup do
adresare, kde ji v tom brani prava aktualne prihlaseneho uzivatele. je
mozne provest na zacatku startu programu automaticke prihlaseni pod
administratorskymi pravy(jen pro danou aplikaci), tak aby uzivatel na
prvni pohled nic nepoznal? diky za "nakopnuti". uz to googlim asi 30
minut a zatim stale nic nenachazim.
s pozdravem Jarda
Skryti DOS okna
[*] Pavel Malinsky <malinsky(zv)pmcom(tec)cz> - 22.1.2007 12:38:47
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Pavel Malinsky
>
> poradi nekdo, prosim, jak skryt z listy
> okno dosovske aplikace, kterou z me apl. vyvolam pres
> CreateProcess ?
Samozrejme StartupInfo.wShowWindow:= SW_HIDE;
Priste rychleji premyslet a pomaleji psat...
PM
Firebird Verbose pri backup
[*] aldik(zv)quick(tec)cz - 22.1.2007 13:16:50
pres isc_service pouzivam FBLib na zalohovani a praci s databazi.
A.
Quoting Jiri Cincura <diskuze(zv)cincura.net>:
> A delas zalohu pres gbak nebo pres service_mgr?
>
> --
> Jiri {x2} Cincura
> http://blog.vyvojar(tec)cz/jirka/ | http://www.ID3renamer.com
>
>
>
program pracujici po admin uctem
[*] Karel Klimes <klimes(zv)unicontrols-tramex(tec)cz> - 22.1.2007 13:22:50
> potrebuji, aby aplikace mela pristup do
> adresare, kde ji v tom brani prava aktualne prihlaseneho uzivatele. je
> mozne provest na zacatku startu programu automaticke prihlaseni pod
> administratorskymi pravy(jen pro danou aplikaci), tak aby uzivatel na
> prvni pohled nic nepoznal?
Myslim, ze zadani hesla pro admina je ve WinXP nevyhnutelne. Leda to
nejak slozite obejit, ale jak? To vi snad je v M$. Zkus pohledat neco
o GINA atd...
kchodl
knihovna ikon
[*] Franta Flinta <jarek2(zv)centrum(tec)cz> - 22.1.2007 12:46:48
jmenuje se to iconbook. http://www.2beesoft.com. obsahuje 32x32 i 16x16
ikony. prehledne roztridene do temat. mozno ukladat do bmp,gif,ico,jpg.
daji se k tomu sosnout i pridavne knihovny s ikonama.
Jarda
Lukas Gebauer napsal(a):
> Koukam se po nejake bohate kolekci ikon pouzitelnych na tlacitka,
> tedy 16x16 BMP. Netusite nekdo o nejake, co by byla free a volne k
> pouziti?
>
>
>
knihovna ikon
[*] Tomas Krejzek <tomas.krejzek(zv)kpsys(tec)cz> - 22.1.2007 13:38:51
Ahoj zkus tohle
http://artax.karlin.mff.cuni(tec)cz/~kendy/ooo/icons/status/
http://www.everaldo.com/crystal.html
Tom
Lukas Gebauer napsal(a):
> Koukam se po nejake bohate kolekci ikon pouzitelnych na tlacitka,
> tedy 16x16 BMP. Netusite nekdo o nejake, co by byla free a volne k
> pouziti?
>
>
>
program pracujici po admin uctem
[*] delphi(zv)spst(tec)cz - 22.1.2007 13:52:52
hledej
CreateProcAsUser
program pracujici po admin uctem
[*] Petr Berek <sojokl(zv)seznam(tec)cz> - 22.1.2007 14:14:54
On 1/22/07, Karel Klimes <klimes(zv)unicontrols-tramex(tec)cz> wrote:
>
> > potrebuji, aby aplikace mela pristup do
> > adresare, kde ji v tom brani prava aktualne prihlaseneho uzivatele. je
> > mozne provest na zacatku startu programu automaticke prihlaseni pod
> > administratorskymi pravy(jen pro danou aplikaci), tak aby uzivatel na
> > prvni pohled nic nepoznal?
Ahoj,
myslim, ze bez hesla vubec. Ale existuje dialog spustit jako. Pres ten by to
slo. Ale jak pises, ze uzivatel nema nic poznat. Nevim.
Petr
program pracujici po admin uctem
[*] Ludek Finstrle <ludek.finstrle(zv)pzkagis(tec)cz> - 22.1.2007 14:24:55
Mon, Jan 22, 2007 at 02:14:54PM +0100, Petr Berek napsal(a):
> On 1/22/07, Karel Klimes <klimes(zv)unicontrols-tramex(tec)cz> wrote:
> >
> > > potrebuji, aby aplikace mela pristup do
> > > adresare, kde ji v tom brani prava aktualne prihlaseneho uzivatele. je
> > > mozne provest na zacatku startu programu automaticke prihlaseni pod
> > > administratorskymi pravy(jen pro danou aplikaci), tak aby uzivatel na
> > > prvni pohled nic nepoznal?
>
> myslim, ze bez hesla vubec. Ale existuje dialog spustit jako. Pres ten by to
> slo. Ale jak pises, ze uzivatel nema nic poznat. Nevim.
Leda me napada napsat si pro to nejakou sluzbu ktera pod adminem pobezi,
ze by po nejakem overeni aplikace (MD5 ci podobna havet jako minimum, aby
se toho nedalo jednoduse zneuzit) ji mohla "nejak" zmenit pod kym bezi,
ci ji spustit ...
Jenze pak mate problem, ze by v te aplikaci nemel byt zadny open dialog
ci dalsi veci, kde se uzivatel muze dostat k praci s FS ci registry a dalsim,
protoze by to byla security hole jak prase.
Luf
program pracujici po admin uctem
[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 22.1.2007 14:26:55
Franta Flinta wrote:
> administratorskymi pravy(jen pro danou aplikaci), tak aby uzivatel na
> prvni pohled nic nepoznal? diky za "nakopnuti". uz to googlim asi 30
Neni to otrchu security problem, kdyz program spusteny beznym userem by
mohl neviditelne bezet s pravy admina?
--
Jiri {x2} Cincura
http://blog.vyvojar(tec)cz/jirka/ | http://www.ID3renamer.com
program pracujici po admin uctem
[*] Petr Vones <conference(zv)petrvones(tec)net> - 22.1.2007 14:40:56
From: "Franta Flinta" <jarek2(zv)centrum(tec)cz>
> administratorskymi pravy(jen pro danou aplikaci), tak aby uzivatel na
> prvni pohled nic nepoznal? diky za "nakopnuti". uz to googlim asi 30
To by bylo hodne spatne kdyby to slo. K cemu je to vlastne potreba ? Neni to
spise spatne navrzena aplikace ? Typicky by se pouze instalace aplikace mela
spustit pod uctem s admin (nebo alespon power user) pravy. Nicmene uzivatel
by pri praci s takovou aplikaci nemel mit nikdy potrebu vyssich prav.
Petr Vones
program pracujici po admin uctem
[*] aldik(zv)quick(tec)cz - 22.1.2007 15:24:59
Spravne,
ono by stacilo misto googleni jen nastavit pravo na adresar pro daneho
usera ci
skupinu...
Resit neco takoveho programove je nesmysl.
Ales
Quoting Petr Vones <conference(zv)petrvones.net>:
> From: "Franta Flinta" <jarek2(zv)centrum(tec)cz>
>> administratorskymi pravy(jen pro danou aplikaci), tak aby uzivatel na
>> prvni pohled nic nepoznal? diky za "nakopnuti". uz to googlim asi 30
>
> To by bylo hodne spatne kdyby to slo. K cemu je to vlastne potreba ? Neni to
> spise spatne navrzena aplikace ? Typicky by se pouze instalace aplikace mela
> spustit pod uctem s admin (nebo alespon power user) pravy. Nicmene uzivatel
> by pri praci s takovou aplikaci nemel mit nikdy potrebu vyssich prav.
>
> Petr Vones
>
>
>
program pracujici po admin uctem
[*] Petr Vones <conference(zv)petrvones(tec)net> - 22.1.2007 15:53:01
From: <aldik(zv)quick(tec)cz>
> ono by stacilo misto googleni jen nastavit pravo na adresar pro daneho
> usera ci
> skupinu...
Stale je otazka k cemu je to dobre. Veskera data aplikace by prece mela byt
v profilu uzivatele, kde zadne nastavovani neni treba.
> Resit neco takoveho programove je nesmysl.
To je potom typicka uloha pro instalator aplikace.
Petr Vones
program pracujici po admin uctem
[*] Franta Flinta <jarek2(zv)centrum(tec)cz> - 22.1.2007 16:27:04
jedna se o to, ze je nutne, aby uzivatel nasim servisnim programem mohl
spustit udrzbu databaze, ktera provadi dump/rozdump db a prepis puvodni
db rozdumpovanou verzi. vzhledem k tomu, ze tam uzivatel nema mit
pristup na zapis, tak me nenapada jinaci zpusob jak to udelat.
jde mi taky o to, ze tento pozadavek se objevil az pote co byl cely
programek udelan, jinak by se delal jako sluzba.... (udajne jedno z
moznych reseni).
s pozdravem
jarda
Petr Vones napsal(a):
> From: "Franta Flinta" <jarek2(zv)centrum(tec)cz>
>> administratorskymi pravy(jen pro danou aplikaci), tak aby uzivatel na
>> prvni pohled nic nepoznal? diky za "nakopnuti". uz to googlim asi 30
>
> To by bylo hodne spatne kdyby to slo. K cemu je to vlastne potreba ? Neni to
> spise spatne navrzena aplikace ? Typicky by se pouze instalace aplikace mela
> spustit pod uctem s admin (nebo alespon power user) pravy. Nicmene uzivatel
> by pri praci s takovou aplikaci nemel mit nikdy potrebu vyssich prav.
>
> Petr Vones
>
>
>
>
>
OT: cena aplikace
[*] Dusan Vrazel <d.vrazel(zv)centrum(tec)cz> - 22.1.2007 19:51:17
Dobry den,
omlouvam se za OT.
Chtel jsem se zeptat, kolik by stala ORIENTACNE udelat aplikace na zakazku
(jen pro moji potrebu), ktera by umoznovala zadavat klienty, tyto klienty by
bylo mozno pozdeji editovat a radit. Udaje o klientech by se potom pouzili
pri tisku smluv a dokumentu. Asi 12 dokumentu. Aplikaci mam v excelu, ale
chtel bych to mit jako aplikaci.
Dekuji. Nabidky pls. na soukromy mail d.vrazel(zv)centrum(tec)cz
Dusan Vrazel.
program pracujici po admin uctem
[*] Ludek <konference(zv)sales(tec)cz> - 22.1.2007 21:01:22
----- Original Message -----
From: "Franta Flinta" <jarek2(zv)centrum(tec)cz>
> jedna se o to, ze je nutne, aby uzivatel nasim servisnim programem mohl
> spustit udrzbu databaze, ktera provadi dump/rozdump db a prepis puvodni
> db rozdumpovanou verzi. vzhledem k tomu, ze tam uzivatel nema mit
> pristup na zapis, tak me nenapada jinaci zpusob jak to udelat.
> jde mi taky o to, ze tento pozadavek se objevil az pote co byl cely
> programek udelan, jinak by se delal jako sluzba.... (udajne jedno z
> moznych reseni).
Ahoj,
No to je typicky blbe zadani.
Bud uzivatel MA pravo prepsat databazi nebo NEMA. Nic "napul" neexistuje.
Pokud dobre chapu smysl cele rosady, jde o to, aby obycejny user MEL pravo backup/restore ale aby nemel pravo si zalohu nekam prekopirovat nebo naopak podvrhnout nejaky svuj upraveny backup databaze a jim prepsat ostra data.
Toho lze imho dosahnout bud tim, ze to bude delat nejaka sluzba bezici pod uctem s "lepsimi" pravy a tim padem se user primo k ulozisti nedostane, nebo je mozne zaheslovat zalohu, pro uzivatele neznamym heslem. Tim padem po ukradeni bude necitelna a pokud by chtel podvrhnout nejaka svoje data k obnove, pak by je neumel spravne zaheslovat a tim padem by pri dekodovani doslo k chybe a obnova dat by se neprovedla.
Ludek
program pracujici po admin uctem
[*] Franta Flinta <jarek2(zv)centrum(tec)cz> - 23.1.2007 08:28:07
v podstate mas pravdu,
jde o to, ze zakaznik si prekopiroval db, nasledne provadel financni
operace, pote vzal puvodni soubor, nahral ho na puvodni misto a veskere
zisky mezi casem odkopirovani databaze a opetovne nahrani zpet byli v
jeho kapse...
nastavenim omezenim pristupu prav to odnesl "muj" program. samozrejme,
ze sluzba by to vyresila. nicmene program je na svete a momentalne
nejschudnejsi reseni vidim v pouziti CreateProcAsUser. v opacnem
priprade bych musel program predelat na sluzbu(coz by asi nakonec
problem nebyl), ale musel bych do nej pridelat funkce pro praci se
sluzbami(instalace sluzby,spusteni....) coz by bylo pro naseho typickeho
uzivatele velmi slozita operace.
hezky den
jarda
Ludek napsal(a):
> ----- Original Message -----
> From: "Franta Flinta" <jarek2(zv)centrum(tec)cz>
>
>
>
>> jedna se o to, ze je nutne, aby uzivatel nasim servisnim programem mohl
>> spustit udrzbu databaze, ktera provadi dump/rozdump db a prepis puvodni
>> db rozdumpovanou verzi. vzhledem k tomu, ze tam uzivatel nema mit
>> pristup na zapis, tak me nenapada jinaci zpusob jak to udelat.
>> jde mi taky o to, ze tento pozadavek se objevil az pote co byl cely
>> programek udelan, jinak by se delal jako sluzba.... (udajne jedno z
>> moznych reseni).
>
> Ahoj,
> No to je typicky blbe zadani.
> Bud uzivatel MA pravo prepsat databazi nebo NEMA. Nic "napul" neexistuje.
> Pokud dobre chapu smysl cele rosady, jde o to, aby obycejny user MEL pravo backup/restore ale aby nemel pravo si zalohu nekam prekopirovat nebo naopak podvrhnout nejaky svuj upraveny backup databaze a jim prepsat ostra data.
> Toho lze imho dosahnout bud tim, ze to bude delat nejaka sluzba bezici pod uctem s "lepsimi" pravy a tim padem se user primo k ulozisti nedostane, nebo je mozne zaheslovat zalohu, pro uzivatele neznamym heslem. Tim padem po ukradeni bude necitelna a pokud by chtel podvrhnout nejaka svoje data k obnove, pak by je neumel spravne zaheslovat a tim padem by pri dekodovani doslo k chybe a obnova dat by se neprovedla.
>
> Ludek
>
>
>
>
>
program pracujici po admin uctem
[*] Ludek <konference(zv)sales(tec)cz> - 23.1.2007 12:06:25
----- Original Message -----
From: "Franta Flinta" <jarek2(zv)centrum(tec)cz>>v podstate mas pravdu,
> jde o to, ze zakaznik si prekopiroval db, nasledne provadel financni
> operace, pote vzal puvodni soubor, nahral ho na puvodni misto a veskere
> zisky mezi casem odkopirovani databaze a opetovne nahrani zpet byli v
> jeho kapse...
> nastavenim omezenim pristupu prav to odnesl "muj" program. samozrejme,
> ze sluzba by to vyresila. nicmene program je na svete a momentalne
> nejschudnejsi reseni vidim v pouziti CreateProcAsUser. v opacnem
> priprade bych musel program predelat na sluzbu(coz by asi nakonec
> problem nebyl), ale musel bych do nej pridelat funkce pro praci se
> sluzbami(instalace sluzby,spusteni....) coz by bylo pro naseho typickeho
> uzivatele velmi slozita operace.
Ahoj,
no pokud si uzivatele ten program sami instaluji je jakakoliv ochrana k smichu.
Podle mne je to cele nejake zmatlane, nebo do toho spravne nevidim:)
Ludek
Admin ucet jen obcas - was: program pracujici pod
[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 23.1.2007 12:36:27
Zdravim,
tak me tak napada pri cteni diskuze nad admin uctem ze potrebuju neco
podobneho. Nicmene ne tak brutalne. Mam aplikaci ktera je "nekde"
(obvykle v program files) nainstalovana a data ma ulozena v Documents
and settings, takze zadny problem. Nicmene pri startu zjisti z internetu
jestli neni novejsi verze a pokud je, pusti externi aktualizacni SW. Ale
potrebuji samozrejmne aby tato aktualizace dokazala prepsat ty veci v
program files. Ted to mam resene tak ze pokud to nejde (nejsou prava)
proste mu reknu at se prihlasi jako admin. Ale sla by udelat treba
sluzba ktera by to resila? Jak bych potom mel s tou sluzbou z toho
aktualizacniho SW komunikovat?
Diky za tip.
TR
program pracujici po admin uctem
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 23.1.2007 12:40:27
Puvodni zprava ze dne 23.1.2007 od Franta Flinta:
> oni(uzivatele) si to sami neinstaluji,
Kdybych byl administrator nejake site mel spravovat tento program, tak
bych vasi firmu asi miloval :-)
> oni jsou radi, ze zvladnou za pomoci obou rukou right click.
> nainstalovane to dostanou od nas, sami maji "mirne omezeny" pristup.
> zvlaste ke slozce s db. zajimalo by me jestli nekdo resil podobny
> problem(ochrana db pred samotnym zakaznikem, aby nemohl
> prekopirovavanim db a tim padem sidit) a jak se s tim vyporadal? je
> tu nekdo takovy?
Pekne dekuji za takovy program, kde programatori prede mnou chrani
ma vlasti data :-)
> jinak si myslim, ze dalsi diskuze na tema, jak (a jestli) to je
> zmatlane bude akorat provokovat admina... :-)
Ne, neprovokuje :-)
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================
program pracujici po admin uctem
[*] Franta Flinta <jarek2(zv)centrum(tec)cz> - 23.1.2007 12:32:27
oni(uzivatele) si to sami neinstaluji, oni jsou radi, ze zvladnou za
pomoci obou rukou right click. nainstalovane to dostanou od nas, sami
maji "mirne omezeny" pristup. zvlaste ke slozce s db.
zajimalo by me jestli nekdo resil podobny problem(ochrana db pred
samotnym zakaznikem, aby nemohl prekopirovavanim db a tim padem sidit) a
jak se s tim vyporadal? je tu nekdo takovy?
jinak si myslim, ze dalsi diskuze na tema, jak (a jestli) to je zmatlane
bude akorat provokovat admina... :-)
cili jsem to vyresil pouzitim funkce CreateProcAsUser.
dany kod vypada zhruba takto:
uses JclMiscel,JCLSecurity,JCLShell,JCLWin32;
begin
EnableProcessPrivilege( True, SE_TCB_Name);
EnableProcessPrivilege( True, SE_INCREASE_QUOTA_NAME);
EnableProcessPrivilege( True, SE_ASSIGNPRIMARYTOKEN_NAME);
CreateProcAsUser(domena,user,heslo,command_line);
end;
s tim, ze dany uzivatelsky ucet by mel mit nastavene prava "Nahradit
token urovne procesu", "Upravit kvoty pameti
pro proces" a "Jednat jako cast operacniho systemu".
> Ahoj,
> no pokud si uzivatele ten program sami instaluji je jakakoliv ochrana k smichu.
> Podle mne je to cele nejake zmatlane, nebo do toho spravne nevidim:)
>
> Ludek
program pracujici po admin uctem
[*] Vladimir Nikel <vladimir.nikel(zv)post(tec)cz> - 23.1.2007 13:04:29
uz mam smaznuty zacatek tohoto threadu a nevim tedy o jaky db engine
se jedna, ale obecne je tu cesta jak to resit pokud se nejedna o
souborove databaze. Reseni je to, ze samotna databazova cast ( sql
server ) bezi jako sluzba pod admin uctem ( nebo libovolnym jinym, s
pravem pristupu k tem datovym souborum ). Samotna aplikace pak bezi
pod uctem prihlaseneho uzivatele, fyzicky k db souborum pristup mit
nemusi, komunikuje s sql serverem pres sitovou vrstvu. Tak se vlk
nazere a koza zustane cela. je samozreme mozne pak i delat pozadovany
backup/restore pres sluzby sql serveru. Proste stejny princip, jako
pri kazde jine aplikaci, ktera pristupuje na nejaky sql server.
zdravim
VN.
Puvodni zprava ze dne 23.1.2007 od Franta Flinta:
<==============Original message text===============
>oni(uzivatele) si to sami neinstaluji, oni jsou radi, ze zvladnou za
>pomoci obou rukou right click. nainstalovane to dostanou od nas, sami
>maji "mirne omezeny" pristup. zvlaste ke slozce s db.
>zajimalo by me jestli nekdo resil podobny problem(ochrana db pred
>samotnym zakaznikem, aby nemohl prekopirovavanim db a tim padem sidit) a
>jak se s tim vyporadal? je tu nekdo takovy?
>jinak si myslim, ze dalsi diskuze na tema, jak (a jestli) to je zmatlane
>bude akorat provokovat admina... :-)Admin ucet jen obcas - was: program pracujici pod
[*] Cajbik Martin <cajbik(zv)sct.sk> - 23.1.2007 15:06:37
Zdravim,
mal by som trochu podobnu otazku:
Akym sposobom by bolo mozne zabezpecit pristup z klasickej klientskej aplikacie k zdielanemu adresaru na serveri tak, aby sa tento pristup zaroven nepovolil samotnemu prihlasenemu pouzivatelovi ?
Aplikacia samozrejme disponuje osobitnym menom a heslom pre pristup ale pocas jej pripojenia sa adresar stane pristupnym pouzivatelovi aj mimo kontext aplikacie co je samozrejme neziaduce.
Alebo sa to pomocou klasickeho sietoveho pristupu vyriesit neda ?
Jednou s moznosti je samozrejme pouzitie specialnej sluzby, ci uz na strane servera (v tomto pripade by sluzba zabezpecovala vykonavanie operacii na serveri a prenos udajov na klienta - obdoba alebo priamo pouzitie FTP) alebo klienta (pod systemovym uctom, tym padom by pripojeny adresar nebol pouzivatelovi pristupny).
Martin Cajbik
Soft & Control Technology s.r.o. Kosice
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Tomas Rosa
Sent: Tuesday, January 23, 2007 12:36 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Admin ucet jen obcas - was: program pracujici pod admin uctem...
Zdravim,
tak me tak napada pri cteni diskuze nad admin uctem ze potrebuju neco
podobneho. Nicmene ne tak brutalne. Mam aplikaci ktera je "nekde"
(obvykle v program files) nainstalovana a data ma ulozena v Documents
and settings, takze zadny problem. Nicmene pri startu zjisti z internetu
jestli neni novejsi verze a pokud je, pusti externi aktualizacni SW. Ale
potrebuji samozrejmne aby tato aktualizace dokazala prepsat ty veci v
program files. Ted to mam resene tak ze pokud to nejde (nejsou prava)
proste mu reknu at se prihlasi jako admin. Ale sla by udelat treba
sluzba ktera by to resila? Jak bych potom mel s tou sluzbou z toho
aktualizacniho SW komunikovat?
Diky za tip.
TR
program pracujici po admin uctem
[*] Franta Flinta <jarek2(zv)centrum(tec)cz> - 23.1.2007 15:14:38
jedna se o firebird databazi. onen programek ma krom jineho za ukol
provest udrzbu databaze. to znamena, ze udelam dump/rozdump a nasledne
pokud je vsechno v poradku, tak musim nahradit puvodni soubor databaze
prave tim rozdumpovanym.
vzhledem k tomu, ze pracovni stanice bezi zaroven jako server a na nem
maji uzivatele omezena prava(fakt to nejde jinak zaridit), diky cemu
jsem nemohl provest posledni krok - nahrazeni puvodni db rozdumpovanou
verzi - to je oc tu slo. operace dump/rozdump nam casto pomohla pri
reseni ruznych problemu s databazi.
Vladimir Nikel napsal(a):
> uz mam smaznuty zacatek tohoto threadu a nevim tedy o jaky db engine
> se jedna, ale obecne je tu cesta jak to resit pokud se nejedna o
> souborove databaze. Reseni je to, ze samotna databazova cast ( sql
> server ) bezi jako sluzba pod admin uctem ( nebo libovolnym jinym, s
> pravem pristupu k tem datovym souborum ). Samotna aplikace pak bezi
> pod uctem prihlaseneho uzivatele, fyzicky k db souborum pristup mit
> nemusi, komunikuje s sql serverem pres sitovou vrstvu. Tak se vlk
> nazere a koza zustane cela. je samozreme mozne pak i delat pozadovany
> backup/restore pres sluzby sql serveru. Proste stejny princip, jako
> pri kazde jine aplikaci, ktera pristupuje na nejaky sql server.
Admin ucet jen obcas - was: program pracujici pod
[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 23.1.2007 15:46:40
Nasdilej si adresar jako
nazevslozky$
a tim pak nebude v siti videt. Je to sice takove polovicate reseni, ale
defacto pokud se uzivatel podiva na sdilene slozky neuvidi to tam a
pokud nebude znat nazev te slozky, nedostane se tam.
Ty pak pristupuj jako \\server\nazevslozky$\nazevsouboru.txt
> Akym sposobom by bolo mozne zabezpecit pristup z klasickej klientskej aplikacie k zdielanemu adresaru na serveri tak, aby sa tento pristup zaroven nepovolil samotnemu prihlasenemu pouzivatelovi ?
> Aplikacia samozrejme disponuje osobitnym menom a heslom pre pristup ale pocas jej pripojenia sa adresar stane pristupnym pouzivatelovi aj mimo kontext aplikacie co je samozrejme neziaduce.
> Alebo sa to pomocou klasickeho sietoveho pristupu vyriesit neda ?
> Jednou s moznosti je samozrejme pouzitie specialnej sluzby, ci uz na strane servera (v tomto pripade by sluzba zabezpecovala vykonavanie operacii na serveri a prenos udajov na klienta - obdoba alebo priamo pouzitie FTP) alebo klienta (pod systemovym uctom, tym padom by pripojeny adresar nebol pouzivatelovi pristupny).
TR
Asistent ala Office
[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 23.1.2007 17:48:49
Zdravim,
mam aplikaci u ktere se strida pomerne dost lidi a ne vsichni si
pamatuji veci ze skoleni a rozhodne temer nikdo necte manualy. Zajima me
Vas nazor na zabudovani "pomocnika" jako maji office. Tedy ze kdyz
otevrou dialog, pomocnik se jich bude ptat jestli chteji A, B nebo C a
pripadne poradi.
Dalsi otazkou je predevsim jak to resit pripadne kdo to jak resil.
Nasel jsem nativni komponentu do delphi co ma vlasni format souboru s
pomocnikem (coz je problem - ty od MS nemuzu prevest do tohoto formatu,
takze si musim sehnat jine postavicky). A nebo pouzit originalni ActiveX
komponentu od MS. K ni jsem sice nasel nejake komponenty a demo, ale je
jaksi nestabilni a obcas zbuchne - tedy pomocnik se zasekne. Coz je pro
me neprijatelne. Osobne jsem pro co nejjedodussi reseni pro zakaznika.
Doposud je aplikace nezavisla na externich modulech ktere nedodavam
primo (tj. ocekavam ze jsou v systemu).
Diky
TR
Admin ucet jen obcas - was: program pracujici pod
[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 23.1.2007 21:05:02
Tomas Rosa wrote:
> proste mu reknu at se prihlasi jako admin. Ale sla by udelat treba
> sluzba ktera by to resila? Jak bych potom mel s tou sluzbou z toho
> aktualizacniho SW komunikovat?
Myslis neco jako ClickOnce?
--
Jiri {x2} Cincura
http://blog.vyvojar(tec)cz/jirka/ | http://www.ID3renamer.com
Paradox - vytvoreni primarniho indexu pomoci SQL
[*] Petr Svejda <petr(zv)svejda(tec)cz> - 23.1.2007 23:33:11
Paradox:
Pokud si vytvorim tabulku pomoci CREATE TABLE..... PRIMARY INDEX
muj_prim_index......
a pote index smazu SQL prikazem DROP INDEX tabulka.muj_prim_index,
tak zaboha nedokazu pomoci SQL tento primarni index vytvorit.
Predpokladejme, ze tabulka jiz obsahuje data.
Vytvorit primarni klic pomoci
Table1.AddIndex('muj_prim_index','ID',[ixPrimary,ixUnique]) neni problem
- ale timto zpusobem ho vytvaret nechci.
Diky za nakopnuti
Paradox - vytvoreni primarniho indexu pomoci SQL
[*] horky(zv)cominn(tec)cz - 24.1.2007 08:57:48
> From: Petr Svejda [mailto:petr(zv)svejda(tec)cz]
> Sent: Tuesday, January 23, 2007 11:33 PM
> Pokud si vytvorim tabulku pomoci CREATE TABLE..... PRIMARY INDEX
> muj_prim_index......
>
> a pote index smazu SQL prikazem DROP INDEX tabulka.muj_prim_index,
> tak zaboha nedokazu pomoci SQL tento primarni index vytvorit.
ALTER TABLE TABULKA ADD CONSTRAINT PK_TABULKA PRIMARY KEY (ID);
Timto SQL prikazem vytvarim PK na Firebirdu, mozna to u Paradoxu bude obdobne.
--
S pozdravem Karel Horky, D7, FB 1.5.2, IBX 7.08, WXP SP2
[mailto:horky(zv)cominn(tec)cz]
Admin ucet jen obcas - was: program pracujici pod
[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 24.1.2007 09:05:49
>
> Myslis neco jako ClickOnce?
>
No, ani ne. Obavam se ze ve windows forms to nemam napsany. Jedna se o
klasickou aplikaci co se instaluje do PF a data ma D&S.
Admin ucet jen obcas - was: program pracujici pod
[*] Jiri Cincura <diskuze(zv)cincura(tec)net> - 24.1.2007 09:31:54
Tomas Rosa wrote:
>>
>> Myslis neco jako ClickOnce?
>>
>
> No, ani ne. Obavam se ze ve windows forms to nemam napsany. Jedna se o
> klasickou aplikaci co se instaluje do PF a data ma D&S.
>
>
Jasny, ale ClickOnce ma (myslim) prave sluzbu bezici pod vyssimi pravy,
takze muze zaktualizovat program.
Ale netusim, jak by to slo pouzit s jinymi aplikacemi - az ted jsem si
vsiml, ze pisu do Delphi konference, sry.
--
Jiri {x2} Cincura
http://blog.vyvojar(tec)cz/jirka/ | http://www.ID3renamer.com
Paradox - vytvoreni primarniho indexu pomoci SQL
[*] Petr Svejda <petr(zv)svejda(tec)cz> - 24.1.2007 09:41:55
to je presne to, co v Paradoxu nejde
>> Pokud si vytvorim tabulku pomoci CREATE TABLE..... PRIMARY INDEX
>> muj_prim_index......
>>
>> a pote index smazu SQL prikazem DROP INDEX tabulka.muj_prim_index,
>> tak zaboha nedokazu pomoci SQL tento primarni index vytvorit.
>>
>
> ALTER TABLE TABULKA ADD CONSTRAINT PK_TABULKA PRIMARY KEY (ID);
>
> Timto SQL prikazem vytvarim PK na Firebirdu, mozna to u Paradoxu bude obdobne.
>
dbfilter
[*] delphi(zv)spst(tec)cz - 24.1.2007 10:39:59
Ahoj
V D7, Win XP potrebuji pro databazovou aplikaci nejakou filtracni
komponentu, kde bude mozno nastavit sloupec tabulky, porovnavaci funkci,
typ (datum, text, cislo) a hodnotu. Neco jako SMDBFilterDialog, ale s
volbou datoveho typu. Znate nekdo nejakou takovou komponentu?
Predem dekuji
Jirka
Jak vytvorit PDF pomoci firtualni tiskarny
[*] Pavel Zidek <delphi(zv)kopr(tec)cz> - 24.1.2007 11:14:02
Zdravim,
existuji programy pro tisk do PDF formatu pomoci tiskoveho programu.
Nevite nekdo e nejakem open source jak takovy program naprogramovat.
Diky Pavel ZIDEK
delphi(zv)kopr(tec)cz
Jak vytvorit PDF pomoci firtualni tiskarny
[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 24.1.2007 11:48:04
Ahoj,
Pavel Zidek napsal(a):
> Zdravim,
> existuji programy pro tisk do PDF formatu pomoci tiskoveho programu.
> Nevite nekdo e nejakem open source jak takovy program naprogramovat.
neco takoveho jsem videl na sourceforge.net, zkus to tam hledat.
Presny nazev si nepamatuju.
> Diky Pavel ZIDEK
Peca
delphi a jak na word,excel,powerpoint
[*] David Kopecek <david.kopecek(zv)hacktrack(tec)com> - 24.1.2007 11:56:05
Zdravim konferenci
chci se zeptat jeslti nekdo nemate nebo neznate reseni na zobrazeni word,excel, powerpoint souboru na
pocitaci kde neni office nainstalovany.. Microsoft vydava powerpointviewer,wordviewer,exceviewer..
a tam to funguje v pohode.. staci mi jenom zobrazovani..
mam tohle naprogramovane tak ze to vyuziva ActiveX z Office ale nemuzu na kazdou stanici instalovat Office.. jen
kvuli zobrazvoani souboru.
Diky David.
Jak vytvorit PDF pomoci firtualni tiskarny
[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 24.1.2007 12:14:06
>> existuji programy pro tisk do PDF formatu pomoci tiskoveho programu.
>> Nevite nekdo e nejakem open source jak takovy program naprogramovat.
Hledej RedMon port redirector. V kombinaci s GhostScriptem a standardnim
PostScriptovym ovladacem z Woken mas to co poterbujes. Pouzvivam to uz
nekolik let.
TR
Jak vytvorit PDF pomoci firtualni tiskarny
[*] Milan Dvorak <dvorak(zv)gymzn(tec)cz> - 24.1.2007 12:40:08
PDF Creator. Je to dobre.
Dvorak
>>> palicka.petr(zv)seznam(tec)cz 24.1.2007 11:48 >>>
Ahoj,
Pavel Zidek napsal(a):
> Zdravim,
> existuji programy pro tisk do PDF formatu pomoci tiskoveho programu.
> Nevite nekdo e nejakem open source jak takovy program naprogramovat.
neco takoveho jsem videl na sourceforge.net, zkus to tam hledat.
Presny nazev si nepamatuju.
> Diky Pavel ZIDEK
Peca
Jak vytvorit PDF pomoci firtualni tiskarny
[*] Peter Ondras <konfery(zv)pse.sk> - 24.1.2007 12:58:09
CutePDFWriter - existuje verzia aj free aj platena. Bezproblemov tlaci
aj diakritiku a rychlost je tiez pouzitelna.
-----Original Message-----
Zdravim,
existuji programy pro tisk do PDF formatu pomoci tiskoveho programu.
Nevite nekdo e nejakem open source jak takovy program naprogramovat.
Diky Pavel ZIDEK
HTTPS klient
[*] Petr Langer <p.langer(zv)nexnet(tec)cz> - 24.1.2007 18:30:30
Ahoj,
potrebuju komunikovat pres HTTPS, jenze mam od zadavatele specificky
pozadavek, aby vse bylo v jednom .exe, tj. bez externi knihovny, nebo
maximalne s pouzitim systemovych knihoven nachazejicich se standardne ve
Windows. Jako asi nejlepsi reseni jsem nasel SSLBlackBox (ma s tim nekdo
zkusenosti?), nicmene jeste hledam, jestli neexistuje jine reseni a to
bud pouziti SCHANNEL, nebo s vyuzitim OSS knihoven jako napr. OpenSSL
(ci neco jineho) ovsem ve forme .obj, tak aby se to dalo prilinkovat.
Googlil jsem, googlil, ale nic pouzitelneho nevygooglil.
Diky za tipy,
Petr Langer
HTTPS klient
[*] Petr Vones <conference(zv)petrvones(tec)net> - 24.1.2007 19:18:34
From: "Petr Langer" <p.langer(zv)nexnet(tec)cz>
> potrebuju komunikovat pres HTTPS, jenze mam od zadavatele specificky
> pozadavek, aby vse bylo v jednom .exe, tj. bez externi knihovny, nebo
> maximalne s pouzitim systemovych knihoven nachazejicich se standardne ve
> Windows. Jako asi nejlepsi reseni jsem nasel SSLBlackBox (ma s tim nekdo
Nejlepsi reseni je pouzit WinInet API a standardni uloziste pro certifikaty
ve Windows, pokud jsou pozadovany. Neni treba nic dalsiho.
Petr Vones
HTTPS klient
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 24.1.2007 18:42:31
> potrebuju komunikovat pres HTTPS, jenze mam od zadavatele specificky
> pozadavek, aby vse bylo v jednom .exe, tj. bez externi knihovny, nebo
> maximalne s pouzitim systemovych knihoven nachazejicich se standardne ve
> Windows. Jako asi nejlepsi reseni jsem nasel SSLBlackBox (ma s tim nekdo
> zkusenosti?), nicmene jeste hledam, jestli neexistuje jine reseni a to bud
> pouziti SCHANNEL, nebo s vyuzitim OSS knihoven jako napr. OpenSSL (ci neco
> jineho) ovsem ve forme .obj, tak aby se to dalo prilinkovat. Googlil jsem,
> googlil, ale nic pouzitelneho nevygooglil.
No a co treba Synapse + StreamSecII? BlackBox je docela nechutne drahy,
nicmene i ten je Synapsi podporovan...
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
WEB: http://www.ararat(tec)cz/synapse - Synapse Delphi and Kylix TCP/IP
Library
HTTPS klient
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 24.1.2007 18:40:31
Puvodni zprava ze dne 24.1.2007 od Petr Langer:
> potrebuju komunikovat pres HTTPS, jenze mam od zadavatele specificky
> pozadavek, aby vse bylo v jednom .exe, tj. bez externi knihovny,
WinInet, Indy, Synapse a mnoho dalsich...
> Googlil jsem, googlil, ale nic pouzitelneho nevygooglil.
Spatne jsi googlil :-)
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================
HTTPS klient
[*] Petr Langer <p.langer(zv)nexnet(tec)cz> - 24.1.2007 20:58:40
Nevim, ale ciste SSLBlackBox stoji ve verzi kterou bych potreboval asi
$190, coz mi nepripada az tak nechutne drahe...
pl
Lukas Gebauer wrote:
>> potrebuju komunikovat pres HTTPS, jenze mam od zadavatele specificky
>
> No a co treba Synapse + StreamSecII? BlackBox je docela nechutne drahy,
> nicmene i ten je Synapsi podporovan...
>
> --
> Lukas Gebauer.
HTTPS klient
[*] Petr Langer <p.langer(zv)nexnet(tec)cz> - 24.1.2007 21:18:42
hmm, nejlepsi reseni jsou ta jednoducha... To mne pres vsechny ty
"component pack-y" nenapadlo. Vyzkousim.
Diky,
pl
Petr Vones wrote:
> From: "Petr Langer" <p.langer(zv)nexnet(tec)cz>
>> potrebuju komunikovat pres HTTPS, jenze mam od zadavatele specificky
>
>
> Nejlepsi reseni je pouzit WinInet API a standardni uloziste pro certifikaty
> ve Windows, pokud jsou pozadovany. Neni treba nic dalsiho.
>
> Petr Vones
HTTPS klient
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 24.1.2007 21:24:42
Puvodni zprava ze dne 24.1.2007 od Petr Langer:
> hmm, nejlepsi reseni jsou ta jednoducha... To mne pres vsechny ty
> "component pack-y" nenapadlo. Vyzkousim.
No vzdy jsem psal, ze WinInet to umi. Delal jsem s nim komunikac s
Telecomem pres SSL na zjistovani majitelu telefonnich cisel.
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================
HTTPS klient
[*] Erik Salaj <winsoft(zv)netkosice.sk> - 24.1.2007 22:14:45
> Nevim, ale ciste SSLBlackBox stoji ve verzi kterou bych potreboval asi
> $190, coz mi nepripada az tak nechutne drahe...
nas WinInet Component Suite, ktory podporuje
viacmenej kompletne WinInet (FTP/HTTP/HTTPS)
stoji este menej (50,- USD). WinInet API sa da
pouzit aj priamo (a netreba platit nic), len treba
trocha prestudovat dokumentaciu alebo najst
nejaky priklad, lebo niektore veci su tam trocha
prekomplikovane (robene pre C-cko).
Erik Salaj
InnoSetup - moc velky setup.exe
[*] Ing. Igor Vodicka <vodicka(zv)sagit(tec)cz> - 25.1.2007 07:53:23
Ahoj!
Pomoci InnoSetupu vytvarim instalacni programy. SETUP.EXE uz dosahuje
velikosti vetsi nez 100 MB. Nevi nekdo jestli jde v InnoSetupu nastavit, aby
se vytvarel maly spousteci setup.exe a ostatni "data" byla zapakovana v
mensich archivech, treba CAB. Momentalne pouzivam verzi 5.1.6
Diky
Igor Vodicka
InnoSetup - moc velky setup.exe
[*] Dalibor <dalibor(zv)torola(tec)cz> - 25.1.2007 08:37:26
Ahoj, nevim jestli je to presne to co chces, ale treba pomoci tohole
DiskSliceSize=1457664
DiskSpanning=1
udelas instalaci, ktera se rozdeli na velikost disket.
Dalibor
> Ahoj!
>
> Pomoci InnoSetupu vytvarim instalacni programy. SETUP.EXE uz dosahuje
> velikosti vetsi nez 100 MB. Nevi nekdo jestli jde v InnoSetupu nastavit,
> aby
> se vytvarel maly spousteci setup.exe a ostatni "data" byla zapakovana v
> mensich archivech, treba CAB. Momentalne pouzivam verzi 5.1.6
>
> Diky
>
> Igor Vodicka
Admin ucet jen obcas - was: program pracujici pod
[*] Ludek <konference(zv)sales(tec)cz> - 25.1.2007 10:47:38
----- Original Message -----
From: "Tomas Rosa" <trosa(zv)seznam(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: 23. ledna 2007 15:46
Subject: Re: Admin ucet jen obcas - was: program pracujici pod admin uctem...> Nasdilej si adresar jako
>
> nazevslozky$
>
> a tim pak nebude v siti videt. Je to sice takove polovicate reseni, ale
Ahoj,
Obavam se, ze WinXP ktere maji nastaveno automaticke vyhledani dostupnych slozek a tiskaren v siti na to kaslou a hezky takovy adresar najdou a prihodi do slozky sitovych pripojeni:)
Dale vubec ten pristup ma jeste jeden velikanansky hacek, pokud na danem serveru existuji i jine slozky pristupne uzivateli pod jeho normalnim prihlasenim (coz je IMHO velmi pravdepodobne) nebude tento zpusob fungovat nebot k jednomu serveru muzete byt pripojeni (myslim sdileni souboru) jen pod jednim uctem. Takze prihlasi-li se nejprve uzivatel pod svym uctem nepujde to jiz pod tim v aplikaci a naopak.
Ludek
program pracujici po admin uctem
[*] Ludek <konference(zv)sales(tec)cz> - 25.1.2007 10:59:39
----- Original Message -----
From: "Franta Flinta" <jarek2(zv)centrum(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: 23. ledna 2007 15:14
Subject: Re: program pracujici po admin uctem
> vzhledem k tomu, ze pracovni stanice bezi zaroven jako server a na nem
> maji uzivatele omezena prava(fakt to nejde jinak zaridit),
Ahoj,
No tak si nehraj na bezpecnost a rekni jim, ze pokud nedokazou mit vyhrazeny server, tak ta pozadovana uroven bezpecnosti fakt nejde jinak zaridit. Vse ostatni je jen bastl a pamatuj, ze na to ve finale doplatis ty. Uznavam sice jasne heslo "naz zakaznik-nas pan" ale nic se nema prehanet. Ver tomu, ze je lepsi vyvolat ten spor nyni, nez udelat nejakej bastl, diky kteremu zakaznik prijde o prachy. Pak ten spor bude mnohem ostrejsi a pro Tebe horsi.
Ludek
Asistent ala Office
[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 25.1.2007 11:37:41
> Obavam se, ze jedina spravna cesta je vlastni postavicka. Pouziti postavicky od M$ bys patrne porusoval autorska prava.
tak pokud pouzijes primo postavicku od MS pomoci technologie od MS, pak
neni problem. To je to same jako kdyz pouzivas treba XML parser - taky
je soucasti MS (pripadne lze z MS webu stahnout do uzivatelovo woken).
TR
Admin ucet jen obcas - was: program pracujici pod
[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 25.1.2007 11:35:41
>> nazevslozky$
>>
> Obavam se, ze WinXP ktere maji nastaveno automaticke vyhledani dostupnych slozek a tiskaren v siti na to kaslou a hezky takovy adresar najdou a prihodi do slozky sitovych pripojeni:)
zkus to :-)
Ne, nenajdou to. Mimojine sam MS takhle "neviditelne" sdili ovladace
treba ke sdilene tiskarne.
TR
Asistent ala Office
[*] Ludek <konference(zv)sales(tec)cz> - 25.1.2007 10:49:38
----- Original Message -----
From: "Tomas Rosa" <trosa(zv)seznam(tec)cz>
> Nasel jsem nativni komponentu do delphi co ma vlasni format souboru s
> pomocnikem (coz je problem - ty od MS nemuzu prevest do tohoto formatu,
> takze si musim sehnat jine postavicky). A nebo pouzit originalni ActiveX
> komponentu od MS. K ni jsem sice nasel nejake komponenty a demo, ale je
Ahoj,
Obavam se, ze jedina spravna cesta je vlastni postavicka. Pouziti postavicky od M$ bys patrne porusoval autorska prava.
Ludek
Asistent ala Office
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 25.1.2007 12:05:43
Puvodni zprava ze dne 23.1.2007 od Tomas Rosa:
> mam aplikaci u ktere se strida pomerne dost lidi a ne vsichni si
> pamatuji veci ze skoleni a rozhodne temer nikdo necte manualy.
> Zajima me Vas nazor na zabudovani "pomocnika" jako maji office. Tedy
> ze kdyz otevrou dialog, pomocnik se jich bude ptat jestli chteji A,
> B nebo C a pripadne poradi.
To neni treba resit nejak externe. Asistenta Microsoftu je mozne
pouzit, Microsoft na to dodava primo SDK. Je treba jen podepsat
smlouvu a pak to lze zadarmo pouzit ve svych aplikacich. Jednou jsem
to podepsal a jednou jsem to kdysi davno i pouzil.
Ted si nejsem jisty, jak se to jmenuje, hledej Office Assistant nebo
Answer Wizard. Myslim ze je tam take nejaky Answer Wizard SDK nebo tak
neco. Ono uz je to dlouho, co jsem s tim delal. Bylo to pak myslim
ActiveX, ktery se velmi jednoduse pouzil. A mam takovy pocit, ze
nebylo potreba mit Office nainstalovany, ale zase tam byl uplne jiny
pajdulak nez ty v Office. Nebo snad dokonce myslim dva uplne jini
pajdulaci.
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================
Asistent ala Office
[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 25.1.2007 12:37:45
Tak zatim jsem nasel jen
http://www.microsoft.com/msagent/downloads/developer.asp
To ale asi neni to co myslis?
Jinak o Answer Wizard se hovori v souvislosti s Office SDK. Pokracuji
dal v patrani.
TR
> To neni treba resit nejak externe. Asistenta Microsoftu je mozne
> pouzit, Microsoft na to dodava primo SDK. Je treba jen podepsat
> smlouvu a pak to lze zadarmo pouzit ve svych aplikacich. Jednou jsem
> to podepsal a jednou jsem to kdysi davno i pouzil.
>
> Ted si nejsem jisty, jak se to jmenuje, hledej Office Assistant nebo
> Answer Wizard. Myslim ze je tam take nejaky Answer Wizard SDK nebo tak
> neco. Ono uz je to dlouho, co jsem s tim delal. Bylo to pak myslim
> ActiveX, ktery se velmi jednoduse pouzil. A mam takovy pocit, ze
> nebylo potreba mit Office nainstalovany, ale zase tam byl uplne jiny
> pajdulak nez ty v Office. Nebo snad dokonce myslim dva uplne jini
> pajdulaci.
>
Asistent ala Office
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 25.1.2007 13:33:49
Puvodni zprava ze dne 25.1.2007 od Tomas Rosa:
> Tak zatim jsem nasel jen
> http://www.microsoft.com/msagent/downloads/developer.asp
> To ale asi neni to co myslis?
No vidis, to bude ono. Ja uz jsem si po letech nemohl vzpomenout, jak
tomu rikali tenkrat. Jo, to bude ten Agent. A jsou tam tedy ctyri:
Genie, Merlin, Peedy a Robby. A pak tam je moznost si namalovat sve
vlastni.
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================
Admin ucet jen obcas - was: program pracujici pod
[*] Ludek <konference(zv)sales(tec)cz> - 25.1.2007 17:40:05
----- Original Message -----
From: "Tomas Rosa" <trosa(zv)seznam(tec)cz>
>>> nazevslozky$
>>>
>> Obavam se, ze WinXP ktere maji nastaveno automaticke vyhledani dostupnych slozek a tiskaren v siti na to kaslou a hezky takovy adresar najdou a prihodi do slozky sitovych pripojeni:)
>
> zkus to :-)
>
Ahoj,
Zkusil jsem a mam v "My Network Places" slozku "test$ on ServerName"
Je pravda ze ji nenajdou "samy od sebe" ale pokud se k ni pripojis mas ji tam za chvili :) Coz predpokladam ze bude v inkriminovanem pripade platne.
Ludek
Admin ucet jen obcas - was: program pracujici pod
[*] Jan Novak <delfin4(zv)volny(tec)cz> - 26.1.2007 07:38:59
> k jednomu serveru muzete byt pripojeni (myslim sdileni souboru)
> jen pod jednim uctem.
Tento problem se da obejit tak, ze v sitove ceste nebude bios-name,
ale IP adresa serveru. Stanice si pak mysli, ze je to jiny server.
Stisk klavesy pro jinou aplikaci
[*] Jan Dvorak <dvorak(zv)szu(tec)cz> - 26.1.2007 09:03:05
Potrebuji predat jine aplikaci stisk klavesy, resp. kombinace klaves.
Predani proste klavesy je bez problemu, aplikaci se posle zprava WM_KEYDOWN,
kde je jednim z parametru kod klavesy a vzapeti zprava WM_KEYUP. Pro
kombinaci klaves (ctrl-A apod.) je treba aplikaci vytvorit KeyboardState,
tj. prepsat ji jeji pole klavesnice API funkci SetKeyboardState.
Hledal jsem v archivu konference a nasel proceduru PostKeyEx naprogramovanou
P. Below v roce 1996. Tam autor upozornuje, ze je treba cizi aplikace pod
W32 propojit pres AttachThreadInput.
Kdyz se vse takto provede, pak to stale nefunguje ve WinXP. Misto odeslane
kombinace ctrl-C dostane aplikace jen C. IMHO ve funkci SetKeyboardState
chybi adresat, kteremu je urcen novy KeyboardState.
Obracim se na experty v teto konferenci se zadosti o radu, jak pozadovany
ukon realizovat korektne i pod WinXP v D6P. Dekuji jiz ted za kazdy namet.
Ing, Jan Dvorak
Stisk klavesy pro jinou aplikaci
[*] Pavel P <pavel(zv)tvsp(tec)net> - 26.1.2007 13:31:22
Pokud by nevadilo ze se aplikace ktere se posila prepne do popredi, celkem spolehlive funguje tohle:
var
handl:hwnd;
begin
handl:=FindWindow(PCHAR('TForm1'),nil);
SetForegroundWindow(handl);
sleep(500);
keybd_event(VK_CONTROL, 1, 0, 0);
keybd_event(VkKeyScan('f'), 1, 0, 0);
keybd_event(VkKeyScan('f'), 1, KEYEVENTF_KEYUP, 0);
keybd_event(VK_CONTROL, 1, KEYEVENTF_KEYUP, 0);
Pavel P.
----- Original Message -----
From: Jan Dvorak [mailto:dvorak(zv)szu(tec)cz]
To:
delphi-l(zv)clexpert(tec)cz
Sent: Fri, 26 Jan 2007 09:03:05 +0100
Subject: Stisk
klavesy pro jinou aplikaci
> Potrebuji predat jine aplikaci stisk klavesy, resp. kombinace klaves.
> Predani proste klavesy je bez problemu, aplikaci se posle zprava WM_KEYDOWN,
> kde je jednim z parametru kod klavesy a vzapeti zprava WM_KEYUP. Pro
> kombinaci klaves (ctrl-A apod.) je treba aplikaci vytvorit KeyboardState,
> tj. prepsat ji jeji pole klavesnice API funkci SetKeyboardState.
> Hledal jsem v archivu konference a nasel proceduru PostKeyEx naprogramovanou
> P. Below v roce 1996. Tam autor upozornuje, ze je treba cizi aplikace pod
> W32 propojit pres AttachThreadInput.
> Kdyz se vse takto provede, pak to stale nefunguje ve WinXP. Misto odeslane
> kombinace ctrl-C dostane aplikace jen C. IMHO ve funkci SetKeyboardState
> chybi adresat, kteremu je urcen novy KeyboardState.
> Obracim se na experty v teto konferenci se zadosti o radu, jak pozadovany
> ukon realizovat korektne i pod WinXP v D6P. Dekuji jiz ted za kazdy namet.
> Ing, Jan Dvorak
>
>
>
>
>
DeleteFile nefunguje
[*] Petr Berek <sojokl(zv)seznam(tec)cz> - 27.1.2007 12:39:02
>
> kdyz uspeje, vrati true, kdyz soubor neexistuje, pripadne
> existuje, ale nepodari se ho smazat, vraci false...
Vratilo to false. Soubor jde smazat primo ze slozky a hodit do kose, a pak
ho z toho kose vyhodit.
Co se stalo muzes zkusit
> zjistit pres GetLastError.
Tahle funkce mi vratila 3, ale nemuzu se nikde dohrabat k tomu, co je to za
vysledek.
Petr
DeleteFile nefunguje
[*] Jiri Koula <dino(zv)atrey.karlin.mff.cuni(tec)cz> - 27.1.2007 11:42:58
Ahoj,
nevim, proc se v Tvem pripade soubor nesmaze (jinak nez z Tveho programu se
smazat da?), ale co se tyce te vyjimky, tak ta nenastane, funkce DeleteFile zkusi
soubor smazat, kdyz uspeje, vrati true, kdyz soubor neexistuje, pripadne
existuje, ale nepodari se ho smazat, vraci false... Co se stalo muzes zkusit
zjistit pres GetLastError.
dino
On Sat, 27 Jan 2007, Petr Berek wrote:
> Zdravim,
> nevite nekdo, proc by prikaz DeleteFile nemohl fungovat. Mam ve svem
> programu tuhle instrukci, soubor je spravny, existuje, vsechny streamy,
> ktere by ho mohly pouzivat jsou uvolnene a soubor se nesmaze. Dokonce
> nedojde ani k zadne vyjimce.
> Diky za jakoukoliv pomoc.
> Petr
>
>
DeleteFile nefunguje
[*] Petr Berek <sojokl(zv)seznam(tec)cz> - 27.1.2007 11:32:57
Zdravim,
nevite nekdo, proc by prikaz DeleteFile nemohl fungovat. Mam ve svem
programu tuhle instrukci, soubor je spravny, existuje, vsechny streamy,
ktere by ho mohly pouzivat jsou uvolnene a soubor se nesmaze. Dokonce
nedojde ani k zadne vyjimce.
Diky za jakoukoliv pomoc.
Petr
DeleteFile nefunguje
[*] Petr Berek <sojokl(zv)seznam(tec)cz> - 27.1.2007 13:53:07
Tak jsem jeste premyslel, cim by to mohlo byt. A napadlo me, zkusit tam
zapsat celou cestu. Myslel jsem si, ze to bude mazat soubory ve slozce,
ktera je u spusteneho souboru. Ale asi to tak nefunguje.
Petr
DeleteFile nefunguje
[*] Petr Vones <conference(zv)petrvones(tec)net> - 27.1.2007 14:21:09
From: "Jiri Koula" <dino(zv)atrey.karlin.mff.cuni(tec)cz>
> Co se stalo muzes zkusit zjistit pres GetLastError.
Nebo vyvolat vyjimku pomoci RaiseLastOSError, kde bude v pripade anglicke
verze Windows prirazen i smyslupny text popisujici dany errorcode.
Petr Vones
Preinstalace Delphi
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 28.1.2007 20:49:11
Puvodni zprava ze dne 28.1.2007 od Viktor Marek:
> Nemel jsem na mysli obnoveni disku z image, ale o zpusob jak dostat
> z image pred preinstalaci OS jen predtim nainstalovane komponenty do
> nove udelane instalace Delphi.
No vsak ja jsem to pochopil, na co ses ptal. Jestli je mozne tam
komponenty nacpat znovu z disku. Na to jsem ti odpovedel, ze to mozne
je. Na zpusob ses neptal, ted uz se koukam ptas. No kdyz se nechces
hrabat v registru, tak normalne pridas cesty do nastaveni a pak v
instalaci balicku ty balicky pridas. Nic sloziteho. A samozrejme tam
musis prislusne soubory nakopirovat.
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================
Preinstalace Delphi
[*] Viktor Marek <viktor(zv)mbox.vol(tec)cz> - 28.1.2007 20:37:10
Nemel jsem na mysli obnoveni disku z image, ale o zpusob jak dostat z image
pred preinstalaci OS jen predtim nainstalovane komponenty do nove udelane
instalace Delphi.
>> Po vymene HW a nove instalaci Win jsem znovu nainstaloval Delphi5
>> prof. a ted mne ceka nova instalace komponent. Je mozno vratit zpet
>> drive nainstalovane komponenty z image disku pred preinstalaci?
>
> Ano.
> Petr Zahradnik, pocitacovy expert
Preinstalace Delphi
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 28.1.2007 20:31:10
Puvodni zprava ze dne 28.1.2007 od Viktor Marek:
> Po vymene HW a nove instalaci Win jsem znovu nainstaloval Delphi5
> prof. a ted mne ceka nova instalace komponent. Je mozno vratit zpet
> drive nainstalovane komponenty z image disku pred preinstalaci?
Ano.
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================
Preinstalace Delphi
[*] Viktor Marek <viktor(zv)mbox.vol(tec)cz> - 28.1.2007 20:11:08
Zdravim
Po vymene HW a nove instalaci Win jsem znovu nainstaloval Delphi5 prof. a
ted mne ceka nova instalace komponent.
Je mozno vratit zpet drive nainstalovane komponenty z image disku pred
preinstalaci?
Diky za radu
Viktor Marek
DeleteFile nefunguje
[*] Petr Vones <conference(zv)petrvones(tec)net> - 27.1.2007 14:23:09
From: "Petr Berek" <sojokl(zv)seznam(tec)cz>
> Tahle funkce mi vratila 3, ale nemuzu se nikde dohrabat k tomu, co je to
> za vysledek.
http://msdn2.microsoft.com/en-us/library/ms681382.aspx
Petr Vones
DeleteFile nefunguje
[*] Jiri Koula <dino(zv)atrey.karlin.mff.cuni(tec)cz> - 27.1.2007 14:31:10
> Nebo vyvolat vyjimku pomoci RaiseLastOSError, kde bude v pripade anglicke
> verze Windows prirazen i smyslupny text popisujici dany errorcode.
Taky moznost, nikdy jsem se s vyjimkami neszil natolik, abych je sam vyvolaval.
K uplnosti sveho reseni dodam, ze funkce SysErrorMesage vypise tez smyslupny
text, v tomto pripade v ceskych Windows "System nemuze nalezt uvedenou cestu.".
dino
Label, RadioButton & barva
[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 29.1.2007 08:15:56
Cau ve spolek,
mam problem - pouzivam v D7prof podbarvovani Editu, Comboboxu & spol
kdyz nejsou vyplneny vsechny udaje na formulari. Nicmene u RadioButonu
a labelu to nefunguje. Nastavim barvu v navrhari vidim toto barevne,
nastavim ParentColor na false (coz se vlastne prepne samo) a kdyz to
pusim barva se nezmeni - ani runtime. Muzu nastavit co chci, porad je
stejne podbarvenej. Dokonce i kdyz placnu label na bilej panel, tak ma
sedivej podklad. Pouzivam manifest pro XP vzhled, takze podezrivam toto.
Poradite jak ho prinutit aby se obarvil?
Diky
TR
Label, RadioButton & barva
[*] Ivan Dulgerov <ivan.dulgerov(zv)sazp.sk> - 29.1.2007 10:00:05
Tomas Rosa wrote / napisal(a):
> Cau ve spolek,
>
> mam problem - pouzivam v D7prof podbarvovani Editu, Comboboxu & spol
> kdyz nejsou vyplneny vsechny udaje na formulari. Nicmene u RadioButonu
> a labelu to nefunguje. Nastavim barvu v navrhari vidim toto barevne,
> sedivej podklad. Pouzivam manifest pro XP vzhled, takze podezrivam toto.
*Presne tak ;-). Ja som to minule zo zufalstva riesil tak, ze som na
*formular "placol" komponentu TJVPanel (z Jedi), a potom na nu som
*polozil RadioButton.
*Ten panel musi mat samozrejme tiez rovnaku farbu ako pozadujes
*od TRadioButton.
--
S pozdravom
Ivan Dulgerov CEI SAZP Programator
Tajovskeho 28
97590 Banska Bystrica
tel: 048 4374144
ICQ : 190698607
mail : ivan.dulgerov(zv)sazp.sk
Potlaceni hledani v ListBoxu
[*] Karel Pecinka <k.pecinka(zv)seznam(tec)cz> - 29.1.2007 12:52:16
Cau,
jak se da potlacit hledani podle prvniho pismene
v Listboxu? Vypada to, ze v udalostech onKeyDown a
onKeyPress je toto hledani jiz provedene, tam je
pozde nulovat Key.
Jde mi pouze o to, aby kdyz uzivatel stoji
v listboxu a zmackne CTRL + A, tak aby se provedla
nejaka funkce bez toho, aby se nejdrive presunul
itemindex na prvni polozku zacinajici na A.
Dik Karel
Spusteni GBAKu pres RDP
[*] Pavel Malinsky <malinsky(zv)pmcom(tec)cz> - 29.1.2007 13:54:20
Ahoj vsem,
poradite, prosim, nekdo s nasledujicim problemem:
Mam PC jako "server" (XPPro a FB 1.5),ke kteremu se
pripojuji pres RDP dva uzivatele - kazdy ma na tomto stroji
svuj win ucet. Potiz je v tom, ze GBAK funguje, pouze pokud
jej pousti uzivatel, ktery instaloval FB. Pokud se GBAK snazi
pouzit ten druhy uzivatel tak zacne gbak nadavat ze database
neni dostupna. OBA uzivatele maji stejna prava, jsou administratori,
jsou si naprosto rovnocenni(z pohledu prav) s tim uz sem se navztekal
dost. Je nekde nejaky jiny figl ?
Test volani:
C:\Temp>gbak.exe -b -l -t -user SYSDBA -pas sql C:\Temp\test.GDB
C:\Temp\X.gbk
1.user(ten i instaloval FB) - zaloha projde OK
2.user chyba:
gbak: ERROR: unavailable database
gbak: Exiting before completion due to errors
Dekuji za kazdy napad!
PM
Spusteni GBAKu pres RDP
[*] Pavel Malinsky <malinsky(zv)pmcom(tec)cz> - 29.1.2007 15:40:27
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Pavel Malinsky
Vyreseno, diky Radkovi Kalovi:
Problem je mi celkem znamy, zmen si volani takto :
C:\Temp>gbak.exe -b -l -t -user SYSDBA -pas sql localhost:C:\Temp\test.GDB
C:\Temp\X.gbk
Dekuji PM
> Mam PC jako "server" (XPPro a FB 1.5),ke kteremu se
> pripojuji pres RDP dva uzivatele - kazdy ma na tomto stroji
[...]
>
> 1.user(ten i instaloval FB) - zaloha projde OK
> 2.user chyba:
> gbak: ERROR: unavailable database
> gbak: Exiting before completion due to errors
I/O error for file "C:\WINDOWS\TEMP\fb_sort_aigsfu
[*] Martin Burle <mburle2(zv)volny(tec)cz> - 30.1.2007 11:21:44
Ahoj,
na jedne instalaci meho sw dochazi pri otvirani datasetu (IBX, FB 1.5)
pripojeneho k databazi na jinem pocitaci v lokalni siti k chybove hlasce:
I/O error for file "C:\WINDOWS\TEMP\fb_sort_aigsfu"
Error while trying to open file
Neplatne udaje
Zatim jsem nic rozumneho nevygooglil, nemate nekdo zkusenosti s podobnou
chybou? Deje se to jen pri pripojeni na remote server, na lokale je vse OK.
Bohuzel nemam primy pristup k te siti, takze jsem nemohl ani prilis
experimentovat. Oba pocitace jedou na skoro cistych win XP, bezi tam udajne
jen AVG, integrovany windowsovy firewall.
Predem diky za pripadne rady,
Martin
I/O error for file "C:\WINDOWS\TEMP\fb_sort_aigsfu
[*] Kalhous <kalhous(zv)eu(tec)cz> - 30.1.2007 12:07:46
Mozna za to muze prave AVG. Nam se to stava pri zaplneni disku a vinikem
byva prave AVG. Ale je to jen tip.
Z.Kalhous
----- Original Message -----
From: "Martin Burle" <mburle2(zv)volny(tec)cz>
> na jedne instalaci meho sw dochazi pri otvirani datasetu (IBX, FB 1.5)
> pripojeneho k databazi na jinem pocitaci v lokalni siti k chybove hlasce:
>
> I/O error for file "C:\WINDOWS\TEMP\fb_sort_aigsfu"
> Error while trying to open file
> Neplatne udaje
>
OT: Nabidka zamestnani v Ostrave
[*] Radim Kunz <rkunz(zv)casestudio(tec)com> - 30.1.2007 13:35:52
Zdravim:
nase firma hleda programatora
podminky:
dobra znalost Delphi,
znalost OOP,
pasivni znalost anglictiny (aktivni znalost vyhodou)
ochota ucit se novym vecem.
znalost databazi (neni podminkou)
samostatnost
schopnost analyzy problemu
nabizime zajimavou praci v super kolektivu
pouze HPP, pracoviste v Ostrave-Hrabuvce
odpovidejte na adresu jobs(zv)casestudio.com,
ne do konference, do mailu uvedte nazev pozice
pokud mate zajem i o jine pozice nez
programator Delphi, jdete na
http://www.casestudio.com/csy/jobs.aspx
Radim Kunz
CHARONWARE, s.r.o.OT: Poptavka po praci
[*] Petr Prochazka <petr..prochazka(zv)seznam(tec)cz> - 30.1.2007 23:14:30
Hledam brigadu na pozici programatora. Nejlepe Brno, nebo Uh. Hradiste.
Jsem studentem 3. rocniku VUT FSI v Brne.
Nabizim:
Znalost vyvojoveho prostredi Delphi, jazyka object pascal.
Znalost visual basicu s vyuzitim microsoft office.
Znalost php a MySQL.
Schopnost se ucit nove technologie a programovaci jazyky.
Moznost prace na zivnostensky list.
Kdybyste nekdo o necem vedeli, napiste na prochazka(zv)mfproduction(tec)cz
Predem dekuji Petr Prochazka
FireBird - export blob
[*] Robert Fujak <robof(zv)inmail.sk> - 30.1.2007 22:56:28
Zdravim,
potrebujem urobit export dat zjednej db a import do druhej (obidve FB)
TIBExtract.ExtractObject(eoData,'TableName',[etData]);
vsetko je OK pri tabulkach ktore neobsahuju "blob field"
tie mi do vysledku (insert into ....) nezaradi
mate nejaky jednoduchy navod ako to mam obist, alebo si to mam napisat
systemom
query.open
while not eof do ...
a prejst celu tabulku a rucne to tam vlozit?
Dik.
S pozdravom
Fujak Robert
D7Ent, FB1.5
Jak zjistit spusteni aplikace pomoci terminalove s
[*] Jiri Semler <jsemler(zv)stbk.mcs(tec)cz> - 31.1.2007 11:47:37
Ahoj,
potrebuji zjistit, jestli moje aplikace, napsana v D6, byla spustena
uzivatelem pomoci terminalove sluzby, nebo beznym zpusobem. Potrebuji to
proto, aby se zjednodusil vzhled aplikace. Nekteri uzivatele se obcas
pripojuji z PDA.
Jak mam zjistit uvedenou informaci?
Jirka
SQL dotaz
[*] Macko Martin <martin.macko(zv)m-pro(tec)cz> - 31.1.2007 15:41:53
Select MIN(a.hodn) from a where a.hodn not in (select b.hodn from b)
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Lubor Martinsky
>
> Select a.hodn from a where a.hodn not in (select b.hodn from b)
>
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Pavel Vosahlo
> Sent: Wednesday, January 31, 2007 3:26 PM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: SQL dotaz
>
> Zdravim,
> potrebuji sestavit dotaz pro zjisteni nasledujiciho. Mam
> tabulku s cisly napr.
> 1
> 8
> 9
> 100
> ...
>
> Dotazem potrebuji zjistit nejmensi hodnotu cisla, ktera v
> tabulce neni, v tomto pripade tedy cislo 2. Interval cisel
> ulozenych v tabulce je 1..999.
Jak zjistit spusteni aplikace pomoci terminalove s
[*] Jiri Semler <jsemler(zv)stbk.mcs(tec)cz> - 31.1.2007 15:13:50
Pro zajemce. Odpoved mi prisla na soukromy mail.
{ vraci True, kdyz EXE bezi na Terminal Serveru jako Remote Session }
function IsRemoteSession : Boolean;
begin
Result := (SysUtils.Win32Platform=Windows.VER_PLATFORM_WIN32_NT) and
(GetSystemMetrics($1000{=SM_REMOTESESSION})<>0);
end;> potrebuji zjistit, jestli moje aplikace, napsana v D6, byla spustena
> uzivatelem pomoci terminalove sluzby, nebo beznym zpusobem. Potrebuji to
> proto, aby se zjednodusil vzhled aplikace. Nekteri uzivatele se obcas
> pripojuji z PDA.SQL dotaz
[*] Lubor Martinsky <l.martinsky(zv)softdec(tec)cz> - 31.1.2007 15:35:52
Zalozil bych si tabulku s jednim sloupcem a ulozil 1000 radku s hodnotami od
jedne do 1000
Pak bych udelal
Select a.hodn from a where a.hodn not in (select b.hodn from b)
Zdravim
Lubor M.
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz] On
Behalf Of Pavel Vosahlo
Sent: Wednesday, January 31, 2007 3:26 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: SQL dotaz
Zdravim,
potrebuji sestavit dotaz pro zjisteni nasledujiciho. Mam tabulku s cisly
napr.
1
8
9
100
...
Dotazem potrebuji zjistit nejmensi hodnotu cisla, ktera v tabulce neni, v
tomto pripade tedy cislo 2. Interval cisel ulozenych v tabulce je 1..999.
Nevim zda je toto pomoci SQL vubec resitelne resit. Hledat zaznam, ktery
neexistuje.
Delphi6, databaze access pres ADO
Dekuji za radu.
Pavel
SQL dotaz
[*] Svoboda Jiri <jsvoboda(zv)lekis(tec)cz> - 31.1.2007 15:49:54
Taulka "a" I "b" je stejna tabulka, odkazuje se sama na sebe
Select Min( a.Hodnota) + 1
>From Tabulka a
Left outer join Tabulka b on b.Hodnota = a.Hodnota+1
Where b.Hodnota is null
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Pavel Vosahlo
Sent: Wednesday, January 31, 2007 3:26 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: SQL dotaz
Zdravim,
potrebuji sestavit dotaz pro zjisteni nasledujiciho. Mam tabulku s cisly napr.
1
8
9
100
....
Dotazem potrebuji zjistit nejmensi hodnotu cisla, ktera v tabulce neni, v tomto pripade tedy cislo 2. Interval cisel ulozenych v tabulce je 1..999. Nevim zda je toto pomoci SQL vubec resitelne resit. Hledat zaznam, ktery neexistuje.
Delphi6, databaze access pres ADO
Dekuji za radu.
Pavel
SQL dotaz
[*] Radek KALA <kala(zv)betacontrol(tec)cz> - 31.1.2007 15:55:54
a co zkusit neco v tomto smyslu
select first 1 t.cislo+1
from tabulka t
left join tabulka tt on tt.cislo = (t.cislo + 1)
where tt.cislo is null
order by t.cislo
pisu to zhlavy, tak mi pro zajimavost napis jestli to k necemu je.
Pavel Vosahlo napsal(a):
> Zdravim,
> potrebuji sestavit dotaz pro zjisteni nasledujiciho. Mam tabulku s cisly napr.
> 1
> 8
> 9
> 100
> ...
>
> Dotazem potrebuji zjistit nejmensi hodnotu cisla, ktera v tabulce neni, v tomto pripade tedy cislo 2. Interval cisel ulozenych v tabulce je 1..999. Nevim zda je toto pomoci SQL vubec resitelne resit. Hledat zaznam, ktery neexistuje.
> Delphi6, databaze access pres ADO
>
> Dekuji za radu.
>
> Pavel
>
>
>
>
SQL dotaz
[*] Pavel Vosahlo <vosahlopavel(zv)o2active(tec)cz> - 31.1.2007 15:25:51
Zdravim,
potrebuji sestavit dotaz pro zjisteni nasledujiciho. Mam tabulku s cisly napr.
1
8
9
100
...
Dotazem potrebuji zjistit nejmensi hodnotu cisla, ktera v tabulce neni, v tomto pripade tedy cislo 2. Interval cisel ulozenych v tabulce je 1..999. Nevim zda je toto pomoci SQL vubec resitelne resit. Hledat zaznam, ktery neexistuje.
Delphi6, databaze access pres ADO
Dekuji za radu.
Pavel
SQL dotaz
[*] honza(zv)haes(tec)cz - 31.1.2007 16:23:57
> Zalozil bych si tabulku s jednim sloupcem a ulozil 1000 radku s
> hodnotami od > jedne do 1000
> Lubor M.
Nemam rad pomocne tabulky ... :-)
V SQL databazi bych to resil ulozenou procedurou.
Tady snad:
TADODataSet.CommandText:=: 'select id from tabulka order by id';
DataSet.Open;
Result:=0;
i:=1;
whle not DataSet.eof do begin
if DataSet.FieldByName('id').asInteger<>i then begin
Result:=i;
exit;
end;
inc(i);
DataSet.Next;
end;
Honza
====================================
= RNDr. Jan Sebelik - HAES
= Skolici a konzultacni stredisko pro vyvoj SW
= www.haes(tec)cz
= Vojtiskova 321
= 507 81 Lazne Belohrad
====================================
SQL dotaz
[*] Sliva <sliva(zv)csh(tec)cz> - 31.1.2007 16:15:56
dobry den
predpokladam ze jmeno sloupce s cisli je ID
pak bude
select min(id+1) from tabulka where not id+1 in (select id from tabulka)
Preji Vam hezky den.
ing Sliva Josef
----- Original Message -----
From: "Pavel Vosahlo" <vosahlopavel(zv)o2active(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, January 31, 2007 3:25 PM
Subject: SQL dotaz
> Zdravim,
> potrebuji sestavit dotaz pro zjisteni nasledujiciho. Mam tabulku s cisly
> napr.
> 1
> 8
> 9
> 100
> ...
>
> Dotazem potrebuji zjistit nejmensi hodnotu cisla, ktera v tabulce neni, v
> tomto pripade tedy cislo 2. Interval cisel ulozenych v tabulce je 1..999.
> Nevim zda je toto pomoci SQL vubec resitelne resit. Hledat zaznam, ktery
> neexistuje.
> Delphi6, databaze access pres ADO
>
> Dekuji za radu.
>
> Pavel
>
>
>
>
> SQL dotaz
[*] Radek KALA <kala(zv)betacontrol(tec)cz> - 31.1.2007 16:25:57
Jak vidim seslo se vice reseni, ale pozor vsechny reseni vynechaji
pripad kdy tam chybi prave Jednicka.
To jen na upozorneni.
Sliva napsal(a):
> dobry den
>
> predpokladam ze jmeno sloupce s cisli je ID
> pak bude
>
> select min(id+1) from tabulka where not id+1 in (select id from tabulka)
>
> Preji Vam hezky den.
>
> ing Sliva Josef
>
> ----- Original Message -----
> From: "Pavel Vosahlo" <vosahlopavel(zv)o2active(tec)cz>
> To: <delphi-l(zv)clexpert(tec)cz>
> Sent: Wednesday, January 31, 2007 3:25 PM
> Subject: SQL dotaz
>
>
>
>> Zdravim,
>> potrebuji sestavit dotaz pro zjisteni nasledujiciho. Mam tabulku s cisly
>> napr.
>> 1
>> 8
>> 9
>> 100
>> ...
>>
>> Dotazem potrebuji zjistit nejmensi hodnotu cisla, ktera v tabulce neni, v
>> tomto pripade tedy cislo 2. Interval cisel ulozenych v tabulce je 1..999.
>> Nevim zda je toto pomoci SQL vubec resitelne resit. Hledat zaznam, ktery
>> neexistuje.
>> Delphi6, databaze access pres ADO
>>
>> Dekuji za radu.
>>
>> Pavel
>>
>>
>>
>>
>>
>>
>>
>
>
>
>
SQL dotaz
[*] Klvan Milos - DEKTRADE a.s. <milos.klvan(zv)dektrade(tec)cz> - 31.1.2007 16:33:58
SELECT TOP (1) rok+1
FROM a as aa
WHERE not exists(select aa.rok from ab where (aa.rok + 1) = ab.rok)
ORDER BY rok
SQL dotaz
[*] Jaroslav Blazek <jaroslav.bk(zv)gmail(tec)com> - 01.2.2007 10:57:17
Ahoj,
priklad pro MSSQL... dulezity si z toho vykopes
> potrebuji sestavit dotaz pro zjisteni nasledujiciho. Mam tabulku s cisly napr.
> 1
> 8
> 9
> 100
> ...
> Dotazem potrebuji zjistit nejmensi hodnotu cisla, ktera v tabulce neni, v tomto pripade tedy cislo 2. Interval cisel ulozenych v tabulce je 1..999. Nevim zda je toto pomoci SQL vubec resitelne resit. Hledat zaznam, ktery neexistuje.
> Delphi6, databaze access pres ADO
DECLARE (zv)TTemp TABLE
(
Number INT
)
DECLARE (zv)lStartNumber INT
SELECT (zv)lStartNumber = 1
INSERT (zv)TTemp VALUES(1)
INSERT (zv)TTemp VALUES(8)
INSERT (zv)TTemp VALUES(9)
INSERT (zv)TTemp VALUES(100)
SELECT ISNULL(MIN(t1.Number), 0) + 1
FROM (zv)TTemp t1
WHERE NOT EXISTS(SELECT * FROM (zv)TTemp t2 WHERE t1.Number + 1 = t2.Number) AND
-- Start Number
1 IN (SELECT Number FROM (zv)TTemp)
DELETE (zv)TTemp
SELECT ISNULL(MIN(t1.Number), 0) + 1
FROM (zv)TTemp t1
WHERE NOT EXISTS(SELECT * FROM (zv)TTemp t2 WHERE t1.Number + 1 = t2.Number) AND
-- Start Number
1 IN (SELECT Number FROM (zv)TTemp)
INSERT (zv)TTemp VALUES(3)
INSERT (zv)TTemp VALUES(8)
INSERT (zv)TTemp VALUES(9)
INSERT (zv)TTemp VALUES(100)
SELECT ISNULL(MIN(t1.Number), 0) + 1
FROM (zv)TTemp t1
WHERE NOT EXISTS(SELECT * FROM (zv)TTemp t2 WHERE t1.Number + 1 = t2.Number) AND
-- Start Number
1 IN (SELECT Number FROM (zv)TTemp)
JB
Ulozeni formulare
[*] delphi(zv)spst(tec)cz - 01.2.2007 16:37:39
Ahoj,
je mozne nejak ulozit formular. To znamena, ze do nejakeho textoveho
souboru si ulozim nastaveni kde se jaka komponenta nachazi, jak se
jmenuje, jakou ma hodnotu atd... To co je v souboru DFM.
Nasel jsem v JVCL nasledujici TJvFormStorageSelectList,
TJvAppIniFileStorage, TJvFormStorage. Da se to pouzit k ulozeni
nastaveni komponent.
Da se vsak ulozit i to jake komponenty mam na formulari?
Pripadne, kdyz pouziji nasledujici:
type
CRefType = class of TControl;
var
MComp : CRefType;
MyObj: TControl;
begin
MComp := TLabel;
- toto funguje, ale co kdyz si to nactu ze souboru? Jak priradim MComp
class kdyz to mam ve formatru string?
Potrebuji neco jako MComp := PrevedStringNaTridu('TLabel');
MyObj := MComp.Create (self);
MyObj.Left := 100;
- toto take funguje, ale co kdyz opet tuto vlastnost "Left" mam v podobe
stringu.
Potrebuji neco jako MyObj.PrevedStringNaVlastnost(Left) := 100;
Predem dekuji
Jirka
Formular vytvoreny v me aplikaci
[*] aldik(zv)quick(tec)cz - 01.2.2007 16:55:41
Existuji hledej na www.torry.net klicove slovo je designer.
Ales
Quoting delphi(zv)spst(tec)cz:
> Ahoj,
> Jeste se chci zeptat, zda existuji nejake komponenty, ktere umozni v me
> aplikaci pridavat ovladaci prvky na formular pretazenim z nastrojove
> listy, tak jak se to dela v Delphi.
> D7, Win XP
>
> Predem dekuji
> Jirka
>
>
>
Formular vytvoreny v me aplikaci
[*] delphi(zv)spst(tec)cz - 01.2.2007 16:43:40
Ahoj,
Jeste se chci zeptat, zda existuji nejake komponenty, ktere umozni v me
aplikaci pridavat ovladaci prvky na formular pretazenim z nastrojove
listy, tak jak se to dela v Delphi.
D7, Win XP
Predem dekuji
Jirka
Ulozeni formulare
[*] Petr Berek <sojokl(zv)seznam(tec)cz> - 01.2.2007 18:25:47
On 2/1/07, delphi(zv)spst(tec)cz <delphi(zv)spst(tec)cz> wrote:
>
> Ahoj,
> je mozne nejak ulozit formular. To znamena, ze do nejakeho textoveho
> souboru si ulozim nastaveni kde se jaka komponenta nachazi, jak se
> jmenuje, jakou ma hodnotu atd... To co je v souboru DFM.
> Nasel jsem v JVCL nasledujici TJvFormStorageSelectList,
> TJvAppIniFileStorage, TJvFormStorage. Da se to pouzit k ulozeni
> nastaveni komponent.
> Da se vsak ulozit i to jake komponenty mam na formulari?
Ahoj,
muzes pouzit funkci TFileStreamu WriteComponent.
Petr
Problem - Synapse - PingHost s omezenymi pravy
[*] Igor Kapoun <igor.kapoun(zv)volny(tec)cz> - 02.2.2007 10:18:50
Napsal jsem jednoduchy programek, ktery pouziva PingHost ze Synapse. Jede mi
na Win XP SP2 bez problemu s pravy Admina, ale s omezenymi pravy ani tuk.
Poradite, prosim?
Dekuji
Igor Kapoun
D6, Synapse ver. 3.1.5, Win XP PRO SP2, XP Home SP2
Problem - Synapse - PingHost s omezenymi pravy
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 02.2.2007 10:44:52
> Napsal jsem jednoduchy programek, ktery pouziva PingHost ze Synapse.
> Jede mi na Win XP SP2 bez problemu s pravy Admina, ale s omezenymi
> pravy ani tuk. Poradite, prosim? Dekuji
Protoze to Microsoft pro ne-admin uzivatele ve WinXP zakazal: "ve
jmenu bezpecnosti vam tuto funkci schvalne upirame".
Nicmene doporucuji si precist:
http://www.grcsucks.com/mirror/SocketToMe.htm
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://synapse.ararat(tec)cz/ - Ararat Synapse - TCP/IP Lib.
Problem - Synapse - PingHost s omezenymi pravy
[*] Igor Kapoun <igor.kapoun(zv)volny(tec)cz> - 02.2.2007 11:28:55
Clanek jsem cetl, lze jen povzdechnout :-( Nicmene, existuje nejake reseni?
Letmo jsem tuto vec konzultoval vcera s lidmi z WUG a padl nazor, ze
neschopni programatori NEUMI psat programy pro ne-adminy...
Igor Kapoun
> Protoze to Microsoft pro ne-admin uzivatele ve WinXP zakazal: "ve
> jmenu bezpecnosti vam tuto funkci schvalne upirame".
>
> Nicmene doporucuji si precist:
> http://www.grcsucks.com/mirror/SocketToMe.htm
> > Napsal jsem jednoduchy programek, ktery pouziva PingHost ze Synapse.
> > Jede mi na Win XP SP2 bez problemu s pravy Admina, ale s omezenymi
> > pravy ani tuk. Poradite, prosim? Dekuji
Problem - Synapse - PingHost s omezenymi pravy
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 02.2.2007 12:22:59
> Clanek jsem cetl, lze jen povzdechnout :-( Nicmene, existuje nejake
> reseni? Letmo jsem tuto vec konzultoval vcera s lidmi z WUG a padl
> nazor, ze neschopni programatori NEUMI psat programy pro ne-adminy...
Jendo reseni ams v tom clanku... druhe reseni je nepouzivat na toto
RAW sockety, ale vyuzit treba sluzeb ICMP.DLL,nebo jeste lepe funkci
v iphlpapi.dll.
Ale pricina neni v neschopnosti programatora, nybrz ciste v tom, ze
se Microsoft skutecne rozhodl, ze 'normalni uzivatel' tuto funkci
prece nepotrebuje, tak aby toho zlotrilske programy nevyuzivaly, tak
tuto funkci radeji zakazeme!
Uz jsem se jednou chystal, ze bych provedl neco prave s tim iphlpapi,
ale nejak na to nebyl cas...
A k nazoru z WUG bych jen dodal, ze nechopni lide jsou schopni jen
pindani o vecech, kterym nerozumi. ;-) (coz plati bohuzel zcela
obecne...)
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://synapse.ararat(tec)cz/ - Ararat Synapse - TCP/IP Lib.
ztrata funkcnosti klaves Ctrl+F4 v D6pro
[*] Pavel Zidek <delphi(zv)kopr(tec)cz> - 03.2.2007 07:50:15
Zdravim,
v D6pro jsem ztratil moznost pouzivat klavesy Ctrl+F4 ... uzavirani stranek
Zjistil jsem, ze to pravdepodobne neco nebo nekdo tuto kombinaci klaves vypnul primo ve windows - i v jinych programech to nejede.
Jak zjistim, kdo prevzal kontrolu nad klavesnici v DELPHI.
Diky Pavel ZIDEK
delphi(zv)kopr(tec)cz
--------------------------------------------------------------------------------
I am using the free version of SPAMfighter for private users.
It has removed 0 spam emails to date.
Paying users do not have this message in their emails.
Try SPAMfighter for free now!
tisk ze Sinea sestav na Oce3165
[*] Vaclav Krmela <krmela(zv)ustinadorlici(tec)cz> - 05.2.2007 14:19:50
From: "Milan Dvorak" <dvorak(zv)gymzn(tec)cz>
> Mam vytvorenou v sinea sestavach sestavu na format A3.
> Kdyz ji poslu na tiskarno-kopirku Oce3165 a na ni zvolim zdroj papiru A3,
> tak se skutecne vytiskne na A3 ale tak, ze je vytisknuta oriznuta na
> velikost A4 uprostred papiru A3
Generator sestav Sinea se vzdy prizpusobuje nastaveni tiskarny, jak je
provedeno v ovladaci tiskarny jako vychozi.
Pro tuto situaci doporucuji nainstalovat do Windows jeste jednu tiskarnu s
poznamkou A3,
ktera bude mit vychozi format papiru A3 a tisknout na tuto tiskarnu.
> Pravda je ta, ze pouzivam sestavy verze 3.39x ze dne 14.09.2000.
Starsi verze generatoru provedly bez ptani orez na format papiru, ktery je v
tiskarne nastaven jako vychozi.
Novejsi verze se v teto situaci zachovaji tak, ze na nesoulad velikosti
papiru upozorni a nabidnou tri varianty reseni:
- orez (jako starsi verze)
- zmenseni meritka tisku tak, aby se to na papir veslo
- tisk jedne stranky na nekolik listu pro slepeni
Novejsi verze zvladnou i dodatecnou zmenu velikosti papiru ve vlastnostech
tiskarny (napriklad pri tisku z nahledu).
Starsi verze na dodatecnou zmenu vlastnosti tiskarny (vsech, nejen formatu
papiru) nereagovaly.
Vaclav Krmela
Beh aplikace na pozadi a odchyceni stisknuti klave
[*] Turek Petr <petr.turek(zv)unimontex(tec)cz> - 05.2.2007 12:29:43
Ahoj.
Potreboval bych poradit, jak spustit aplikaci na pozadi a jak nastavit, aby
aplikace zaznamenavala, napr. do textoveho souboru, veskere stisky klaves a
spustene aplikace.
Diky za kazdou radu
P. Turek
Tisk bitmapy - nekdy se vytiskne jen cerny obdelni
[*] Peter Surovy <psurovy(zv)uevora.pt> - 05.2.2007 11:31:39
Ahoj
----- Original Message -----
From: <delphak(zv)centrum(tec)cz>
Sent: Monday, February 05, 2007 9:29 AM
> BitmapPrint.Assign(Img.Picture.Graphic);
-- mozno ten problem moze byt v tomto riadku ^
nepises ako sa ten Img.Picture naplna. Skus si tu
bitmapu pred tlacenim ulozit na disk BitMapPrint.SaveToFile
a uvidis ci je chyba uz tu.
ak do toho imageu nieco vykreslujes je lepsie do bitmapy
priradit Canvas :
BitmapPrint.Canvas.CopyRect(rect1(),Img.Canvas, rect2());
No a tiez Ti tam chyba nastavenie velkosti Bitmap width, height.
text soubor do exe
[*] horky(zv)cominn(tec)cz - 05.2.2007 11:23:38
> From: Petr Vetesnik [mailto:vetesnik(zv)gmail.com]
> Sent: Monday, February 05, 2007 9:38 AM
> potreboval bych 'nakopnout', jak jednoduse zakomponovat
> textovy soubor do
> vysledneho exe.
Pomoci brcc32 zkompilujes libovolny soubor do resourcu a pak si ho z resourcu opet vytahnes pomoci funkce napr. LoadFromResourceName. Resource ti linker pri kompilaci prilinkuje do vysledneho EXE, takze netahas zadne dodatecne soubory.
Podivej se, jak se dela s resourci v Delphi, je to popsano v kazde prirucce typu Delphi snadno a rychle ...
--
S pozdravem Karel Horky, D7, FB 1.5.2, IBX 7.08, WXP SP2
[mailto:horky(zv)cominn(tec)cz]
tisk ze Sinea sestav na Oce3165
[*] Milan Dvorak <dvorak(zv)gymzn(tec)cz> - 05.2.2007 10:59:37
Mam vytvorenou v sinea sestavach sestavu na format A3. Kdyz ji poslu na tiskarno-kopirku Oce3165 a na ni zvolim zdroj papiru A3, tak se skutecne vytiskne na A3 ale tak, ze je vytisknuta oriznuta na velikost A4 uprostred papiru A3 (takze ze vsech stran je mezera cca 6-7 cm) a dole a vpravo prislusne kusy textu chybi. V nahledu sestavy je vse OK. Zkousel jsem ruzne experimenty s Oce, ale nic nepomohlo. Bohuzel nemam moznost vyzkouset sestavu na jine A3 tiskarne, takze nevim, jestli je chyba na strane tiskarny nebo Sinea sestav.
Pravda je ta, ze pouzivam sestavy verze 3.39x ze dne 14.09.2000. Pokud vam nekomu tisk na A3 funguje bez problemu, dejte prosim vedet, treba by pomohlo upgradovat Sinea Sestavy.
Dekuji Milan Dvorak
TRichEdit a posun textu
[*] Petr Hlozek <petr h(zv)mrp(tec)cz> - 05.2.2007 10:49:36
Dobry den,
pouzivam TRichEdit pro ruznobarevne zobrazovani informaci.
Text pridavam pomoci RichEdit.Lines.Add('nejaky text');
Vzdy po pridani textu udelam
PostMessage(RichEdit.Handle,WM_VSCROLL,SB_BOTTOM,0);
Uzivatel muze v okne scrolovat. Kdyz se prepne do jineho programu a pak
zpet, text skoci automaticky na zacatek.
Nevite jak "premluvit" TRichEdit aby se text neposunul?
Dekuju za pripadne rady a preji pekny den.
Petr
--
email : petr_h(zv)mrp(tec)cz
work : www.mrp(tec)cz
home : www.ok2cqr.com
ICQ : 165536992
AOL : PetrHH
Skype : PetrHH
text soubor do exe
[*] Petr Vetesnik <vetesnik(zv)gmail(tec)com> - 05.2.2007 09:37:31
Zdravim vsechny programatory,
potreboval bych 'nakopnout', jak jednoduse zakomponovat textovy soubor do
vysledneho exe.
Potrebuji vygenerovat textovy soubor, ale nechci ho mit jako template na
disku a nechci ho mit ani na formulari v TMemo (TRichEdit).
Predem dik
Petr
Tisk bitmapy - nekdy se vytiskne jen cerny obdelni
[*] delphak(zv)centrum(tec)cz - 05.2.2007 09:29:31
Ahoj, tisknu bitmapy (A4 pri 300DPI) a celkem casto se stane ze se vytiskne pouze cerny obdelnik. Dela to ciste nahodne, nedojde k zadne chybe, nezalezi na tiskarne. Po restartu programu to vetsinou vytiskne dobre.
Pro tisk pouzivam nize uvedenou proceduru (coz jsem nalezl u Borlandu jako doporuceny zpusob tisku).
Pokud ma nekdo podobnou zkusenost a hlavne nejaky napad co s tim, napiste prosim ...
V.
Takhle nejak tu proceduru volam:
R := DestRect(Img.Width, Img.Height, Printer.PageWidth - 40, Printer.PageHeight - 40, aStretch, aCenter);
BitmapPrint := TBitmap.Create;
try
BitmapPrint.PixelFormat := pf24bit;
BitmapPrint.Assign(Img.Picture.Graphic);
if FirstPage then
FirstPage := False
else
Printer.NewPage;
PrintBitmap(Printer.Canvas, R, BitmapPrint);
finally
BitmapPrint.Free;
end;
procedure PrintBitmap(Canvas: TCanvas; DestRect: TRect;
Bitmap: TBitmap);
VAR
BitmapHeader: pBitmapInfo;
BitmapImage : POINTER;
HeaderSize : DWORD;
ImageSize : DWORD;
BEGIN
try
GetDIBSizes(Bitmap.Handle, HeaderSize, ImageSize);
GetMem(BitmapHeader, HeaderSize);
GetMem(BitmapImage, ImageSize);
TRY
GetDIB(Bitmap.Handle, Bitmap.Palette, BitmapHeader^, BitmapImage^);
if Cardinal(StretchDIBits(Canvas.Handle,
DestRect.Left, DestRect.Top, // Destination Origin
DestRect.Right - DestRect.Left, // Destination Width
DestRect.Bottom - DestRect.Top, // Destination Height
0, 0, // Source Origin
Bitmap.Width, Bitmap.Height, // Source Width & Height
BitmapImage,
TBitmapInfo(BitmapHeader^),
DIB_RGB_COLORS,
SRCCOPY)) = GDI_ERROR then begin
end;
FINALLY
FreeMem(BitmapHeader);
FreeMem(BitmapImage)
END
except
on E:Exception do begin
ShowError('Tisk selhal',E.Message);
raise;
end;
end;
end;
Master-Detail na urovni klienta
[*] Ivan Dulgerov <ivan.dulgerov(zv)sazp.sk> - 05.2.2007 08:21:24
Zdravim.
Mam trojvrstvovu aplikaciu pre Oracle vyuzivajucu DataSnap.
Chcem robi Master Detail len na urovni klienta.
Takze mam napr. tabulku Master, z nej vyberam prvych
100 zaznamov :
select * from Master where rownum < 101
K tomu vyberiem do tabulky napr. Detail, vsetky
relevantne zaznamy k zaznamom v tabulke master (k tym prvym 100
zaznamom samozrejme ;-)) :
select * from Detail where Detail.id_Master = some( select id_Master
from Master where rownum <101 )
S tymito datami potom pracujem Master-Detail len na urovni klienta
(ide to rychlo)
Otazka znie co v pripade filtrovania tabulky master?
V pripade pouzitia tejto technologie by to vyzeralo asi takto :
tabulka Master:
select * from Master where .... tu zadat podmienky filtra....
tabulka Detail:
select * from Detail where Detail.id_Master = some( select id_Master
from Master where ... sem zadat filter z tabulky Master )
Cize musel by som vykonat ten isty select vlastne dva krat. Raz
na tabulke Master a raz na tabulke Detail.
Otazka : neslo by to urobit nejako efektivnejsie?
Skusal som samozrejme vyrobit aj Master-Detail uz na urovni aplikacneho
servera, ale cele to slo to priserne pomaly.
--
S pozdravom
Ivan Dulgerov CEI SAZP Programator
Tajovskeho 28
97590 Banska Bystrica
tel: 048 4374144
ICQ : 190698607
mail : ivan.dulgerov(zv)sazp.sk
broadcast?
[*] Dusan Nagy <dnagy(zv)inomacomp.sk> - 05.2.2007 01:04:55
Posli do siete UDP broadcast na definovany port na ktorom pocuvaju
instalovane programy napr. siet 10.1.2.0/255.255.255.0 boadcast
10.1.2.255 port mozes pouzit nad 1024.
Instalovany program zachyti broadcast a na adresu z ktorej prijal paket
vysle na definovany port odpoved.
broadcast?
[*] Pavel Simek <p.simek(zv)svscr(tec)cz> - 04.2.2007 17:56:26
Zdravim vsechny.
Potrebuji poslat z D7/WinXP do cele lokalni site dotaz a na nekterych
stanicich bude ustalovan programek, ktery dotaz zachyti a odpovi na nej.
Vse co jsem nasel na webu, bylo o tom, ze je treba nejdrive najit protejsi
pocitac (ci licitace) a pak na ne poslat dotaz. Chtel bych to ale bez
navazovani nejakeho spojeni. Jen - dotaz do cele site a ze site prijdou
nejake (jedna ci vice) odpovedi..
Muzete mne nekdo pomoci? Kousek kodu ci tak,, Klidne na soukr. mail -
kejchal(zv)volny(tec)cz
Diky Simek
Delka retezce v TJvCsvDataSet
[*] Venca Zaruba <zaruba(zv)elastoform(tec)cz> - 06.2.2007 07:50:59
Hi *,
Pouzil jsem v projektu komponentu TJvCsvDataSet. Vse se zdalo byt OK, az na to ze:
- Nedokaze zpacovat a prenest string (widestring) delsi nez 255 (80) znaku (orizne ho).
Lze nejak prenastavit? Vite o necem cim ji nahradit?
Diky a prijemny zbytek dne
Vasek Zaruba / D7 Pro
8^)MDI Child a ScreenPosition=DefaultPosOnly
[*] Jan Fiala <jan.fiala(zv)wo(tec)cz> - 06.2.2007 07:10:56
Delphi7 ent WinXP cz SP1
Mame aplikaci, kde vytvarime nemodalni okna (MDIChild).
Pokud neni dosud jine okno otevrene (ale predtim uz nejake bylo),
vypoctou si Delphi 'nasledujici' pozici od naposledy takto vytvoreneho
okna. Nam by se ale libila pozice znovu od vrchu (left-top).
Tu kdyz nastavim 'rucne', tak se mi ale stejne dalsi okno otevre na
dalsi puvodne pocitane pozici - takto bych musel vypocty provadet sam
a okna podle toho nastavovat. Nelze pri tom prvnim okne nastavit
'vynulovani' pocitani pozice? Bohuzel jsem to nikde nenasel :(
Dalsi, co by mne zajimalo, je, proc se pri nastaveni Form.Position
znovu provadi OnShow (poprve pri create, podruhe v teto chvili). Teda
proc, to bych vedel - po nastaveni pozice si Delphi volaji udalost
CM_RECREATEWND, takze dochazi znovu ke 'zviditelneni' formulare. Spis
mne zajima jak to elegantne obejit. Ted mam na tu chvilku
'presmerovane' OnShow a pak ho zase vracim zpet. Delam to na predkovi
formulare, takze dopredu nevim, jestli tam je/neni prepsane OnShow -
stejne se mi ale toto reseni nelibi.
--
Jan Fiala
MailTo:jan.fiala(zv)wo(tec)cz
ICQ: 23032692
MDI Child a ScreenPosition=DefaultPosOnly
[*] Petr Fejfar <petr.fejfar(zv)seznam(tec)cz> - 06.2.2007 08:59:06
> Mame aplikaci, kde vytvarime nemodalni okna (MDIChild).
> Pokud neni dosud jine okno otevrene (ale predtim uz nejake bylo),
> vypoctou si Delphi 'nasledujici' pozici od naposledy takto vytvoreneho
> okna. Nam by se ale libila pozice znovu od vrchu (left-top).
> Tu kdyz nastavim 'rucne', tak se mi ale stejne dalsi okno otevre na
> dalsi puvodne pocitane pozici - takto bych musel vypocty provadet sam
> a okna podle toho nastavovat. Nelze pri tom prvnim okne nastavit
> 'vynulovani' pocitani pozice? Bohuzel jsem to nikde nenasel :(
Tohle reseni ti nevyhovuje?
http://groups.google.com/group/microsoft.public.vc.mfc/browse_thread/thread/a87807ac0a6eb033/35879822559cc46a?lnk=st&q=&rnum=2#35879822559cc46a
MDI Child a ScreenPosition=DefaultPosOnly
[*] pavel.zilinec(zv)seznam(tec)cz - 06.2.2007 09:35:09
Problem je, ze i tam narazil na to, ze se neprovedl 'reset'
pozicovani a ze se dalsi otevrene okno opet umistilo do predpocitane
pozice.
Takze v danem pripade by bylo stejne nutne si pozice pocitat sam ...> Tohle reseni ti nevyhovuje?
> http://groups.google.com/group/microsoft.public.vc.mfc/browse_thread/thread/a87807ac0a6eb033/35879822559cc46a?lnk=st&q=&rnum=2#35879822559cc46a
--
ing. Pavel Zilinec
PROG-SOFT s.r.o., Plzen
MDI Child a ScreenPosition=DefaultPosOnly
[*] Petr Fejfar <petr.fejfar(zv)seznam(tec)cz> - 06.2.2007 11:13:15
Dne Tue, 06 Feb 2007 09:35:09 +0100 <pavel.zilinec(zv)seznam(tec)cz> napsal/-a:
> Problem je, ze i tam narazil na to, ze se neprovedl 'reset'
Aha, ja to v rannim shonu nedocetl do konce. Omlouvam se.
pf
OT: Grrrr....
[*] Zbysek Hlinka <konfery(zv)hlinka(tec)cz> - 06.2.2007 12:37:20
Ahoj,
sorry, ale je to ve mne jako v koze, musi to ven... :(
S ohledem na drivejsi debatu, zda ma smysl psat programy pro Win95 a Win98.
...
Kazdy tyden mi chodi vic a vic spamu. Dle odbornych kruhu jsou na vine
nezabezpecene pocitace, ktere jsou napadany ve vlnach a stavaji se z nich
zombie, pres ktere pak proudi tuny bordelu.
Vzhledem k tomu, ze pocitace osazene starymi OS (tedy z tech, co nas
predevsim zajimaji, se to tyka prave Win95 a Win98) jsou dnes uz fakticky
nezabezpecitelne (a problemy mohou nastat i uvnitr site, kdyz si trouba
uzivatel neco natahne dovnitr), protoze se jimi vyrobce nezabyva, vnimam
jako velmi uzitecne zrusit jejich podporu i ze strany programatoru. Staci si
uvedomit jednu skutecnost: cim dele budu podporovat stare krapy, tim vic mi
v konecnem dusledku bude chodit spamu, viru a cervu.
Grrrr.... Uz me to fakt vytaci, takze jeste jedna omluva na konec. :(((
S pozdravem
Zbysek Hlinka
E-mail: hlinka zavin. hlinka(tec)cz
Grrrr....
[*] Ales Pavel <aldik(zv)quick(tec)cz> - 06.2.2007 12:49:21
Zbysek Hlinka napsal(a):
> Kazdy tyden mi chodi vic a vic spamu. Dle odbornych kruhu jsou na vine
> nezabezpecene pocitace, ktere jsou napadany ve vlnach a stavaji se z nich
> zombie, pres ktere pak proudi tuny bordelu.
>
na to ti reknu jen jedno, hezky sci-fi, duvod je jasnej... viz.
http://www.google(tec)cz/search?client=firefox-a&rls=org.mozilla%3Acs%3Aofficial&channel=s&hl=cs&q=hlinka%40hlinka(tec)cz&lr=&btnG=Vyhledat+Googlem
vubec se tomu spamu nedivim..
Grrrr....
[*] Martin Burle <mburle2(zv)volny(tec)cz> - 06.2.2007 13:17:23
> Kazdy tyden mi chodi vic a vic spamu. Dle odbornych kruhu jsou na vine
> nezabezpecene pocitace, ktere jsou napadany ve vlnach a stavaji se z nich
> zombie, pres ktere pak proudi tuny bordelu.
Spamy pole meho rozesilaji spise ruzni roboti, kteri m.j. vyuzivaji diry v
odesilacich formularich spatne napsanych stranek, nez napadene pocitace.
Nejvetsi tragedie jsou primo zverejnene email adresy. Jednu schranku ve
firme mame neskutecne zahlcenou spamem, protoze si nas dalo fura
dodavatelu /aniz bychom jim o to nejak extra stali/ do seznamu prodejcu. Co
je pak platna skryta adresa na nasem webu ;(
Martin
Grrrr....
[*] Jaroslav Nadhera <nadhera(zv)csh(tec)cz> - 06.2.2007 13:51:26
> Vzhledem k tomu, ze pocitace osazene starymi OS (tedy z tech, co nas
> predevsim zajimaji, se to tyka prave Win95 a Win98) jsou dnes uz fakticky
> nezabezpecitelne (a problemy mohou nastat i uvnitr site, kdyz si trouba
> uzivatel neco natahne dovnitr), protoze se jimi vyrobce nezabyva, vnimam
> jako velmi uzitecne zrusit jejich podporu i ze strany programatoru. Staci
> si
> uvedomit jednu skutecnost: cim dele budu podporovat stare krapy, tim vic
> mi
> v konecnem dusledku bude chodit spamu, viru a cervu.
Ja s tim beze zbytku souhlasim, ale to si muzeme tady rikam mezi sebou.
Uzivatele to nezajima, ten ma 10 let pocitac s W95 a staci mu to, co by
kupoval neco jineho. A ja kuprikladu nejsem takovy frajer, abych mu rekl, at
jde ke konkurenci, ktera po nem hrabne vsemi deseti a stejne bude porad s
W95/98 strasit dal. Ja tu mel letos 2 (slovy dva) zakazniky, kteri pouzivaji
nas staricky DOSovy program, ktery uz 6 let neudrzujeme a je zcela
neaktualni a nepouzitelny (z meho hlediska). A oni jej stale pozivaji a jsou
spokojeni.
Jaroslav Nadhera
CSH spol. s r.o.
Velflikova 10, 160 00 Praha 6
tel.: 242 486 998, fax: 242 486 970
e-mail: nadhera(zv)csh(tec)cz , WWW: http://www.csh(tec)cz
pobocka Ostrava: Nedbalova 14, 701 00 Ostrava
tel.: 597 578 698
Grrrr....
[*] Jaroslav Nadhera <nadhera(zv)csh(tec)cz> - 06.2.2007 14:03:27
> BTW - zkusim neco konstruktivnejsiho. Coz takhle zacit ucit uzivatele
> pouzivat podepsany e-mail? At chceme nebo ne, zacit s tim musime my (IT
> branze). Kvalifikovany certifikat stoji dnes na poste 190 Kc, takze nic,
> co
> by si nikdo nemohl dovolit.
Myslis? Ja dostal onehdy telefonicky vynadano za fakturu na nejakou sluzbu
za 260,- Kc. Co ze si vymyslim takove nehorazne castky. A jak komunikuji s
uzivateli, tak odpovedi jsou:
a) je to drahe
b) nerozumim tomu
c) zas budu muset neco instalovat
d) bude to po me neco chtit a ja nebudu vedet co
e) nemam cas jit na postu (skutecne mi toto kdosi rekl)
f) ......
Jaroslav Nadhera
CSH spol. s r.o.
Velflikova 10, 160 00 Praha 6
tel.: 242 486 998, fax: 242 486 970
e-mail: nadhera(zv)csh(tec)cz , WWW: http://www.csh(tec)cz
pobocka Ostrava: Nedbalova 14, 701 00 Ostrava
tel.: 597 578 698
Grrrr....
[*] Zbysek Hlinka <konfery(zv)hlinka(tec)cz> - 06.2.2007 13:43:25
Ano, to je dan za to, ze pouzivam mnoho let stejnou adresu. Vsimni si vsak,
ze uz nejmene 2 roky pouzivam jiny podpis.
Dale, hromada spamu mi chodi i na konference(zv)hlinka(tec)cz (dnes uz neplati,
takze ji klidne vypisu celou :), ktera byla urcena a pouzivana vyhradne pro
tuto konferenci a jeste pro .NET a MS SQL. Nikde jsem ji v podpisech
neuvadel, byla jen v hlavickach. Presto se ke spamerum dostala. Podobne to
bylo i se zbysek(zv)hlinka(tec)cz (take zrusena), kterou jsem nepouzival prakticky
vubec. Hmmm....
BTW - zkusim neco konstruktivnejsiho. Coz takhle zacit ucit uzivatele
pouzivat podepsany e-mail? At chceme nebo ne, zacit s tim musime my (IT
branze). Kvalifikovany certifikat stoji dnes na poste 190 Kc, takze nic, co
by si nikdo nemohl dovolit.
S pozdravem
Zbysek Hlinka
E-mail: hlinka zavin. hlinka(tec)cz
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Ales Pavel
> Sent: Tuesday, February 06, 2007 12:49 PM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: Re: Grrrr....
>
>
>
>
> Zbysek Hlinka napsal(a):
> > Kazdy tyden mi chodi vic a vic spamu. Dle odbornych kruhu
> jsou na vine
> > nezabezpecene pocitace, ktere jsou napadany ve vlnach a
> stavaji se z
> > nich zombie, pres ktere pak proudi tuny bordelu.
> >
> na to ti reknu jen jedno, hezky sci-fi, duvod je jasnej... viz.
>
>
> http://www.google(tec)cz/search?client=firefox-a&rls=org.mozilla%3
> Acs%3Aofficial&channel=s&hl=cs&q=hlinka%40hlinka(tec)cz&lr=&btnG=V
> yhledat+Googlem
>
> vubec se tomu spamu nedivim..
>
>
>
> Grrrr....
[*] Petr Berek <sojokl(zv)seznam(tec)cz> - 06.2.2007 14:23:29
>
> Spamy pole meho rozesilaji spise ruzni roboti, kteri m.j. vyuzivaji diry v
> odesilacich formularich spatne napsanych stranek, nez napadene pocitace.
> Nejvetsi tragedie jsou primo zverejnene email adresy. Jednu schranku ve
> firme mame neskutecne zahlcenou spamem, protoze si nas dalo fura
> dodavatelu /aniz bychom jim o to nejak extra stali/ do seznamu prodejcu.
> Co
> je pak platna skryta adresa na nasem webu ;(
Taky jsem toho nazoru, ze spam rozesilaji roboti, kteri prochazeji stranky a
snazi se na nich nejakym zpusobem vyhledat zverejnene adresy a na ty pak
rozesilaji spamy.
Petr
Grrrr....
[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 06.2.2007 14:51:31
Ahoj,
puvodne jsem se nechtel zapojovat, ale
Petr Berek napsal(a):
> Taky jsem toho nazoru, ze spam rozesilaji roboti, kteri prochazeji stranky a
> snazi se na nich nejakym zpusobem vyhledat zverejnene adresy a na ty pak
> rozesilaji spamy.
to IMHO neni pravda. Me chodi celkem dost spamu na sluzebni email,
ktery na zadnych strankach neni, pouzivam ho pouze pro primou komunikaci
se zakazniky. Z toho usuzuji, ze spam posila nejaky spambot, ktery
vybrakoval adresar v nezabezpecenem pocitaci.
A zhorsuje se to s poctem zakazniku, kteri se mnou komunikuji emailem.
Zase me tesi, ze pribyva zakazniku s WinXP, a ze hraci skrinky Win9x
ochazeji do vecnych lovist.
> Petr
Peca
Grrrr....
[*] Zbysek Hlinka <konfery(zv)hlinka(tec)cz> - 06.2.2007 14:47:30
Napriklad tento clanek: http://www.viry(tec)cz/go.php?p=viry&t=novinka&id=2507
Ale jinak souhlasim. Zneuzivani kombinaci vsech moznych der a lajdackosti je
frustrujici...
S pozdravem
Zbysek Hlinka
E-mail: hlinka zavin. hlinka(tec)cz
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Martin Burle
> Sent: Tuesday, February 06, 2007 1:17 PM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: Re: Grrrr....
>
> Spamy pole meho rozesilaji spise ruzni roboti, kteri m.j.
> vyuzivaji diry v odesilacich formularich spatne napsanych
> stranek, nez napadene pocitace.
> Nejvetsi tragedie jsou primo zverejnene email adresy. Jednu
> schranku ve firme mame neskutecne zahlcenou spamem, protoze
> si nas dalo fura dodavatelu /aniz bychom jim o to nejak extra
> stali/ do seznamu prodejcu. Co je pak platna skryta adresa
> na nasem webu ;(
>
> Martin
>
>
>
>
> Grrrr....
[*] Zbysek Hlinka <konfery(zv)hlinka(tec)cz> - 06.2.2007 14:59:31
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Jaroslav Nadhera
> Sent: Tuesday, February 06, 2007 2:03 PM
>
> > BTW - zkusim neco konstruktivnejsiho. Coz takhle zacit ucit
> uzivatele
> > pouzivat podepsany e-mail? At chceme nebo ne, zacit s tim musime my
> > (IT branze). Kvalifikovany certifikat stoji dnes na poste 190 Kc,
> > takze nic, co by si nikdo nemohl dovolit.
>
>
> Myslis? Ja dostal onehdy telefonicky vynadano za fakturu na
> nejakou sluzbu za 260,- Kc. Co ze si vymyslim takove
> nehorazne castky.
Myslim, ze kvalifikovany certifikat za 190 vc. DPH je dobra cena. Kdyz vezmu
v uvahu, jake investice za tim musi stat...
Moje predstava. Zacit lze v konferencich jako je tato. Provozovatel konfery
muze vyhlasit, ze od urciteho data nepodepsane maily nebere. Programatorum
by nemelo cinit potiz se prislusne vybavit. Kdyz budu mit jednou nastaveny
podpis, budu ho pouzivat vsude. Tato praxe se muze dal rozsirit do firem, ve
kterych programatori delaji. Casem lze zakaznikum rict, ze chteji-li zaruku,
ze jejich mail dorazi a nespadne do spamoveho kose, musi byt e-podepsany. A
pak uz je jen krok k tomu nepodepsane maily nebrat vubec.
Vtip je pouze v jednom: nekde se zacit musi. Proc ne treba zde? Staci jen
prekonat onen kriticky mnozstevni bod, od ktereho to jede samospadem.
Technologie jsou uz pripravene, cena rozumna.
S pozdravem
Zbysek Hlinka
E-mail: hlinka zavin. hlinka(tec)cz
Grrrr....
[*] Ales Pavel <aldik(zv)quick(tec)cz> - 06.2.2007 14:59:31
> to IMHO neni pravda. Me chodi celkem dost spamu na sluzebni email,
> ktery na zadnych strankach neni, pouzivam ho pouze pro primou komunikaci
> se zakazniky. Z toho usuzuji, ze spam posila nejaky spambot, ktery
> vybrakoval adresar v nezabezpecenem pocitaci.
>
>
pokud je to neco jako info(zv)domena tak je jasne ze ty generuje sam spam
robot.> Zase me tesi, ze pribyva zakazniku s WinXP, a ze hraci skrinky Win9x
> ochazeji do vecnych lovist.
>
>
Neprijde mi ze to vyresi prave winXP. Ja uz doma presel na linux, zatim
budu mit klid...;)
A.
Grrrr....
[*] Franta Flinta <jarek2(zv)centrum(tec)cz> - 06.2.2007 16:01:36
> Taky jsem toho nazoru, ze spam rozesilaji roboti, kteri prochazeji stranky a
> snazi se na nich nejakym zpusobem vyhledat zverejnene adresy a na ty pak
> rozesilaji spamy.
> Petr
presne tak, jednu dobu jsem se tim zabyval a faktem je, ze existuji
roboti, kteri na strankach hledaji e-mailove adresy a ty pote ukladaji
do sve db. nekteri se snazi obchazet problem se zverejnovanim adresy
typu muj_email (at) poskytovatel.neco. nicmene jsou uz roboti na te
urovni, ze i tento text dokazi zahrnout do sve db.
spam se odesila na objednavku a prichazi vetsinou z tzv. zombie pocitacu
(pocitace, ktere jsou zneuzivane utocnikem) prostrednictvim
viru/cervu/trojana. casto tyto trojany naslouchaji pres port vyuzivajici
irc. proto kdyz se dopatra koncovy uzivatel, ktery email "odeslal", je
to vetsinou pomateny ucetni nebo nejaky ucitel, ktery nema o bezpecnosti
pc ani poneti. co se tyce onech emailovych adres, tak plati jeste jedna
pomerne casta vec. sleduje se, jestli je email aktivni. nektere spamy
obsahuji potvrzeni o precteni. pokud uzivatel nema potvrzeni o precteni
zakazane a odesle se(automaticky jako prectene) zpet utocnikovi, stava
se adresa cennejsi.
zajimave jsou pokusy, kdy si uzivatel zalozil emailovou adresu na free
email serveru (adresa je slozitejsiho razu aby nebyla zarazena v ramci
slovnikoveho odesilani) a aniz by ji komukoliv sdelil a posleze se do ni
po tydnu podival. zjistil, ze je plna spamu. otazka je odkud se tam vzal...
jarda
COM server napsany ve VB
[*] Martin Burle <mburle2(zv)volny(tec)cz> - 06.2.2007 15:55:36
Ahoj,
Potrebuji se pripojit k COM serveru napsanemu ve foxpro. Sam jsem se doposud
COM technologii prilis nezabyval. Mam to napsane zhruba takto:
---------------------------------------------------------------
type ISH = interface
['{C35120A0-3C75-4A2A-9873-153BA98C725D}']
function get_in_path: Variant; stdcall;
....
end
const
C_ID: TGUID='{02DEB5E7-1DD7-49E2-BC10-6C43360BBB15}';
I_ID: TGUID = '{C35120A0-3C75-4A2A-9873-153BA98C725D}';
var I: IUnknown;
H: ISH;
R:Variant;
begin
I := CreateComObject(C_ID);
R := I.QueryInterface(I_ID, H); //vrati 0, takze ok nacteni interface
Log(R);
R := H.get_in_path; //zhavaruje, vyjimka, tj. neco je spatne
Log(R);
--------------------------------------------------------------------------
Potrebuju se dobrat, zda je chyba u me nebo na strane serveru. Ma nekdo
zkusenosti s COM vytvorenymi ve VFP? Predem diky za kazde nakopnuti.
Martin
ADMIN: Grrrr....
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 06.2.2007 15:39:35
Puvodni zprava ze dne 6.2.2007 od Zbysek Hlinka:
> Moje predstava. Zacit lze v konferencich jako je tato. Provozovatel
> konfery muze vyhlasit, ze od urciteho data nepodepsane maily nebere.
> Programatorum by nemelo cinit potiz se prislusne vybavit. Kdyz budu
> mit jednou nastaveny podpis, budu ho pouzivat vsude. Tato praxe se
> muze dal rozsirit do firem, ve kterych programatori delaji. Casem
> lze zakaznikum rict, ze chteji-li zaruku, ze jejich mail dorazi a
> nespadne do spamoveho kose, musi byt e-podepsany. A pak uz je jen
> krok k tomu nepodepsane maily nebrat vubec.
> Vtip je pouze v jednom: nekde se zacit musi. Proc ne treba zde?
> Staci jen prekonat onen kriticky mnozstevni bod, od ktereho to jede
> samospadem. Technologie jsou uz pripravene, cena rozumna.
Zacni si prosim ve sve vlastni konferenci a hlavne tu prestan prosim
delat bordel. Spatny subjekt, nesmyslna debata, tohle sem vubec
nepatri. Navic nechapu, co chces kde zacinat, kdyz uz v Delphi stejne
neprogramujes. Ber to jako durazne napomenuti a okamzite vsichni
ukoncete tuhle debatu.
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================
Grrrr....
[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 06.2.2007 15:15:33
Panove, co kdyby Vas nekdo zacal nutit, abyste:
1. si nechali udelat novy rozvod elektriny, ze ten stary v Al se jiz dnes nenosi
a je buhvi jak nebezpecny
2. Kopili si nove auto, neb to stare nema airbag, autoradio, ci kdovico jeste
3. a dalsi a dalsi (jen se podivejte, co mate doma veci, ktere jsou starsi 5
let).
Pokud opravdu chcete neco prodat, tak musite presvedcit (kupujiciho,
ktery vymenuje svou praci konvertovanou do meny, za Vasi praci), ze Vase
prace je pro nej prinosem, nikolik ho presvedcovat o tom, ze Vase prace
kterou jste mu prodali v minulosti stoji za ......
Otazka neni o tom, kolik to stoji penez a namahy, ale o smysluplnosti
teto akce a protoze IT lidem lide po predchozich zkusenostech moc neveri,
je treba zacit jednat zcela seriozne a poctive.
Proste moralni zivotnost HW i SW se bude stale prodluzovat, s tim
nic neudelate, musite se prizpusobit.
Slavek
Ing. Slavomir Skopalik
Jednatel spolecnosti
Elekt Labs s.r.o.
Chaloupky 158
783 72 Velky Tynec
Czech Republic
--------------------------------------------
Mobil: +420 724 207 851
icq:199 118 333
e-mail:skopalik(zv)elektlabs(tec)cz
http://www.elektlabs(tec)cz
> > BTW - zkusim neco konstruktivnejsiho. Coz takhle zacit ucit
> uzivatele
> > pouzivat podepsany e-mail? At chceme nebo ne, zacit s tim musime my
> > (IT branze). Kvalifikovany certifikat stoji dnes na poste 190 Kc,
> > takze nic, co by si nikdo nemohl dovolit.
>
>
> Myslis? Ja dostal onehdy telefonicky vynadano za fakturu na
> nejakou sluzbu
> za 260,- Kc. Co ze si vymyslim takove nehorazne castky. A jak
> komunikuji s
> uzivateli, tak odpovedi jsou:
> a) je to drahe
> b) nerozumim tomu
> c) zas budu muset neco instalovat
> d) bude to po me neco chtit a ja nebudu vedet co
> e) nemam cas jit na postu (skutecne mi toto kdosi rekl)
> f) ......
>
Grrrr....
[*] Petr Vones <conference(zv)petrvones(tec)net> - 06.2.2007 16:25:38
From: "petr palicka" <palicka.petr(zv)seznam(tec)cz>
> Zase me tesi, ze pribyva zakazniku s WinXP, a ze hraci skrinky Win9x
> ochazeji do vecnych lovist.
Ono to zase tento problem neresi, protoze nejslabsi clanek se nemeni :-)
Typicky rozesilac, domaci zakaznik, je stejne trvale prihlasen jako admin a
ma i otevrene vsechny porty pro prichozi komunikaci, aby mohl hrat hry a
donekoncna stahovat GB kravin (pritom si samozrejme nasdili cely disk i se
souborem certifikatu do internetbankingu, ktery posleze banka radeji zrusi
vsem bez rozdilu - ale to uz je jina kapitola :-/). Snad jedine stesti je,
ze nekteri poskytovatele pripojeni takoveho rozesilace ihned nekompromisne
na nekolik dni odpoji.
Pritom staci, aby nebylo povoleno zadne prichozi spojeni (neni potreba) a
uzivatel bud nebyl prihlasen trvale jako admin nebo alespon spoustel
potencialne nebezpecne aplikace jako (jakykoli !) prohlizec, postovni
klient, prehravac videa apod s omezenymi pravy. Windows XP/2003 takovou
moznost primo nabizi, neni treba instalovat zadny dalsi podivny software:
http://msdn2.microsoft.com/en-us/library/ms972802.aspx
Aby to nebylo uplne OT, tak nutno rici, ze ne vsichni vyvojari dodnes
pochopili, ze aplikace musi fungovat i pod uzivatelskym uctem. Neni prilis
mnoho realnych duvodu ktere tomu brani. Samozrejme jedinou vyjimkou je
instalace.
Ale souhlasim s tim, ze nejvetsim nebezpecnim je jiz zde zminene zverejneni
emailu na webu. Nastesti soucasne spamove filtry jsou docela ucinne a tech
par zbytecnych GB dat je vcelku zanedbatelna polozka.
Petr Vones
Grrrr....
[*] Petr Vones <conference(zv)petrvones(tec)net> - 06.2.2007 16:37:39
From: "Zbysek Hlinka" <konfery(zv)hlinka(tec)cz>
> Myslim, ze kvalifikovany certifikat za 190 vc. DPH je dobra cena. Kdyz
> vezmu v uvahu, jake investice za tim musi stat...
Jenze certifikat je pro bezne uzivatele neprijatelny. Za prve nechteji za
nic platit (budiz, existuji i CA kteri jej na email davaji zdarma) a za
druhe si nejsem jisty, jestli to vubec podporuji freemaily s webovym
rozhranim. Uvedom si, ze nemala cast lidi pouziva email prevazne takto (byt
to osobne povazuji za nepouzitelne rozhrani, jen pro pripad krajni nouze).
Kdyz si chteji z materske skolky pres den precist emaily, tak casto ani
jinou moznost nemaji. Pokud se jedna o ciste firemni postu, tak tam uz je
dnes situace prece jen lepsi (firewall, antivir, odstraneni priloh ...)
> Moje predstava. Zacit lze v konferencich jako je tato. Provozovatel
> konfery muze vyhlasit, ze od urciteho data nepodepsane maily nebere
To jsem zvedav, jak se na takovy napad bude tvarit provozovatel zdejsi
konference :-) Pokud pominu to, ze nebude kontrolovat platnost kazdeho
certifikatu (to uz by zpravy nechodili mozna nikdy), tak je s tim spojena i
tak pomerne velka rezie.
Petr Vones
Grrrr....
[*] Ludek <konference(zv)sales(tec)cz> - 06.2.2007 17:23:43
----- Original Message -----
From: "petr palicka" <palicka.petr(zv)seznam(tec)cz>
> Zase me tesi, ze pribyva zakazniku s WinXP, a ze hraci skrinky Win9x
> ochazeji do vecnych lovist.
Ahoj,
WinXP neni vubec zadnou zarukou. Uvedu priklad - bracha se nechal ukecat od telecomu a poridil si ADSL samozrejme s USB modemem (zajimave je ze kolikrat dokaze prudit s kravinama ale tentokrat si to cele nainstaloval sam a vubec se neporadil) Samozrejme mel do 2 dnu z notebooku nepouzitelne zombie, ktery pro same odesilani sajrajtu ani nemohl pracovat. Tak jsem zazalohoval data a protoze jsem mel zrovna cas, tak jsem to preinstaloval (z image) no a protoze na XPHome nic postahovaneho nemam rekl jsem si , ze to pripojim na NET pres ten USB (nez mu dovalim poradnej router) no a tak jsem to (podotykam s nainstalovanym a aktualizovanym AVG) pripojil na net, zapnul zabudovany firewall, overil jeho funkcnost na http://test.bezpecnosti(tec)cz a spustil automaticky update. Po stazeni a instalaci nejakeho asti update to chtelo restart a po nem zacalo AVG hlasit viry v rootu a ve windows/system32 , firewall byl jakoby zapnutej , ale http://test.bezpecnosti(tec)cz ukazal, ze vsechny porty jsou otevreny.... takze jsem to preinstalovaval znovu az za t
yden, kdyz to bylo za HW firewalem.... Takze nezabezpeceny a neopatchovany XP Home (a nedivil bych se ze i profi) vydrzej na NETU maximalne tak 30minut. Takze zadnej velikej rozdil od Win9x.
Navic mne to privadi k myslence, ze do hry budou bud zapojeni spravci od telecomu (resp. o2) , protoze to byla 100% cista instalace a je nebyl nikde jinde nez na AVG update a Microsoft update. Takze to muselo prijit aktivne zvenku a nepredpokladam, ze by dokazali skenovat IP adresy a do 30 minut mne mit. (Kdyz navic nejmin tejden na te IP adrese nic neviselo).
Ludek
COM server napsany ve VB
[*] Martin Burle <mburle2(zv)volny(tec)cz> - 06.2.2007 20:09:54
> U Win32 COM musis uvest predka !!!
Diky,
bylo to v tom, ze namisto interface bylo treba rozhrani napsat jako
dispinterface. A nebo se vykaslat na rozhrani a pouzit dynamickou vazbu
CreateOleObject. RTFM, jako obvykle ;)
Martin
Tisk bitmapy - nekdy se vytiskne jen cerny obdelni
[*] Vlastislav Cilek <bigvlci(zv)seznam(tec)cz> - 06.2.2007 17:25:43
Podobny problem jsem resil asi pred 14 ti dny a zjistil jsem jednu vec, a to ze pri velikosti obrazku vetsi nez cca 3MB se tiskne obcas cerny obdelnik, pri velikosti mensi uz se tiskne obrazek spravne. Takze reseni bylo zmenit velikost vkladaneho obrazku :)
Zatim.
Vlasta Cilek.
> ------------ Puvodni zprava ------------
> Od: <delphak(zv)centrum(tec)cz>
> Predmet: Tisk bitmapy - nekdy se vytiskne jen cerny obdelnik
> Datum: 05.2.2007 09:32:54
> ----------------------------------------
> Ahoj, tisknu bitmapy (A4 pri 300DPI) a celkem casto se stane ze se vytiskne
> pouze cerny obdelnik. Dela to ciste nahodne, nedojde k zadne chybe, nezalezi na
> tiskarne. Po restartu programu to vetsinou vytiskne dobre.
> Pro tisk pouzivam nize uvedenou proceduru (coz jsem nalezl u Borlandu jako
> doporuceny zpusob tisku).
>
> Pokud ma nekdo podobnou zkusenost a hlavne nejaky napad co s tim, napiste prosim
COM server napsany ve VB
[*] Karel Klimes <klimes(zv)unicontrols-tramex(tec)cz> - 06.2.2007 17:43:44
ahoj, posilam vytah z borland helpu:
type interfaceName = interface (ancestorInterface)
['{GUID}']
memberList
end;
where (ancestorInterface) and ['{GUID}'] are optional for .NET interfaces.
Warning:
Though the ancestor interface and GUID specification are optional for
.NET interfaces, they are required to support Win32 COM
interoperability. If your interface is to be accessed through COM, be
sure to specify the ancestor interface and GUID.
U Win32 COM musis uvest predka !!!
kchodl
6.2.07, Martin Burle <mburle2(zv)volny(tec)cz>:
> Ahoj,
>
> Potrebuji se pripojit k COM serveru napsanemu ve foxpro. Sam jsem se doposud
> COM technologii prilis nezabyval. Mam to napsane zhruba takto:
> ---------------------------------------------------------------
> type ISH = interface
> ['{C35120A0-3C75-4A2A-9873-153BA98C725D}']
> function get_in_path: Variant; stdcall;
> ....
> end
> const
> C_ID: TGUID='{02DEB5E7-1DD7-49E2-BC10-6C43360BBB15}';
> I_ID: TGUID = '{C35120A0-3C75-4A2A-9873-153BA98C725D}';
>
> var I: IUnknown;
> H: ISH;
> R:Variant;
> begin
> I := CreateComObject(C_ID);
> R := I.QueryInterface(I_ID, H); //vrati 0, takze ok nacteni interface
> Log(R);
> R := H.get_in_path; //zhavaruje, vyjimka, tj. neco je spatne
> Log(R);
> --------------------------------------------------------------------------
> Potrebuju se dobrat, zda je chyba u me nebo na strane serveru. Ma nekdo
> zkusenosti s COM vytvorenymi ve VFP? Predem diky za kazde nakopnuti.
>
> Martin
>
>
>
Tisk bitmapy - nekdy se vytiskne jen cerny obdelni
[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 07.2.2007 08:48:43
Ahoj,
mozna se jedna o problem DDB vs DIB. Bohuzel dneska skolim, ale zkus
pohledat Win32 help kolem funkce *StretchDIBits*.
Peca