Archív konference Delphi

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

Jedna aplikace, vice tlacitek v pruhu uloh

[*] Jiri Babka <jb_konf(zv)seznam(tec)cz> - 5.6.2002 14:16:17

Ahoj,

mam aplikaci (ne MDI), ktera ma vice nemodalnich oken, kde kazde ma sve
tlacitko v pruhu uloh, coz delam pomoci nastaveni parametru v procedure
CreateParams:

Params.ExStyle:=Params.ExStyle or WS_EX_APPWINDOW;
Params.WndParent:=GetDesktopWindow;

Problem nastava, pokud chci zobrazit modalni dialog prislusejici jednomu z
oken. Zaroven s dialogem, se totiz zobrazi pred danym oknem i hlavni okno
aplikace. Navic nefunguje spravne ani prepinani oken pomoci tlacitek na
pruhu uloh. (Testovano ve Win2000.) Poradite mi, prosim, jak tyto nedostatky
odstranit?

Dekuji

Jiri Babka

Prevod string na Integer a spat ???

[*] Robert Suska <delphi(zv)korak.sk> - 5.6.2002 14:22:51

Ahojte

Pisem dopredu ze ak je to totalna hlupost tak ma prosim neukrizujte v
konferencii :)

Je mozne alebo existuje nejaka rutina ktora mi pomoze potrebujem
prekonvertovat text napr:

&FillData&"Nov� z�znam"&Command&"ODPADY GET ODPAD -1 ALIAS"#10"ODPADY GET
ODPAD -1 LIKVPERSON"#10"ODPADY GET ODPAD -1 SPZ"#10"ODPADY GET ODPAD -1
LIKVIDATOR"#10"ODPADY GET ODPAD -1 ODDELENIE"#10"ODPADY GET ODPAD -1 PERSON"

na cislo integer ktore by som si ulozil do Tag-u komponenty a preniesol ho
niekam odtial by som si ho vybral a "urobil" spat string??? Neviem si to
predstavit sice ale cez to vsetko sa pytam.

Dakujem

Robo

vyzadani o preceteni zpravy

[*] Jakub Dusek <jdev(zv)seznam(tec)cz> - 5.6.2002 14:29:18

Body <> Hlavicka.

Teoreticky by se to melo v NMSMTP pridat do FinalHeader, ale nevim, protoze
NMSMTP nepouzivam, je na nic, prejdi na Indy nebo Synapsi.

Jakub Dusek

-------------------------------------------
Homepage : http://dusek.zde(tec)cz
Phone : +420604615795
Sms email : jakub.dusek(zv)click(tec)cz
Icq : 86063232
Apps : Add/Remove Manager, Charmaper,
Sms GateKeeper
-------------------------------------------

----- Original Message -----
From: <kuchar(zv)unicodesys(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, June 05, 2002 2:13 PM
Subject: Re: vyzadani o preceteni zpravy


> dal jsem do
>
> >>>NMSMTP1.PostMessage.Body.Text:='Disposition-Notification-To:
> <bla(zv)bla(tec)cz>'
>
> ale porad to nejak nefunguje
>
> >
> > Ahoj.
> > IMHO musis nejak dostat do hlavicky zpravy toto :
> > Disposition-Notification-To: Jmeno <email(zv)email(tec)cz>
> >
> > Ludek
> >
> >
> >
>
>

vyzadani o preceteni zpravy

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

To musis dostat do HLAVICKY, ne tela zpravy. Posli si to sam sobe a
prohledni si hlavicky. V Indy to urcite jde.

kuchar(zv)unicodesys(tec)cz wrote:
>
> dal jsem do
>
> >>>NMSMTP1.PostMessage.Body.Text:='Disposition-Notification-To:
> <bla(zv)bla(tec)cz>'
>
> ale porad to nejak nefunguje
>
> >
> > Ahoj.
> > IMHO musis nejak dostat do hlavicky zpravy toto :
> > Disposition-Notification-To: Jmeno <email(zv)email(tec)cz>
> >
> > Ludek
> >
> >
> >

--
______________________________________________________
Karel Kral, vyvojar IT / IT developer
Purus, s.r.o., Cezavy 627, 664 56 Blucina, CZ
Tel: 05/47235000, 0602/552432, Fax: 05/47231203
E-Mail: mailto:kral(zv)purus(tec)cz, WWW: http://www.purus(tec)cz
______________________________________________________

cooltray

[*] Jakub Dusek <jdev(zv)seznam(tec)cz> - 5.6.2002 14:30:44

A mas v cestach ke knihovnam cestu ke zdrojakum CoolTray?

Jakub Dusek

-------------------------------------------
Homepage : http://dusek.zde(tec)cz
Phone : +420604615795
Sms email : jakub.dusek(zv)click(tec)cz
Icq : 86063232
Apps : Add/Remove Manager, Charmaper,
Sms GateKeeper
-------------------------------------------

----- Original Message -----
From: "Kalus Jozef Ing." <jozef.kalus(zv)spordat.sk>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, June 05, 2002 1:55 PM
Subject: cooltray


> nazdareg,
> po nainstalovani CoolTray my pri kompilacii prikladov pre CoolTray hadze
> chybovu hlasku, neviete v com to moze byt ?
>
> normalne som si otvoril CoolTrayIcon_D6.dpk dal Compile a potom Install a
> pri akejkolvek kompilacii to hlasi toto:
>
> [Fatal Error] CtDraw.pas(7): File not found: 'CoolTrayIcon.dcu'
>
> dik
>
> joka
>

unicode

[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 5.6.2002 14:33:21

On 5 Jun 2002 at 13:27, Ivan Fiala wrote:

> problem, ktery jsem zde nedavno prednesl o moznosti zadavani ruznych
> znaku po prepnuti klavesnice uzivatelem, jsem jiz vyresil pomoci
> napadu z delphi-unicode. Pokud nekdo ma obdobne problemy, tak
> doporucuji:
>
> http://home.ccci.org/wolbrink/tntmpd/delphi_unicode_controls_project.h
> tm

Jak jsem na to koukal, tak to nechodi pod radou W95. Musis tedy
upozornit zakazniky, ze s temito Wokny maji smulu.

S pozdravem

Zbysek Hlinka


TMeneItem.SubMenuImages

[*] �tevl�k Mari�n <Marian.Stevlik(zv)merlin(tec)cz> - 5.6.2002 14:40:22

Hi all
D5Pro SP1
Mam vytvorenu MDI aplikaciu
Na MainForme ma MainMenu, kde do jednej menu polozky "Operace" kopirujem
popmocou mojej fcie InsertSubmenu zoznam menuitems z pmActs: TPopupMenu, kt
lezi na aktivnom MDIChild okne. Fciu volam vzdy ked sa dane okno zaktivni
Ide vlastne oto aby som mal v menu Operace vzdy operacie aktivneho MDIchild
okna.
Fcia funguje bezproblemov az na to, ze vnej vyuzivam SubMenuImages na
priradenie ImageListu pre SubMenuItems toho menu "Operace"
Obcas (cca kazdy treti krat) mi fcia vyhodi AV ked otvaram MDIChildOkno a
potom menu "Operace" je totalne znicene :(
Vyuziva niekto z vas SubMenuItems?

Posielam Vam i zdrojak tej fcie InsertSubmenu
(z programu ju volam InsertSubmenu(MainFrm.Operace1, pmActs.Items, -1)

procedure InsertSubmenu(irDst, irSrc: TMenuItem; iiDstIdx: integer);
var
i: integer;
liDelta: integer;
lrMenu: TMenuItem;
begin
if (not Assigned(irDst)) or (not Assigned(irSrc)) then Exit;
if (not irSrc.Visible) then Exit;
liDelta := -1;
for i := 0 to irSrc.Count-1 do
begin
lrMenu := TMenuItem.Create(irSrc.Owner);
lrMenu.Action := irSrc[i].Action;
lrMenu.Caption := irSrc[i].Caption;
lrMenu.ImageIndex := irSrc[i].ImageIndex;
lrMenu.Hint := irSrc[i].Hint;
lrMenu.Visible := irSrc[i].Visible;
if (lrMenu.Hint='') and (lrMenu.Caption<>'-') then
lrMenu.Hint := StripHotKey(lrMenu.Caption);
lrMenu.OnClick := irSrc[i].OnClick;
if (lrMenu.Visible) or (lrMenu.Caption='-') then
begin
Inc(liDelta);
if (iiDstIdx=-1) then
irDst.Add(lrMenu)
else
irDst.Insert(iiDstIdx+liDelta, lrMenu);
if (irSrc[i].Count>0) then
InsertSubMenu(lrMenu, irSrc[i], -1);
end
else
lrMenu.Free;
end;
// ImageList
irDst.SubMenuImages := irSrc.GetImageList;
// ci tu je toto alebo irDst.SubMenuImages := nil;
// hodi to ten AV
end;

Stevlik Marian
Software Development Specialist
MERLIN
Stefanikova 32
150 00 Prague 5
Czech Republic
e-mail: marian.stevlik(zv)merlin(tec)cz
tel: +420 2 41010111 (153)
mobil: +420 724 296616
icq: 38493645

cooltray

[*] ales.pavel(zv)popron(tec)cz - 5.6.2002 14:44:05

joka:
[Fatal Error] CtDraw.pas(7): File not found: 'CoolTrayIcon.dcu'

Aldik na to:
pridej si cestu kde mas komponenty do library....

Aldik Pavel Talpa
WXP D6Ent

Rizene prekresleni TPanel

[*] bleak <bleak(zv)atlas(tec)cz> - 5.6.2002 15:02:55

muzes zkusit funkci API (netestovano)
LockWindowUpdate(Form1.Handle)
.... kod pro kresleni
LockWindowUpdate(0)

bleak
----- Original Message -----
From: <tomsir1.edu(zv)mail.cez(tec)cz>
> Bohuzel dochazi k docela nehezkym efektum pri prekreslovani TPanel,
napadlo
> mne tedy nejakym zpusobem pred zapocetim vkladani komponent zakazat
> prekreslovani TPanel a po ukonceni vkladani TPanel prekreslit ...bohuzel

Prevod string na Integer a spat ???

[*] Robert Suska <delphi(zv)korak.sk> - 5.6.2002 15:37:04

Ahojte

ok fajn uz som pisal nasmu kolegovi z konferencie priamo na jeho mail ale
som odpustite mi to prosim, som nedockavy a potrebujem to co najskor totiz v
tom fragmente kodu chyba zapis tela metody Create. Kto by mi vedel poradit
co tam ma ist. Prosim ozvite sa.

Dakujem

Robo


> skus takto
>
> type
> TX = class(TObject)
> S : string
> constructor Create(SN : String);
> end;
>
> v procedure naplnis
>
> Obj.Tag := integer( TX.Create(string));
>
> preberes
> if (TOBject(Obj.Tag) is TX) then
> String := TOBject(Obj.Tag) as TX).S
>
> Robert Suska wrote:
>
> > Ahojte
> >
> > Pisem dopredu ze ak je to totalna hlupost tak ma prosim neukrizujte v
> > konferencii :)
> >
> > Je mozne alebo existuje nejaka rutina ktora mi pomoze potrebujem
> > prekonvertovat text napr:
> >
> > &FillData&"Nov� z�znam"&Command&"ODPADY GET ODPAD -1 ALIAS"#10"ODPADY
GET
> > ODPAD -1 LIKVPERSON"#10"ODPADY GET ODPAD -1 SPZ"#10"ODPADY GET ODPAD -1
> > LIKVIDATOR"#10"ODPADY GET ODPAD -1 ODDELENIE"#10"ODPADY GET ODPAD -1
PERSON"
> >
> > na cislo integer ktore by som si ulozil do Tag-u komponenty a preniesol
ho
> > niekam odtial by som si ho vybral a "urobil" spat string??? Neviem si to
> > predstavit sice ale cez to vsetko sa pytam.
> >
> > Dakujem
> >
> > Robo
>

Prevod string na Integer a spat ???

[*] Nagy Dusan <dnagy(zv)inomacomp.sk> - 05.6.2002 15:49:25

[P��loha v souboru: dnagy.vcf]
skus takto

type
TX = class(TObject)
S : string
constructor Create(SN : String);
end;

v procedure naplnis

Obj.Tag := integer( TX.Create(string));

preberes
if (TOBject(Obj.Tag) is TX) then
String := TOBject(Obj.Tag) as TX).S

Robert Suska wrote:

> Ahojte
>
> Pisem dopredu ze ak je to totalna hlupost tak ma prosim neukrizujte v
> konferencii :)
>
> Je mozne alebo existuje nejaka rutina ktora mi pomoze potrebujem
> prekonvertovat text napr:
>
> &FillData&"Nov� z�znam"&Command&"ODPADY GET ODPAD -1 ALIAS"#10"ODPADY GET
> ODPAD -1 LIKVPERSON"#10"ODPADY GET ODPAD -1 SPZ"#10"ODPADY GET ODPAD -1
> LIKVIDATOR"#10"ODPADY GET ODPAD -1 ODDELENIE"#10"ODPADY GET ODPAD -1 PERSON"
>
> na cislo integer ktore by som si ulozil do Tag-u komponenty a preniesol ho
> niekam odtial by som si ho vybral a "urobil" spat string??? Neviem si to
> predstavit sice ale cez to vsetko sa pytam.
>
> Dakujem
>
> Robo

Prevod string na Integer a spat ???

[*] Jon� Mari�n <Jonas(zv)komercpoj(tec)cz> - 5.6.2002 15:51:33

Nejspis by tam melo byt tohle :

constructor TX.Create(SN: string);
begin
S:=SN;
end;

> -----Original Message-----
> From: Robert Suska [mailto:delphi(zv)korak.sk]
> Sent: Wednesday, June 05, 2002 3:37 PM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: Re: Prevod string na Integer a spat ???
>
>
> Ahojte
>
> ok fajn uz som pisal nasmu kolegovi z konferencie priamo na
> jeho mail ale
> som odpustite mi to prosim, som nedockavy a potrebujem to co
> najskor totiz v
> tom fragmente kodu chyba zapis tela metody Create. Kto by mi
> vedel poradit
> co tam ma ist. Prosim ozvite sa.
>
> Dakujem
>
> Robo
>
>
> > skus takto
> >
> > type
> > TX = class(TObject)
> > S : string
> > constructor Create(SN : String);
> > end;
> >
> > v procedure naplnis
> >
> > Obj.Tag := integer( TX.Create(string));
> >
> > preberes
> > if (TOBject(Obj.Tag) is TX) then
> > String := TOBject(Obj.Tag) as TX).S
> >
> > Robert Suska wrote:
> >
> > > Ahojte
> > >
> > > Pisem dopredu ze ak je to totalna hlupost tak ma prosim
> neukrizujte v
> > > konferencii :)
> > >
> > > Je mozne alebo existuje nejaka rutina ktora mi pomoze potrebujem
> > > prekonvertovat text napr:
> > >
> > > &FillData&"Nov� z�znam"&Command&"ODPADY GET ODPAD -1
> ALIAS"#10"ODPADY
> GET
> > > ODPAD -1 LIKVPERSON"#10"ODPADY GET ODPAD -1
> SPZ"#10"ODPADY GET ODPAD -1
> > > LIKVIDATOR"#10"ODPADY GET ODPAD -1 ODDELENIE"#10"ODPADY
> GET ODPAD -1
> PERSON"
> > >
> > > na cislo integer ktore by som si ulozil do Tag-u
> komponenty a preniesol
> ho
> > > niekam odtial by som si ho vybral a "urobil" spat
> string??? Neviem si to
> > > predstavit sice ale cez to vsetko sa pytam.
> > >
> > > Dakujem
> > >
> > > Robo
> >
>

Prevod string na Integer a spat ???

[*] Robert Suska <delphi(zv)korak.sk> - 5.6.2002 15:57:28

Ahojte

OSPRAVEDLNUJEM SA ZE TO IDE ESTE RAZ - MOZNO - LEBO SME MALI VYPADOK A NIE
SOM SI ISTY CI TO DOSLO DO KONFERENCIE Dakujem za pochopenie

ok fajn uz som pisal nasmu kolegovi z konferencie priamo na jeho mail ale
som odpustite mi to prosim, som nedockavy a potrebujem to co najskor totiz
v
tom fragmente kodu chyba zapis tela metody Create. Kto by mi vedel poradit
co tam ma ist. Prosim ozvite sa.

Dakujem

Robo


> skus takto
> >
> > type
> > TX = class(TObject)
> > S : string
> > constructor Create(SN : String);
> > end;
> >
> > v procedure naplnis
> >
> > Obj.Tag := integer( TX.Create(string));
> >
> > preberes
> > if (TOBject(Obj.Tag) is TX) then
> > String := TOBject(Obj.Tag) as TX).S
> >
> > Robert Suska wrote:
> >
> > > Ahojte
> > >
> > > Pisem dopredu ze ak je to totalna hlupost tak ma prosim neukrizujte v
> > > konferencii :)
> > >
> > > Je mozne alebo existuje nejaka rutina ktora mi pomoze potrebujem
> > > prekonvertovat text napr:
> > >
> > > &FillData&"Nov� z�znam"&Command&"ODPADY GET ODPAD -1 ALIAS"#10"ODPADY
> GET
> > > ODPAD -1 LIKVPERSON"#10"ODPADY GET ODPAD -1 SPZ"#10"ODPADY GET
ODPAD -1
> > > LIKVIDATOR"#10"ODPADY GET ODPAD -1 ODDELENIE"#10"ODPADY GET ODPAD -1
> PERSON"
> > >
> > > na cislo integer ktore by som si ulozil do Tag-u komponenty a
preniesol
> ho
> > > niekam odtial by som si ho vybral a "urobil" spat string??? Neviem si
to
> > > predstavit sice ale cez to vsetko sa pytam.
> > >
> > > Dakujem
> > >
> > > Robo
> >
>

Jak zapisovat do logu

[*] Jakub Dusek <jdev(zv)seznam(tec)cz> - 5.6.2002 16:18:10

Myslel jsem tim obecne celou rutinu AssignFile - Append - CloseFile.

Jakub Dusek

From: "Dalibor Toman" <dtoman(zv)fortech(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Subject: Re: Jak zapisovat do logu


> AssignFile opravdu neni nic narocneho (se souborem taky nic nedela)
> :-)
>
> D. Toman
>
>
>

Zmena barvy radku v RichEditu

[*] tomsir1.edu(zv)mail.cez(tec)cz - 5.6.2002 16:30:25



Lze provest zmenu barvy nebo tloustky fontu jednotlivych radku v richeditu,
pripadne jen u casti radku /napr. zvyrazneni slova/ ??

Diky Radek

Remote debugging

[*] Anton�n =?ISO-8859-1?QD8ez�� - 5.6.2002 16:35:48

Zdravim,
sna��m se ladit program na mirne historickem HW pomoci remote debuggeru z D6
Ent. Kdyz je program prelozeny bez balicku, debugger funguje jak ma. Pokud
jej vsak prelozim s balicky, kasle debugger na breakpointy. Netusite nekdo,
co delam blbe ?

Diky

Vojta

Prevod string na Integer a spat ???

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 5.6.2002 17:49:58

From: "Nagy Dusan" <dnagy(zv)inomacomp.sk>
> skus takto
>
> type
> TX = class(TObject)
> S : string
> constructor Create(SN : String);
> end;
>
> v procedure naplnis
>
> Obj.Tag := integer( TX.Create(string));

A co pouzit napriklad TStringList a do Tag ukladat jednotlive indexy.

Petr Vones

Prevod string na Integer a spat ???

[*] J�n Harman <harman(zv)atlas(tec)cz> - 5.6.2002 18:19:15

Pomoci toho objektu je to zbytecne slozite, staci si tento retezec ulozit do
nejakeho pole a ukladat jenom ukazatele nebo indexy.
Honza.

----- Original Message -----
From: "Petr Vones" <pvones(zv)mbox.vol(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, June 05, 2002 5:49 PM
Subject: Re: Prevod string na Integer a spat ???> From: "Nagy Dusan" <dnagy(zv)inomacomp.sk>
> > skus takto
> >
> > type
> > TX = class(TObject)
> > S : string
> > constructor Create(SN : String);
> > end;
> >
> > v procedure naplnis
> >
> > Obj.Tag := integer( TX.Create(string));
>
> A co pouzit napriklad TStringList a do Tag ukladat jednotlive indexy.
>
> Petr Vones

Zmena barvy radku v RichEditu

[*] J�n Harman <harman(zv)atlas(tec)cz> - 5.6.2002 18:20:47

Vyberes nejakou cast, a zadas ji atributy. Vybirat lze manualne, nebo
SelStart, SelLength, nebo tak nejak. Uz jsem s tim dlouho nedelal.
Honza.

----- Original Message -----
From: <tomsir1.edu(zv)mail.cez(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, June 05, 2002 4:30 PM
Subject: Zmena barvy radku v RichEditu


>
> Lze provest zmenu barvy nebo tloustky fontu jednotlivych radku v
richeditu,
> pripadne jen u casti radku /napr. zvyrazneni slova/ ??
>
> Diky Radek
>

Remote debugging

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 5.6.2002 18:44:48

From: "Anton�n �ez��" <rezac(zv)apls(tec)cz>
> sna��m se ladit program na mirne historickem HW pomoci remote debuggeru z D6
> Ent. Kdyz je program prelozeny bez balicku, debugger funguje jak ma. Pokud
> jej vsak prelozim s balicky, kasle debugger na breakpointy. Netusite nekdo,

Jde o breakpointy unistene v tvem kodu (v EXE), v balicku nebo ve zdrojaku
RTL/VCL v balicku ?

Petr Vones

Textovy editor Delphi

[*] Jan Neuzil <neuzil.jan(zv)post(tec)cz> - 5.6.2002 19:14:34

Soucasti Delphi je take textovy editor (Demos). Chtel bych ho s upravami pouzit, ale nevim jak odstranit to, ze prvni pismeno ma bud jinou velikost, nebo jiny typ pisma (nepoznam to), nez vsechna pismena dalsi. Zkuste napsat napr. male "g". Nedokaze nekdo poradit? Honza


----
Bez Financ� se p�i koupi
nemovitosti neobejdete
http://reality.finance(tec)cz

Remote debugging

[*] Anton�n =?ISO-8859-1?QD8ez�� - 6.6.2002 07:35:46

Jde o breakpointy umistene v mem kodu (v EXE)

Vojta

----- Original Message -----
From: "Petr Vones" <pvones(zv)mbox.vol(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, June 05, 2002 6:44 PM
Subject: Re: Remote debugging


> From: "Anton�n �ez��" <rezac(zv)apls(tec)cz>
> > sna��m se ladit program na mirne historickem HW pomoci remote debuggeru
z D6
> > Ent. Kdyz je program prelozeny bez balicku, debugger funguje jak ma.
Pokud
> > jej vsak prelozim s balicky, kasle debugger na breakpointy. Netusite
nekdo,
>
> Jde o breakpointy unistene v tvem kodu (v EXE), v balicku nebo ve zdrojaku
> RTL/VCL v balicku ?
>
> Petr Vones

OT: Jak se da prekopirovat disk

[*] Sebesta Jan <delcomseb(zv)volny(tec)cz> - 6.6.2002 07:47:07

Zdravim vsechny,

potrebuji prekopirovat disk (rozdelen na C,D) s WinXP na novy cisty
nenaformatovany disk. Chci dat do PC ten novy, ale nechce se mi vse
preinstalovavat.

Jak na to?

Diky Jan Sebesta

Jak se da prekopirovat disk

[*] Kalus Jozef Ing. <jozef.kalus(zv)spordat.sk> - 6.6.2002 07:47:58

skus Norton Ghost alebo PQ Disk Image (myslim ze takto sa to vola), tie
vedia klonovat disky :o)

joka

-----Original Message-----
From: Sebesta Jan [mailto:delcomseb(zv)volny(tec)cz]
Sent: Thursday, June 06, 2002 7:47 AM
To: Delphi Konference
Subject: OT: Jak se da prekopirovat disk


Zdravim vsechny,

potrebuji prekopirovat disk (rozdelen na C,D) s WinXP na novy cisty
nenaformatovany disk. Chci dat do PC ten novy, ale nechce se mi vse
preinstalovavat.

Jak na to?

Diky Jan Sebesta

Jak se da prekopirovat disk

[*] Robert Suska <delphi(zv)korak.sk> - 6.6.2002 07:51:23

Ahoj

Drive Image 2002 ak chces poslem URL kde sa to da stiahnut

Robo


> Zdravim vsechny,
>
> potrebuji prekopirovat disk (rozdelen na C,D) s WinXP na novy cisty
> nenaformatovany disk. Chci dat do PC ten novy, ale nechce se mi vse
> preinstalovavat.
>
> Jak na to?
>
> Diky Jan Sebesta

Jak se da prekopirovat disk

[*] �tevl�k Mari�n <Marian.Stevlik(zv)merlin(tec)cz> - 6.6.2002 07:54:49

Najlepsie urobit z diskov image, napr cez Ghost od symantecu

Stevlik Marian
Software Development Specialist
MERLIN
Stefanikova 32
150 00 Prague 5
Czech Republic
e-mail: marian.stevlik(zv)merlin(tec)cz
tel: +420 2 41010111 (153)
mobil: +420 724 296616
icq: 38493645

-----P�vodn� zpr�va-----
Od: Sebesta Jan [mailto:delcomseb(zv)volny(tec)cz]
Odesl�no: 6. �ervna 2002 7:47
Komu: Delphi Konference
P�edm�t: OT: Jak se da prekopirovat disk


Zdravim vsechny,

potrebuji prekopirovat disk (rozdelen na C,D) s WinXP na novy cisty
nenaformatovany disk. Chci dat do PC ten novy, ale nechce se mi vse
preinstalovavat.

Jak na to?

Diky Jan Sebesta

Jak se da prekopirovat disk

[*] Martin Ocenas <matko(zv)proces.sk> - 6.6.2002 07:55:08

Symantec Norton Ghost. Zachova uplne vsetko. Mozes strcit disk do
pocitaca a pracovat dalej.

MO

> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]
> Sent: Thursday, June 06, 2002 7:47 AM
> To: Delphi Konference
> Subject: OT: Jak se da prekopirovat disk
>
>
>
>
> Zdravim vsechny,
>
> potrebuji prekopirovat disk (rozdelen na C,D) s WinXP na novy
> cisty nenaformatovany disk. Chci dat do PC ten novy, ale
> nechce se mi vse preinstalovavat.
>
> Jak na to?
>
> Diky Jan Sebesta
>
>

Jak se da prekopirovat disk

[*] Otisk Rene <otisk(zv)misel(tec)cz> - 6.6.2002 08:30:08

Dal bych prednost tomu Ghostu. Jednou jsem na PQ zhorel a Norton Ghost mi
proshel bez problemu. Jinak jestli budes klonovat disk serveru s NTFS, tak
na to s Ghostem i DriveImagem zapomen, musis mit Volume Manager (600$).

Sroub
> Zdravim vsechny,
>
> potrebuji prekopirovat disk (rozdelen na C,D) s WinXP na novy cisty
> nenaformatovany disk. Chci dat do PC ten novy, ale nechce se mi vse
> preinstalovavat.
>
> Jak na to?
>
> Diky Jan Sebesta

OT:ftp.delphi

[*] Viktor Marek <viktor(zv)mbox.vol(tec)cz> - 6.6.2002 08:34:33

Zdravim

Pri preinstalaci PC jsem ztratil prihlasovaci jmeno a heslo na ftp server
ftp://delphi:archivar(zv)ftp.delphi(tec)cz

Poradi nekdo username a login.

Diky za odpoved

Viktor Marek
viktor(zv)mbox.vol(tec)cz


---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.370 / Virov� b�ze: 205 - datum vyd�n�: 5.6.2002

OT:ftp.delphi

[*] tomsir1.edu(zv)mail.cez(tec)cz - 6.6.2002 08:38:41


vzdyt ho tam mas !
user je delphi
heslo je archivar

co chces vic ??

Radek
"Viktor Marek" <viktor(zv)mbox.vol(tec)cz>(zv)clexpert(tec)cz on 06.06.2002 08:34:33

Odpov�zte pros�m - delphi-l(zv)clexpert(tec)cz

Odesl�no k�m: delphi-l-owner(zv)clexpert(tec)cz


Komu: "Konference Delphi 2000" <delphi-l(zv)clexpert(tec)cz>
Kopie:
P�edm�t: OT:ftp.delphi


Zdravim

Pri preinstalaci PC jsem ztratil prihlasovaci jmeno a heslo na ftp server
ftp://delphi:archivar(zv)ftp.delphi(tec)cz

Poradi nekdo username a login.

Diky za odpoved

Viktor Marek
viktor(zv)mbox.vol(tec)cz


---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.370 / Virov� b�ze: 205 - datum vyd�n�: 5.6.2002

Jak se da prekopirovat disk

[*] Sula Milos <milos.sula(zv)oku-su(tec)cz> - 6.6.2002 08:40:37

a coz takhle linux if=/dev/hda of=/dev/hdb teda NTFS to asi nezvladne taky :) ale nepotrebujete zadnej soft a je to free

Milos

-----Original Message-----
From: Otisk Rene [mailto:otisk(zv)misel(tec)cz]
Sent: Thursday, June 06, 2002 8:30 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Jak se da prekopirovat disk


Dal bych prednost tomu Ghostu. Jednou jsem na PQ zhorel a Norton Ghost mi
proshel bez problemu. Jinak jestli budes klonovat disk serveru s NTFS, tak
na to s Ghostem i DriveImagem zapomen, musis mit Volume Manager (600$).

Sroub
> Zdravim vsechny,
>
> potrebuji prekopirovat disk (rozdelen na C,D) s WinXP na novy cisty
> nenaformatovany disk. Chci dat do PC ten novy, ale nechce se mi vse
> preinstalovavat.
>
> Jak na to?
>
> Diky Jan Sebesta

Jak se da prekopirovat disk

[*] Robert Suska <delphi(zv)korak.sk> - 6.6.2002 08:44:02

Nerozumiem preco sa to neda s DriveImage alebo s Ghost ?? mam urobenu zalohu
Win2000 servra s active directories na NTFS.

Robo


> Dal bych prednost tomu Ghostu. Jednou jsem na PQ zhorel a Norton Ghost mi
> proshel bez problemu. Jinak jestli budes klonovat disk serveru s NTFS, tak
> na to s Ghostem i DriveImagem zapomen, musis mit Volume Manager (600$).
>
> Sroub
>
>
> > Zdravim vsechny,
> >
> > potrebuji prekopirovat disk (rozdelen na C,D) s WinXP na novy cisty
> > nenaformatovany disk. Chci dat do PC ten novy, ale nechce se mi vse
> > preinstalovavat.
> >
> > Jak na to?
> >
> > Diky Jan Sebesta

Jak se da prekopirovat disk

[*] Otisk Rene <otisk(zv)misel(tec)cz> - 6.6.2002 08:51:09

A uz jsi ji zkousel obnovit?

Sroub

----- Original Message -----
From: "Robert Suska" <delphi(zv)korak.sk>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, June 06, 2002 8:44 AM
Subject: Re: Jak se da prekopirovat disk


> Nerozumiem preco sa to neda s DriveImage alebo s Ghost ?? mam urobenu
zalohu
> Win2000 servra s active directories na NTFS.
>
> Robo
>
>
> > Dal bych prednost tomu Ghostu. Jednou jsem na PQ zhorel a Norton Ghost
mi
> > proshel bez problemu. Jinak jestli budes klonovat disk serveru s NTFS,
tak
> > na to s Ghostem i DriveImagem zapomen, musis mit Volume Manager (600$).
> >
> > Sroub
> >
> >
> >
> > > Zdravim vsechny,
> > >
> > > potrebuji prekopirovat disk (rozdelen na C,D) s WinXP na novy cisty
> > > nenaformatovany disk. Chci dat do PC ten novy, ale nechce se mi vse
> > > preinstalovavat.
> > >
> > > Jak na to?
> > >
> > > Diky Jan Sebesta

Jak se da prekopirovat disk

[*] Robert Suska <delphi(zv)korak.sk> - 6.6.2002 09:27:52

hm...

este nie priznam sa. A su s tym nejake problemi??? Lebo uz som obnovoval
disk na NTFS ale s Win 2000 PRO a WinXP a bez problemov. Ak mas nejake
skusenosti asi ich uvitame vsetci. Tak von s nimi :)

Robo


> A uz jsi ji zkousel obnovit?
>
> Sroub
>
> ----- Original Message -----
> From: "Robert Suska" <delphi(zv)korak.sk>
> To: <delphi-l(zv)clexpert(tec)cz>
> Sent: Thursday, June 06, 2002 8:44 AM
> Subject: Re: Jak se da prekopirovat disk
>
>
> > Nerozumiem preco sa to neda s DriveImage alebo s Ghost ?? mam urobenu
> zalohu
> > Win2000 servra s active directories na NTFS.
> >
> > Robo
> >
> >
> > > Dal bych prednost tomu Ghostu. Jednou jsem na PQ zhorel a Norton Ghost
> mi
> > > proshel bez problemu. Jinak jestli budes klonovat disk serveru s NTFS,
> tak
> > > na to s Ghostem i DriveImagem zapomen, musis mit Volume Manager
(600$).
> > >
> > > Sroub
> > >
> > >
> > >
> > > > Zdravim vsechny,
> > > >
> > > > potrebuji prekopirovat disk (rozdelen na C,D) s WinXP na novy cisty
> > > > nenaformatovany disk. Chci dat do PC ten novy, ale nechce se mi vse
> > > > preinstalovavat.
> > > >
> > > > Jak na to?
> > > >
> > > > Diky Jan Sebesta

Jak se da prekopirovat disk

[*] miro mrazik <preas_w(zv)stonline.sk> - 6.6.2002 09:57:04

Ahoj
neviem ci XP to umoznuje ale na NT som to robil tak ze som jeden disk nechal
zrkadlit na iny a potom som ten druhy dal ako prvy a vypol som zrkadlenie a
bolo to.

miro
----- Original Message -----
From: "Sebesta Jan" <delcomseb(zv)volny(tec)cz>
To: "Delphi Konference" <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, June 06, 2002 7:47 AM
Subject: OT: Jak se da prekopirovat disk


> Zdravim vsechny,
>
> potrebuji prekopirovat disk (rozdelen na C,D) s WinXP na novy cisty
> nenaformatovany disk. Chci dat do PC ten novy, ale nechce se mi vse
> preinstalovavat.
>
> Jak na to?
>
> Diky Jan Sebesta
>

Zmena barvy radku v RichEditu

[*] bardon <bardon(zv)akord-soft(tec)cz> - 6.6.2002 09:57:39

Barvu pisma snadno (tusim SelAttributes.Font.Color), barvu podkladu jen v
nekterych potomcich RichEditu (napr. RichEdit98)

-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of tomsir1.edu(zv)mail.cez(tec)cz
Sent: Wednesday, June 05, 2002 4:30 PM

Lze provest zmenu barvy nebo tloustky fontu jednotlivych radku v richeditu,
pripadne jen u casti radku /napr. zvyrazneni slova/ ??

Hromadna zmena udajov VERSIONINFO

[*] Jan Grman <J.Grman(zv)kmer.elf.stuba.sk> - 6.6.2002 10:42:37

Zdravim skalnych,

potrebujem zmenit HROMADNE (v asi 10tich projektoch) udaje ktore su zapisane
v zalozke VERSIONINFO.
Nemate niekto nieco take ?

Ja som si urobil program ktory:
- zmaze RES subor projektu
- zmeni DOF subor projektu (co je vlastne INI subor)

Ono to vlastne aj funguje - STRATI sa mi vsak NAPRIKLAD PRIRADENA IKONA
programu.
Mate nieco take urobene alebo viete aspon poradit?

Vdaka
Jan Grman
J.Grman(zv)kmer.elf.stuba.sk

Jak se da prekopirovat disk

[*] Kalus Jozef Ing. <jozef.kalus(zv)spordat.sk> - 6.6.2002 10:43:40

to je ale mozne iba pri RAID radici (napriklad na doskach ABIT alebo
samostatny HotRod a podobne) :o)

ak ide o klasicky radic tak sa to neda :o)

joka

-----Original Message-----
From: miro mrazik [mailto:preas_w(zv)stonline.sk]
Sent: Thursday, June 06, 2002 9:57 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Jak se da prekopirovat disk


Ahoj
neviem ci XP to umoznuje ale na NT som to robil tak ze som jeden disk nechal
zrkadlit na iny a potom som ten druhy dal ako prvy a vypol som zrkadlenie a
bolo to.

miro
----- Original Message -----
From: "Sebesta Jan" <delcomseb(zv)volny(tec)cz>
To: "Delphi Konference" <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, June 06, 2002 7:47 AM
Subject: OT: Jak se da prekopirovat disk


> Zdravim vsechny,
>
> potrebuji prekopirovat disk (rozdelen na C,D) s WinXP na novy cisty
> nenaformatovany disk. Chci dat do PC ten novy, ale nechce se mi vse
> preinstalovavat.
>
> Jak na to?
>
> Diky Jan Sebesta
>

Problem s pripojenim k FB na W98

[*] miro mrazik <preas_w(zv)stonline.sk> - 6.6.2002 10:45:25

Ahojte,
neviem si rady s tymto problemom:
mam dva PC s W98 prepojene v sieti peer-to-peer. Na obidvoch mam spusteny
server Firebird a na obidvoch mam spusteny IBConsole.
z Prveho PC na druhe neni ziadny problem vsetko pracuje rychlo a bez zavad -
konekt k serveru aj k databaze je bez problemov.
Problem je ked sa pripajam z toho druheho k prvemu. Po zadani hesla to
stuhne asi na dve minuty, potom sa to pripoji. Ked chcem otvorit databazu
tak zase 2 minuty ked robim test pripojenia k databazi tiez dve minuty a
potom mi zahlasi ze prebehol OK.

V com mozem mat problem?
Diky
Miro

Jak se da prekopirovat disk

[*] Otisk Rene <otisk(zv)misel(tec)cz> - 6.6.2002 10:49:21

No, snazil jsem se pred asi 2 mesici preklopit nas firemni server WinNT 4.0
Server (Back Office Small Business Server 4.5) na vetsi SCSI disk a zarvalo
mi to, ze tato verze neni urcena pro Server. Nenasel jsem odvahu
prekonvertovet NTFS na FAT, lepe receno pri zpetne konverzi z FAT na NTFS
nejni MS uplne koser s obnovenim prav pro adresare resp. souboru (kdysi mi
tam vzdycky nekde neco zapomel). Bohuzel mi to ten darebak nahlasil az v
okamziku obnoveni z image, cemuz predchazela nejprve instalace BSB 4.0, na
to upgrade na 4.5 to vse s asi milionem restartu po kazde zmene jakekoli
blbosti. Kdyz k tomu pripoctu, ze WinNT neumi pri instalaci rozpoznat vic,
nez 4GB, tak jsem mel krvave oci, jak mi ty "nove" technologie pomahaji. Pry
si mam stahnout Volume Manager z PowerQuestu. Tak jsem si stahnul demo, na
kterem je sice krasne videt jak to sqele vsechno umi, lec kdyz dojde na
lamani chleba, chce ostrou verzi za 599$. Mozna je to dobra cena pro firmu
ktera klonuje/obnovuje disky kazdy tyden ale za jednorazovou akci vyplaznout
tolik mi tady nikdo neschvalil...

Sroub

> hm...
>
> este nie priznam sa. A su s tym nejake problemi??? Lebo uz som obnovoval
> disk na NTFS ale s Win 2000 PRO a WinXP a bez problemov. Ak mas nejake
> skusenosti asi ich uvitame vsetci. Tak von s nimi :)
>
> Robo
>
>
> > A uz jsi ji zkousel obnovit?
> >
> > Sroub
> >
> > ----- Original Message -----
> > From: "Robert Suska" <delphi(zv)korak.sk>
> > To: <delphi-l(zv)clexpert(tec)cz>
> > Sent: Thursday, June 06, 2002 8:44 AM
> > Subject: Re: Jak se da prekopirovat disk
> >
> >
> > > Nerozumiem preco sa to neda s DriveImage alebo s Ghost ?? mam urobenu
> > zalohu
> > > Win2000 servra s active directories na NTFS.
> > >
> > > Robo
> > >
> > >
> > > > Dal bych prednost tomu Ghostu. Jednou jsem na PQ zhorel a Norton
Ghost
> > mi
> > > > proshel bez problemu. Jinak jestli budes klonovat disk serveru s
NTFS,
> > tak
> > > > na to s Ghostem i DriveImagem zapomen, musis mit Volume Manager
> (600$).
> > > >
> > > > Sroub
> > > >
> > > >
> > > >
> > > > > Zdravim vsechny,
> > > > >
> > > > > potrebuji prekopirovat disk (rozdelen na C,D) s WinXP na novy
cisty
> > > > > nenaformatovany disk. Chci dat do PC ten novy, ale nechce se mi
vse
> > > > > preinstalovavat.
> > > > >
> > > > > Jak na to?
> > > > >
> > > > > Diky Jan Sebesta

Pocesteni konstant v D6

[*] Rumcajs <prajz.rumcajs(zv)quick(tec)cz> - 6.6.2002 10:54:44

Servus,
nevite nekdo jak se daji v D6 pocestit konstanty? V D4 jsem p�epsal soubor
Consts.pas do cestiny, prekompiloval a nahradil Consts.dcu tim novym. V D6
to nejak nejde, Consts.pas jsem prepsal, ale nejde zkompilovat, proste zadne
DCU z nej nevypadne. Dokonce ani Delfine nevadi, ze jsem puvod Consts.dcu
smazal.
Poradte
Rumcajs
rumcajs(zv)email(tec)cz, email(zv)rumcajs.com

IB: Jak na bloby ?

[*] Milan Tome� <milan.tomes(zv)haida(tec)cz> - 6.6.2002 11:07:52

Zdravim vsechny,

potrebuji akutne ukladat bloby do IB/FB. Jak na to ???
Jen podotykam, ze mam sve vlastni objekty pro praci s DB a vyuzivam je pro
kompletni praci s recordama v DB. Da se s bloby manipulovat nejak pres SQL s
vyloucenim metod tridy TField ??? Ten totiz nechci (a ani nemuzu, protoze
normalne nevyuzivam TDataset) pouzivat...
Nicmene kazda rada je dobra - zkuste mi, prosim, poslat i kousek zdrojaku
(napr. ulozeni souboru z disku do DB a naopak)

Diky

S pozdravem

Milan Tomes
mailto:milan.tomes(zv)haida(tec)cz

OT: Jak se da prekopirovat disk

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 6.6.2002 11:16:46

Puvodni zprava, kterou napsal Sebesta Jan dne 6 Jun 2002:

> potrebuji prekopirovat disk (rozdelen na C,D) s WinXP na novy cisty
> nenaformatovany disk. Chci dat do PC ten novy, ale nechce se mi vse
> preinstalovavat.

No nejlepsi je podle me Ghost, jestli si chces o nem neco cesky precist,
pak: http://www.clexpert(tec)cz/software/ghost/

S pozdravem
Petr Zahradnik, pocitacovy expert

============================================================
Petr Zahradnik, Computer Laboratory
Obvodova 740/14, P.O. Box 15, 400 07 Usti nad Labem
Telefony: 047-5500610, 047-5501627, 0602-409601
Fax: 047-5511338
WWW: http://www.clexpert(tec)cz, http://www.zahradnik(tec)cz
E-Mail: clexpert(zv)clexpert(tec)cz, petr(zv)zahradnik(tec)cz
ICQ: 21215917
============================================================

Jak se da prekopirovat disk

[*] Kalus Jozef Ing. <jozef.kalus(zv)spordat.sk> - 6.6.2002 11:18:08

Poznamka: winnt4 pozna pri instalacii aj vacsie disky ako je 4GB a da sa ne
ne v pohode nainstalovat, nutnost je mat instalacku s NT4 SP minimalne 4,
ale ja som instaloval na 15GB disk NT4 bez SP a ide mi to normalne (dokonca
po SP6a pozna aj w2000 NTFS), potom si treba stiahnut ATAPI ovladac pre NT4,
ktory je z SP4 a pri instalacii na zaciatku nedavat rozpoznavat disky a cd
rom ale cez F6 mu treba vnutit z diskety ATAPI SP4 a prejde dalej uplne v
pohode, blizsie info a aj ovladac na mojom maile, rad poslem.

joka

-----Original Message-----
From: Otisk Rene [mailto:otisk(zv)misel(tec)cz]
Sent: Thursday, June 06, 2002 10:49 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Jak se da prekopirovat disk


No, snazil jsem se pred asi 2 mesici preklopit nas firemni server WinNT 4.0
Server (Back Office Small Business Server 4.5) na vetsi SCSI disk a zarvalo
mi to, ze tato verze neni urcena pro Server. Nenasel jsem odvahu
prekonvertovet NTFS na FAT, lepe receno pri zpetne konverzi z FAT na NTFS
nejni MS uplne koser s obnovenim prav pro adresare resp. souboru (kdysi mi
tam vzdycky nekde neco zapomel). Bohuzel mi to ten darebak nahlasil az v
okamziku obnoveni z image, cemuz predchazela nejprve instalace BSB 4.0, na
to upgrade na 4.5 to vse s asi milionem restartu po kazde zmene jakekoli
blbosti. Kdyz k tomu pripoctu, ze WinNT neumi pri instalaci rozpoznat vic,
nez 4GB, tak jsem mel krvave oci, jak mi ty "nove" technologie pomahaji. Pry
si mam stahnout Volume Manager z PowerQuestu. Tak jsem si stahnul demo, na
kterem je sice krasne videt jak to sqele vsechno umi, lec kdyz dojde na
lamani chleba, chce ostrou verzi za 599$. Mozna je to dobra cena pro firmu
ktera klonuje/obnovuje disky kazdy tyden ale za jednorazovou akci vyplaznout
tolik mi tady nikdo neschvalil...

Sroub

> hm...
>
> este nie priznam sa. A su s tym nejake problemi??? Lebo uz som obnovoval
> disk na NTFS ale s Win 2000 PRO a WinXP a bez problemov. Ak mas nejake
> skusenosti asi ich uvitame vsetci. Tak von s nimi :)
>
> Robo
>
>
> > A uz jsi ji zkousel obnovit?
> >
> > Sroub
> >
> > ----- Original Message -----
> > From: "Robert Suska" <delphi(zv)korak.sk>
> > To: <delphi-l(zv)clexpert(tec)cz>
> > Sent: Thursday, June 06, 2002 8:44 AM
> > Subject: Re: Jak se da prekopirovat disk
> >
> >
> > > Nerozumiem preco sa to neda s DriveImage alebo s Ghost ?? mam urobenu
> > zalohu
> > > Win2000 servra s active directories na NTFS.
> > >
> > > Robo
> > >
> > >
> > > > Dal bych prednost tomu Ghostu. Jednou jsem na PQ zhorel a Norton
Ghost
> > mi
> > > > proshel bez problemu. Jinak jestli budes klonovat disk serveru s
NTFS,
> > tak
> > > > na to s Ghostem i DriveImagem zapomen, musis mit Volume Manager
> (600$).
> > > >
> > > > Sroub
> > > >
> > > >
> > > >
> > > > > Zdravim vsechny,
> > > > >
> > > > > potrebuji prekopirovat disk (rozdelen na C,D) s WinXP na novy
cisty
> > > > > nenaformatovany disk. Chci dat do PC ten novy, ale nechce se mi
vse
> > > > > preinstalovavat.
> > > > >
> > > > > Jak na to?
> > > > >
> > > > > Diky Jan Sebesta

Jak na bloby ?

[*] Otisk Rene <otisk(zv)misel(tec)cz> - 6.6.2002 11:29:43

Pouzivam na to UDeFko stazene z netu (BlobUDFLib.dll) a zatim bez jakychkoli
problemu. Pak s tim pracujes primo v SQL

INSERT INTO TABLE_A
(ID, BLOBPOLE)
VALUES (1, F_STR_BLOB('TADY BUDE TEN BLOB')

Sroub

> Zdravim vsechny,
>
> potrebuji akutne ukladat bloby do IB/FB. Jak na to ???
> Jen podotykam, ze mam sve vlastni objekty pro praci s DB a vyuzivam je pro
> kompletni praci s recordama v DB. Da se s bloby manipulovat nejak pres SQL
s
> vyloucenim metod tridy TField ??? Ten totiz nechci (a ani nemuzu, protoze
> normalne nevyuzivam TDataset) pouzivat...
> Nicmene kazda rada je dobra - zkuste mi, prosim, poslat i kousek zdrojaku
> (napr. ulozeni souboru z disku do DB a naopak)
>
> Diky
>
> S pozdravem
>
> Milan Tomes
> mailto:milan.tomes(zv)haida(tec)cz

Jak se da prekopirovat disk

[*] Otisk Rene <otisk(zv)misel(tec)cz> - 6.6.2002 11:33:32

Problem ale je, ze BackOfficeSBS mi pripada, ze neni uplne standardni
instalace WinNT

Sroub

P.S. Byl bych rad, kdybys mi poslal info, japa na to... Diky


> Poznamka: winnt4 pozna pri instalacii aj vacsie disky ako je 4GB a da sa
ne
> ne v pohode nainstalovat, nutnost je mat instalacku s NT4 SP minimalne 4,
> ale ja som instaloval na 15GB disk NT4 bez SP a ide mi to normalne
(dokonca
> po SP6a pozna aj w2000 NTFS), potom si treba stiahnut ATAPI ovladac pre
NT4,
> ktory je z SP4 a pri instalacii na zaciatku nedavat rozpoznavat disky a cd
> rom ale cez F6 mu treba vnutit z diskety ATAPI SP4 a prejde dalej uplne v
> pohode, blizsie info a aj ovladac na mojom maile, rad poslem.
>
> joka
>
> -----Original Message-----
> From: Otisk Rene [mailto:otisk(zv)misel(tec)cz]
> Sent: Thursday, June 06, 2002 10:49 AM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: Re: Jak se da prekopirovat disk
>
>
> No, snazil jsem se pred asi 2 mesici preklopit nas firemni server WinNT
4.0
> Server (Back Office Small Business Server 4.5) na vetsi SCSI disk a
zarvalo
> mi to, ze tato verze neni urcena pro Server. Nenasel jsem odvahu
> prekonvertovet NTFS na FAT, lepe receno pri zpetne konverzi z FAT na NTFS
> nejni MS uplne koser s obnovenim prav pro adresare resp. souboru (kdysi mi
> tam vzdycky nekde neco zapomel). Bohuzel mi to ten darebak nahlasil az v
> okamziku obnoveni z image, cemuz predchazela nejprve instalace BSB 4.0, na
> to upgrade na 4.5 to vse s asi milionem restartu po kazde zmene jakekoli
> blbosti. Kdyz k tomu pripoctu, ze WinNT neumi pri instalaci rozpoznat vic,
> nez 4GB, tak jsem mel krvave oci, jak mi ty "nove" technologie pomahaji.
Pry
> si mam stahnout Volume Manager z PowerQuestu. Tak jsem si stahnul demo, na
> kterem je sice krasne videt jak to sqele vsechno umi, lec kdyz dojde na
> lamani chleba, chce ostrou verzi za 599$. Mozna je to dobra cena pro firmu
> ktera klonuje/obnovuje disky kazdy tyden ale za jednorazovou akci
vyplaznout
> tolik mi tady nikdo neschvalil...
>
> Sroub
>
>
>
> > hm...
> >
> > este nie priznam sa. A su s tym nejake problemi??? Lebo uz som obnovoval
> > disk na NTFS ale s Win 2000 PRO a WinXP a bez problemov. Ak mas nejake
> > skusenosti asi ich uvitame vsetci. Tak von s nimi :)
> >
> > Robo
> >
> >
> > > A uz jsi ji zkousel obnovit?
> > >
> > > Sroub
> > >
> > > ----- Original Message -----
> > > From: "Robert Suska" <delphi(zv)korak.sk>
> > > To: <delphi-l(zv)clexpert(tec)cz>
> > > Sent: Thursday, June 06, 2002 8:44 AM
> > > Subject: Re: Jak se da prekopirovat disk
> > >
> > >
> > > > Nerozumiem preco sa to neda s DriveImage alebo s Ghost ?? mam
urobenu
> > > zalohu
> > > > Win2000 servra s active directories na NTFS.
> > > >
> > > > Robo
> > > >
> > > >
> > > > > Dal bych prednost tomu Ghostu. Jednou jsem na PQ zhorel a Norton
> Ghost
> > > mi
> > > > > proshel bez problemu. Jinak jestli budes klonovat disk serveru s
> NTFS,
> > > tak
> > > > > na to s Ghostem i DriveImagem zapomen, musis mit Volume Manager
> > (600$).
> > > > >
> > > > > Sroub
> > > > >
> > > > >
> > > > >
> > > > > > Zdravim vsechny,
> > > > > >
> > > > > > potrebuji prekopirovat disk (rozdelen na C,D) s WinXP na novy
> cisty
> > > > > > nenaformatovany disk. Chci dat do PC ten novy, ale nechce se mi
> vse
> > > > > > preinstalovavat.
> > > > > >
> > > > > > Jak na to?
> > > > > >
> > > > > > Diky Jan Sebesta

Resource a Sytem log

[*] Leos Urban <Leos.Urban(zv)iol(tec)cz> - 6.6.2002 11:55:00

Vc. utility vc. zdrojaku (zrejme se odkaz rozpadne na dva radky):
http://www.pinnaclepublishing.com/DD/DDmag.nsf/0/9E27FFF5B9FC7C32852568F5004
B1605

Leos

Jak na bloby ?

[*] Milan Tome� <milan.tomes(zv)haida(tec)cz> - 6.6.2002 12:41:12

No, jenze ja potrebuji ukladat binarni data (o velikosti klidne i par MB)...

S pozdravem

Milan Tomes
mailto:milan.tomes(zv)haida(tec)cz

> Pouzivam na to UDeFko stazene z netu (BlobUDFLib.dll) a zatim bez
> jakychkoli
> problemu. Pak s tim pracujes primo v SQL
>
> INSERT INTO TABLE_A
> (ID, BLOBPOLE)
> VALUES (1, F_STR_BLOB('TADY BUDE TEN BLOB')
> Sroub

Jak na bloby ?

[*] Otisk Rene <otisk(zv)misel(tec)cz> - 6.6.2002 12:48:18

Tak potom pres stream-> LoadFromStream, SaveToStream

Sroub

----- Original Message -----
From: "Milan Tome�" <milan.tomes(zv)haida(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, June 06, 2002 12:41 PM
Subject: RE: Jak na bloby ?> No, jenze ja potrebuji ukladat binarni data (o velikosti klidne i par
MB)...
>
> S pozdravem
>
> Milan Tomes
> mailto:milan.tomes(zv)haida(tec)cz
>
> > Pouzivam na to UDeFko stazene z netu (BlobUDFLib.dll) a zatim bez
> > jakychkoli
> > problemu. Pak s tim pracujes primo v SQL
> >
> > INSERT INTO TABLE_A
> > (ID, BLOBPOLE)
> > VALUES (1, F_STR_BLOB('TADY BUDE TEN BLOB')
> > Sroub

Ztraceni udalosti

[*] Zdenek Drvota <drvota-l(zv)zds(tec)cz> - 6.6.2002 13:00:38

Ahoj,
ono ale mnozstvi (i volne) RAM nema s nedostatkem
zdroju celkem nic spolecn�ho-bohuzel :(
Tedy alespon na win 9x/ME, na NT+ uz je to se zdroji lepsi.

### Milan Schembera napsal dne 5 Jun 2002, v 12:04 :
> > A take se mi to stalo pri nedostatku zdroju na W98 (pozmenilo
> > to zdrojaky-sem tam pismenko, vypadavaly eventy z DFM,
> > neulozilo se to ac jsem ulozil atp). Taky jsem to resil v
> > konferenci asi pred rok-dvema. Pod Win2000jsem se s tim u z
> > nesetkal :-)
>
> Tohle zrejme nepripada v uvahu, mam Win2k a 512MB RAM, z cehoz mam 50%
> fyzicke pameti stale volne ;-)
>


--
-----------------------------------------------
Ing. Zdenek Drvota e-mail: drvota(zv)zds(tec)cz
director ICQ# 135770414
ZDS, spol. s r.o.
Hronovicka 708 tel:+420-40-6613756
530 02 Pardubice fax:+420-40-6613756
Czech Republic http://www.zds(tec)cz
e-mail: info(zv)zds(tec)cz
Pripojte se k hledani mimozemskych civilizaci:
SETI(zv)Home http://setiathome.ssl.berkeley.edu
Darek, ktery nezklame? CeDecko od nas!
http://www.zds(tec)cz/cdrom/cdrom.asp?sender=mail
--

Jak na bloby ?

[*] Milan Tome� <milan.tomes(zv)haida(tec)cz> - 6.6.2002 13:01:49

To me napadlo, ale jak presne ??? Nemate nekdo kousek zdrojaku ???

S pozdravem

Milan Tomes
mailto:milan.tomes(zv)haida(tec)cz

> Tak potom pres stream-> LoadFromStream, SaveToStream
> Sroub

> > No, jenze ja potrebuji ukladat binarni data (o velikosti klidne i par
> MB)...
> >
> > S pozdravem
> >
> > Milan Tomes
> > mailto:milan.tomes(zv)haida(tec)cz

DCOM W2000 Pro - Wxp

[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 6.6.2002 13:08:20

Ahoj,

nevite nekdo, jak nakonfigurovat na XP Pro COM objekt, aby sel
spustit z W2000 Pro? Obracene mi to jde bez problemu. Kde delam
chybu?

S pozdravem

Zbysek Hlinka


Jak se da prekopirovat disk

[*] Ludek ZITA <konference(zv)sales(tec)cz> - 6.6.2002 13:11:38


----- Original Message -----
From: "Otisk Rene" <otisk(zv)misel(tec)cz>> A uz jsi ji zkousel obnovit?
>
> Sroub
>
> ----- Original Message -----
> From: "Robert Suska" <delphi(zv)korak.sk>
> > Nerozumiem preco sa to neda s DriveImage alebo s Ghost ?? mam urobenu
> zalohu
> > Win2000 servra s active directories na NTFS.
> >
> > Robo

Ahoj.
Pokud nepouziva dynamicke disky tak to obnovi.
Ja bezne zalohuji Win2000 server i SBS2000 server a obnovuji.
Mam u trech zakazniku HW identicke servery a u sebe jeden zalozni.
POkud potrebuji v klidu neco vykoumat, pak Ghostem prenesu celou image start
disku domu a muzu vesele laborovat.
Dynamicke disky to ovsem neumi.

Ludek



---
Douf�m, �e odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.365 / Virov� b�ze: 202 - datum vyd�n�: 24.5.2002

Jak dynamicky vytvorit record

[*] LUKES V�clav <lukes(zv)ans(tec)cz> - 6.6.2002 13:13:17


Ahoj,

nevite prosim nekdo, jestli jde vytvorit dynamicky record ?

Napr.

type
TPokus = record
vek: integer;
end;

No jo, ale kdyz dopredu nevim, kolik hodnot bude v recordu ???

Vasek

Jak na bloby ?

[*] Otisk Rene <otisk(zv)misel(tec)cz> - 6.6.2002 13:22:16

var
Stream: TStream;
begin
Stream :=
Data.Blobon.CreateBlobStream(Data.IBDataset.FieldByName(FieldName),
bmWrite);
try
Data.IBDataset.Edit;
Data.IBDataset.FieldByName(FieldName).SaveToStream(Stream);
Data.IBDataset.Post;
finally
Stream.Free;
end;

Pisu z hlavy, takze kdy\z tak v archivu najdes dalsi odkazy

Sroub

> To me napadlo, ale jak presne ??? Nemate nekdo kousek zdrojaku ???
>
> > Tak potom pres stream-> LoadFromStream, SaveToStream
> > Sroub
>
> > > No, jenze ja potrebuji ukladat binarni data (o velikosti klidne i par
> > MB)...
> > >

OT: Platebni karta a internet

[*] Mephisto <mephisto(zv)akvila(tec)cz> - 6.6.2002 13:25:11

Mate nekdo zkusenosti se %subj% nejde mi ani o to zjistit jestli je karta
platna ale co vsechno musim udelat abych tuto sluzbu mohl provozovat, jak se
oznamuje bance ze karta cislo to a to si u me neco koupila a chce prachy
atd.

Diky

Jak na bloby ?

[*] Milan Tome� <milan.tomes(zv)haida(tec)cz> - 6.6.2002 13:40:36

A nemate / nepouzivate nekdo pristup pres SQL ???
Tohle je reseni, ktere nechci pouzit (fuj fuj fuj :). Nemam rad TDataset
(pro editaci).

S pozdravem

Milan Tomes
mailto:milan.tomes(zv)haida(tec)cz

> var
> Stream: TStream;
> begin
> Stream :=
> Data.Blobon.CreateBlobStream(Data.IBDataset.FieldByName(FieldName),
> bmWrite);
> try
> Data.IBDataset.Edit;
> Data.IBDataset.FieldByName(FieldName).SaveToStream(Stream);
> Data.IBDataset.Post;
> finally
> Stream.Free;
> end;
> Sroub
>
> > To me napadlo, ale jak presne ??? Nemate nekdo kousek zdrojaku ???
> >
> > > Tak potom pres stream-> LoadFromStream, SaveToStream
> > > Sroub
> >
> > > > No, jenze ja potrebuji ukladat binarni data (o velikosti
> klidne i par
> > > MB)...
> > > >
>

OT: Platebni karta a internet

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 6.6.2002 13:57:38

Puvodni zprava, kterou napsal Mephisto dne 6 Jun 2002:

> Mate nekdo zkusenosti se %subj% nejde mi ani o to zjistit jestli je karta
> platna ale co vsechno musim udelat abych tuto sluzbu mohl provozovat, jak
> se oznamuje bance ze karta cislo to a to si u me neco koupila a chce
> prachy atd.

To se oznamuje tak, ze si s nimi nejdrive musis sjednat smlouvu, abys
neco mohl oznamovat, takze navstiv svou a nebo vsechny ostatni banky a
podepis smlouvu o prijimani platebnich karet. Predem te upozornuju, ze z
Internetu nebudou mit moc velkou radost :)

S pozdravem
Petr Zahradnik, pocitacovy expert

============================================================
Petr Zahradnik, Computer Laboratory
Obvodova 740/14, P.O. Box 15, 400 07 Usti nad Labem
Telefony: 047-5500610, 047-5501627, 0602-409601
Fax: 047-5511338
WWW: http://www.clexpert(tec)cz, http://www.zahradnik(tec)cz
E-Mail: clexpert(zv)clexpert(tec)cz, petr(zv)zahradnik(tec)cz
ICQ: 21215917
============================================================

OT: ADPort

[*] Radek Masnica - konference <delphi(zv)wige-mic(tec)cz> - 6.6.2002 14:01:17

Zdravim ...

neslysel nekdo o Unite "adport" ?

dik a s pozdravem

Radek

ADPort

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 6.6.2002 14:05:52

From: "Radek Masnica - konference" <delphi(zv)wige-mic(tec)cz>
> neslysel nekdo o Unite "adport" ?

Zkusil jsi treba: http://www.google.com/search?hl=en&q=delphi+adport

Petr Vones

ADPort

[*] Radek Masnica - konference <delphi(zv)wige-mic(tec)cz> - 6.6.2002 14:20:43

no jasne, ale tam, je videt jenom cast zdrojaku, kde je adport pouzitej v
uses ... No a ja bych ten ADPort ale potreboval jako unitu ...

mam totiz kousek programu, kterej to vyuziva a ja to kvuli tomu nezkompiluju
...;-(


Dik

Radek

ADPort

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 6.6.2002 14:26:33

From: "Radek Masnica - konference" <delphi(zv)wige-mic(tec)cz>
> no jasne, ale tam, je videt jenom cast zdrojaku, kde je adport pouzitej v
> uses ... No a ja bych ten ADPort ale potreboval jako unitu ...

Vzhledem k tomu, ze pochazi z komercni knihovny AsyncPro, tak si ji budes
muset koupit anebo prepsat tu aplikaci s pouzitim nejake jine knihovny.

Petr Vones

Jak dynamicky vytvorit record

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 6.6.2002 14:29:44

From: "LUKES V�clav" <lukes(zv)ans(tec)cz>
> nevite prosim nekdo, jestli jde vytvorit dynamicky record ?
> type
> TPokus = record
> vek: integer;
> end;
> No jo, ale kdyz dopredu nevim, kolik hodnot bude v recordu ???

V recordu bude vzdy jen ta hodnota(y) ktera tam je. Patrne jsi mel namysli
pole recordu, ktere muzes udelat pomoci:

var
PokusArray: array of TPokus;

SetLength(PokusArray, 1000);
PokusArray[0].vek := 140;

popripade pouzit misto zaznamu tridu a tu ukladat do TObjectListu, v nekterych
pripadech se s tim lepe pracuje.

Petr Vones

OT: ADPort

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 6.6.2002 14:39:44

Puvodni zprava, kterou napsal Radek Masnica - konference dne 6 Jun 2002:

> neslysel nekdo o Unite "adport" ?

Async Professional, komercni knihovna.

S pozdravem
Petr Zahradnik, pocitacovy expert

============================================================
Petr Zahradnik, Computer Laboratory
Obvodova 740/14, P.O. Box 15, 400 07 Usti nad Labem
Telefony: 047-5500610, 047-5501627, 0602-409601
Fax: 047-5511338
WWW: http://www.clexpert(tec)cz, http://www.zahradnik(tec)cz
E-Mail: clexpert(zv)clexpert(tec)cz, petr(zv)zahradnik(tec)cz
ICQ: 21215917
============================================================

Prihlaseni k FB

[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 6.6.2002 15:04:54

Ahoj,

zjistil jsem, ze pokud se prihlasuji pres komponentu IBDatabase k
FB serveru, trva to rekneme jednu az dve sekundy. Mam IBX4.52.

Existuje nejaky zpusob, jak to zrychlit? Mam totiz formular s
nekolika IBDatabazemi pro ruzne thready a kdyz je chci vsechny
pripojit k databazi, tak to uz celkem trva. I kdyz otvirani vsech
databazi probiha soucasne v samostatnych threadech, stejne to
zdrzuje. Neexistuje nejake nastaveni, kterym by se ta doba dala
zkratit?

Dik.

David Lebeda

Jak dynamicky vytvorit record

[*] LUKES V�clav <lukes(zv)ans(tec)cz> - 6.6.2002 15:08:44


Asi jsem spatne napsal svuj dotaz.
Jde o to, ze chci udelat record a hodnoty jsou nazvy sloupcu tabulky. Samozrejme, ze jde vzdy o jinou tabulku a o jinou strukturu, proto nemuzu natvrdo vytvorit record...
V.

-----Original Message-----
From: Petr Vones [mailto:pvones(zv)mbox.vol(tec)cz]
Sent: Thursday, June 06, 2002 2:30 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Jak dynamicky vytvorit record


From: "LUKES V�clav" <lukes(zv)ans(tec)cz>
> nevite prosim nekdo, jestli jde vytvorit dynamicky record ?
> type
> TPokus = record
> vek: integer;
> end;
> No jo, ale kdyz dopredu nevim, kolik hodnot bude v recordu ???

V recordu bude vzdy jen ta hodnota(y) ktera tam je. Patrne jsi mel namysli
pole recordu, ktere muzes udelat pomoci:

var
PokusArray: array of TPokus;

SetLength(PokusArray, 1000);
PokusArray[0].vek := 140;

popripade pouzit misto zaznamu tridu a tu ukladat do TObjectListu, v nekterych
pripadech se s tim lepe pracuje.

Petr Vones

ADPort

[*] Nagy Dusan <dnagy(zv)inomacomp.sk> - 06.6.2002 15:10:56



Sucast kniznice Async profesional for delphy.

Jak na bloby ?

[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 6.6.2002 15:11:27

----- Original Message -----
From: "Milan Tome�" <milan.tomes(zv)haida(tec)cz>
> A nemate / nepouzivate nekdo pristup pres SQL ???
> Tohle je reseni, ktere nechci pouzit (fuj fuj fuj :). Nemam rad TDataset
> (pro editaci).
>
> Milan Tomes
>
> > Data.IBDataset.FieldByName(FieldName).SaveToStream(Stream);

:-) A jake objekty pouzivas pro konektivitu, my napriklad pouzivame
z IBX vyhradne komponentu TIBSQL, ktera nema s datasety nic
spolecneho a BLOBy se do ni hrnou normalne pres streamy:
...
FQuery.SQL := 'insert into tab values (?param1)';
FQuery.Prepare;
FQuery.Params.Vars [0].LoadFromStream (mStream) ;
FQuery.ExecQuery;

Martin Schayna

Parametr neni spravny

[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 6.6.2002 15:12:59

Ahoj,

jako spolecneho predka pro vsechny formulare mam jeden form, na
kterem spoustim ulozenou proceduru (FB 1.0) pres komponentu
IBStoredProc z IBExpress 4.52. Pritom obcas, zcela nahodile, pri
pokusu o jeji pouziti vznikne hlaska "Parametr neni spravny". Hlaska
je cesky, patrne jejim zdrojem jsou Windows a nejhorsi je ta
nahodilost. Vznika to pri volani metody ExecProc. Pritom ulozena
procedura samotna je urcite v poradku. Osobne to tipuji na chybu v
te komponente, ale nez se dam do hledani, chci se zeptat, zda jste
se s tim nekdo nahodou nesetkal. NT4SP4, D5E SP1, IBX 4.52

Dik.

David Lebeda

Platebni karta a internet

[*] Radim Kunz <privat(zv)casestudio(tec)com> - 6.6.2002 15:16:08


----- Original Message -----
From: "Mephisto" <mephisto(zv)akvila(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, June 06, 2002 1:25 PM
Subject: OT: Platebni karta a internet


> Mate nekdo zkusenosti se %subj% nejde mi ani o to zjistit jestli je karta
> platna ale co vsechno musim udelat abych tuto sluzbu mohl provozovat, jak
se
> oznamuje bance ze karta cislo to a to si u me neco koupila a chce prachy
> atd.
>
> Diky
>

Pokud chces takhle prodavat software, podivej se radeji po internetu
po komercnich sluzbach, jako treba www.shareit.com .

Radim

Jak dynamicky vytvorit record

[*] Peter Jurco <peter.jurco(zv)alcatel.sk> - 6.6.2002 15:31:28

Nazdar
skus napriklad takuto strukturu:
(myslim si ze je to asi zretazeny zoznam)

type
p_data = ^data;
data = record
Meno : string[8];
vek : integer;
next_rec : p_data;
end;

var newdata : p_data;

first_rec := Nil;
last_rec := Nil;

a potom prichadza nacitavanie dat npr. z tabulky ......

While not(databaza^.eof)
do begin
new (newdata);
// nacitavania hodnot tabulky do recordu
newdata^.next_rec := Nil;
if (first_rec = Nil)
then begin
first_rec := newdata; last_rec := newdata;
end
else begin
last_rec^.next_rec := newdata; last_rec := newdata;
end;
end;
databaza^.Skip(1);
end;

dufam ze Ti to pomohlo ....

Maj sa

P.
(WinNT, D5)


----- Original Message -----
From: "LUKES V�clav" <lukes(zv)ans(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: 6. j�n 2002 13:13
Subject: Jak dynamicky vytvorit record



Ahoj,

nevite prosim nekdo, jestli jde vytvorit dynamicky record ?

Napr.

type
TPokus = record
vek: integer;
end;

No jo, ale kdyz dopredu nevim, kolik hodnot bude v recordu ???

Vasek

Jak dynamicky vytvorit record

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 6.6.2002 15:38:58

From: "LUKES V�clav" <lukes(zv)ans(tec)cz>
> Jde o to, ze chci udelat record a hodnoty jsou nazvy sloupcu tabulky.
> Samozrejme, ze jde vzdy o jinou tabulku a o jinou strukturu, proto nemuzu

Pak musis vytvorit jeden seznam sloupcu. Kazdy sloupec pak bude mit nazev a
dalsi seznam, ve kterem budou hodnoty. Na tohle se hodi pouzit objekty. Jine
reseni by mohlo byt pouzit TClientDataSet, kde je jiz vsechno tohle hotove.

Petr Vones

ADPort

[*] MarekFi <MarekFi(zv)centrum(tec)cz> - 06.6.2002 15:46:32

Ahoj!

AdPort je z baliku komponent pro komunikaci Async Professional. Roste to na
http://www.turbopower.com/products/APRO/

Radek Masnica - konference wrote:

> no jasne, ale tam, je videt jenom cast zdrojaku, kde je adport pouzitej v
> uses ... No a ja bych ten ADPort ale potreboval jako unitu ...
>
> mam totiz kousek programu, kterej to vyuziva a ja to kvuli tomu nezkompiluju
> ...;-(

Marek Fiala

Vice prihlaseni z jednoho stroje

[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 6.6.2002 15:53:15

Ahoj,

s prekvapenim jsem zjistil, jednu vec: na formular dam 12
komponent IBDatabase. Dam-li je postupne jednu po druhe pripojit k
databazi, trva to celkem 15 sekund. OK. Zajimave ale je, ze pokud
otvirani dam do samostatnych threadu a ty spustim, tj. mely by se
prihlasovat vsechny "soucasne", trva to taky 15 sekund. Jakoby v te
knihovne gds32.dll to stejne probihalo jedno po druhem , postupne.
Je to tak? Ani nastavovani priorit vlaken nic nezmeni.

David Lebeda

Jak zrusim pretahovani z TListBoxu?

[*] <little_bobes(zv)centrum(tec)cz> - 6.6.2002 16:01:54

Zdravim,

mam LB: TListBox, u ktereho jsem si nastavil DragMode = dmManual.
V udalosti LBOnMouseDown mam LB.BeginDrag(False, 10).

Vsechno je v poradku a funguje, az do chvile, kdy se mi spusti udalost
LBDblClick, ve ktere mam funkci InputQuery.
Prestoze mam v udalosti LBDblClick prikaz LB.EndDrag(False), po ukonceni
udalosti zustane zapnuta funkce pretahovani a musim stisknout klavesu Esc
nebo nekam klepnout, aby se pretahovani ukoncilo.

Mozna delam neco spatne, protoze jsem pretahovani jeste nepouzival.

Vi nekdo, kde mam chybu?

Bob

Platebni karta a internet

[*] Lstiburek Pavel <Lstiburek(zv)ceb(tec)cz> - 6.6.2002 16:06:23

Postup je uplne shodny jako kdyz chces prijimat platby v normalnim obchode.
Uzavrit smlouvu s bankou. Problem je, ze v CR jen malo bank nabizi moznost
prijmu plateb, ktere probehly bez tzv. pritomnosti karty.
( akivni byla Bank Austria, ale ta jiz neexistuje - pohlcena Hypo Bank)

Pavel
> From: Radim Kunz [mailto:privat(zv)casestudio.com]
> > Mate nekdo zkusenosti se %subj% nejde mi ani o to zjistit
> jestli je karta
> > platna ale co vsechno musim udelat abych tuto sluzbu mohl
> provozovat, jak
> se
> > oznamuje bance ze karta cislo to a to si u me neco koupila
> a chce prachy
> > atd.
> >
> > Diky
> >
>
> Pokud chces takhle prodavat software, podivej se radeji po internetu
> po komercnich sluzbach, jako treba www.shareit.com .
>
> Radim
>
>

Prihlaseni k FB

[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 6.6.2002 16:13:42

----- Original Message -----
From: "Lebeda David" <david.lebeda(zv)comarr(tec)cz>
> zjistil jsem, ze pokud se prihlasuji pres komponentu IBDatabase k
> FB serveru, trva to rekneme jednu az dve sekundy. Mam IBX4.52.
>
> Existuje nejaky zpusob, jak to zrychlit? Mam totiz formular s
> nekolika IBDatabazemi pro ruzne thready a kdyz je chci vsechny
> pripojit k databazi, tak to uz celkem trva. I kdyz otvirani vsech
> databazi probiha soucasne v samostatnych threadech, stejne to
> zdrzuje. Neexistuje nejake nastaveni, kterym by se ta doba dala
> zkratit?

Muzes si pro odlozena spojeni (t.j. komponenty TIBDatabase+
TIBTransaction) vytvorit nejaky pool a kesovat v ramci programu,
pak kdyz otevres jine formulare muzes pouzit ty odlozene.

Martin Schayna

Parametr neni spravny

[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 6.6.2002 16:17:01

> jako spolecneho predka pro vsechny formulare mam jeden form, na
> kterem spoustim ulozenou proceduru (FB 1.0) pres komponentu
> IBStoredProc z IBExpress 4.52. Pritom obcas, zcela nahodile, pri
> pokusu o jeji pouziti vznikne hlaska "Parametr neni spravny". Hlaska
> je cesky, patrne jejim zdrojem jsou Windows a nejhorsi je ta
> nahodilost. Vznika to pri volani metody ExecProc. Pritom ulozena
> procedura samotna je urcite v poradku. Osobne to tipuji na chybu v
> te komponente, ale nez se dam do hledani, chci se zeptat, zda jste
> se s tim nekdo nahodou nesetkal. NT4SP4, D5E SP1, IBX 4.52

Pouzivas v programu nejake COM/DCOM komponenty, treba
i psane v Delphi? Me se to drive take stavalo a pote jsem je vsechny
vykopal, nemam problem. Podle me jde o chybu kterou vraci
nejake modernejsi API funkce kdyz si mysli ze dostaly spatne
vstupni parametry(?)

Martin Schayna

Firebird SS server v deb baliku - beta verze

[*] Vladimir Michl <vladimir.michl(zv)hlubocky.del(tec)cz> - 6.6.2002 16:25:12

Dobry den,

konecne se mi podarilo ve volnych chvilich vytvorit .deb balik firebirdu,
ale pouze 32bit I/O verze SuperServer Firebirdu 1.0, konverzi z .tag.gz.

Server je rozdelen na nekolik baliku (podle zvyklosti v Debianu) a ne
jeden velky moloch. Zatim doufam ze Vam tento balik bude uzitecny.

!!!POZOR!!! Pokud by prisel nejaky pripadny upgrade, zatim se neresi
zachovani isc4.gdb (databaze uzivatelu), ktera bude nahrazena novou z
noveho baliku, tedy prijdete o sve uzivatele. Zatim nevim jak toto resit.

Hlavni rysy baliku:
- rozdeleni na client, knihovny (+dev), server a dokumentace
- umisteni v /usr/lib/firebird
- isc4.gdb v /var/lib/firebird
- data ve /var/lib/firebird/data
- isc_config v /etc/firebird/
- log ve /var/log/firebird.log
- rotovani logu tydne
- server se spousti pod uzivatelem firebird, datovy a UDF adresar tomuto
uzivateli patri.
- /usr by melo byt mozno montovat ro a serveru by to nemelo vadit.
- proste podle me install&go

Jakekoliv pripominky vitany a navrhy na vylepseni vitany.

A kde jej najdete http://hlubocky.del(tec)cz/downloads/firebird/

S pozdravem

Vladimir Michl

---------------------------------------------------------------------------
Vladim�r Michl <Vladimir.Michl(zv)hlubocky.del(tec)cz>
Del a.s., Stroj�rensk� 38, ���r nad S�zavou
pobo�ka Olomouck� 355, Hlubo�ky-Mari�nsk� �dol�
tel: +420 68 5353548, fax: +420 68 5352364
http://hlubocky.del(tec)cz

Parametr neni spravny

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 6.6.2002 16:30:25

From: "Martin Schayna" <mschayna(zv)aktis(tec)cz>
> vykopal, nemam problem. Podle me jde o chybu kterou vraci
> nejake modernejsi API funkce kdyz si mysli ze dostaly spatne
> vstupni parametry(?)

Presne tak. Nicmene lze prece zjistit ktera funkce to je.

Petr Vones

RichEdit98 alebo nieco lepsie este raz

[*] <ivan.ivanov(zv)email(tec)cz> - 6.6.2002 17:18:30

Zdravim Vas,

neviete nahodou, kde mozem najst richedit98 alebo nejaky iny richedit, v ktorom neblbnu tabulatory (najlepsie free a aj do QuickReportu)?
Prehladal som uz odkazy z konferencie aj nejake stranky, na ktore som nasiel odkazy, ale Richedit98 nie a nie pozhanat :-(


Vdaka

ivan



______________________________________________________________________________
Cht�li byste str�vit dovolenou u mo�e? Objevte o�zu st�edomo�� a nav�tivte Tunisko s CK ITC, Vinohradsk� 47, Praha 2, http://www.itcz(tec)cz

MS SQL a temporary table

[*] Lstiburek Pavel <Lstiburek(zv)ceb(tec)cz> - 6.6.2002 17:33:43

Samozrejme je to tvoje vec,
no myslim si, ze vytvaret referencni integritu na docasnou tabulku je
zbytecnost (mozna dokonce chyba). Tim totiz zaclenujes tabulku do DB
schematu a to by melo byt v case pokud mozno nemene.
Stejne nakonec musis data z teto tabulky synchronisovat (Update, Insert
nebo Delete) se statickou tabulkou a zde ti referencni integrita zabere
(stejne tak i constrainty)!
Tabulka #.. lezi v jine DB (tempdb)!

Pavel

> -----Original Message-----
> From: Otisk Rene [mailto:otisk(zv)misel(tec)cz]
> Sent: Tuesday, June 04, 2002 1:50 PM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: Re: MS SQL a temporary table
>
>
> No potrebuji tam mit integritu, takze nezbyva nez rucne
> create table...
> Skoda
>
> Sroub
>
>
>
> > Neni, staci na to bezny SQL SELECT:
> >
> > SELECT .....
> > INTO #docasnatabulka
> > FROM ...
> > WHERE ....
> >
> > Pozor ! docasna tabulka zije pouze od transakce k jejimu
> konci, vcetne
> > defaultovych transakci (jednou z nich bohuzel start a ukonceni store
> > procedury), proto nelze vytvaret docasne tabulky (s jednim #) pomoci
> > procedur (,ale uvnitr se daji samozrejme pouzivat !).
> >
> > Pavel
> >
> > > Subject: MS SQL a temporary table
> > >
> > >
> > > Hi,
> > >
> > > MS SQL7, D5
> > >
> > > Chci si vytvorit docasnou tabulku s totoznou strukturou
> > > (indexy, referencni
> > > integrita...) jako ma jina tabulka. Neni na to v MS SQL
> > > nejaka procedura,
> > > nebo to musis natukat datlovat?
> > >
> > > Sroub
> > >
>

IP adresy v LAN

[*] JIM Design <jim.design(zv)iol(tec)cz> - 6.6.2002 17:33:10

Ahoj,

co takhle pouzit UDP Sockety a jejich methodu SendBroadcast

M.Jirman

-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Petr Pa��enko


Nevite nekdo, zda existuje zpusob, jak zjistit IP adresy v�ech pocitacu v
ramci jednoho segmentu LAN?

Take bych potreboval navod jak vytvorit zpravu, ktera by byla dorucena vsem
pocitacum na s�ti (broadcast).

Predem dekuji. Petr Pa��enko.

Parametr neni spravny

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 6.6.2002 17:34:19

From: "Lebeda David" <david.lebeda(zv)comarr(tec)cz>
> se s tim nekdo nahodou nesetkal. NT4SP4, D5E SP1, IBX 4.52

Jen poznamka, nejnovejsi verze IBX je 5.03:
http://codecentral.borland.com/codecentral/ccweb.exe/listing?id=17556

Petr Vones

ComboBox

[*] Lstiburek Pavel <Lstiburek(zv)ceb(tec)cz> - 6.6.2002 17:43:42

To si nejsem jist, ale pokud by otazka byla "zda je zadana hodnota v listu"
tak ano.

Pavel

> From: Rumcajs [mailto:prajz.rumcajs(zv)quick(tec)cz]
> Servus ve spolek
> Mam dotaz kolem ComboBoxu: da se nejak zjistit, eli byla hodnota
> ComboBox.Text zadana z klavesnice nebo eli byla vybrana z
> DrapDown listu?
> Rumcajs
>

Parametr neni spravny

[*] miro mrazik <preas_w(zv)stonline.sk> - 6.6.2002 17:53:17

Ahoj
mne sa podobne veci deju pri pouziti IBOjects.
Zistil som ze k tomu dochadza vzdy ked mam vycerpane zdroje windows. Skus
spustit aplikaciu systemove informacie v dobe ked sa ti to stane, ci nahodou
aj u teba to nerobi toto. (hlasnie mavam presne to iste)

miro
----- Original Message -----
From: "Lebeda David" <david.lebeda(zv)comarr(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, June 06, 2002 3:12 PM
Subject: Parametr neni spravny


> Ahoj,
>
> jako spolecneho predka pro vsechny formulare mam jeden form, na
> kterem spoustim ulozenou proceduru (FB 1.0) pres komponentu
> IBStoredProc z IBExpress 4.52. Pritom obcas, zcela nahodile, pri
> pokusu o jeji pouziti vznikne hlaska "Parametr neni spravny". Hlaska
> je cesky, patrne jejim zdrojem jsou Windows a nejhorsi je ta
> nahodilost. Vznika to pri volani metody ExecProc. Pritom ulozena
> procedura samotna je urcite v poradku. Osobne to tipuji na chybu v
> te komponente, ale nez se dam do hledani, chci se zeptat, zda jste
> se s tim nekdo nahodou nesetkal. NT4SP4, D5E SP1, IBX 4.52
>
> Dik.
>
> David Lebeda
>

Vice prihlaseni z jednoho stroje

[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 6.6.2002 17:58:01

----- Original Message -----
From: "Lebeda David" <david.lebeda(zv)comarr(tec)cz>
> s prekvapenim jsem zjistil, jednu vec: na formular dam 12
> komponent IBDatabase. Dam-li je postupne jednu po druhe pripojit k
> databazi, trva to celkem 15 sekund. OK. Zajimave ale je, ze pokud
> otvirani dam do samostatnych threadu a ty spustim, tj. mely by se
> prihlasovat vsechny "soucasne", trva to taky 15 sekund. Jakoby v te
> knihovne gds32.dll to stejne probihalo jedno po druhem , postupne.
> Je to tak? Ani nastavovani priorit vlaken nic nezmeni.

Ano, nikoliv vsak v klientske knihovne gds32.dll, ale v serveru
jako takovem, jestli to cte Pavel Cisar (zdravim) tak ti to snad
take potvrdi -- takove ty rezie kolem na obsluhu klientu jsou ok,
ale jadro IB serveru je bohuzel serializovane. Mozna by se to
melo zmenit v IB7 nebo v FB2(?).

Martin Schayna

Jak na bloby ?

[*] Leos Urban <Leos.Urban(zv)iol(tec)cz> - 6.6.2002 18:03:47

Ahoj,
na internetu existuje Delphi resp. pascalova portace ESQL/C pro Interbase.
Tam uz si to pak muzes udelat pomoci IB_API dle libosti. Tusim ze ten soubor
je i soucasti FIB?
Leos

> A nemate / nepouzivate nekdo pristup pres SQL ???
> Tohle je reseni, ktere nechci pouzit (fuj fuj fuj :). Nemam rad TDataset
> (pro editaci).

IP adresy v LAN

[*] Robert Suska <delphi(zv)korak.sk> - 6.6.2002 18:15:28

Ahojte

ok to tu uz odznelo asi 5x :( ale co takto pustit nejaky zdrojacik :)).
Kusocek kodiku co by pomohlo. To ze treba poslat broadcast a cakat kto sa
ozve vie kazdy kto robi siete ale naprogramovat to cez api alebo cez nieco
druhe to uz treba nastudovat a ked clovek nema tolko casu tak sa pyta.
Skuste niekto pomoct.

Robo

> Ahoj,
>
> co takhle pouzit UDP Sockety a jejich methodu SendBroadcast
>
> M.Jirman
>
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
> Behalf Of Petr Pa��enko
>
>
> Nevite nekdo, zda existuje zpusob, jak zjistit IP adresy v�ech pocitacu v
> ramci jednoho segmentu LAN?
>
> Take bych potreboval navod jak vytvorit zpravu, ktera by byla dorucena
vsem
> pocitacum na s�ti (broadcast).
>
> Predem dekuji. Petr Pa��enko.
>
>

Lokalizator

[*] Jan Jochman <Jan.Jochman(zv)ais(tec)cz> - 6.6.2002 18:19:58

Stahl jsem si trial verzi Language Lokalizatoru. Pri exportu slovniku do TXT
souboru (Export to External Data Source) se mi ztrari cestina z nekterych
pismen. Neite nekdo proc? Mam neco blbe nastaveny? Win2000 CZ, Narodni
prostredi Cestina, i system Cestina.

Honza Jochman

Excel

[*] J�n Harman <harman(zv)atlas(tec)cz> - 6.6.2002 18:39:56

Ahoj, prosim Vas existuje nejaka komponenta ktera se podoba Excel tabulce?
Kde bych mohl volne zapisovat do bunek, menit libovolne pismo, barvy,
zarovnani... Programovani se StringGridem je hrozne v mem pripade
negramotne. Bude to totiz nekdy velmi velka tabulka.
Diky moc. Honza.

Lokalizator

[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 6.6.2002 19:00:43

On 6 Jun 2002 at 18:19, Jan Jochman wrote:

> Stahl jsem si trial verzi Language Lokalizatoru. Pri exportu slovniku
> do TXT souboru (Export to External Data Source) se mi ztrari cestina z
> nekterych pismen. Neite nekdo proc? Mam neco blbe nastaveny? Win2000
> CZ, Narodni prostredi Cestina, i system Cestina.

Nebylo by lepsi se zeptat rovnou u zdroje? (To plati i pro ostatni,
protoze podobne dotazy uz zde byly vicekrat.) Jaka je to verze, a
jaka pismena se przni?

Pokud je to verze 5, pak zalezi na definici tabulky a jazyka
puvodniho textu. Vsechno je tam v unicode, takze zalezi prave na
definici jazyka textu, a podle toho se text prevadi do ansi.

S pozdravem

Zbysek Hlinka


Resource

[*] Robert Suska <delphi(zv)korak.sk> - 6.6.2002 19:51:51

Ahojte!

Potrebujem urobit nejaky resource v ktorom budu ulozene bmp subory a ku nim
prisluchajuce texty. Proste ide mi o to ze mam aplikaciu ktora sa kompletne
cela nacita zo servera este aj Toolbar na hlavnom MDI okne aj s tlacitkami a
potrebujem na server umiestnit *.res file v ktorom budu iconky pre tie
ToolButton-y ku nim tam chcem mat text pre HINT a text COMMANDu pre
interpreter ktory mam napisany. Ako to zrealizovat bez toho aby som si musel
napisat vlastny resource file.

Dakujem za nakopnutie

Robo

Resource

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 6.6.2002 19:57:18

From: "Robert Suska" <delphi(zv)korak.sk>
> Potrebujem urobit nejaky resource v ktorom budu ulozene bmp subory a ku nim
> prisluchajuce texty. Proste ide mi o to ze mam aplikaciu ktora sa kompletne
> cela nacita zo servera este aj Toolbar na hlavnom MDI okne aj s tlacitkami a
> potrebujem na server umiestnit *.res file v ktorom budu iconky pre tie
> ToolButton-y ku nim tam chcem mat text pre HINT a text COMMANDu pre
> interpreter ktory mam napisany. Ako to zrealizovat bez toho aby som si musel
> napisat vlastny resource file.

A co tu aplikaci spustit celou pres nejaky terminal ? Jinak to uloz vsechno
treba do XML.

Petr Vones

Excel

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 6.6.2002 19:58:22

From: "J�n Harman" <harman(zv)atlas(tec)cz>
> Ahoj, prosim Vas existuje nejaka komponenta ktera se podoba Excel tabulce?

Soucasti Delphi je OCX prvek F1Book na zalozce ActiveX.

Petr Vones

Button do IE

[*] Jiri Sedivec <jsedivec(zv)mail(tec)cz> - 6.6.2002 20:02:22

Uz jste si nekdo hral s pridavanim buttonu do listy v IE???

WriteString('ButtonText','Spustit MujProgram');
WriteString('ClSid','{1FBA04EE-3024-11D2-8F1F-0000F87ABD16}');
WriteString('Default Visible','Yes');
WriteString('Exec',Path + 'MujProgram.exe');
WriteString('HotIcon', Path + 'Graphics\Coll.ico');
WriteString('Icon', Path + 'Graphics\Coll.ico');

Strasne by me zajimalo, jak tahat ikonu primo z programu MujProgram.exe?
Doted jsem mel na disku primo soubor ve formatu .ico...

Diky
Jiri

Resource

[*] Robert Suska <delphi(zv)korak.sk> - 6.6.2002 20:18:48

Ahoj

>
> A co tu aplikaci spustit celou pres nejaky terminal ? Jinak to uloz
vsechno
> treba do XML.

Ako???


Robo


>
> Petr Vones

Parametr neni spravny

[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 6.6.2002 20:41:07

----- Original Message -----
From: "miro mrazik" <preas_w(zv)stonline.sk>
> Zistil som ze k tomu dochadza vzdy ked mam vycerpane zdroje windows. Skus
> spustit aplikaciu systemove informacie v dobe ked sa ti to stane, ci nahodou
> aj u teba to nerobi toto. (hlasnie mavam presne to iste)
>
> ----- Original Message -----
> From: "Lebeda David" <david.lebeda(zv)comarr(tec)cz>
> > NT4SP4, D5E SP1, IBX 4.52

> > ^^^^
Zdroje na NT/2000/XP jsou (temer :-) nekonecne, tim to asi nebude

Martin Schayna

Excel

[*] Jaroslav Uher <moravia(zv)mbox.vol(tec)cz> - 6.6.2002 20:50:35

Ahoj,<color><param>0100,0100,0100</param>On 6 Jun 2002, at 18:39, J�n Harman wr=
ote:<color><param>7F00,0000,0000</param>> Ahoj, prosim Vas existuje nejaka kom=
ponenta ktera se podoba Excel

> tabulce? Kde bych mohl volne zapisovat do bunek, menit libovolne

> pismo, barvy, zarovnani... Programovani se StringGridem je hrozne v

> mem pripade negramotne. Bude to totiz nekdy velmi velka tabulka. Diky

> moc. Honza.</color>pred par dny se v konferenci objevil link na

<color><param>0100,0100,0100</param><FontFamily><param>Times New Roman</pa=
ram>{HYPERLINK "http://www.vtktools.ru"}<FontFamily><param>Arial</param>ww=
w.vtktools.ru

kde je vtkExport - library intended for export from your programs in the f=
ormats
</color>Excel and HTML.<color><param>0100,0100,0100</param>Mozna Ti to</color> pomuze.


Jarek Uher


Button do IE

[*] Tom� Kup��k����J�����̿ - 6.6.2002 20:52:55

Co takhle?
var ico: TIcon;
begin
ico:=TIcon.Create;
ico.Handle:=ExtractIcon(hInstance,PChar(Application.ExeName),0);
ico.Free;
end;
Strasne by me zajimalo, jak tahat ikonu primo z programu MujProgram.exe?
Doted jsem mel na disku primo soubor ve formatu .ico...

Diky
Jiri

Excel

[*] J�n Harman <harman(zv)atlas(tec)cz> - 6.6.2002 21:01:12

Dik, vtkExport jsem si pred par dny stahl. Mne spise jde o to zobrazit v
aplikaci delphi tabulku kterou bych mohl libovolne formatovat, spojovat
bunky, barvit...
Pred chvilkou jsem narazil na komponentu TadvStringGrid od tmssoftware, ale
chce za ni 60$. Vypada bombasticky, ale nevim jestli se pro mne za ty love
vyplati.
Nejaky dalsi napad?
Diky moc. Honza.

----- Original Message -----
From: "Jaroslav Uher" <moravia(zv)mbox.vol(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, June 06, 2002 8:50 PM
Subject: Re: Excel


Ahoj,

On 6 Jun 2002, at 18:39, J n Harman wrote:

> Ahoj, prosim Vas existuje nejaka komponenta ktera se podoba Excel
> tabulce? Kde bych mohl volne zapisovat do bunek, menit libovolne
> pismo, barvy, zarovnani... Programovani se StringGridem je hrozne v
> mem pripade negramotne. Bude to totiz nekdy velmi velka tabulka. Diky
> moc. Honza.

pred par dny se v konferenci objevil link na
{HYPERLINK "http://www.vtktools.ru"}www.vtktools.ru
kde je vtkExport - library intended for export from your programs in the
formats Excel and HTML.

Mozna Ti to pomuze.

Jarek Uher

TClientSocket - TServerSocket

[*] Robert Suska <delphi(zv)korak.sk> - 6.6.2002 21:06:54

Ahojte!

Robim jednu apl. ako clienta a na skusku niektorych funkcii som si postavil
"server" na lokali 127.0.0.1:5000. Vsetko Beha v pohode. Ale ked som skusil
prehodil server na iny pocitac v sieti konkretne je to PC s OS Win98 mozno
aj tam je problem tak sa mi objavil problem ten ze ked si posielam string zo
servera na clienta tak mi nepride cely. Pride iba koniec zaciatok nejako
nezachytim. IP adresy mam dobre aj port. Ale je tu jedna "anomalia" ked dam
breakpoint na

S:= clientsocket.socket.receivetext;

a krokujem program tak ten string uz mam v S cely kdezto ked program pustim
bez breakpointov a dam si S ulozit po prejdeni metodou

procedure TDataModule1.ClientSocket1Connect(Sender: TObject;
Socket: TCustomWinSocket);

do txt suboru tak vidim zo stringu napr. abcdefgh iba efgh. Ten cely string
ma cca 8kbyt ale nejde mi do hlavy ked to bezi cez 127.0.0.1:5000 tak preco
to nechodi aj po LAN ako takej.

Dakujem za napady

Robo

Prehravani namapovaneho WAVu

[*] Jan Zelen� <zeleny.jan(zv)seznam(tec)cz> - 6.6.2002 21:47:28

Ahoj. Opet zdravim svou oblibenou konferenci.
Narazil jsem pri svem programovani na nasledujici problem.
Mam pres nasledujici zdrojovy kod namapovany maly WAV soubor do pameti(predpokladam tim, ze se dostane do pameti), ktery pak prehravam pres Playsound(). Prehravani mi nedela problem. Vadi mi vsak jedna vec. Pokud zavolam Playsound s danym souborem poprve, dojde k malemu "zaskubnuti"(citelne cte z HD)-jako by az ted se ho uracil nejakym zpusobem nacist do pameti. Nasledujici prehravani funguje, tak jak si predstavuji, tedy bez "skubnuti".
Nemate s tim nekdo zkusenosti ?


uryvek z kodu k namapovani souboru:

handle:=FileOpen(f,fmOpenRead+fmShareDenyWrite);
if handle>0 then
begin
pointer file:=CreatefileMapping(handle,nil,PAGE READONLY,0,0,nil);
if pointer file<>0 then
pointer map:=MapViewOfFile(pointer file,FILE MAP READ,0,0,0);
end;

prehravani:
PlaySound(pointer map,0,SND MEMORY+SND ASYNC);


Jan Zelen�
...budouc� profesion�l :-)
D6SP2
WinXP

Prehravani namapovaneho WAVu

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 6.6.2002 22:28:12

From: "Jan Zelen�" <zeleny.jan(zv)seznam(tec)cz>
> Mam pres nasledujici zdrojovy kod namapovany maly WAV soubor do pameti
> (predpokladam tim, ze se dostane do pameti), ktery pak prehravam pres

Ne, ve Windows nema pojem pamet (RAM) z pohledu aplikace zadny vyznam.
Namapovani znamena, ze se dany soubor umisti do virtualniho pametoveho
prostoru aplikace. O tom ktere stranky jsou momentalne ve fyzicke pameti a
ktere jsou na disku (reprezentovany vlastnim souborem) rozhoduje pouze spravce
pameti ve Windows. Pokud by jsi nejdrive alokoval pamet a do ni nahral obsah
toho souboru (napriklad do TMemoryStreamu), tak vlastne pouze zkopirujes dany
soubor do page filu. Princip je pak stejny, s tim rozdilem ze misto vlastniho
souboru se pouziva jeho (zbytecna) kopie.

> Pokud zavolam Playsound s danym souborem poprve, dojde k malemu
> "zaskubnuti"(citelne cte z HD)-jako by az ted se ho uracil nejakym zpusobem

Mozna inicializuje neco ohledne prehravani zvuku, podivej se pomoci nejakeho
nastroje na monitorovani diskovych operaci co se presne deje.

Petr Vones

Button do IE

[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 6.6.2002 22:34:19

----- Original Message -----
From: "Jiri Sedivec" <jsedivec(zv)mail(tec)cz>
> Uz jste si nekdo hral s pridavanim buttonu do listy v IE???
>
> WriteString('ButtonText','Spustit MujProgram');
> WriteString('ClSid','{1FBA04EE-3024-11D2-8F1F-0000F87ABD16}');
> WriteString('Default Visible','Yes');
> WriteString('Exec',Path + 'MujProgram.exe');
> WriteString('HotIcon', Path + 'Graphics\Coll.ico');
> WriteString('Icon', Path + 'Graphics\Coll.ico');
>
> Strasne by me zajimalo, jak tahat ikonu primo z programu MujProgram.exe?
> Doted jsem mel na disku primo soubor ve formatu .ico...

A zkousel jsi klasiku, co je v normalnim Exploreru:

WriteString('Icon', Path + 'MujProgram.exe,0');

Martin Schayna


Prehravani namapovaneho WAVu

[*] Jan Zelen� <zeleny.jan(zv)seznam(tec)cz> - 6.6.2002 22:39:01

Na to monitorovani se kouknu.
J.Z.
----- Original Message -----
From: "Petr Vones" <pvones(zv)mbox.vol(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, June 06, 2002 10:28 PM
Subject: Re: Prehravani namapovaneho WAVu


> From: "Jan Zelen�" <zeleny.jan(zv)seznam(tec)cz>
> > Mam pres nasledujici zdrojovy kod namapovany maly WAV soubor do pameti
> > (predpokladam tim, ze se dostane do pameti), ktery pak prehravam pres
>
> Ne, ve Windows nema pojem pamet (RAM) z pohledu aplikace zadny vyznam.
> Namapovani znamena, ze se dany soubor umisti do virtualniho pametoveho
> prostoru aplikace. O tom ktere stranky jsou momentalne ve fyzicke pameti a
> ktere jsou na disku (reprezentovany vlastnim souborem) rozhoduje pouze
spravce
> pameti ve Windows. Pokud by jsi nejdrive alokoval pamet a do ni nahral
obsah
> toho souboru (napriklad do TMemoryStreamu), tak vlastne pouze zkopirujes
dany
> soubor do page filu. Princip je pak stejny, s tim rozdilem ze misto
vlastniho
> souboru se pouziva jeho (zbytecna) kopie.
>
> > Pokud zavolam Playsound s danym souborem poprve, dojde k malemu
> > "zaskubnuti"(citelne cte z HD)-jako by az ted se ho uracil nejakym
zpusobem
>
> Mozna inicializuje neco ohledne prehravani zvuku, podivej se pomoci
nejakeho
> nastroje na monitorovani diskovych operaci co se presne deje.
>
> Petr Vones
>
>

Objekt je =?ISO-8859-1?Q?ji=BE?= =?ISO-8859-1?Q?ob

[*] Vlastimil Zdenek <gestore(zv)wo(tec)cz> - 7.6.2002 07:22:42

Zdarvim, dephini,
prosil bych zase o radu:
Pouzivame ADO komponenty. Nyni se jedna konkretne o ADOCommand. Pokud
zavolam vicekrat za sebou z jineho formu proceduru ADOCommand.Execute, tak
program ohlasi chybu "Objekt je jiz obsazen v kolekci a nelze jej pripojit".
Musim ukoncit cepol aplikaci a pak je zase OK. Nevite, co s tim? Nesetkel
jste se uz nekdo s timto problemem?

D5 Ent, SQL 7.0, 8.0, ADO Update pack 2 for Delphi5

Dekuji za kazdou radu.
Vlasta

MS SQL a temporary table

[*] Otisk Rene <otisk(zv)misel(tec)cz> - 7.6.2002 07:42:56

Tak jsem projel BOL a tam jest psano, ze referencni integritu nelze uplatnit
v temporary tables...

Sroub
> Samozrejme je to tvoje vec,
> no myslim si, ze vytvaret referencni integritu na docasnou tabulku je
> zbytecnost (mozna dokonce chyba). Tim totiz zaclenujes tabulku do DB
> schematu a to by melo byt v case pokud mozno nemene.
> Stejne nakonec musis data z teto tabulky synchronisovat (Update, Insert
> nebo Delete) se statickou tabulkou a zde ti referencni integrita zabere
> (stejne tak i constrainty)!
> Tabulka #.. lezi v jine DB (tempdb)!
>
> Pavel
>
> > No potrebuji tam mit integritu, takze nezbyva nez rucne
> > create table...
> > Skoda
> >
> > Sroub
> >
> >
> >
> > > Neni, staci na to bezny SQL SELECT:
> > >
> > > SELECT .....
> > > INTO #docasnatabulka
> > > FROM ...
> > > WHERE ....
> > >
> > > Pozor ! docasna tabulka zije pouze od transakce k jejimu
> > konci, vcetne
> > > defaultovych transakci (jednou z nich bohuzel start a ukonceni store
> > > procedury), proto nelze vytvaret docasne tabulky (s jednim #) pomoci
> > > procedur (,ale uvnitr se daji samozrejme pouzivat !).
> > >
> > > Pavel
> > >
> > > > Subject: MS SQL a temporary table
> > > >
> > > >
> > > > Hi,
> > > >
> > > > MS SQL7, D5
> > > >
> > > > Chci si vytvorit docasnou tabulku s totoznou strukturou
> > > > (indexy, referencni
> > > > integrita...) jako ma jina tabulka. Neni na to v MS SQL
> > > > nejaka procedura,
> > > > nebo to musis natukat datlovat?
> > > >
> > > > Sroub
> > > >
> >

Jak na bloby ?

[*] Milan Tome� <milan.tomes(zv)haida(tec)cz> - 7.6.2002 07:52:21

Tak to je ono :) Zkusim to a uvidim. Jinak pro konektivitu pouzivam
IBDataset (pouze pro dotazy, ktere vraci nejaky result set) a potom IBSQL
pro vsechno ostatni.

S pozdravem

Milan Tomes
mailto:milan.tomes(zv)haida(tec)cz

> > > Data.IBDataset.FieldByName(FieldName).SaveToStream(Stream);
>
> :-) A jake objekty pouzivas pro konektivitu, my napriklad pouzivame
> z IBX vyhradne komponentu TIBSQL, ktera nema s datasety nic
> spolecneho a BLOBy se do ni hrnou normalne pres streamy:
> ...
> FQuery.SQL := 'insert into tab values (?param1)';
> FQuery.Prepare;
> FQuery.Params.Vars [0].LoadFromStream (mStream) ;
> FQuery.ExecQuery;
>
> Martin Schayna
>

Parametr neni spravny

[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 7.6.2002 07:57:14

> Zistil som ze k tomu dochadza vzdy ked mam vycerpane zdroje windows.
> Skus spustit aplikaciu systemove informacie v dobe ked sa ti to stane,
> ci nahodou aj u teba to nerobi toto. (hlasnie mavam presne to iste)

Ahoj,

to urcite ne. Aplikace ma hlavni formular - jednoduchy - DBGrid, menu, par
checkboxu, Toolbar s tlacitky. Pri stisku tlacitka se vyvola modalni formular
- opet nic narocneho. Zmacknu Button jednou - hlaska, podruhe - hlaska,
potreti -povede se. Priste se to povede treba uz na poprve. Je to vec
nahody.

Zkusim jeste IBStoredProc nahradit datasetem a uvidime.

David Lebeda

MS SQL a temporary table

[*] Lstiburek Pavel <Lstiburek(zv)ceb(tec)cz> - 7.6.2002 08:22:10

Ono to souvisi s tim, ze temporary tabulky lezi v jine databazi, viz. muj
posledni vykrik v odpovedi. Ony se ty docasne tabulky vytvarene pomoci
SELECT INTO #, chovaji mirne podivne (, to rikam proto, ze se mi nepodarilo
vysledovat jejich chovani presne), napr. velmi casto prevezmou PRIMARY KEY a
vlastnost IDENTITY (,ja pouzivam temez v kazde tabulce IDENTITY sloupec),
nekdy se tak vsak nestane. Je mi jasne, ze pokud spojim vice tabulek a
vsechny maji PRIMARY KEY a IDENTITY sloupec, ze nedokaze vybrat ten
"spravny", presto me obcas prekvapi a vytvori se IDENTITY sloupec (zajimave
je, ze zatim vzdy ten jediny v dann�m pripade smysluplny)!
Jinak, presto ze mam s temporary tabulkami dobre (az velmi) zkusenosti,
snazim se nyni najit reseni na XML. Pokusy, ktere jsem podnikl jsou zatim
smysluplne. Jediny vaznejsi problem je, ze jsem zatim nanasel popis XLS
pouzivany CustomDataSetem Borlandu D5 pri vytvareni (nacitani) XML souboru,
nebo neco co by jej dokazalo nahradit.

Pavel

> From: Otisk Rene [mailto:otisk(zv)misel(tec)cz]
> Tak jsem projel BOL a tam jest psano, ze referencni integritu
> nelze uplatnit
> v temporary tables...
>
> Sroub
>
>
>
> > Samozrejme je to tvoje vec,
> > no myslim si, ze vytvaret referencni integritu na docasnou
> tabulku je
> > zbytecnost (mozna dokonce chyba). Tim totiz zaclenujes tabulku do DB
> > schematu a to by melo byt v case pokud mozno nemene.
> > Stejne nakonec musis data z teto tabulky synchronisovat
> (Update, Insert
> > nebo Delete) se statickou tabulkou a zde ti referencni
> integrita zabere
> > (stejne tak i constrainty)!
> > Tabulka #.. lezi v jine DB (tempdb)!
> >
> > Pavel
> >
> > > No potrebuji tam mit integritu, takze nezbyva nez rucne
> > > create table...
> > > Skoda
> > >
> > > Sroub
> > >
> > >
> > >
> > > > Neni, staci na to bezny SQL SELECT:
> > > >
> > > > SELECT .....
> > > > INTO #docasnatabulka
> > > > FROM ...
> > > > WHERE ....
> > > >
> > > > Pozor ! docasna tabulka zije pouze od transakce k jejimu
> > > konci, vcetne
> > > > defaultovych transakci (jednou z nich bohuzel start a
> ukonceni store
> > > > procedury), proto nelze vytvaret docasne tabulky (s
> jednim #) pomoci
> > > > procedur (,ale uvnitr se daji samozrejme pouzivat !).
> > > >
> > > > Pavel
> > > >
> > > > > Subject: MS SQL a temporary table
> > > > >
> > > > >
> > > > > Hi,
> > > > >
> > > > > MS SQL7, D5
> > > > >
> > > > > Chci si vytvorit docasnou tabulku s totoznou strukturou
> > > > > (indexy, referencni
> > > > > integrita...) jako ma jina tabulka. Neni na to v MS SQL
> > > > > nejaka procedura,
> > > > > nebo to musis natukat datlovat?
> > > > >
> > > > > Sroub
> > > > >
> > >
>

Aplikace na CD-ROMu

[*] Ing. Igor Vodi�ka <vodicka(zv)sagit(tec)cz> - 7.6.2002 09:06:25

Zdravim!

Narazil jsem na jeden problem. Mam aplikaci postavenou na FF 2.10. Demoverzi
chci spoustet s CD-ROMu. Dokud jsem pouzival FF 2.05, tak vse fungovalo
normalne. Funkci GetDriveType() jsem zjistil, ze se aplikace spousti z
CD-ROMu a nastavil property ffServerEngine1.IsReadOnly na True. Od verze FF
2.10 mi to takto funguje jen na WIN NT, 2000 a XP, ale na WIN 98 to hlasi
"Exception EffServerException in module ... INTERNAL Error when writing to
file [Cesta:\FFSTRAN.CFG, error 5. Pristup byl odepren]".

Nevite nekde co to muze byt. pritom funkce GetDriveType() nebo
GetDriveTypeStr() z JCL spravne detekuje CD-ROM mechaniku. Nevite co je ten
soubor FFSTRAN.CFG u verze FF 2.05 to nebylo.

Zajimave je take to, ze kdyz na simuluji spusteni z CD
(ffServerEngine1.IsReadOnly nastavim na True) tak soubory FFSALIAS.FF2,
FFSINFO.FF2 a FFSTRAN.CFG se meni. Zkousel jsem take nastavit
ffServerEngine1.NoAutoSaveCfg := True a je to porad stejne.

Aplikace je kompilovana v D5 Ent na Win 2000 CZ.

Poradte nekdo prosim, specha.

Ing. Igor Vodicka
informacni systemy
Nakladatelstvi Sagit
Tel.: 069 6786 001
HTTP://www.sagit(tec)cz/

---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.370 / Virov� b�ze: 205 - datum vyd�n�: 5.6.2002

Ako na maily (Synapse, JCL ...)

[*] dphi_forum(zv)proces.sk - 7.6.2002 09:22:13

Zdravim ...

Potreboval by som poradit s odosielanim mailov.
Uz davnejsie som sa tu na to pytal a bolo mi poradene pouzivat Synapse, co
som aj urobil.
Je to pekne a spolahlive a mam s tym plne pod kontrolov cely proces
odosielania mailu.
Vsetko funguje ako ma ale ma to jeden problem:

Musim posielat vacsi subor (asi 6 MB). Tak si ho programom rozdelim na viac
zipov (750 kB) alebo na take
aby mohli prist do schranky a posielam ich kazdy jeden v samostatnom maily.
U mna to funguje ale u
zakaznikov sa obcas stane ze to odosle len prvy mail a potom to skonci na
nejaky timeout ???

A druhy problem je ze niektory zakaznici si neviedia nastavit SMTP server a
ja ho neviem od nikial vycitat cize
im posielanie mailov nefunguje.

Tak som sa rozhodol pouzit JCL. Nasiel som si funkciu JclSimpleSendMail
ktora pozadovanej ulohe
uplne postacuje ale s prekvapenim som zistil ze to ide len tam kde maju
ludkovia Outlook, OutlookExpress.
Ak mali ako postoveho klienta Netscape, Operu alebo nebodaj Lotus Notes tak
to neslo.

Viete mi poradit nejake ine riesenie alebo povedat co robim zle ?

Za kazdu odpoved dopredu dik. NORO.


Takto to odosielam:

JCL:

JclSimpleSendMail('mlynarcik(zv)proces.sk', 'Nejake meno', 'Testovacia
sprava', 'Toto je telo testovacej spravy. IXO', 'test.zip', True, 0);

Synapse:

function mailSend2(FromAddr, ToAddr, Subject: String; Attachments:
TStrings; Host: String; Port: String = 'smtp'; TimeOut: integer = 15):
Boolean;
var
FProgress2: TmailProgress2;
begin
FProgress2 := TmailProgress2.Create(nil);
try
FProgress2.smtp.Host := Host;
FProgress2.smtp.Port := Port;
FProgress2.smtp.Timeout := TimeOut;

FProgress2.smtp.FromName := FromAddr;
FProgress2.smtp.HdrFrom := FromAddr; //toto moze byt text

FProgress2.smtp.RcptName.Clear;
FProgress2.smtp.RcptName.Add(ToAddr);
FProgress2.smtp.HdrTo := ToAddr; //toto moze byt text

FProgress2.smtp.HdrSubject := Subject;
FProgress2.smtp.EmailFiles.Assign(Attachments);

Result := FProgress2.ShowModal = mrOk; // tu sa vola ten kus kodiku
uzavrety v - - - - - - - -
finally
FProgress2.Free;
end;
end;


- - - - - - - - -
if smtp.ConnectSync and smtp.MailFromSync and smtp.RcptToSync then
begin
smtp.CtrlSocket.OnSendData := ShowStatus;
for i := 0 to FList.Count - 1 do
begin
smtp.EmailFiles.Clear;
smtp.EmailFiles.Add(FList.Strings[i]);
smtp.HdrSubject := Format('%s - %d/%d', [oldSubject, i+1,
FList.Count]);
smtp.MailSync;
end;
smtp.QuitSync;
end;
- - - - - - - - -


Lokalizator

[*] Jan Jochman <Jan.Jochman(zv)ais(tec)cz> - 7.6.2002 09:39:20

Omlouvam se, ze jsem to poslal do konference. Myslel jsem si, ze by to mohlo
zajimat i ostatni, protoze jsem tento dotaz v archivu nenasel. Mozna jsem
jenom spatne hledal.
Mam verzi 5. Je to opravdu tim jazykem. Pri vytazeni z programu jsou vsechny
texty EN. Neda se nejak premluvit lokalizator aby je vsechny vzal jako CSY?
Anebo lepe, zda nejde oznacit vybrane jako CSY? Totez plati pro pridavani do
slovniku. Lze pridavat pouze po jednom anebo pridat vsechny neprelozene.
Nelze pridat vybrane. Je to pouze omezeni trial verze nebo je to tak i v
plne verzi?

Predem diky za odpovedi.
Zdravi
Honza Jochman
AIS Software


> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Zbysek Hlinka
> Sent: Thursday, June 06, 2002 7:01 PM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: Re: Lokalizator
>
>
> On 6 Jun 2002 at 18:19, Jan Jochman wrote:
>
> > Stahl jsem si trial verzi Language Lokalizatoru. Pri exportu slovniku
> > do TXT souboru (Export to External Data Source) se mi ztrari cestina z
> > nekterych pismen. Neite nekdo proc? Mam neco blbe nastaveny? Win2000
> > CZ, Narodni prostredi Cestina, i system Cestina.
>
> Nebylo by lepsi se zeptat rovnou u zdroje? (To plati i pro ostatni,
> protoze podobne dotazy uz zde byly vicekrat.) Jaka je to verze, a
> jaka pismena se przni?
>
> Pokud je to verze 5, pak zalezi na definici tabulky a jazyka
> puvodniho textu. Vsechno je tam v unicode, takze zalezi prave na
> definici jazyka textu, a podle toho se text prevadi do ansi.
>
> S pozdravem
>
> Zbysek Hlinka
>
>

Ztraceni udalosti

[*] Roland Turcan <rolo(zv)sedas.sk> - 7.6.2002 09:48:26

<<< 7. 6. 2002 9:46 - Milan Schembera "milan(zv)missoftware(tec)cz" >>>
MS> mam takovy zahadny problem. Na formu mam TTreeView, kde mam naplneny
MS> udalosti OnDragOver a OnDragDrop. Vsechno funguje OK. Zavru projekt, znovu
MS> otevru a ty udalosti na tom objektu proste nejsou ... Mam na mysli, ze se v
MS> OI vubec neobjevi jako udalosti, nemyslim prirazeni metod k tem udalostem.
MS> Nic jsem neinstaloval, nic neodinstalovaval ... Netusite nekdo, kdo a kde je
MS> ten kouzelnik ???

Ja som onoho casu pouzival komponentu TDosMove, ktora nejako zazracne
modifikovala OnKeyDown a stavalo sa mi dost casto ze zrazu priradenie
procedury k udalosti sa stratilo. Od kedy ho nepouzivam tak sa mi to
nestava.

--
Best regards, TRoland

TClientSocket - TServerSocket

[*] Robert Suska <delphi(zv)korak.sk> - 7.6.2002 10:04:11

Neviem ci to zapadlo v konfere ale prosim skuste sa na to pozriet. Adminovi:
nehnevajte sa ze to posielam este raz ale potrebujem vediet co stym moze
byt.

Dakujem

Ahojte!

Robim jednu apl. ako clienta a na skusku niektorych funkcii som si postavil
"server" na lokali 127.0.0.1:5000. Vsetko Beha v pohode. Ale ked som skusil
prehodil server na iny pocitac v sieti konkretne je to PC s OS Win98 mozno
aj tam je problem tak sa mi objavil problem ten ze ked si posielam string zo
servera na clienta tak mi nepride cely. Pride iba koniec zaciatok nejako
nezachytim. IP adresy mam dobre aj port. Ale je tu jedna "anomalia" ked dam
breakpoint na

S:= clientsocket.socket.receivetext;

a krokujem program tak ten string uz mam v S cely kdezto ked program pustim
bez breakpointov a dam si S ulozit po prejdeni metodou

procedure TDataModule1.ClientSocket1Connect(Sender: TObject;
Socket: TCustomWinSocket);

do txt suboru tak vidim zo stringu napr. abcdefgh iba efgh. Ten cely string
ma cca 8kbyt ale nejde mi do hlavy ked to bezi cez 127.0.0.1:5000 tak preco
to nechodi aj po LAN ako takej.

Dakujem za napady

Robo

Predchozi aktivovane okno

[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 7.6.2002 10:04:21

Dobry den,
jak lze po aktivaci okna moji aplikace zjistit handle naposledy aktivniho (predchoziho) okna jine aplikace ?
Dekuji
Jaro B.

TClientSocket - TServerSocket

[*] Petr <DelphiForum(zv)seznam(tec)cz> - 7.6.2002 10:12:38

A co zkusit pouzit nejake prodlevy (cekaci) ? Je normalni, ze kdyz delas vse
na jednom PC, tak je to posilani rychle .... pres sit to ale bude VZDY
pomalejsi .... a kdyz pouzivas breakpointy, tak se program zastavi a je dost
casu, aby se prijali vsechny packety.

Petr
ICQ# : 119119215


> Neviem ci to zapadlo v konfere ale prosim skuste sa na to pozriet.
Adminovi:
> nehnevajte sa ze to posielam este raz ale potrebujem vediet co stym moze
> byt.
>
> Dakujem
>
> Ahojte!
>
> Robim jednu apl. ako clienta a na skusku niektorych funkcii som si
postavil
> "server" na lokali 127.0.0.1:5000. Vsetko Beha v pohode. Ale ked som
skusil
> prehodil server na iny pocitac v sieti konkretne je to PC s OS Win98 mozno
> aj tam je problem tak sa mi objavil problem ten ze ked si posielam string
zo
> servera na clienta tak mi nepride cely. Pride iba koniec zaciatok nejako
> nezachytim. IP adresy mam dobre aj port. Ale je tu jedna "anomalia" ked
dam
> breakpoint na
>
> S:= clientsocket.socket.receivetext;
>
> a krokujem program tak ten string uz mam v S cely kdezto ked program
pustim
> bez breakpointov a dam si S ulozit po prejdeni metodou
>
> procedure TDataModule1.ClientSocket1Connect(Sender: TObject;
> Socket: TCustomWinSocket);
>
> do txt suboru tak vidim zo stringu napr. abcdefgh iba efgh. Ten cely
string
> ma cca 8kbyt ale nejde mi do hlavy ked to bezi cez 127.0.0.1:5000 tak
preco
> to nechodi aj po LAN ako takej.
>
> Dakujem za napady
>
> Robo


Prehravani namapovaneho WAVu

[*] Delphin <delphin(zv)post(tec)cz> - 7.6.2002 10:39:43

Dle mych zkusenosti CreateFileMapping a MapViewOfFile nic z disku do pameti
necte. Cteni probehne az tehdy, kdyz se s konkretni strankou zacne pracovat.

----- Original Message -----
From: "Jan Zelen�" <zeleny.jan(zv)seznam(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, June 06, 2002 9:47 PM
Subject: Prehravani namapovaneho WAVu


Ahoj. Opet zdravim svou oblibenou konferenci.
Narazil jsem pri svem programovani na nasledujici problem.
Mam pres nasledujici zdrojovy kod namapovany maly WAV soubor do
pameti(predpokladam tim, ze se dostane do pameti), ktery pak prehravam pres
Playsound(). Prehravani mi nedela problem. Vadi mi vsak jedna vec. Pokud
zavolam Playsound s danym souborem poprve, dojde k malemu
"zaskubnuti"(citelne cte z HD)-jako by az ted se ho uracil nejakym zpusobem
nacist do pameti. Nasledujici prehravani funguje, tak jak si predstavuji,
tedy bez "skubnuti".
Nemate s tim nekdo zkusenosti ?


uryvek z kodu k namapovani souboru:

handle:=FileOpen(f,fmOpenRead+fmShareDenyWrite);
if handle>0 then
begin
pointer_file:=CreatefileMapping(handle,nil,PAGE_READONLY,0,0,nil);
if pointer_file<>0 then
pointer_map:=MapViewOfFile(pointer_file,FILE_MAP_READ,0,0,0);
end;

prehravani:
PlaySound(pointer_map,0,SND_MEMORY+SND_ASYNC);


Jan Zelen�
...budouc� profesion�l :-)
D6SP2
WinXP


Prehravani namapovaneho WAVu

[*] Sula Milos <milos.sula(zv)oku-su(tec)cz> - 7.6.2002 10:56:10

Ano neco podobneho jsem resil ale v cecku ve WINCE.
Vyresit se to da tak ze PlaySound date do samostatneho threadu nebot dochazi v hlavnim threadu k pozastaveni behu po dobu nacitani toho wavu.

Milos

-----Original Message-----
From: Delphin [mailto:delphin(zv)post(tec)cz]
Sent: Friday, June 07, 2002 10:40 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Prehravani namapovaneho WAVu


Dle mych zkusenosti CreateFileMapping a MapViewOfFile nic z disku do pameti
necte. Cteni probehne az tehdy, kdyz se s konkretni strankou zacne pracovat.

----- Original Message -----
From: "Jan Zelen�" <zeleny.jan(zv)seznam(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, June 06, 2002 9:47 PM
Subject: Prehravani namapovaneho WAVu


Ahoj. Opet zdravim svou oblibenou konferenci.
Narazil jsem pri svem programovani na nasledujici problem.
Mam pres nasledujici zdrojovy kod namapovany maly WAV soubor do
pameti(predpokladam tim, ze se dostane do pameti), ktery pak prehravam pres
Playsound(). Prehravani mi nedela problem. Vadi mi vsak jedna vec. Pokud
zavolam Playsound s danym souborem poprve, dojde k malemu
"zaskubnuti"(citelne cte z HD)-jako by az ted se ho uracil nejakym zpusobem
nacist do pameti. Nasledujici prehravani funguje, tak jak si predstavuji,
tedy bez "skubnuti".
Nemate s tim nekdo zkusenosti ?


uryvek z kodu k namapovani souboru:

handle:=FileOpen(f,fmOpenRead+fmShareDenyWrite);
if handle>0 then
begin
pointer_file:=CreatefileMapping(handle,nil,PAGE_READONLY,0,0,nil);
if pointer_file<>0 then
pointer_map:=MapViewOfFile(pointer_file,FILE_MAP_READ,0,0,0);
end;

prehravani:
PlaySound(pointer_map,0,SND_MEMORY+SND_ASYNC);


Jan Zelen�
...budouc� profesion�l :-)
D6SP2
WinXP


RichEdit - kopirovani z clipboardu

[*] Jan Krizek <krizek(zv)vitasw(tec)cz> - 7.6.2002 11:28:40

Ahojte,

mam v programu RichEdit, kde povoluji jen omezenou mnozinu akci (styly
fontu, odrazeni, zarovnani), protoze pak to vkladam do sablon a nechci
dovolit treba zmenu fontu. Ale nevim jak ocistit veci, ktere jsou
vkladany uzivatelem pres clipboard - stacilo by mi aby ten muj richedit
akceptoval pouze plain text - da se nejak toto vkladani z clipboardu
preprogramovat.

Dik Honza +

sietova komunikacia

[*] Robert Suska <delphi(zv)korak.sk> - 7.6.2002 11:53:49

Ahojte

pozeral som zdrojaky cital som help. Vsetko mam urobene tak "ako" asi treba
a nechodi to. Proste ked posielam vacsi objem txt dat na klienta tak to
pride rozsekane a proste ja tie data potrebujem pospajat lebo v nich su
commandy data pre komponenty a proste cela komunikacia client server. Co za
guru kod treba pouzit aby mi to pekne vsetko chodilo.

Dakujem

Robo

Ako na maily (Synapse, JCL ...)

[*] Gebauer Lukas <gebylist(zv)mlp(tec)cz> - 7.6.2002 11:54:51

> Uz davnejsie som sa tu na to pytal a bolo mi poradene pouzivat Synapse, co
> som aj urobil.

No, v ukazkovem kodu pouzivas NECO, co rozhodne jako moje Synapse
nevypada. Je to tomu podobne, vypada to jako nejake komponentove
zapouzdreni Synapse kodu. Netusim, co to zapouzreni pacha, je mozne
ze je chyba nekde v nem.

> A druhy problem je ze niektory zakaznici si neviedia nastavit SMTP server a
> ja ho neviem od nikial vycitat cize
> im posielanie mailov nefunguje.
>
> Tak som sa rozhodol pouzit JCL. Nasiel som si funkciu JclSimpleSendMail
> ktora pozadovanej ulohe
> uplne postacuje ale s prekvapenim som zistil ze to ide len tam kde maju
> ludkovia Outlook, OutlookExpress.
> Ak mali ako postoveho klienta Netscape, Operu alebo nebodaj Lotus Notes tak
> to neslo.

pincipielni rozdil je v tomto:

SMTP reseni - nastaveni postovniho systemu je potreba sdelit
programu. Funguje (az na cestne vyjimky) vsude. A to i treba na Linux
platforme.

MAPI reseni - nastaveni potovniho systemu se provede v postovnim
klientu. program pak vlastne pres MAPI rozhrani vola toho postovniho
klienta. Funguje jen na windows a jen na nekterych postovnich
klientech.

Nevyhodu MAPI reseni jsi jiz objevil.. ano, funguje to jen na par
postovnich klientech. Nejlepe to funguje na microsoftich postovnich
ech, ktere jsou ale ty nejhorsi, jake kdy lidstvo vymyslelo. ;-(

Jedno je ale jiste... V obou pripadech musi NEKDO ten pocitac na
mistno postovni system nakonfigrovat. NENI pravda, ze pri pouziti
MAPI neni potreba postovni konfigurace. Ona potreba je, jen se ta
konfigurace pouzije v jinem programu!

Tedy kdyz NEKDO dokazal nakonfigurovat nekde postu tak aby fungovala,
bude to ten samy clovek, ktery ti povi jaky nastavit SMTP server.
-- Lukas Gebauer.

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

Ako na maily (Synapse, JCL ...)

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 7.6.2002 13:10:29

From: "Gebauer Lukas" <gebylist(zv)mlp(tec)cz>
> Nevyhodu MAPI reseni jsi jiz objevil.. ano, funguje to jen na par
> postovnich klientech. Nejlepe to funguje na microsoftich postovnich
> ech, ktere jsou ale ty nejhorsi, jake kdy lidstvo vymyslelo. ;-(

Potiz je v tom, ze kdyz nekdo neni schopen spravne implementovat ani par zcela
jednoduchych API funkci, tak co si mam asi o jeho produktu pomyslet. Zkousel
jsem to i s nejakym Netscapem a vicemene to fungovalo. Takze osobne bych spise
posuzoval postovni klienty podle schopnosti vubec fungovat tak, jak se na dane
platforme ocekava, nez dle vsemoznych nabozenstvi.

> Jedno je ale jiste... V obou pripadech musi NEKDO ten pocitac na
> mistno postovni system nakonfigrovat. NENI pravda, ze pri pouziti
> MAPI neni potreba postovni konfigurace. Ona potreba je, jen se ta
> konfigurace pouzije v jinem programu!

Predstav si velky (statni) moloch, kde nekdo kdysi kdesi pred lety nejak
nakonfiguroval postu. Kdyz pouzijes Simple MAPI tak se zkratka posle posta
pres existujiciho klienta (ne vzdy se totiz pouziva primo SMTP). Tim chci jen
naznacit, ze SMTP neni vzdy pouzitelne reseni.

Petr Vones

Parametr neni spravny

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 7.6.2002 13:25:45

From: "Lebeda David" <david.lebeda(zv)comarr(tec)cz>
> - opet nic narocneho. Zmacknu Button jednou - hlaska, podruhe - hlaska,
> potreti -povede se. Priste se to povede treba uz na poprve. Je to vec
> nahody.
>
> Zkusim jeste IBStoredProc nahradit datasetem a uvidime.

Kdyz se ti chyba projevuje opakovane, neni lepsi ji najit nez neustale jen
neco zkouset ?

Petr Vones

Aplikace na CD-ROMu

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 7.6.2002 13:33:22

Puvodni zprava, kterou napsal Ing. Igor Vodi�ka dne 7 Jun 2002:

> Narazil jsem na jeden problem. Mam aplikaci postavenou na FF 2.10.
> Demoverzi chci spoustet s CD-ROMu. Dokud jsem pouzival FF 2.05, tak vse
> fungovalo normalne. Funkci GetDriveType() jsem zjistil, ze se aplikace
> spousti z CD-ROMu a nastavil property ffServerEngine1.IsReadOnly na True.
> Od verze FF 2.10 mi to takto funguje jen na WIN NT, 2000 a XP, ale na WIN
> 98 to hlasi "Exception EffServerException in module ... INTERNAL Error
> when writing to file [Cesta:\FFSTRAN.CFG, error 5. Pristup byl odepren]".
>
> Nevite nekde co to muze byt. pritom funkce GetDriveType() nebo
> GetDriveTypeStr() z JCL spravne detekuje CD-ROM mechaniku. Nevite co je
> ten soubor FFSTRAN.CFG u verze FF 2.05 to nebylo.

To je nejaky konfiguracni soubor pro transakcni soubor nebo co, novinka
verze 2.10. Ale IsReadOnly by mel zamezit jeho vytvareni, je divne, ze se
to pod W98 chova jinak. Zkusim se na to podivat, ale asi by to chtelo
napsat do newsu TP...

S pozdravem
Petr Zahradnik, pocitacovy expert

============================================================
Petr Zahradnik, Computer Laboratory
Obvodova 740/14, P.O. Box 15, 400 07 Usti nad Labem
Telefony: 047-5500610, 047-5501627, 0602-409601
Fax: 047-5511338
WWW: http://www.clexpert(tec)cz, http://www.zahradnik(tec)cz
E-Mail: clexpert(zv)clexpert(tec)cz, petr(zv)zahradnik(tec)cz
ICQ: 21215917
============================================================

RichEdit - kopirovani z clipboardu

[*] bardon <bardon(zv)akord-soft(tec)cz> - 7.6.2002 13:37:48

[P��loha v souboru: winmail.dat]
Ja bych se vybodl na RichEdit a pouzil rvpkg. V podstate je to komponenta
mnohem lepsi nez RichEdit s jedinou "nevyhodou" - umoznuje jen nejake predem
definovane styly - nikoli cokoli.

-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Jan Krizek

mam v programu RichEdit, kde povoluji jen omezenou mnozinu akci (styly
fontu, odrazeni, zarovnani), protoze pak to vkladam do sablon a nechci
dovolit treba zmenu fontu. Ale nevim jak ocistit veci, ktere jsou
vkladany uzivatelem pres clipboard - stacilo by mi aby ten muj richedit
akceptoval pouze plain text - da se nejak toto vkladani z clipboardu
preprogramovat.

Aplikace na CD-ROMu - reseni

[*] Ing. Igor Vodi�ka <vodicka(zv)sagit(tec)cz> - 7.6.2002 14:06:09



> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On

> Puvodni zprava, kterou napsal Ing. Igor Vodi�ka dne 7 Jun 2002:
>
> > Narazil jsem na jeden problem. Mam aplikaci postavenou na FF 2.10.
> > Demoverzi chci spoustet s CD-ROMu. Dokud jsem pouzival FF 2.05, tak vse
> > fungovalo normalne. Funkci GetDriveType() jsem zjistil, ze se aplikace
> > spousti z CD-ROMu a nastavil property
> ffServerEngine1.IsReadOnly na True.
> > Od verze FF 2.10 mi to takto funguje jen na WIN NT, 2000 a XP,
> ale na WIN
> > 98 to hlasi "Exception EffServerException in module ... INTERNAL Error
> > when writing to file [Cesta:\FFSTRAN.CFG, error 5. Pristup byl
> odepren]".
> >
> > Nevite nekde co to muze byt. pritom funkce GetDriveType() nebo
> > GetDriveTypeStr() z JCL spravne detekuje CD-ROM mechaniku. Nevite co je
> > ten soubor FFSTRAN.CFG u verze FF 2.05 to nebylo.
>
> To je nejaky konfiguracni soubor pro transakcni soubor nebo co, novinka
> verze 2.10. Ale IsReadOnly by mel zamezit jeho vytvareni, je divne, ze se
> to pod W98 chova jinak. Zkusim se na to podivat, ale asi by to chtelo
> napsat do newsu TP...
>
> S pozdravem
> Petr Zahradnik, pocitacovy expert
>

Jedina zminka o tomto souboru v ruznych napovedach FF je tato:

FlashFiler 2 allows concurrent transactions per database. Each TffDatabase
component may still have only one active transaction at a time. Each table
may be modified by only one transaction at a time. If a table is currently
locked by a transaction, another transaction needing to modify that table
will wait until the current transaction has finished or until its timeout
expires.

In FlashFiler 1, a client reading a table might encounter data that had been
changed but not committed by a transaction. This is called a dirty read. In
FlashFiler 2, all reads are clean reads. A client sees only clean data or,
if the client is in a transaction, the data that it has modified.

Each file block is marked with the Log Sequence Number (LSN) of the
transaction modifying the block. The transaction manager maintains the
highest LSN for each database, storing the information in a file named
FFSTRAN.CFG.

Ja jsem to prozatim vyresil nasledovne:

1. do datamodulu pred otevrenim databazi jsem dal tento kod

if Z_CDRomu then
begin
ffServerEngine1.IsReadOnly := True;
ffServerEngine1.NoAutoSaveCfg := True;
Database1.ReadOnly := True;
end
else
begin
ffServerEngine1.IsReadOnly := False;
ffServerEngine1.NoAutoSaveCfg := False;
Database1.ReadOnly := False;
end;

2. Soubor FFSTRAN.CFG jsem neumistil na CD (coz jsem pred tim mel).

Takto to prozatim funguje na vsech OS (overeno), krome WIN 95, ktere ve
firme uz nemame.

Ing. Igor Vodicka
informacni systemy
Nakladatelstvi Sagit
Tel.: 069 6786 001
HTTP://www.sagit(tec)cz/
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.370 / Virov� b�ze: 205 - datum vyd�n�: 5.6.2002

Ako na maily (Synapse, JCL ...)

[*] Gebauer Lukas <gebylist(zv)mlp(tec)cz> - 7.6.2002 14:33:18

> Potiz je v tom, ze kdyz nekdo neni schopen spravne implementovat ani par zcela
> jednoduchych API funkci, tak co si mam asi o jeho produktu pomyslet.

Tak nejak je mi mnohem milejsi postovni program, ktery sice treba
neumi MAPI, ale neni deravy jako Outlook, diky kteremu dneska zije
95% veskerych viru.

To uz nemluvim o tom, ze MAPI povazuji za hodne proprietarni reseni,
ktere vnasi do systemu odesilni posty ponekud vice nespolehlivych
prvnku, nez je na tak jednoduchu ulohu potreba. ;-/

> Zkousel jsem to i s nejakym Netscapem a vicemene to fungovalo. Takze
> osobne bych spise posuzoval postovni klienty podle schopnosti vubec
> fungovat tak, jak se na dane platforme ocekava, nez dle vsemoznych
> nabozenstvi.

Za nabozenstvi povazuji neustale prosazovani microsoftich reseni,
kdyz je k dispizici reseni univerzalni, ba co vice multiplatformni!
Pouziti MAPI znamena microsoft navzdy. Jakmile jedno dostanes napad
prenest apliakci trebas na Linux, mas smulu. Pouziti SMTP te v tomto
nijak neomezuje.

> > Jedno je ale jiste... V obou pripadech musi NEKDO ten pocitac na
> > mistno postovni system nakonfigrovat. NENI pravda, ze pri pouziti
> > MAPI neni potreba postovni konfigurace. Ona potreba je, jen se ta
> > konfigurace pouzije v jinem programu!
> Predstav si velky (statni) moloch, kde nekdo kdysi kdesi pred lety nejak
> nakonfiguroval postu. Kdyz pouzijes Simple MAPI tak se zkratka posle posta
> pres existujiciho klienta (ne vzdy se totiz pouziva primo SMTP). Tim chci jen
> naznacit, ze SMTP neni vzdy pouzitelne reseni.

Takove molochy znam moc dobre, sam v jednom pracuji. Proto take vim,
ze cim je ten moloch vetsi, tim vice lidi se tam stara o pocitace.
jsou na to cele oddeleni, nebo dokonce i cele 'odbory infomatiky'.

Tvoje naivni predstava, ze ve velkych molochach nikdo nic nevi o
pocitacich je skutecne humorna. Cim je vetsi podnik, tim spise mam po
ruce lidi, kteri o tamni pocitaciove siti neco vi! Takze tim spise je
po ruce nekdo, kdo ti adresu SMTP serveru rekne!

Neni pravda, ze pres MAPI jednoduse posles zpravu pres existujiciho
klienta a nemusis nic konfigurovat! Musis nakonfigurovat toho
klienta! je jedno kdy, jedno se to udelat mus tak citak. a
konfigurace nejakeho pecielnihopostovniho klienta mistniho postovniho
systemu je SLOZITEJSI nez zadat jednu SMTP adresu!

Kdyz byl nekdo schopen nakonfigurovat postovniho klienta, tak o
postovnim systemu neco vi, a tu SMTP adresu ti rekne. cim vetsi
podnik, tim je situace paradoxne prehlednejsi, protoze je k
dispozicivice odbornych lidi. situae, kdy to nekdy nekdo udela a pak
tam nmeni je spise v malicych firmickach, kde se o sytem stara nejaky
externista. ale v takove male firmicce je pro zmenu prehled a vi na
koho se tedy obratit.

Ze nektere ostovni systemy nepouzivaji SMTP je totiz uplne jedno,
protoze SMTP server tam musi byt vzdycky. Kdyby tam nebyl, tezko by
ta posta fungovala s internetem. je uplne jedno jakym zpusobem
komunikuji po mistni siti postovni klienti s postovnim uradem. na to
xistuji mnoho proprietarnih i standardnich zpusobu. SMTP server tam
ale najdes vzdy!

Zkratka SMTP tam je vzdycky, zatimco MAPI je tam nekdy, a to jeste
mozna bude i nekde fungovat jak ma. SMTP je mnohonasobne rozsirenejsi
standard nez cele MAPI vynasobene deseti. ;-)
-- Lukas Gebauer.

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

Ako na maily (Synapse, JCL ...)

[*] Milan Tomes <milan.tomes(zv)haida(tec)cz> - 7.6.2002 14:46:44

Ale jak chces napr. osetrit situaci, kdy je nutne aby uzivatel s tim emailem
jeste pred odeslanim neco udelal. To chces programovat cele okno s odchozi
postou se vsemi funkcemi, ktere ma treba outlook jenom proto, ze se ti (bez
urazky) nelibi MAPI ??? Je jasne, ze SMTP je mnohem univerzalnejsi reseni,
ale pro rychlost a konfort obsluhy je MAPI urcite vhodnejsi. Napriklad
uzivatele ve statni sprave malokdy vedi co je to mail a umi pouze to, co jim
nekdo dokonale vysvetli (tzv. uzivatele na klicek), takze reseni pouziti
standardniho postovniho klienta mi v tomto pripade pripada mnohem
vyhodnejsi.

<NOFLAMES>
Pokud se jedna o multiplatformni aplikaci, tak to v soucasne a take dlouhe
budoucnosti nemusim vubec resit, protoze Linux zatim nema sanci se na
desktopovych systemech prosadit (a uz vubec ne ve statni sprave)
</NOFLAMES>

S pozdravem

Milan Tomes
mailto:milan.tomes(zv)haida(tec)cz

> > Potiz je v tom, ze kdyz nekdo neni schopen spravne
> implementovat ani par zcela
> > jednoduchych API funkci, tak co si mam asi o jeho produktu pomyslet.
>
> Tak nejak je mi mnohem milejsi postovni program, ktery sice treba
> neumi MAPI, ale neni deravy jako Outlook, diky kteremu dneska zije
> 95% veskerych viru.
>
> To uz nemluvim o tom, ze MAPI povazuji za hodne proprietarni reseni,
> ktere vnasi do systemu odesilni posty ponekud vice nespolehlivych
> prvnku, nez je na tak jednoduchu ulohu potreba. ;-/...zkraceno :)

TClientSocket - TServerSocket

[*] Slavomir Skopalik <skopalik(zv)hlubocky.del(tec)cz> - 7.6.2002 14:53:30

Takto radeji NE !
1. Pokud pouzivas Non blocking, tak je nutne testovat zda je mozne odslat.
Non blocking znamena, ze pokud nelze okamzite odeslat (prenest do bufferu OS),
tak se ti volani vrati s priznak, ze to nejde.
2. Pokud pouzivas ThreadBlocking, tak si musis vyresit synchronizaci s hlavnim threadem,
nepriklad pres SendMessage.

Slavek


> A co zkusit pouzit nejake prodlevy (cekaci) ? Je normalni, ze kdyz delas vse
> na jednom PC, tak je to posilani rychle .... pres sit to ale bude VZDY
> pomalejsi .... a kdyz pouzivas breakpointy, tak se program zastavi a je dost
> casu, aby se prijali vsechny packety.
>
> > Neviem ci to zapadlo v konfere ale prosim skuste sa na to pozriet.
> Adminovi:
> > nehnevajte sa ze to posielam este raz ale potrebujem vediet co stym moze
> > byt.
> >
> > Dakujem
> >
> > Ahojte!
> >
> > Robim jednu apl. ako clienta a na skusku niektorych funkcii som si
> postavil
> > "server" na lokali 127.0.0.1:5000. Vsetko Beha v pohode. Ale ked som
> skusil
> > prehodil server na iny pocitac v sieti konkretne je to PC s OS Win98 mozno
> > aj tam je problem tak sa mi objavil problem ten ze ked si posielam string
> zo
> > servera na clienta tak mi nepride cely. Pride iba koniec zaciatok nejako
> > nezachytim. IP adresy mam dobre aj port. Ale je tu jedna "anomalia" ked
> dam
> > breakpoint na
> >

sietova komunikacia

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 7.6.2002 14:57:22

> pozeral som zdrojaky cital som help. Vsetko mam urobene tak "ako"
asi treba
> a nechodi to. Proste ked posielam vacsi objem txt dat na klienta tak
to
> pride rozsekane a proste ja tie data potrebujem pospajat lebo v nich
su
> commandy data pre komponenty a proste cela komunikacia client
server. Co za
> guru kod treba pouzit aby mi to pekne vsetko chodilo.
>

co takhle naznacit nejake dalsi podrobnosti aby se dalo vubec o necem
premyslet?

Domnivam se (pokud pouzivas TCP prenos), ze Ti vadi, ze posles blok
dat a a na druhou stranu data dorazi ve vice blocich (nebo naopak
vice bloku se spoji do jednoho) pak je tovec se kterou se neda nic
delat - je to vlastnost TCP protokolu. Ty sam si musis poskladat ty
bloky tak aby obsahovaly to co potrebujes.


D. Toman

Ako na maily (Synapse, JCL ...)

[*] Gebauer Lukas <gebylist(zv)mlp(tec)cz> - 7.6.2002 15:04:28

Jo, ale o tom, ze uzivatel potrebuje pred odeslanim neco z mailu
zmenit, nebyla rec!

Pod pojmem 'odeslani mailu z aplikace' si predstavuji, ze aplikace
vygeneruje a odesle mail.

To co popisujes ty si predstavuji pod pojmen 'pripravit text mailu k
odeslani uzivatelem'. To je neco zcela jineho a na to se treba MAPI
hodi. Je to zcela jina uloha! Neco jako jablka a hrusky.

Jenze apliace, ktere odesilaji samy e-maily, jaksi zdaleka nemusi byt
desktopove! (takze tvoje 'noflame' se ocita mimo herni pole!)

Muze to byt treba nejaka serverova aplikace, ktera automaticky e-
mailuje administratorovi info o nejakem kritickem stavu. Tento druh
aplikace vubec neni vazana na nejake desktopy, a klidne muze bezet na
Linuxovem serveru. Mozna bys byl sam prekvapen, ze i ve statni sprave
se nejdou linuxove servery!

A i kdyz pouzivam Windows, tak pouzivat takovou vec pres MAPI
povazuji za naprstou zhuverilost! Na takovem pocitaci neni nikdo
prihlaseny, aplikace bezi trebas jako service, a potrebujes neco
odeslat... A jsi s MAPI nahrany... Nebo i kdyz nakrasne tam bude
nekdo prihlaseny, aby na konzoli neco mohlo bezet, to kvuli jedne
aplikaci budu na takovy pocitac instalovat outlook???

> Ale jak chces napr. osetrit situaci, kdy je nutne aby uzivatel s tim emailem
> jeste pred odeslanim neco udelal. To chces programovat cele okno s odchozi
> postou se vsemi funkcemi, ktere ma treba outlook jenom proto, ze se ti (bez
> urazky) nelibi MAPI ??? Je jasne, ze SMTP je mnohem univerzalnejsi reseni,
> ale pro rychlost a konfort obsluhy je MAPI urcite vhodnejsi. Napriklad
> uzivatele ve statni sprave malokdy vedi co je to mail a umi pouze to, co jim
> nekdo dokonale vysvetli (tzv. uzivatele na klicek), takze reseni pouziti
> standardniho postovniho klienta mi v tomto pripade pripada mnohem
> vyhodnejsi.
>
> <NOFLAMES>
> Pokud se jedna o multiplatformni aplikaci, tak to v soucasne a take dlouhe
> budoucnosti nemusim vubec resit, protoze Linux zatim nema sanci se na
> desktopovych systemech prosadit (a uz vubec ne ve statni sprave)
> </NOFLAMES>


-- Lukas Gebauer.

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

Jak se da prekopirovat disk

[*] Zdenek Drvota <drvota-l(zv)zds(tec)cz> - 7.6.2002 15:07:18

Ahoj,
mne se osvedcila i na dynamicke disky tato metoda:
1) pridat novy disk
2) zapnout mirroring
3) pockat az dobehne synchronizace dat stary->novy
4) vyjmout disk
5) zrusit mirroring

Vyzkouseno na W2k server, NTFS :)

### Ludek ZITA napsal dne 6 Jun 2002, v 13:11 :
> ----- Original Message -----
> From: "Otisk Rene" <otisk(zv)misel(tec)cz>
> > > Win2000 servra s active directories na NTFS.
> > >
> > > Robo
>
> Ahoj.
> Pokud nepouziva dynamicke disky tak to obnovi.
> Ja bezne zalohuji Win2000 server i SBS2000 server a obnovuji.
> Mam u trech zakazniku HW identicke servery a u sebe jeden zalozni.
> POkud potrebuji v klidu neco vykoumat, pak Ghostem prenesu celou image
> start disku domu a muzu vesele laborovat. Dynamicke disky to ovsem
> neumi.
>
> Ludek
>
>

--
-----------------------------------------------
Ing. Zdenek Drvota e-mail: drvota(zv)zds(tec)cz
director ICQ# 135770414
ZDS, spol. s r.o.
Hronovicka 708 tel:+420-40-6613756
530 02 Pardubice fax:+420-40-6613756
Czech Republic http://www.zds(tec)cz
e-mail: info(zv)zds(tec)cz
Pripojte se k hledani mimozemskych civilizaci:
SETI(zv)Home http://setiathome.ssl.berkeley.edu
Darek, ktery nezklame? CeDecko od nas!
http://www.zds(tec)cz/cdrom/cdrom.asp?sender=mail
--

sietova komunikacia

[*] Robert Suska <delphi(zv)korak.sk> - 7.6.2002 15:13:55

ahoj

ok. ale mam Socket.ReceiveText a to volam v ClientSocket1.OnRead hej? a
teraz sa tato metoda vola cyklicky tak ako dojdu nejake data takze ma teraz
napadlo ze musim urobit nejake narazniky na zaciatku a na konci aby som
vedel ze uz mam vsetko z toho bloku ktory cakam?

Robo

>
> Domnivam se (pokud pouzivas TCP prenos), ze Ti vadi, ze posles blok
> dat a a na druhou stranu data dorazi ve vice blocich (nebo naopak
> vice bloku se spoji do jednoho) pak je tovec se kterou se neda nic
> delat - je to vlastnost TCP protokolu. Ty sam si musis poskladat ty
> bloky tak aby obsahovaly to co potrebujes.
>
> D. Toman
>

Ako na maily (Synapse, JCL ...)

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 7.6.2002 15:14:25

From: "Gebauer Lukas" <gebylist(zv)mlp(tec)cz>
> Za nabozenstvi povazuji neustale prosazovani microsoftich reseni,

Netvrdim, ze klient musi byt od MS. Pouze by mel podporovat rozhrani, ktera
jsou na *dane platforme* bezna. Ze snad jen MS je schopen implementovat
knihovnu s par funkcemi a par parametry svedci jen o neschopnosti a
nekompetentnosti ostatnich vyrobcu software. Z toho prameni pak dojemne
pohadky o tom, jak je MS utlacuje. Bohuzel casto jen jejich vlastni totalni
neschopnost je duvodem jejich ne zrovna ruzove situace, ovsem ono si jen
stezovat bylo vzdy jednodusi nez neco opravdu udelat.

> kdyz je k dispizici reseni univerzalni, ba co vice multiplatformni!

Tohle zaklinadlo v mnoha pripadech nic neznamena. Casto to totiz znamena, ze
se nehodi ani na jednu z platforem ;-)

> Pouziti MAPI znamena microsoft navzdy. Jakmile jedno dostanes napad

Stejne tak jako treba pouziti CreateProcess nebo WSAGetLastError ;-))

> postovnim systemu neco vi, a tu SMTP adresu ti rekne. cim vetsi
> podnik, tim je situace paradoxne prehlednejsi, protoze je k
> dispozicivice odbornych lidi. situae, kdy to nekdy nekdo udela a pak

Moje zkousenost je bohuzel zcela opacna, ale to sem asi nepatri.

> Ze nektere ostovni systemy nepouzivaji SMTP je totiz uplne jedno,
> protoze SMTP server tam musi byt vzdycky. Kdyby tam nebyl, tezko by

Jiste, jenze :

a) pro vnitropodnikovou postu nema smysl pouzivat SMTP do Internetu
b) neni v mnoha pripadech zadouci, aby uzivatel mel k SMTP vubec pristup
(rozesilani spamu atd.)
c) jine postovni systemy se lepe hromadne spravuji (distribucni listy,
adresare atd.)

> Zkratka SMTP tam je vzdycky, zatimco MAPI je tam nekdy, a to jeste
> mozna bude i nekde fungovat jak ma. SMTP je mnohonasobne rozsirenejsi

Simple MAPI (neplest s MAPI) funguje vzdy, kdyz je v klientu spravne
implementovano. Nezapomen ze je to jen specifikace rozhrani obsahujici cca 12
jednoduchych funkci. Bohuzel i tohle je asi pro nektere firmy prilis narocne.

Petr Vones

IB: Jak na bloby ?

[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 7.6.2002 15:19:57

Haj hou!

On 6 Jun 2002 at 11:07, Milan Tome� wrote:

> potrebuji akutne ukladat bloby do IB/FB. Jak na to ???
> Jen podotykam, ze mam sve vlastni objekty pro praci s DB a vyuzivam je pro
> kompletni praci s recordama v DB. Da se s bloby manipulovat nejak pres SQL s
> vyloucenim metod tridy TField ??? Ten totiz nechci (a ani nemuzu, protoze
> normalne nevyuzivam TDataset) pouzivat...
> Nicmene kazda rada je dobra - zkuste mi, prosim, poslat i kousek zdrojaku
> (napr. ulozeni souboru z disku do DB a naopak)

Mas zdroje IBX ? Tam to najdes. Pokud nemas IBX, tak je v CodeCentralu na
community.borland.com.

S pozdravem
Pavel Cisar
Mobil: 0724 281429
http://www.ibphoenix(tec)cz
Vse co potrebujete pro Firebird a InterBase

Ako na maily (Synapse, JCL ...)

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 7.6.2002 15:21:10

From: "Gebauer Lukas" <gebylist(zv)mlp(tec)cz>
> To co popisujes ty si predstavuji pod pojmen 'pripravit text mailu k
> odeslani uzivatelem'. To je neco zcela jineho a na to se treba MAPI
> hodi. Je to zcela jina uloha! Neco jako jablka a hrusky.

V tom byl asi zakladni problem tohoto nedorozumeni. Bezny uzivatel totiz
zadnou jinou moznost vetsionou nema. Takze, mas-li aplikaci kde je treba
funkce "Odeslete chybovou zpravu emailem", tak musis vzit zavdek tim, co na
tom pocitaci je. A prave od toho je tu Simple MAPI.

Pokud se jedna o aplikaci bezici treba na serveru jako service, tak to je uz o
necem jinem.

Petr Vones

TClientSocket - TServerSocket

[*] Robert Suska <delphi(zv)korak.sk> - 7.6.2002 15:30:41

Ahoj

dobre, ale mohol by si mi s tym helfnut? Co je lepsie pouzit resp. co mi Ty
odporucas? Lebo robime vyrobno informacnu databazu a ja som dostal
naprogramovat clienta a server bezi na linuxe pod MySQL. Takze ta
komunikacia tam musi byt excelentna. A este som s ClientSocketom nerobit tak
by som potreboval len postrcit. Aby som neurobil skolacku chybu.

Dakujem

Robo


> Takto radeji NE !
> 1. Pokud pouzivas Non blocking, tak je nutne testovat zda je mozne odslat.
> Non blocking znamena, ze pokud nelze okamzite odeslat (prenest do
bufferu OS),
> tak se ti volani vrati s priznak, ze to nejde.
> 2. Pokud pouzivas ThreadBlocking, tak si musis vyresit synchronizaci s
hlavnim threadem,
> nepriklad pres SendMessage.
>
> Slavek
>
>
> > A co zkusit pouzit nejake prodlevy (cekaci) ? Je normalni, ze kdyz delas
vse
> > na jednom PC, tak je to posilani rychle .... pres sit to ale bude VZDY
> > pomalejsi .... a kdyz pouzivas breakpointy, tak se program zastavi a je
dost
> > casu, aby se prijali vsechny packety.
> >
> > > Neviem ci to zapadlo v konfere ale prosim skuste sa na to pozriet.
> > Adminovi:
> > > nehnevajte sa ze to posielam este raz ale potrebujem vediet co stym
moze
> > > byt.
> > >
> > > Dakujem
> > >
> > > Ahojte!
> > >
> > > Robim jednu apl. ako clienta a na skusku niektorych funkcii som si
> > postavil
> > > "server" na lokali 127.0.0.1:5000. Vsetko Beha v pohode. Ale ked som
> > skusil
> > > prehodil server na iny pocitac v sieti konkretne je to PC s OS Win98
mozno
> > > aj tam je problem tak sa mi objavil problem ten ze ked si posielam
string
> > zo
> > > servera na clienta tak mi nepride cely. Pride iba koniec zaciatok
nejako
> > > nezachytim. IP adresy mam dobre aj port. Ale je tu jedna "anomalia"
ked
> > dam
> > > breakpoint na
> > >

Bitmapa (obrazek) do listy okna

[*] LUKES V�clav <lukes(zv)ans(tec)cz> - 7.6.2002 15:36:45


Ahoj,

jde prosim nejak udelat, abych do listy okna dal BITMAPU (ne ikonu) ??? Proste bych chtel mit maly obrazek v liste.

Diky


Vasek

sietova komunikacia

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 7.6.2002 15:53:17

From: "Robert Suska" <delphi(zv)korak.sk>
> ok. ale mam Socket.ReceiveText a to volam v ClientSocket1.OnRead hej? a
> teraz sa tato metoda vola cyklicky tak ako dojdu nejake data takze ma teraz
> napadlo ze musim urobit nejake narazniky na zaciatku a na konci aby som
> vedel ze uz mam vsetko z toho bloku ktory cakam?

Presne tak, v tom je princip TCP komunikace.

Petr Vones

Inno setup

[*] Fabik Milan <kinekus(zv)nextra.sk> - 7.6.2002 16:05:18

Zdravim,


Prave som si zakupil D6 PROF a trocha som z Install shitu prekvapeny. Skusam
pouzit inno setup, ale mam niekolko nezodpovedanych otazok.

1. Ako zabezpecit, aby sa "moj program" neinstaloval do uzivatelskeho
adresara ale mnou urceneho adresara?
2. Ako zabezpecit instalaciu BDE
3. Co v pripade, ze na cielovy pocitac sa instaluje cca 1500 suborov - moj
pripad - to mam vsetky vypisovat do scriptu?

Diky aj za aspon ciastocne odpovede.

Fabik

Inno setup

[*] Ales Radikovsky <radik(zv)allstar(tec)cz> - 7.6.2002 16:12:37

> 1. Ako zabezpecit, aby sa "moj program" neinstaloval do uzivatelskeho
> adresara ale mnou urceneho adresara?

[Setup]
DisableDirPage=yes

> 2. Ako zabezpecit instalaciu BDE

http://www.jrsoftware.org/ishowto.phtml?a=bde

> 3. Co v pripade, ze na cielovy pocitac sa instaluje cca 1500
> suborov - moj
> pripad - to mam vsetky vypisovat do scriptu?

Viz dokumentrace.... ale to plati i o predchozich bodech....
This can be a wildcard to specify a group of files in a single entry.
When a wildcard is used, all files matching it use the same options.
Source: "Files\*"

Ales

Inno setup

[*] Jiri Kratochvil <jiri.kratochvil(zv)webzin(tec)cz> - 7.6.2002 16:13:28

> 3. Co v pripade, ze na cielovy pocitac sa instaluje cca 1500 suborov - moj
> pripad - to mam vsetky vypisovat do scriptu?
Lze pouzit hvezdickovou konvenci

Na ostatni nejspis odpovi kolegove :)
PS. Koukal jste do napovedy ??

Jirka K.

Ako na maily (Synapse, JCL ...)

[*] Gebauer Lukas <gebylist(zv)mlp(tec)cz> - 7.6.2002 16:13:30

> Netvrdim, ze klient musi byt od MS. Pouze by mel podporovat rozhrani, ktera
> jsou na *dane platforme* bezna. Ze snad jen MS je schopen implementovat
> knihovnu s par funkcemi a par parametry svedci jen o neschopnosti a
> nekompetentnosti ostatnich vyrobcu software. Z toho prameni pak dojemne
> pohadky o tom, jak je MS utlacuje. Bohuzel casto jen jejich vlastni totalni
> neschopnost je duvodem jejich ne zrovna ruzove situace, ovsem ono si jen
> stezovat bylo vzdy jednodusi nez neco opravdu udelat.

Fakt, ze si Microsoft vymysli dalsi svuj 'standard', jeste preci
neznamena, ze ostatni vyrobci jej musi ihned implementovat. Nejde o
zadnou neschopnost, ale spise o nechut poskakovat jak si Microsoft
piska. Zvlast kdyz se Microsoft snazi porad vymyslet veci zbytecne,
nebo veci, ktere se davno resi jinak. Toto prosim chapat obecne.

Jen diky teto nechuti vsech ostanich se neujaly dementni vymysly,
jako treba winmail.dat v e-mailech. Je-li toto neschopnost ostatnich,
pak zustanu velmi rad i nadale neschopnym.

> > kdyz je k dispizici reseni univerzalni, ba co vice multiplatformni!
> Tohle zaklinadlo v mnoha pripadech nic neznamena. Casto to totiz znamena, ze
> se nehodi ani na jednu z platforem ;-)

V priapde nekoho, kdo se prilis zameruje na implementace micrsoftich
vymyslu, se to opravdu muze tak zda. Jenze mluvime o SMTP, ktere
existuje uz opravdu dlouho, a funguje take dobre, a prekvapive
opravdu vsude.

> > Pouziti MAPI znamena microsoft navzdy. Jakmile jedno dostanes napad
> Stejne tak jako treba pouziti CreateProcess nebo WSAGetLastError ;-))

:-)))
WSAGetLastError ma primy ekvivalent v linuxu (jak jinak bych to asi
tezko v Synapsi naimplemenoval...) A Obdoba createprocessu v linuxu
pochopitelne exstuje take.

Co si tim tedy chtel vlastne dokazat?

> > Ze nektere ostovni systemy nepouzivaji SMTP je totiz uplne jedno,
> > protoze SMTP server tam musi byt vzdycky. Kdyby tam nebyl, tezko by
>
> Jiste, jenze :
>
> a) pro vnitropodnikovou postu nema smysl pouzivat SMTP do Internetu

No a? kdyz v siti bude SMTP server, tak to preci nicem nevadi...

> b) neni v mnoha pripadech zadouci, aby uzivatel mel k SMTP vubec pristup
> (rozesilani spamu atd.)

To je zcela mylna predstava. je-li system nakonfigurovan tak, ze lze
pres SMTP posilat spamy, tak jej lze uplne stejne poslat pres
jakykoliv proprietarni system!

> c) jine postovni systemy se lepe hromadne spravuji (distribucni listy,
> adresare atd.)

No a??? Existence SMTP serveru nijak neohrozuje provoz jakehokoliv
postovniho sytemu, ani zadne z jeho vymozenosti.

Porad asi nechapes, ze existence SMTP serveru te nijak neomezuje v
pouzivani jakychkoliv proprietarnich postovnich systemu. Treba muj
postovni program nijak nepouziva odesilani SMTP (ackoliv to umi),
pouziva sdilene aresare a jine veci. To vse ale nijak nebrani tomu
mit SMTP server. Vnitropodnikova posta nejde vubec pres SMTP...

Jenze SMTP server tam nekde byt vzdycky musi, kvuli komunikaci s
internetem. nejak nechapu, proc kdyz ma k SMTP serveru pristup
naprosto KDOKOLIV ANONYMNE z internetu, tak proc by k nemu nemel mit
pristup dobre autorizovany uzivatel z vnitrku site???

> > Zkratka SMTP tam je vzdycky, zatimco MAPI je tam nekdy, a to jeste
> > mozna bude i nekde fungovat jak ma. SMTP je mnohonasobne rozsirenejsi
> Simple MAPI (neplest s MAPI) funguje vzdy, kdyz je v klientu spravne
> implementovano. Nezapomen ze je to jen specifikace rozhrani obsahujici cca 12
> jednoduchych funkci. Bohuzel i tohle je asi pro nektere firmy prilis narocne.

Vsechno funguje jen kdyz je to spravne naprogramovane. ;-) Tim bych
se moc neohanel... jednoduchosti bych se neohanel uz vubec, zvlast
kdyz a odeslani mailu staci jedoducha funkce 1...

Hele, tuhle debatu ze nevedeme poprve. Naposledy to skoncilo tak, ze
jsme se shodli na tom, ze by bylo velmi sikovne mit programek
'SimpleMapiToSMTP wrapper'. Proc toto jeste nikdo nenaprogramoval,
kdyz je to tak strasne jednoduche? ;-))) (treba nekdo kdo rozhrani
SimpleMapi dobre zna?)


-- Lukas Gebauer.

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

sietova komunikacia

[*] Petr Fejfar <development(zv)callnet(tec)cz> - 7.6.2002 16:35:14

From: "Robert Suska" <delphi(zv)korak.sk>

> napadlo ze musim urobit nejake narazniky
> na zaciatku a na konci aby som
> vedel ze uz mam vsetko z toho bloku ktory cakam?

Narazniky - to je reseni spis z telekomunistickeho sveta :-)

V pocitacovem svete se to zpravidla resi tak, ze se nejdrive posle napr.
DWORD s delkou bloku dat nasledovan vlastnim blokem dat.

Prijimac vzdy cte DWORD a pak tolik bytu, kolik udava DWORD. Kdyz to
neprijme vsechno do limitu, tak jde o chybu. Je-li dat vic, predpoklada se,
ze uz patri k dalsimu bloku tj. ze je to DWORD dalsiho bloku.

Nevyhodou je, ze ten DWORD je platformove zavisly - pozor na big/little
endian, vyhodou je, ze prenos bloku dat je transparentni a nemusis se starat
o escapovani "narazniku" a ze to nevyzaduje zadne parsovani prijimaneho
streamu, tudiz jednodussi a rychlejsi.


HTH, pf

sietova komunikacia

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 7.6.2002 16:36:04

> ok. ale mam Socket.ReceiveText a to volam v ClientSocket1.OnRead
hej? a
> teraz sa tato metoda vola cyklicky tak ako dojdu nejake data takze
ma teraz
> napadlo ze musim urobit nejake narazniky na zaciatku a na konci aby
som
> vedel ze uz mam vsetko z toho bloku ktory cakam?
>

optimalni reseni zavisi na tipu prenasenych dat. Textova data se
obvykle ukoncuji CRLF (ctou se tedy do vyskytu nejake sekvence znaku).
Binarni data se opatruji hlavickou, ktera rika kolik tech dat ma
prijit.


D. Toman

Porovnani IB5.6 a FB 1.0

[*] Slavomir Skopalik <skopalik(zv)hlubocky.del(tec)cz> - 7.6.2002 16:46:44

Nema nekdo prosim vykonovy test IB5.6 proti FB1.0 ?
Zajima mne hlavne rychlost pri komplikovanych joinech.
Resim ted vykonovy problem s IB5.6, tak jestli ma smysl
ji nahradit FB. Jiny dovod neni.
S upgrade HW samozrejme take pocitam.

Slavek

ing. Slavomir Skopalik DEL a.s.
Olomoucka 355 Marianske udoli 783 75
Czech Republic
----------------------------------------------
Tel: 068 535 35 48
Mobil: 0602 795 874
Fax: 068 535 23 64
e-mail:skopalik(zv)hlubocky.del(tec)cz
http://hlubocky.del(tec)cz


Ako na maily (Synapse, JCL ...)

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 7.6.2002 18:03:22

From: "Gebauer Lukas" <gebylist(zv)mlp(tec)cz>
> Fakt, ze si Microsoft vymysli dalsi svuj 'standard', jeste preci
> neznamena, ze ostatni vyrobci jej musi ihned implementovat. Nejde o

Pokud ma byt jejich aplikace plnohotnotna v systemu, tak ano. Podobne jako
treba shell extension atd.

> Co si tim tedy chtel vlastne dokazat?

Ze idea multiplatformnich aplikaci je omyl. Porad budes bojovat s 'nesmyslnymi
standardy' na te ci one platforme.

> Vsechno funguje jen kdyz je to spravne naprogramovane. ;-) Tim bych
> se moc neohanel... jednoduchosti bych se neohanel uz vubec, zvlast
> kdyz a odeslani mailu staci jedoducha funkce 1...

V pripade, ze uzivatel ma klienta pripojeneho jen nejakym ne-SMTP protokolem
prave nestaci.

> Hele, tuhle debatu ze nevedeme poprve. Naposledy to skoncilo tak, ze
> jsme se shodli na tom, ze by bylo velmi sikovne mit programek
> 'SimpleMapiToSMTP wrapper'. Proc toto jeste nikdo nenaprogramoval,

Dobre, staci jen specifikovat vlastnosti. Samozrejme to lze odbyt implementaci
MAPISendMail a popisem nastaveni SMTP v nejakem INI filu. Na druhe strane by
treba nebylo spatne tam implementovat i prihlaseni uzivatele (rozumej overeni
podle udaju v tom konfiguracnim souboru), moznost ukladani takto 'odeslanych'
zprav do nejakeho souboru, kde se pak hromadne odeslou nebo jinak zpracuji,
jakozto i nejaky adresar (LDAP ?) a mozna i prijem posty.

> kdyz je to tak strasne jednoduche? ;-))) (treba nekdo kdo rozhrani

Low priority :-)

Petr Vones

Inno setup

[*] miro mrazik <preas_w(zv)stonline.sk> - 7.6.2002 18:25:49

Ahoj
no stiahni si pouzi inno setup extensions to ti hodne zjednodusi pracu.

> 1. Ako zabezpecit, aby sa "moj program" neinstaloval do uzivatelskeho
> adresara ale mnou urceneho adresara?
[Setup]
DefaultDirName={pf}\co_chces\

> 3. Co v pripade, ze na cielovy pocitac sa instaluje cca 1500 suborov - moj
> pripad - to mam vsetky vypisovat do scriptu?
[Files]
Source: "D:\INSTALL\BDE\*.*"; DestDir: "{tmp}"; CopyMode: alwaysoverwrite

{v adresari bde mam bdeinst.dll - je v dbeinst.cab, a program bdereg.exe
stiahnuty zo stranok inno estup extensions}
> 2. Ako zabezpecit instalaciu BDE
[Run]
Filename: "{tmp}\bdereg.exe"; Parameters: """{tmp}\BdeInst.dll"""


Miro

----- Original Message -----
From: "Fabik Milan" <kinekus(zv)nextra.sk>
>

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