Archív konference Delphi

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

dobry PING neznamena, ze TCP protokol je v poradku

[*] Kalhous <kalhous(zv)eu(tec)cz> - 12.10.2004 07:13:48

Rozumim tomu cim dal mene. Jestlize se pripojujes na LOKALNI server cili
server bezici na stejnem pocitaci na kterem spoustis iSQL tak kde se tam
vyskytne modem a pripojeni k Internetu? Pokud je server jinde, neuvadi se v
ceste "Localhost" ale jmeno serveru nebo IP adresa.
> jsem vsak pripojeny k DSL modemu, pres ktery se
> pripojuji k internetu TCP protokolem a spojeni je funkcni, TCP ma pevnou
> IP,
> s pozdravem Votava
>> >>'localhost:c:\delphi....', pingem jsem overil, ze je nainstalovan


Synapse

[*] Ing. Keder Vladimir <vkeder(zv)iol.sk> - 11.10.2004 23:49:19

Unika mi podstatna vec a tou je CID. Mam HTML dokument "bug.htm". Pri
ukladani MS Word vytvoril adresar "\bug.files\" a do neho vlozil obrazok
"image001.gif" a "filelist.xml". V HTML dokumente sa na xml subor odkazuje

<link rel=File-List href="bug.files/filelist.xml">

dalej sa na obrazok odvolava

src="bug.files/image001.gif"

filelist.xml vyzera takto

- <xml xmlns:o="urn:schemas-microsoft-com:office:office">
<o:MainFile HRef="../bug.htm" />
<o:File HRef="image001.gif" />
<o:File HRef="filelist.xml" />
</xml>

Nepochopil som kde najdem CID. Poslat to uz nie je problem. Dakujem

Ing. Keder Vladimir


> Z toho HTML dokumetu se musis nejak na ten obrazek odkazovat. Dela se to
> pres CID, a tak ten obrazek musi byt vlozen s odpovidajicim CIDem. K tomu
> slouzi funkce AddPartHTMLBinary nebo AddPartHTMLBinaryFromFile.

Jak modifikovat Open/Save Dialog

[*] L?ikola Petr <developer(zv)efg(tec)cz> - 11.10.2004 22:09:05

Diky, to je presne ono!
Petr Sikola

>
> Ahoj.
> Ja to delal v OnShow :
>
> procedure TForm1.OpenDialog1Show(Sender: TObject);
> var
> Wnd: HWND;
> Pozice: TRect;
>
> Ludek


Pristup k sdilene slozce pod cizim uctem

[*] Ludek ZITA <konference(zv)sales(tec)cz> - 11.10.2004 19:22:49

Zdravim,
Mam tento problem.
Sit se Serverem W2000 server Active directory a stanice W2000 Prof.
Na serveru existuji ruzne sdilene slozky s ruznymi pristupovymi pravy
pro ruzne uzivatele.
Zridim sdilenou slozku sss kam ma pristup pro cteni a zapis jen uzivatel
xxx s heslem hhh.
Pak potrebuji aby JINY uzivatel spustil muj program ktery si otevre
slozku sss pomoci jmena a hesla xxx a hhh a zapise tam soubor. Pak hned
zavre pristup ke slozce.
Pouzivam toto :

function Connect(const Path, UserName, Password: string): boolean;
var
NetRes: TNetResource;
dw: DWORD;
begin
ZeroMemory((zv)NetRes, sizeof(NetRes));
NetRes.dwType := RESOURCETYPE_ANY;
NetRes.dwDisplayType := RESOURCEDISPLAYTYPE_DOMAIN;
NetRes.lpLocalName := PChar('');
NetRes.lpRemoteName := PChar(FileUtil.RemoveBackSlash(Path));
NetRes.lpProvider := nil;
dw := WNetAddConnection2(NetRes, PChar(Password), PChar(UserName), 0);
if (dw <> NO_ERROR) then
begin
Result := False;
exit;
end
else
Result := True;
end;

function DisConnect(const Path: string): boolean;
var
dw: DWORD;
begin
dw := WNetCancelConnection(PChar(FileUtil.RemoveBackSlash(Path)),
True);
Result := (dw = NO_ERROR);
end;

Vsechno funguje naprosto squele do doby nez se uzivatel rozhodne otevrit
nejaky soubor v jine sdilene slozce na serveru (pochopitelne uz noramlne
se svymi pravy). Od te chvile az do resetu pocitace se do slozky sss s
jmenem a heslem xxx a hhh nedostanu. Hlasi mi to jakysi konflikt v
povereni ci co (ERROR_SESSION_CREDENTIAL_CONFLICT = 1219).

Jak z toho ven ?

Predem diky.

Ludek

P.S. Prihlaseny uzivatel pochopitelne do slozky sss nema pristupova
prava


Jak modifikovat Open/Save Dialog

[*] Ludek ZITA <konference(zv)sales(tec)cz> - 11.10.2004 19:42:54

On Behalf Of L?ikola Petr

> no ja jsem myslel, kdyby to slo i nejak jinak, melo by to ve
> vysledku vypadat nejak jako opendialog v notepadu v W2000
> nebo ve WXP, akorat s jinyma polozkama v tom druhem combu.
> Jeste dodam ze je to v D5.

Ahoj.
Ja to delal v OnShow :

procedure TForm1.OpenDialog1Show(Sender: TObject);
var
Wnd: HWND;
Pozice: TRect;
begin
Wnd := GetWindowLong((Sender as TCommonDialog).Handle,
GWL_HWNDPARENT);
GetWindowRect(Wnd, Pozice);
SetWindowPos(Wnd, 0, 0, 0, Pozice.Right - Pozice.Left, Pozice.Bottom -
Pozice.Top + 30, SWP_NOZORDER or SWP_NOMOVE);

if FPanel = nil then
FPanel := TPanel.Create((Sender as TCommonDialog));
with FPanel do
begin
Name := 'DialogPanel';
Caption := '';
SetBounds(8, Pozice.Bottom - Pozice.Top - 26, Pozice.Right -
Pozice.Left -
24, 30);

BevelOuter := bvLowered;
//Color := 200;
ParentWindow := Wnd;
end;

if FLabel1 = nil then
FLabel1 := TLabel.Create(OpenDialog1);
with FLabel1 do
begin
Parent := FPanel;
Left := (FPanel.Width - 385) div 2;
Top := 8;
Caption := 'Kod:';
end;

if FLanguage = nil then
FLanguage := TComboBox.Create(OpenDialog1);
with FLanguage do
begin
Name := 'Language';
Parent := FPanel;
Width := 135;
Left := FLabel1.Left + FLabel1.Width + 2;
Top := 4;
Style := csDropDownList;
OnChange := BoxChange;
Items.Add('bez konverze (Off)');
Items.Add('Windows CP1250 (Win)');
Items.Add('Latin 2 CP 852 (Lat)');
Items.Add('Kamenicky CP867 (Kam)');
Items.Add('ISO 8859-2 (ISO)');
if (DialogMode = 2) then
Items.Add('ASCII (Asc)')
else
Items.Add('----------------------------');
if (DialogMode = 1) then
Items.Add('Automaticky');
ItemIndex := TMPLang;
end;

if FLabel2 = nil then
FLabel2 := TLabel.Create(OpenDialog1);
with FLabel2 do
begin
Parent := FPanel;
Left := FLanguage.Left + FLanguage.Width + 6;
Top := 8;
Caption := 'CR/LF:';
end;

if FCRLF = nil then
FCRLF := TComboBox.Create(OpenDialog1);
with FCRLF do
begin
Parent := FPanel;
Name := 'CRLF';
Width := 92;
Left := FLabel2.Left + FLabel2.Width + 2;
Top := 4;
OnChange := BoxChange;
Style := csDropDownList;
Items.Add('bez konverze (Off)');
Items.Add('CRLF (Dos)');
Items.Add('LF (Unix)');
if (DialogMode = 1) then
Items.Add('Automaticky');
ItemIndex := TMPCRLF;

if FOEMbox = nil then
FOEMbox := TCheckBox.Create(OpenDialog1);
with FOEMbox do
begin
Parent := FPanel;
Name := 'OEM';
Left := FCRLF.Left + FCRLF.Width + 6;
Top := 7;
Caption := 'Zobrazit OEM';
Checked := False;
Alignment := taLeftJustify;
Width := 85;
if (DialogMode = 2) then
Enabled := False
else
Enabled := True;
end;

end;

end;

Ludek


Synapse

[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 11.10.2004 19:34:51

> Mam vytvoreny html dokument v ktorom mam vlozeny obrazok. Text, formatovanie
> sa prenesie spravne, avsak ten vlozeny obrazok sa v prijatom maily nezobrazi
> ? Preco ?

Z toho HTML dokumetu se musis nejak na ten obrazek odkazovat. Dela se to
pres CID, a tak ten obrazek musi byt vlozen s odpovidajicim CIDem. K tomu
slouzi funkce AddPartHTMLBinary nebo AddPartHTMLBinaryFromFile.
--
Lukas Gebauer.

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

Jak modifikovat Open/Save Dialog

[*] L?ikola Petr <developer(zv)efg(tec)cz> - 11.10.2004 19:30:50

no ja jsem myslel, kdyby to slo i nejak jinak, melo by to ve vysledku vypadat nejak jako opendialog v notepadu v W2000 nebo ve WXP, akorat s jinyma polozkama v tom druhem combu.
Jeste dodam ze je to v D5.

Petr Sikola


> Zdravim, radeji bych vytvoril ten dialog novy nez rozsirovat stavajici....
> Nenapada me nic jineho nez tam dat hook - viz struktura.

> {---->}
> lCustData: LPARAM; // Custom data to be passed to hook.
> lpfnHook: function(Wnd: HWND; Msg: UINT; wParam: WPARAM;
> lParam: LPARAM): UINT stdcall; // Hook.
> {<----}

Synapse

[*] Ing. Keder Vladimir <vkeder(zv)iol.sk> - 11.10.2004 19:00:47

Mam vytvoreny html dokument v ktorom mam vlozeny obrazok. Text, formatovanie
sa prenesie spravne, avsak ten vlozeny obrazok sa v prijatom maily nezobrazi
? Preco ?

Ing. Keder Vladimir

> vkladas obrazek nebo HTML ??
>
>> MIME.AddPartHTMLFromFile(TextFromFile_Path, Part);

Jak modifikovat Open/Save Dialog

[*] Pavel Lang <langpatech(zv)seznam(tec)cz> - 11.10.2004 17:48:37

Zdravim, radeji bych vytvoril ten dialog novy nez rozsirovat stavajici...
Nenapada me nic jineho nez tam dat hook - viz struktura.
Problem je, ze o tento dialog se stara samotny pan Windows funkce
GetOpenFileNameA z comdlg32.dll, takze neco jako modifikovat resource asi
nema moc smysl (kuriozity v anglickych Win)
Jestli nekdo napise takovy kod, budu sam taky rad, takove patlani se v API
je na me moc :o)
Ale pozor! Na starsich verzich Windows se ukazuje puvodni stary dialog!!!
Ten 2000 style se nijak nekompiluje.

Resource lze z comdlg32.dll dostat napriklad Resource Hackerem (staci do
googlu reshack) nebo i tooly v Delphi (ResourceExplorer)

Unit JvWinDialogs;
...
type
TOpenFileNameEx = packed record
lStructSize: DWORD; // Size of the structure in bytes.
hWndOwner: HWND; // Handle that is the parent of the
dialog.
hInstance: HINST; // Application instance handle.
lpstrFilter: PAnsiChar; // String containing filter information.
lpstrCustomFilter: PAnsiChar; // Will hold the filter chosen by the
user.
nMaxCustFilter: DWORD; // Size of lpstrCustomFilter, in bytes.
nFilterIndex: DWORD; // Index of the filter to be shown.
lpstrFile: PAnsiChar; // File name to start with (and
retrieve).
nMaxFile: DWORD; // Size of lpstrFile, in bytes.
lpstrFileTitle: PAnsiChar; // File name without path will be
returned.
nMaxFileTitle: DWORD; // Size of lpstrFileTitle, in bytes.
lpstrInitialDir: PAnsiChar; // Starting directory.
lpstrTitle: PAnsiChar; // Title of the open dialog.
Flags: DWORD; // Controls user selection Options.
nFileOffset: Word; // Offset of file name in
filepath=lpstrFile.
nFileExtension: Word; // Offset of extension in
filepath=lpstrFile.
lpstrDefExt: PAnsiChar; // Default extension if no extension
typed.
{---->}
lCustData: LPARAM; // Custom data to be passed to hook.
lpfnHook: function(Wnd: HWND; Msg: UINT; wParam: WPARAM;
lParam: LPARAM): UINT stdcall; // Hook.
{<----}
lpTemplateName: PAnsiChar; // Template dialog, if applicable.
// Extended structure starts here.
pvReserved: Pointer; // Reserved, use nil.
dwReserved: DWORD; // Reserved, use 0.
FlagsEx: DWORD; // Extended Flags.
end;

----- Original Message -----
From: "Ing. Petr Sikola" <developer(zv)efg(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, October 11, 2004 4:36 PM
Subject: Jak modifikovat Open/Save Dialog


> Zdravim, ve sve aplikaci pouzivam JvOpenDialog2000 a JvSaveDialog2000.
> Potreboval bych na tento dialog "pridat" jeden label a jeden combobox s
> vlastnima items a jeho stav nastavit pred otevrenim a opet precist po
> uzavreni dialogu (po execute). Udalost pri zmene itemindex pri
> zobrazenem dialogu nepotrebuji.
>
> Potreboval bych to nejjsednoduseji.
> Dekuji na nakopnuti spravnym smerem.
>
> S pozdravem
>
> Ing. Petr Sikola
> EFG CZ spol. s r.o.
> tel.: 481 319 324
> sikola(zv)efg(tec)cz
> www.efg(tec)cz
> www.aktion(tec)cz
>
>
>
>

Jak modifikovat Open/Save Dialog

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

Zdravim, ve sve aplikaci pouzivam JvOpenDialog2000 a JvSaveDialog2000.
Potreboval bych na tento dialog "pridat" jeden label a jeden combobox s
vlastnima items a jeho stav nastavit pred otevrenim a opet precist po
uzavreni dialogu (po execute). Udalost pri zmene itemindex pri
zobrazenem dialogu nepotrebuji.

Potreboval bych to nejjsednoduseji.
Dekuji na nakopnuti spravnym smerem.

S pozdravem

Ing. Petr Sikola
EFG CZ spol. s r.o.
tel.: 481 319 324
sikola(zv)efg(tec)cz
www.efg(tec)cz
www.aktion(tec)cz

Hodnota DBCheckobox

[*] mato <mato.tino(zv)inmail.sk> - 11.10.2004 16:26:31

prave ci nie je nejaky parameter ktorym sa nastavi ak nie je ziaden zaznam v
detail tabulke ze to bude ukazovat nezaskrtnute. Nic som nenasiel v objekt
insp. V detail tabulke mam iba zaznami s true.

Hodnota DBCheckobox

[*] Karel Halamasek <compro(zv)vol(tec)cz> - 11.10.2004 16:14:29

Hodnotu musis urcit bud pri vytvareni databaze a a nebo to nastavit jako
predvoleny parametr. Kdyz je okenko v CheckBoxu sedive, znamena to, ze
pole nema zadnou hodnotu, nezaskrtle bude, kdyz je hodnota False...

Karel Halamasek

> zdravim, mam tabulku master a detail. V detail su iba 2 polozky, jedna na
> spojenie s master a druha nabuda hodotu boolean. Pritom v detail su iba
> zaznami s Boolean, resp. prida sa zaznam iba ak vo formulari sa nstavi
> ceckbox na true. problem je vsak ze ceckbox ukazuje zatrhnutie / ale
> netvyraznene-sive / aj vtedy ak ziadny zaznam v detail nieje. Da sa
> nejako
> nastavit aby ak nema zaznam ukazoval prazdny stvorcek ?
>
> dakujem
>

Nemohu pridat me framy do palety komponent (Templa

[*] Jan Rizek <jan_rizek(zv)centrum(tec)cz> - 11.10.2004 16:08:29

Kdyz kliknu pravym tlacitkem mysi na muj frame, tak se tam neobjevi volba "Add To Component Palette" - netusite nekdo, kam se to mohlo ztratit? Respektive jak jinak to pridat do palety komponent?

Zmizelo mi to po instalaci CodeRush a ModelMaker-u - nestalo se nekomu neco podobneho?

D6, CodeRush, ModelMaker Explorer, ModelMaker, GExperts, WinXP

Hodnota DBCheckobox

[*] mato <mato.tino(zv)inmail.sk> - 11.10.2004 15:50:27

zdravim, mam tabulku master a detail. V detail su iba 2 polozky, jedna na
spojenie s master a druha nabuda hodotu boolean. Pritom v detail su iba
zaznami s Boolean, resp. prida sa zaznam iba ak vo formulari sa nstavi
ceckbox na true. problem je vsak ze ceckbox ukazuje zatrhnutie / ale
netvyraznene-sive / aj vtedy ak ziadny zaznam v detail nieje. Da sa nejako
nastavit aby ak nema zaznam ukazoval prazdny stvorcek ?

dakujem

D6 - Hlavicka metody (proc, fce)

[*] Jan Sebelik <honza(zv)haes(tec)cz> - 11.10.2004 14:12:20

> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Jan Rizek
> Sent: Monday, October 11, 2004 11:46 AM
> neco opravuji v kodu a strasne rad bych videl v jake metode
> zrovna jsem. Napriklad Visual Basic tuto informaci zobrazoval. Je
> mozne v Delphi (6.0) nekde videt hlavicku metody nebo neumi to
> nejaky plugin, expert?

Pokud programujeme pekne objektove a modularne, melo by se nam podarit dosahnout toho, aby se kod metody (az na vyjimky) vesel ma jednu obrazovku.

Doporucuji. Pak s orientaci v programu neni problem...

Honza
====================================
= RNDr. Jan Sebelik - HAES
= Skolici a konzultacni stredisko pro vyvoj SW
= www.haes(tec)cz
= Vojtiskova 321
= 507 81 Lazne Belohrad
= tel. 493 792 931 (mobil 776 347 735)
====================================

dobry PING neznamena, ze TCP protokol je v poradku

[*] votavaSW <mail(zv)votavasw(tec)com> - 11.10.2004 14:24:21

ano, s PINGem mate pravdu, jsem vsak pripojeny k DSL modemu, pres ktery se
pripojuji k internetu TCP protokolem a spojeni je funkcni, TCP ma pevnou IP,
s pozdravem Votava
> >
> >
> >>'localhost:c:\delphi....', pingem jsem overil, ze je nainstalovan
protokol
> >>TCP a funkcni.
> >>
> >>
> >OT: ping nema krome IP adresovani s protokolem TCP/IP moc spolecneho
protoze
> >nepouziva protokol TCP ale jiny z rodinky IP tusim ze ICMP. Ale ze
nepouziva
> >TCP, to vim jiste.
> >
> Je to tak, ICMP protokol je integrovan s IP protokolem (nikoliv s TCP)
> diky takzvane ECHO funkci, kterou prave vyuziva PING lze poslat pakety
> na nejakeho prijemce a zpet. To, ze jde PING jeste neznamena, ze je TCP
> protokol vporadku. Jenom pro ilustraci pojmu (struktura je vybrana z
> obecneho popisu IP protokolu).
>
> http://www.freesoft.org/CIE/RFC/791/7.htm
>
> The following diagram illustrates the place of the internet protocol in
> the protocol hierarchy:
>
> +------+ +-----+ +-----+ +-----+
> |Telnet| | FTP | | TFTP| ... | ... |
> +------+ +-----+ +-----+ +-----+
> | | | |
> +-----+ +-----+ +-----+
> | TCP | | UDP | ... | ... |
> +-----+ +-----+ +-----+
> | | |
> +--------------------------+----+
> | Internet Protocol & ICMP |
> +--------------------------+----+
> |
> +---------------------------+
> | Local Network Protocol |
> +---------------------------+
>
> Protocol Relationships
>
> Figure 1.
>
>
> Marek.
>
>

OT: dobry PING neznamena, ze TCP protokol je v por

[*] Marek Spisak <spishark(zv)post(tec)cz> - 11.10.2004 13:36:18

>
>
>>'localhost:c:\delphi....', pingem jsem overil, ze je nainstalovan protokol
>>TCP a funkcni.
>>
>>
>OT: ping nema krome IP adresovani s protokolem TCP/IP moc spolecneho protoze
>nepouziva protokol TCP ale jiny z rodinky IP tusim ze ICMP. Ale ze nepouziva
>TCP, to vim jiste.
>
Je to tak, ICMP protokol je integrovan s IP protokolem (nikoliv s TCP)
diky takzvane ECHO funkci, kterou prave vyuziva PING lze poslat pakety
na nejakeho prijemce a zpet. To, ze jde PING jeste neznamena, ze je TCP
protokol vporadku. Jenom pro ilustraci pojmu (struktura je vybrana z
obecneho popisu IP protokolu).

http://www.freesoft.org/CIE/RFC/791/7.htm

The following diagram illustrates the place of the internet protocol in
the protocol hierarchy:


+------+ +-----+ +-----+ +-----+
|Telnet| | FTP | | TFTP| ... | ... |
+------+ +-----+ +-----+ +-----+
| | | |
+-----+ +-----+ +-----+
| TCP | | UDP | ... | ... |
+-----+ +-----+ +-----+
| | |
+--------------------------+----+
| Internet Protocol & ICMP |
+--------------------------+----+
|
+---------------------------+
| Local Network Protocol |
+---------------------------+

Protocol Relationships

Figure 1.
Marek.

Nastroj pro aktualizaci SQL databazi?

[*] Petr Brant <brant(zv)dcomm(tec)cz> - 11.10.2004 13:22:16

Aha, pardon, zapomnel jsem napsat, ze se jedna o Firebird 1.5

PB


> Pro MS-SQL pouzivam k plne spokojenosti RED GATE SQL Compare.
> Pavel
>
>
> > From: Petr Brant [mailto:brant(zv)dcomm(tec)cz <mailto:brant(zv)dcomm(tec)cz> ]
> > Ahoj vespolek, zacinam prepisovat nas program pro SQL
> > databazi a zajima me,
> > jaky pouzit nastroj pro aktualizaci struktur tabulek. Cas od
> > casu v nejake
> > tabulce pribyde nejake pole, tak aby se to dalo nejak jednoduse
> > aktualizovat.
>

Nastroj pro aktualizaci SQL databazi?

[*] Jan Sebelik <honza(zv)haes(tec)cz> - 11.10.2004 13:30:17

> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Petr Brant
> Sent: Monday, October 11, 2004 12:12 PM
>
> jaky pouzit nastroj pro aktualizaci struktur tabulek. Cas od casu v nejake
> tabulce pribyde nejake pole, tak aby se to dalo nejak jednoduse
> aktualizovat.

At uz pouzijes jakykoli nastroj pro fyzickou aktualizaci tabulek (ja bych to radsi delal rucne, nejaky ten skriptik), rozhodne bych doporucoval radnou datovou analyzu, datove modelovani, dokumentaci, historii, ...

CASE Studio 2 je "skorozadarmo" (www.casestudio.com).
Umi verze, porovnani verzi, porovnani databazi, dokumetace (RTF+HTML), reverse engineering, ...

viz tez nase kurzy (www.haes(tec)cz).

Honza
====================================
= RNDr. Jan Sebelik - HAES
= Skolici a konzultacni stredisko pro vyvoj SW
= www.haes(tec)cz
= Vojtiskova 321
= 507 81 Lazne Belohrad
= tel. 493 792 931 (mobil 776 347 735)
====================================

Nastroj pro aktualizaci SQL databazi?

[*] Lstiburek Pavel <lstiburek(zv)ceb(tec)cz> - 11.10.2004 12:44:11

Pro MS-SQL pouzivam k plne spokojenosti RED GATE SQL Compare.
Pavel


> From: Petr Brant [mailto:brant(zv)dcomm(tec)cz]
> Ahoj vespolek, zacinam prepisovat nas program pro SQL
> databazi a zajima me,
> jaky pouzit nastroj pro aktualizaci struktur tabulek. Cas od
> casu v nejake
> tabulce pribyde nejake pole, tak aby se to dalo nejak jednoduse
> aktualizovat.

nemohu vytvorit databazi ve FB

[*] Kalhous <kalhous(zv)eu(tec)cz> - 11.10.2004 12:42:11

> 'localhost:c:\delphi....', pingem jsem overil, ze je nainstalovan protokol
> TCP a funkcni.
OT: ping nema krome IP adresovani s protokolem TCP/IP moc spolecneho protoze
nepouziva protokol TCP ale jiny z rodinky IP tusim ze ICMP. Ale ze nepouziva
TCP, to vim jiste.

D6 - Hlavicka metody (proc, fce)

[*] Jan Rizek <jan_rizek(zv)centrum(tec)cz> - 11.10.2004 11:46:06

Zdravim,

neco opravuji v kodu a strasne rad bych videl v jake metode zrovna jsem. Napriklad Visual Basic tuto informaci zobrazoval. Je mozne v Delphi (6.0) nekde videt hlavicku metody nebo neumi to nejaky plugin, expert?


Honza

Nastroj pro aktualizaci SQL databazi?

[*] Petr Brant <brant(zv)dcomm(tec)cz> - 11.10.2004 12:12:09

Ahoj vespolek, zacinam prepisovat nas program pro SQL databazi a zajima me,
jaky pouzit nastroj pro aktualizaci struktur tabulek. Cas od casu v nejake
tabulce pribyde nejake pole, tak aby se to dalo nejak jednoduse
aktualizovat.

Zdravim vsechny

RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
http://brant.wz(tec)cz

Tiskarna Star SP200

[*] Pavel GRATZER <pavelg(zv)stbk.mcs(tec)cz> - 11.10.2004 11:46:07

Delal "Pokladni system" pro Dunkun Donuts, kde tyto tiskarny byly pouzity.
Tisklo se na nich pomoci TPrinter jako na tiskarny s papirem A4, akorat se
musi dodrzet sirka papiru, tzn. 76 mm.

Pokud je zajem o dalsi informace ozvete se na email pavelg(zv)stbk.mcs(tec)cz nebo
na tel. 608 259 251

Pavel GRATZER


> Panove,
> dostala se mi do rukou tiskarna Star SP200 - jehlickova tiskarna pro tisk
> pokladnich uctenek. Potrebuji napsat jednoduchy soft pro tisk uctenek.
> Nemate nekdo nejake zkusenosti jak na to. Jaky ovladac, jak na znakovy
> tisk, jaka komponenta pro tvorbu sestav, atd.
>
> Roman


Tiskarna Star SP200

[*] Jaroslav Uher <jarek(zv)iuher(tec)cz> - 11.10.2004 12:00:08

On 11 Oct 2004 at 8:41, rnetusil(zv)vez.pce.justice(tec)cz wrote:

> dostala se mi do rukou tiskarna Star SP200 - jehlickova tiskarna pro
> tisk pokladnich uctenek. Potrebuji napsat jednoduchy soft pro tisk
> uctenek. Nemate nekdo nejake zkusenosti jak na to. Jaky ovladac, jak
> na znakovy tisk, jaka komponenta pro tvorbu sestav, atd.

nejlepe zadny ovladac a tisk primo na LPT, alespon u brachy v
prodejne jsem to takto vyresil.

Na soukromy mail mohu poslat ...

Jarek Uher

D6 - Hlavicka metody (proc, fce)

[*] Jan Rizek <jan_rizek(zv)centrum(tec)cz> - 11.10.2004 11:48:07

Hmm, umi to CodeRush - proc ja to vlastne do ty konference pisu.. :-)

----- Original Message -----
From: Jan Rizek
To: delphi-l(zv)clexpert(tec)cz
Sent: Monday, October 11, 2004 11:44 AM
Subject: D6 - Hlavicka metody (proc, fce) Zdravim,

neco opravuji v kodu a strasne rad bych videl v jake metode zrovna jsem. Napriklad Visual Basic tuto informaci zobrazoval. Je mozne v Delphi (6.0) nekde videt hlavicku metody nebo neumi to nejaky plugin, expert?


Honza

nemohu vytvorit databazi ve FB

[*] votavaSW <mail(zv)votavasw(tec)com> - 11.10.2004 10:36:02


dobry den,
IP namisto localhost jsem take zkousel, vypada to, jako by byl zapnuty
firewall, ale neni.
Votava


> Zdravim,
>
> ja osobne jsem mel nejake velmi podobne problemy s classic serverem,
> pouzivam superserver a vse je ok. Misto 'localhost' bych take zkusil zadat
> IP tj. 127.0.0.1.
>
> A.B.
>
> ----- Original Message -----
> From: "votavaSW" <mail(zv)votavasw.com>
> To: <delphi-l(zv)clexpert(tec)cz>
> Sent: Sunday, October 10, 2004 3:40 PM
> Subject: nemohu vytvorit databazi ve FB
>
>
> > dobry den,
> > nainstaloval jsem FB Classic server a kdyz zkousim pomoci isql, vytvorit
> > databazi, tak skoncim na chybe -902, "unable to complete network request
> > to
> > host "localhost"",
> > prikaz v isql: create database 'localhost:c:\delphi\fb\test.fdb'
page_size
> > 8192 user 'SYSDBA' password 'masterkey' default character set ISO8859_2;
> >
> > ping na localhost funguje, firewall je vypnuty a v netstat port 3050
> > nasloucha,
> > nevite kde by mohl byt problem?
> > D5, WinXPPro CZ, FB Classic 1.5.0.3481
> >
> > s pozdravem Votava
> >
> >
> >
>
>
>

Synapse, odeslani mailu

[*] Pave Gazda <pavel_gazda(zv)datasw(tec)cz> - 11.10.2004 10:01:59

Uz jsem na to prisel.

>> Problem je ted jiny: Outlook to odesle a zprava take dojde,
>> ale Synapse (muj program) zpravu odesle ale ta nedojde.
>> ( odeslani na jinou adresu stejnym postupem funguje ).
>
> A to i v pripade, ze vsechny kroky odesilani neskoncily chybou? V
> takovem pripade se pak tezko usuzuje pricina.
> Co rika log na postovnim serveru?

Problem byl v zadani udaje pro SMTPsend.MailFrom.
Skoda, ze SMTP server v takovem pripade nevratil chybu a navic
nekdy zpravu dorucil.

Pavel

nemohu vytvorit databazi ve FB

[*] Andreas Bednarek <bednarek(zv)digitus(tec)cz> - 11.10.2004 10:05:59

Zdravim,

ja osobne jsem mel nejake velmi podobne problemy s classic serverem,
pouzivam superserver a vse je ok. Misto 'localhost' bych take zkusil zadat
IP tj. 127.0.0.1.

A.B.


----- Original Message -----
From: "votavaSW" <mail(zv)votavasw.com>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Sunday, October 10, 2004 3:40 PM
Subject: nemohu vytvorit databazi ve FB


> dobry den,
> nainstaloval jsem FB Classic server a kdyz zkousim pomoci isql, vytvorit
> databazi, tak skoncim na chybe -902, "unable to complete network request
> to
> host "localhost"",
> prikaz v isql: create database 'localhost:c:\delphi\fb\test.fdb' page_size
> 8192 user 'SYSDBA' password 'masterkey' default character set ISO8859_2;
>
> ping na localhost funguje, firewall je vypnuty a v netstat port 3050
> nasloucha,
> nevite kde by mohl byt problem?
> D5, WinXPPro CZ, FB Classic 1.5.0.3481
>
> s pozdravem Votava
>
>
>

Default tiskarna

[*] Vlastimil Zdenek <delphi(zv)gestore(tec)cz> - 11.10.2004 09:57:59

Zdravim,
jak zjistim index default tiskarny?

Tiskarna := Printers.Printer.Printers.Strings[default_tiskarna];

Diky moc

Vlassa
D5Ent

nemohu vytvorit databazi ve FB

[*] votavaSW <mail(zv)votavasw(tec)com> - 11.10.2004 09:15:56

Classic server pro Win nepodporuje lokalni protokol, tzn., ze chci-li se
pripojit ze stroje, na kterem je instalovan server, musim pouzit
'localhost:c:\delphi....', pingem jsem overil, ze je nainstalovan protokol
TCP a funkcni.> Na prvni pokus jsem si to neprecetl cele a ted jsem vsecekzmaten. Takoveto
> obskurni pokusy jsem nikdy nedelal ale mam pocit ze je-li server
instalovan
> jako lokalni tak zadne sluzby "ven" neposkytuje cili pokouset se z jineho
> pocitace k tomuto serveru pripojit nema moc velkou sanci na uspech. Ping v
> podstate jen testuje spojeni, sluzba SQL serveru je mu celkem fuk. Ale
> mozna se mylim. Kdyz nejde connect na vzdaleny server i kdyz je jinak
> vsechno v poradku tak nekdy pomuze misto jmena serveru zadat IP adresu. A
> jmeno vzdaleneho serveru by asi nemelo byt Localhost. Podle toho naopak
> klient pozna, ze se ma pripojit k mistnimu serveru.

>cesta musi byt vcetne nazvu serveru


> Ahoj.
> Zkusil bych cestu umisteni databaze bez "localhost:", tedy:
> create database 'c:\delphi\fb\test.fdb' page_size 8192 user 'SYSDBA'
> password 'masterkey' default character set ISO8859_2;
> S pozdravem Mirek Vopalecky, D7 W2000
>
>server i fbguard bezi
>
>Bych si tipnul ze neni nastartovany FB server.
>
>> nainstaloval jsem FB Classic server a kdyz zkousim pomoci isql, vytvorit
> databazi, tak skoncim na chybe -902, "unable to complete network request
to
> host "localhost"", prikaz v isql: create database
> 'localhost:c:\delphi\fb\test.fdb' page_size 8192 user 'SYSDBA' password
> 'masterkey' default character set ISO8859_2;
>ping na localhost funguje, firewall je vypnuty a v netstat port 3050
>nasloucha,
>nevite kde by mohl byt problem?
>D5, WinXPPro CZ, FB Classic 1.5.0.3481

>s pozdravem Votava


Tiskarna Star SP200

[*] rnetusil(zv)vez.pce.justice(tec)cz - 11.10.2004 08:41:53

Panove,
dostala se mi do rukou tiskarna Star SP200 - jehlickova tiskarna pro tisk pokladnich uctenek. Potrebuji napsat jednoduchy soft pro tisk uctenek. Nemate nekdo nejake zkusenosti jak na to. Jaky ovladac, jak na znakovy tisk, jaka komponenta pro tvorbu sestav, atd.

Roman

Prava sdileneho adresare

[*] Pavel Malinsky <malinsky(zv)pmcom(tec)cz> - 11.10.2004 08:37:52

Ahoj,

jak programove mohu u sdileneho adresare provest
nastaveni prav? Napriklad odebrat stadardni sdileni
pro uzivatele Everyone nastavit tam MujUzivatel(existuje
jako uzivatelsky ucet) a nastavit mu Change ci FullControl.

Env: D7, WinXP

S pozdravem a dikem
=====================================
> Pavel Malinsky; malinsky(zv)pmcom(tec)cz <
=====================================
> GSM: 602 652 203 | ICQ: 322015967 <
=====================================

XP SP2 a instalace MSDE

[*] Jaroslav Nadhera <nadhera(zv)csh(tec)cz> - 8.10.2004 12:33:12

Nesetkal jste se nekdo s problemy pri instalaci MSDE na Win XP SP2? nejak se
nam nedari, ac na XP nikdy problemy nebyly. Ze by to byl ten SP2?

Jaroslav Nadhera

CSH spol. s r.o.
Velflikova 10, 160 00 Praha 6
tel.: 224 312 344-5
fax: 235 522 892
e-mail: nadhera(zv)csh(tec)cz WWW: http://www.csh(tec)cz
pobocka Ostrava:
Nedbalova 14, 701 00 Ostrava
tel: 596 635 687

XP SP2 a instalace MSDE

[*] delphi(zv)hon(tec)cz - 8.10.2004 13:01:16

Setkal a uz jsem to tu psal.

WinXP + SP2 a nasleduje:

* client tools z originalnihoCD MS SQL Standard (i Enterprise) = NELZE
* MSDE z www.microsoft.com = NELZE

Reseni. Nainstalovat WinXP, MSDE a SP2.

Jenze i tak mohou byt problemy (ktere nenastavaji pravidelne a ja stejne
nevim,
kam je hlasit). U nas ve firme jsem zacal instalovat SP2 na prvnich pet
pocitacu. Vsichni hlasili problemy stejneho razu (DCOM aplikace nechodi,
Skype neskypuje). Po odinstalaci SP2 vse v poradku. No a pak se v tom
vyznejte.

Martin

P.S. Na news.microsoft.com microsoft.public.cs.desktop jsem se snazil
poptat se, co kdo uz ma za problemy. Kazdy pise jen o tech, ktere
zverejnuje Microsoft (coz je tak mozna 1/10 vsech problemu). A jestli
si nekdo mysli, ze jsem takovy trotl, ze neumim vypnout firewall (i s
takovym
nazorem jsem se uz setkal) tak mohu rici ze tohle vyjmecne zvladnu.

----- Original Message -----

> Nesetkal jste se nekdo s problemy pri instalaci MSDE na Win XP SP2? nejak
> se
> nam nedari, ac na XP nikdy problemy nebyly. Ze by to byl ten SP2?
>
> Jaroslav Nadhera


XP SP2 a instalace MSDE

[*] Pavel Zichovsky <zichovsky(zv)trul(tec)cz> - 8.10.2004 13:01:15

Zdravim,

> -----Puvodni zprava-----
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] za uzivatele Jaroslav Nadhera
> Predmet: XP SP2 a instalace MSDE
>
> Nesetkal jste se nekdo s problemy pri instalaci MSDE na Win
> XP SP2? nejak se nam nedari, ac na XP nikdy problemy nebyly.
> Ze by to byl ten SP2?

Instaloval jsem MSDE jiz na nekolik pocitacu s SP2 a to jak samostatne, tak
"embeded" v ramci KB ProfiBanky, a bez problemu.
Hlasi vam to nejakou chybu (cislo)? Nebo jine? Nebo se to jen "zasekne"?

S pozdravem
Pavel Zichovsky (zichovsky(zv)trul(tec)cz)

MDB a heslo !

[*] Winsoft <winsoft(zv)netkosice.sk> - 8.10.2004 13:31:18

> > Ale zaujimalo, by ma, ci uz tu niekto skusal ziskat heslo z MDW. Ja
> > som nasiel program, ktory by to mal vediet (demo verzia na 3 znaky),
> > ale nefungoval mi. Zaujimalo by ma, co je mozne zistit admin heslo
> > Accessu aj inak ako hadanim.
>
> Ano, zkousel :) Tak mi posli e-mailem nejaky MDW a ja ti to schvalne
> prubnu :)

poslal som MDW a mam to uz aj prakticky potvrdene: admin heslo
nie je problem zistit, cize ta ochrana MDW nestoji za nic. Takze ani
druha uroven ochrany v Accesse nie je bezpecna. Dakujem Petrovi
Zahradnikovi za opravu mojej nespravnej informacie a overenie
tohto bezpecnostneho problemu.

Erik


Zavirani childoken v MDI aplikaci

[*] Ing. Igor Vodicka <vodicka(zv)sagit(tec)cz> - 8.10.2004 13:01:16

Ahoj do kofery!

V MDI aplikaci mam funkci, ktera zavira vsechna otevrena childokna. Pouzivam
nasledujici konstrukci:

for I := MDIChildCount-1 downto 0 do
MDIChildren[I].Close;

Childokno ma nadefinovanou udalost OnClose, kde provadim nasledujici test:

if MainForm.MDIChildCount=1 then //kdyz zustava posledni otevrene okno
begin
.
neco;
.
end;

Problem je ten, ze MDIChildCount se nesnizuje jak jsou postupne okna v cyklu
zavirana, ale zustava na hodnote puvodniho postu oken.
Nevite nekdo jak zaridit, aby se hodnota MDIChildCount aktualizovala? Delam
v D5 Ent na W2K.

Diky za kazde nakopnuti

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

MDB a heslo !

[*] Sula Milos <milos.sula(zv)musumperk(tec)cz> - 8.10.2004 12:49:13

Me taky nic spolehlive nefungovalo. Co se tyce uzivatelskych hesel, tak
v posledni verzi accessu se to neda zjistit. Da se to obejit
(accessrecovery aj.), ale vysledna vygenerovana DB je nanic, nebot to
obnovi casto jen cast dat ve sloupci takze tam je misto Milos treba jen
Mi atd...


Milos
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz] On
Behalf Of Winsoft
Sent: Friday, October 08, 2004 12:21 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: MDB a heslo !> > MS Access ma dve urovne ochrany a riesenie zabezpecenia je velmi
> > jednoduche: treba pouzit tu druhu, bezpecnu uroven, t.j. uroven
> > uzivatelov a ich prav. Pohladaj si v helpe Workgroup file (.MDW).
>
> To sice neni tak uplne trivialne snadne jako prvni uroven, ale presto
> i toto jde prokopnout...

mas pravdu. Microsoft aj priznava bezpecnostne diery aj principialne
problemy so zabezpecenim desktop databaz:

http://support.microsoft.com/default.aspx?scid=%2fsupport%2faccess%2fcon
tent%2fsecfaq.asp

Ale zaujimalo, by ma, ci uz tu niekto skusal ziskat heslo z MDW. Ja som
nasiel program, ktory by to mal vediet (demo verzia na 3 znaky), ale
nefungoval mi. Zaujimalo by ma, co je mozne zistit admin heslo Accessu
aj inak ako hadanim.

Erik


TDBGRID - oznaceni vice radku mysi bez stisku CTR

[*] Ludek Finstrle <ludek.finstrle(zv)pzkagis(tec)cz> - 8.10.2004 12:49:14

> TDBGRID - oznaceni vice radku mysi bez stisku CTRL ci SHIFT
>
> Poradite mi jak na to?

Vzdyt jsem vam jiz radil. To neumite tu radu pouzit? V tom pripade
je vhodne reagovat na mou odpoved a ne klast stejnou otazku znova.

Zakladni myslenka je takovato:

DBGrid.DataSource.DataSet.First;
while not DBGrid.DataSource.DataSet.Eof do
begin
DBGrid.SelectedRows.CurrentRowSelected := ChciOznacitRadek;
DBGrid.DataSource.DataSet.Next;
end;

kde ChciOznacitRadek vraci true, pokud ma byt radek oznacen a false
kdyz nema byt oznacen.

Luf

MDB a heslo !

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 8.10.2004 12:25:11

Puvodni zprava ze dne 8.10.2004:

> Ale zaujimalo, by ma, ci uz tu niekto skusal ziskat heslo z MDW. Ja
> som nasiel program, ktory by to mal vediet (demo verzia na 3 znaky),
> ale nefungoval mi. Zaujimalo by ma, co je mozne zistit admin heslo
> Accessu aj inak ako hadanim.

Ano, zkousel :) Tak mi posli e-mailem nejaky MDW a ja ti to schvalne
prubnu :)

Petr Zahradnik, pocitacovy expert

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


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

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

Delphi a Abra - predefinovany typ currency

[*] Karel Kral <kralkonf(zv)purus(tec)cz> - 8.10.2004 12:55:15

A co takto: System.Currency (nevim, ale snad to je v unite System)
Kalhous napsal(a):

> Zdravim.
> Narazil jsem na problem a snad ho jako delphi neodbornik budu umet popsat. Delame aplikaci (D6) ktera komunikuje s OLE Automation Serverem systemu Abra. Aby komunikovala, musi se do uses unity
> pridat
> AbraOLE_TLB
> kde je ovsem oblibeny delphi typ currency predefinovan - nahle je to interface. Takze v unite kde je Abra OLE nelze pouzivat delphi typ currency - hlasi to takove roztomilosti jako
> Incompatible types: 'DB.Currency' and 'AbraOLE_TLB.Currency'
> Incompatible types: 'Extended' and 'Currency'
> a podobne. Jak z toho?
> Z.Kalhous
> ToWare s.r.o.
>
>
>
>
>

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


XP SP2 a instalace MSDE

[*] Petr Cafourek <petr.cafourek.d7(zv)seznam(tec)cz> - 8.10.2004 13:19:17

> Nesetkal jste se nekdo s problemy pri instalaci MSDE na Win XP SP2? nejak se
> nam nedari, ac na XP nikdy problemy nebyly. Ze by to byl ten SP2?

> Jaroslav Nadhera

> CSH spol. s r.o.
> Velflikova 10, 160 00 Praha 6
> tel.: 224 312 344-5
> fax: 235 522 892
> e-mail: nadhera(zv)csh(tec)cz WWW: http://www.csh(tec)cz
> pobocka Ostrava:
> Nedbalova 14, 701 00 Ostrava
> tel: 596 635 687


Zkus se trochu pohrabat ve firewallu. Resil jsem uz neco podobneho s
jinymi programi a vetsinou se to vyresilo tam.
--
S pozdravem,
Petr Cafourek
mailto:petr.cafourek.d7(zv)seznam(tec)cz


CodeRush a kolecko na mysi

[*] Jan Rizek <jan_rizek(zv)centrum(tec)cz> - 8.10.2004 13:15:17

Ano odebrani NavBAr-u pomohlo.. diky :-) > Pozor, ne v Options ale CodeRush/Plugin manager!
> Jan Rizek napsal(a):
> >
> >>Ano, musi se odtranit snad nejaky nepotrebny plugin, jenomze uz si moc
> >>nepamatuju, ktery to byl. Myslim, ze to byl Nav Bar. V Plug-In manager
> >>vypnout.
> >
> >

Delphi a Abra - predefinovany typ currency

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

Delame aplikaci (D6) ktera komunikuje s OLE Automation
> Serverem systemu Abra. Aby komunikovala, musi se do uses unity pridat
> AbraOLE_TLB kde je ovsem oblibeny delphi typ currency predefinovan -
> nahle je to interface. Takze v unite kde je Abra OLE nelze pouzivat
> delphi typ currency - hlasi to takove roztomilosti jako Incompatible
> types: 'DB.Currency' and 'AbraOLE_TLB.Currency' Incompatible types:
> 'Extended' and 'Currency' a podobne.

Pokud nekdo neporadi neco lepsiho, tak (bez znalosti veci) bych zkusil tam, kde chcete
pouzit typ currency z Delphi, jako typ promenne nepsat currency, ale system.currency.
Podobne v pripade zameru pouzit predefinovany typ currency uvadet takto jmeno unity,
ze ktere se ma definice prevzit, tj. napr. AbraOLE_TLB.currency, ale jak rikam, nevim,
do jake miry je to dobre reseni.

David Lebeda

Predani typu.

[*] Petr Vones <konference(zv)petrvones(tec)net> - 8.10.2004 12:41:13

From: "Jiri Bouchala" <bouchala(zv)starmon(tec)cz>
> Mam definovanych nekolik vyctovych typu a podle potreby bych chtel predat
> takovy typ procedure a ta by vytvorila dynamickou promenou daneho typu a
> pracovala by sni. Je neco takoveho mozne? Pripadne jak to obejit. Existuje
> nejaka moznost jak ziskat seznam definovanych typu za behu aplikace,
> vyhledat v nem nektery a vytvorit promene tohoto typu?

Mozne by to bylo ale prijde mi to zbytecne komplikovane a typove nebezpecne.
Co spise vytvorit objekt a vyuzit dedicnost ?

Petr Vones


XP SP2 a instalace MSDE

[*] Vit Krska <vit.krska(zv)del(tec)cz> - 8.10.2004 12:53:14

>Nesetkal jste se nekdo s problemy pri instalaci MSDE na Win XP SP2? nejak se
>nam nedari, ac na XP nikdy problemy nebyly. Ze by to byl ten SP2?
>
pred dvema dny jsem to instaloval bez problemu.
proc vam to presne nejde?

Vit Krska
vit.krska(zv)del(tec)cz
2004-10-08

velky a maly outlook

[*] Petr Vones <konference(zv)petrvones(tec)net> - 8.10.2004 12:41:13

From: "Vlastimil Zdenek" <delphi(zv)gestore(tec)cz>
> jak poznam v me app, zda poslat pripraveny email velkym nebo malym
> outlookem?

Pokud jde o Simple MAPI tak se podivej na priklad MapiExample v JCL.

Petr Vones

Delphi a Abra - predefinovany typ currency

[*] Kalhous <kalhous(zv)eu(tec)cz> - 8.10.2004 12:39:12

Zdravim.
Narazil jsem na problem a snad ho jako delphi neodbornik budu umet popsat. Delame aplikaci (D6) ktera komunikuje s OLE Automation Serverem systemu Abra. Aby komunikovala, musi se do uses unity
pridat
AbraOLE_TLB
kde je ovsem oblibeny delphi typ currency predefinovan - nahle je to interface. Takze v unite kde je Abra OLE nelze pouzivat delphi typ currency - hlasi to takove roztomilosti jako
Incompatible types: 'DB.Currency' and 'AbraOLE_TLB.Currency'
Incompatible types: 'Extended' and 'Currency'
a podobne. Jak z toho?
Z.Kalhous
ToWare s.r.o.

Kopirovani otevreneho DBF souboru

[*] Petr Vones <konference(zv)petrvones(tec)net> - 8.10.2004 12:37:12

From: "David Klodner" <d.klodner(zv)sofico(tec)cz>
> potrebuju zkopirovat DBF soubor, ktery je zrovna jinym programem otevren
> s vyhradnim pristupem.
> Funkce CopyFile soubor otevira, takze dojde k chybe a zkopirovani
> neprobehne.

Pokud by si chtel kopirovat soubor ktery je otevren tak prece nemuzes zajistit
ze je prave v konzistentnim stavu.

> Kdyz ho ale kopiruju napr. pres Total Commandera, tak to jde.

Podle toho asi bude vypadat jeho "obsah".

Petr Vones


MDB a heslo !

[*] Winsoft <winsoft(zv)netkosice.sk> - 8.10.2004 12:21:10

> > MS Access ma dve urovne ochrany a riesenie zabezpecenia je velmi
> > jednoduche: treba pouzit tu druhu, bezpecnu uroven, t.j. uroven
> > uzivatelov a ich prav. Pohladaj si v helpe Workgroup file (.MDW).
>
> To sice neni tak uplne trivialne snadne jako prvni uroven, ale presto
> i toto jde prokopnout...

mas pravdu. Microsoft aj priznava bezpecnostne diery aj principialne
problemy so zabezpecenim desktop databaz:

http://support.microsoft.com/default.aspx?scid=%2fsupport%2faccess%2fcontent%2fsecfaq.asp

Ale zaujimalo, by ma, ci uz tu niekto skusal ziskat heslo z MDW.
Ja som nasiel program, ktory by to mal vediet (demo verzia na 3
znaky), ale nefungoval mi. Zaujimalo by ma, co je mozne zistit
admin heslo Accessu aj inak ako hadanim.

Erik

Kopirovani otevreneho DBF souboru

[*] David Klodner <d.klodner(zv)sofico(tec)cz> - 8.10.2004 12:17:10

Zdravim,

potrebuju zkopirovat DBF soubor, ktery je zrovna jinym programem otevren
s vyhradnim pristupem.
Funkce CopyFile soubor otevira, takze dojde k chybe a zkopirovani
neprobehne.
Kdyz ho ale kopiruju napr. pres Total Commandera, tak to jde.

David Klodner
D5


Zmena pisma na celem formulari viz 1001 typu a tri

[*] Karel Kral <kralkonf(zv)purus(tec)cz> - 8.10.2004 11:27:06

TNeco podobneho by ti mohlo fungovat:

...
PropInfo := GetPropInfo(Component.ClassInfo, 'DataSource');
if PropInfo <> nil then
begin
ObjProp := GetObjectProp(Component, 'DataSource');
if ObjProp is TDataSource then
begin
SetObjectProp(Component, 'DataSource', DataSource);
Result := true;
Exit;
end;
end;

jakub napsal(a):
> pouzivam konstrukci
>
> GetPropInfo(Component[i].ClassInfo, 'Font');
> ...
>
> a
>
> SetOrdProp(....
>
> Mam pozadavek nastavit pouze velikost pisma na celem formulari kde jsou
> ruzne typy fontu.
>
> lze vytahnout pouze Font.Size a nasledne ho nastavit ?
>
> Dekuji za nakopnuti
>
> JaVal
>
>
>
>


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


Predani typu.

[*] Jiri Bouchala <bouchala(zv)starmon(tec)cz> - 8.10.2004 11:41:07

Mam definovanych nekolik vyctovych typu a podle potreby bych chtel predat
takovy typ procedure a ta by vytvorila dynamickou promenou daneho typu a
pracovala by sni. Je neco takoveho mozne? Pripadne jak to obejit. Existuje
nejaka moznost jak ziskat seznam definovanych typu za behu aplikace,
vyhledat v nem nektery a vytvorit promene tohoto typu?

velky a maly outlook

[*] Pave Gazda <pavel_gazda(zv)datasw(tec)cz> - 8.10.2004 11:05:04

Ahoj

> jak poznam v me app, zda poslat pripraveny email velkym nebo malym
> outlookem?


Pokud pouzivas Simple MAPI, tak to nepotrebujes vedet, napojis se na ten,
ktery je nastaven jako default.

Pavel

velky a maly outlook

[*] Vlastimil Zdenek <delphi(zv)gestore(tec)cz> - 8.10.2004 10:41:01

Zdravim,
jak poznam v me app, zda poslat pripraveny email velkym nebo malym outlookem?

Diky

Vlasta
D5Ent

TDBGRID - oznaceni vice radku mysi bez stisku CTR

[*] delphak(zv)centrum(tec)cz - 8.10.2004 09:36:54

TDBGRID - oznaceni vice radku mysi bez stisku CTRL ci SHIFT

Poradite mi jak na to?

Dik Vlada


Zavirani childoken v MDI aplikaci

[*] Jan Sebelik <honza(zv)haes(tec)cz> - 8.10.2004 09:12:52

> V MDI aplikaci mam funkci, ktera zavira vsechna otevrena
> childokna. Pouzivam
> nasledujici konstrukci:
>
> for I := MDIChildCount-1 downto 0 do
> MDIChildren[I].Close;
>
> Problem je ten, ze MDIChildCount se nesnizuje jak jsou postupne
> okna v cyklu
> zavirana, ale zustava na hodnote puvodniho postu oken.
> Nevite nekdo jak zaridit, aby se hodnota MDIChildCount
> aktualizovala? Delam

Problem spociva v tom, ze Close okno fakticky nezavre, ale jenom posle message WM_CLOSE (resp. neco podobneho).
viz Close - FInd Declaration
Tyto zpravy zustavaji ve fronte zprav a zpracuji se az tehdy, kdyz cyklus skonci.
Proto by (ac to zni mozna prekvapive) fungovalo i

for I := 0 to MDIChildCount-1 do
MDIChildren[I].Close;

Jednou z moznosti, jak to resit je

for I := MDIChildCount-1 downto 0 do begin
MDIChildren[I].Close;
Application.ProcessMessages;
end;

Ale na to pozor - aplikace uprostred cyklu zpracuje nejen tyto zpravy, ale i vsechny ostatni.
Mohlo by tak dojit ke spusteni evenhandleru, ktere v danem okamziku nechceme.

Cistsi reseni - to by bylo treba vedet, co se na OnClose posledniho okna deje.

viz nase kurzy Delphi.

Honza
====================================
= RNDr. Jan Sebelik - HAES
= Skolici a konzultacni stredisko pro vyvoj SW
= www.haes(tec)cz
= Vojtiskova 321
= 507 81 Lazne Belohrad
= tel. 493 792 931 (mobil 776 347 735)
====================================

OT-AUTORUN

[*] Jiri Baudys <konference(zv)baudys.name> - 8.10.2004 08:58:51

Popr. "vycrrpavajici" info na
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/shellcc/pla
tform/shell/programmersguide/shell_basics/shell_basics_extending/autorun/aut
oplay_cmds.asp

Jirka


>Ahoj,
>poradite mi nekdo jak docilit automatickeho spusteni instalace po vlozeni
CD do mechaniky?
>Diky
--
>Milos J. Hrach, D6 profi, WinXP Home


Jak poslat zpravu na plochu

[*] Karel Halamasek <compro(zv)vol(tec)cz> - 8.10.2004 08:44:50

Ahoj lidi.
Nevite nekdo, jak z programu poslat text na plochu windows, aby tam
zustala urcity cas a pak zase zmizela? D5.

Diky.

Karel Halamasek COMPRO

Zavirani childoken v MDI aplikaci

[*] Ing. Igor Vodicka <vodicka(zv)sagit(tec)cz> - 8.10.2004 08:12:47

Ahoj do kofery!

V MDI aplikaci mam funkci, ktera zavira vsechna otevrena childokna. Pouzivam
nasledujici konstrukci:

for I := MDIChildCount-1 downto 0 do
MDIChildren[I].Close;

Childokno ma nadefinovanou udalost OnClose, kde provadim nasledujici test:

if MainForm.MDIChildCount=1 then //kdyz zustava posledni otevrene okno
begin
.
neco;
.
end;

Problem je ten, ze MDIChildCount se nesnizuje jak jsou postupne okna v cyklu
zavirana, ale zustava na hodnote puvodniho postu oken.
Nevite nekdo jak zaridit, aby se hodnota MDIChildCount aktualizovala? Delam
v D5 Ent na W2K.

Diky za kazde nakopnuti

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

Utajeni dat

[*] Vlko II. <vlko(zv)zilina(tec)net> - 7.10.2004 21:48:06

On Thu, 7 Oct 2004 21:26:05 +0200, Pospisil Jan <j.pospisil(zv)aquasoft(tec)cz>
wrote:

>> Pouzivam komponentu MyLittleDatabase, ktera je sice pro mne
>> dostacujici, ale pracuje s textovymi soubory, tudiz neni ta
>> ochrana. Snad jedine : Po ulozeni dat, se data ulozi sice
>> textove, ale zahesluji se po ukonceni programu. Pri startu
>> programu si je nekam program zase rozhesluje, a pouziva
>> nezaheslovanou verzi souboru. Jenze co kdyz se mi program
>> zhrouti? :((( Nejak nevim jak na to.
>> Diky za kazdou radu ...

> A co sifrovat primo to co ukladas a ne az cele cilove uloziste??

A co pouzit napriklad flashfiller? ten ma vlastne sifrovanie priamo
na pristupe k suboru, moznost sql selectov, celkovo je s nim prijemna
praca, co ako najdes na firemnej stranke pana Zahradnika:
http://www.clexpert(tec)cz/devtip/.
Troska poradim, ze je lepsie vytvorit server cez Datamodule s plnou
podporou
pristupu na db (TCPIP), vytvorit tabulky pomocou ffe
(adresar {ff-instal-dir}/source/explorer/), naplnit ich udajmi, zrusit
pristup k serveru a dalej data spracovavat v aplikacii.

vlko



--


--------------
mail: vlko_(zv)pobox.sk
web: http://vlko.zilina.net

Utajeni dat

[*] Pospisil Jan <j.pospisil(zv)aquasoft(tec)cz> - 7.10.2004 21:26:05

> Dobry den,
> vytvarim program, ktery prijima "uzivatel je vpisuje" jiste
> informace a zapisuje je "nekam do souboru", ktery pote lze
> distribuovat. Tyto data se v programu celkem casto pouzivaji.
> Nejlepsi by bylo neco na bazi tabulek (samozrejmne) neco jako
> BDE, ale nemuzu si dovolit jakkekoliv jine instalace nez muj
> program (i ten se nebude instalovat, staci zkopirovat), .
> Navic musi tento soubor byt chranen heslem, jelikzo jsou v
> nem citliva data.
> Mam tento navrh :
> Pouzivam komponentu MyLittleDatabase, ktera je sice pro mne
> dostacujici, ale pracuje s textovymi soubory, tudiz neni ta
> ochrana. Snad jedine : Po ulozeni dat, se data ulozi sice
> textove, ale zahesluji se po ukonceni programu. Pri startu
> programu si je nekam program zase rozhesluje, a pouziva
> nezaheslovanou verzi souboru. Jenze co kdyz se mi program
> zhrouti? :((( Nejak nevim jak na to.
> Diky za kazdou radu ...
>
> (Celkem specha)
>

A co sifrovat primo to co ukladas a ne az cele cilove uloziste??

Utajeni dat

[*] mr.guest_delphi(zv)centrum(tec)cz - 7.10.2004 21:16:04

Dobry den,
vytvarim program, ktery prijima "uzivatel je vpisuje" jiste informace a zapisuje je "nekam do souboru", ktery pote lze distribuovat. Tyto data se v programu celkem casto pouzivaji. Nejlepsi by bylo neco na bazi tabulek (samozrejmne) neco jako BDE, ale nemuzu si dovolit jakkekoliv jine instalace nez muj program (i ten se nebude instalovat, staci zkopirovat), . Navic musi tento soubor byt chranen heslem, jelikzo jsou v nem citliva data.
Mam tento navrh :
Pouzivam komponentu MyLittleDatabase, ktera je sice pro mne dostacujici, ale pracuje s textovymi soubory, tudiz neni ta ochrana. Snad jedine : Po ulozeni dat, se data ulozi sice textove, ale zahesluji se po ukonceni programu. Pri startu programu si je nekam program zase rozhesluje, a pouziva nezaheslovanou verzi souboru. Jenze co kdyz se mi program zhrouti? :((( Nejak nevim jak na to.
Diky za kazdou radu ...

(Celkem specha)

texture1:pointer

[*] P&v <pa.v(zv)seznam(tec)cz> - 7.10.2004 18:13:47

> > Textury nacitam podle tutorialu procedurou
> > auxDIBImageLoadA do promene tohoto typu:
> >
> > type TAUX_RGBImageRec= record
> > sizeX, sizeY: TGLint;
> > data: pointer;
> > end;
> > PTAUX_RGBImageRec= ^TAUX_RGBImageRec;
> >
> > Moje zacatecnicka otazka zni, jak mam tyto informace, na nez ukazuje
> > "data" pozmenit? Tzn. jak se pracuje s typem obecny pointer? Umim
> > pouze typove ukazatele.
>
> data su formatu RGB, ak nie je alpha , ak je tak staci doplnit...
>
> type
> TRGB24 = record
> R,G,B: Byte;
> end;
> TData = array [0..0]of TRGB24;
>
>
> potom napr. jednoducho bielu farbu v prvom riadku nastavis takto:
>
> var p: ^TData;
> test: PTAUX_RGBImageRec;
> i: Integer;
> begin
> *LoadFromFILE*(test);
> p := test^.data;
>
> for i := 0 to test^.sizeX -1 do
> with p[i] do
> begin
> r:= 255;g:=255;b:=255;
> end;
>
> end;
>
> ked uz posles texturu do grafickej karty tak uz ju vies zmodifikovat
> iba ak ju znova posles ...
>
> palo
>

Tak jo. Je to zde:
http://z44.iglu(tec)cz/tex.zip
dik moc

TDBGrid - programove oznaceni vice radku

[*] Ludek Finstrle <ludek.finstrle(zv)pzkagis(tec)cz> - 7.10.2004 17:11:43

> muzete mi prosim nekdo poradit, jak v TDBGridu programove oznacim radky? Zjistovat je lze pred SelectedRows, ale na pridavani jsem neprisel .. a simulovat kliknuti mysi se shiftem se mi nepozdava ...

Kliknuti mysi s Ctrl, kdyz uz. Co programove takto:

DBGrid.SelectedRows.CurrentRowSelected := true;

??

Z helpu:

TBookmarkList.CurrentRowSelected

Indicates whether the Bookmark property of the associated DBGrid.s dataset is in the Items array.

property CurrentRowSelected: Boolean;

Description

...
Setting CurrentRowSelected to True adds the Bookmark property of the
dataset to the Items array if it is not already there.
...

Luf

P.S. Byva dobrym zvykem zalamovat radky, aby odpovedi byly videt ...

CodeRush a kolecko na mysi

[*] Jan Rizek <jan_rizek(zv)centrum(tec)cz> - 7.10.2004 17:07:43



> Ano, musi se odtranit snad nejaky nepotrebny plugin, jenomze uz si moc
> nepamatuju, ktery to byl. Myslim, ze to byl Nav Bar. V Plug-In manager
> vypnout.

Tak Nav Bar to asi neni - v Options jsem vypnul jediny check box ktery byl
zatrzen a nic..

Nemate nejaky dalsi tip? :-)

Firebird 1.5 CZ lokalizace

[*] Jaroslav Uher <jarek(zv)iuher(tec)cz> - 7.10.2004 16:55:42

On 7 Oct 2004 at 16:25, Pavel Lang wrote:

> Hledam CZ lokalizaci instalace nebo instalacniho skriptu (Inno setup)
> databazoveho serveru Firebird 1.5. Nevi nekdo, kde to najdu??

1. archiv konference
2. www.abra(tec)cz

Jarek Uher

Firebird 1.5 CZ lokalizace

[*] Pavel Lang <langpatech(zv)seznam(tec)cz> - 7.10.2004 16:25:39

Hledam CZ lokalizaci instalace nebo instalacniho skriptu (Inno setup) databazoveho serveru Firebird 1.5.
Nevi nekdo, kde to najdu??

Kam spolecny INI pro vsechny uzivatele, kteri jsou

[*] Jaroslav Uher <jarek(zv)iuher(tec)cz> - 7.10.2004 16:09:35

On 7 Oct 2004 at 15:59, little_bobes(zv)centrum(tec)cz wrote:

> ve svem klientskem programu si ukladam nastaveni spojeni na server do
> ini souboru. Puvodne jsem mel ini umisteny standartne v adresari
> windows. Pozdeji jsem narazil na to, ze nekteri uzivatele maji pravo
> User, tudiz nemohou do windows zapisovat.
>
> Ted nevim, kam ten ini umistit, aby do nej mohli zapisovat vsichni
> uzivatele daneho pocitace. Chtel jsem jej umistit do \Documents and
> Settings\All Users\Data Aplikaci\firma\program\muj.ini, ale zapisovat
> do nej muze pouze ten, kdo jej zde vytvoril.

mozna jsem mimo, ale proc to nedas do adresare, kde mas EXE ?

Jarek

Kam spolecny INI pro vsechny uzivatele, kteri jsou

[*] little_bobes(zv)centrum(tec)cz - 7.10.2004 15:59:35

Zdravim,

ve svem klientskem programu si ukladam nastaveni spojeni na server do ini
souboru.
Puvodne jsem mel ini umisteny standartne v adresari windows.
Pozdeji jsem narazil na to, ze nekteri uzivatele maji pravo User, tudiz
nemohou do windows zapisovat.

Ted nevim, kam ten ini umistit, aby do nej mohli zapisovat vsichni uzivatele
daneho pocitace.
Chtel jsem jej umistit do \Documents and Settings\All Users\Data
Aplikaci\firma\program\muj.ini, ale zapisovat do nej muze pouze ten, kdo jej
zde vytvoril.

Poradite mi nekdo, kam s nim?

Diky Bob (D4 c/s, FB 1.5)

Spusteni DOSove aplikace

[*] Ondrej Kelle <o.kelle(zv)digitalpublishing.de> - 7.10.2004 15:41:33

> spoustim z programu v Delphi DOSovou aplikaci pomoci
> CreateProcess, coz probehne celkem bez problemu, ale
> potreboval bych, aby se okno otevrelo rovnou pres
> celou obrazovku (neco jak kdyz uzivatel zmackne
> Alt+Enter)...
> Jak na to?

Nedavno som si vsimol toto, mozno to pomoze:
http://www.delphi3000.com/articles/article_4137.asp
Neskusal som to.

HTH
TOndrej

Spusteni DOSove aplikace

[*] Jiri Matejka <matejka(zv)stemmark(tec)cz> - 7.10.2004 15:19:31

Zdar,
spoustim z programu v Delphi DOSovou aplikaci pomoci CreateProcess, coz
probehne celkem bez problemu, ale potreboval bych, aby se okno otevrelo
rovnou pres celou obrazovku (neco jak kdyz uzivatel zmackne Alt+Enter)...
Jak na to?

D6Prof, W2000

Jirka Matejka

TIBClientDataset - nahrada za jinou, ktera nepotre

[*] Jaroslav Uher <jarek(zv)iuher(tec)cz> - 7.10.2004 13:59:25

On 7 Oct 2004 at 10:51, Ing. Jiri Sokol wrote:

> Ve sve aplikaci potrebuji pred urcitou ulohou sthnout vybrane sloupce
> sloupce z tabulky/tabulek, tyto hodnoty si nechat nejak setridit
> (vzestupne/sestupne) a pak se k nim ve vypoctu dostavat pomoci
> nastavovani filtru. Na toto mi prislo jako vhodne pouzit komponentu
> TIBClientDataset, ale tato vyzaduje mit nekde v ceste knihovnu
> MIDAS.DLL.

ja pouzivam pro FB v D6 Pro
TClientDataSet + TDataSetProvider + TIBQuery
(plus midaslib v uses, jak uz tady bylo popsano)

a bez problemu se propojim na DBGrid,
nepotrebuji dalsi MemoryTable :-)

Nikdu jsem TIBClienDataset nepouzil, nevim proc.

Jarek Uher

OT: www rozhrani pro VSS

[*] Ing. Petr Sikola <developer(zv)efg(tec)cz> - 7.10.2004 13:39:24

Zdravim, nema nekdo z vas k dispozici www rozhrani pro MS Visual Source
Safe? Nebo alespon nejakz link.
V podstate mi staci dokumenty pouze cist, eventuelne se podivat na
starsi verze dokumentu.
Potrebuju to pro IIS.

VSS verze 6

Diky
Petr Sikola

Synapse - maily a outlook

[*] Pave Gazda <pavel_gazda(zv)datasw(tec)cz> - 7.10.2004 13:29:21

Ahoj

> Caues,
> nedavno jsem se ptal, jak posilat email absolutne bez zasahu uzivatele.
> Odkazali jste me na synapse.
> Muzete mi tedy poradit, jake unity pouzit pro odesilani emailu, prochazeni
> outlook adresaru a kontrolovat zpravy v nich?
>
> Vlasta

Synapse nepracuje s Outlookem.

Pokud chces pracovat s daty v Outlooku pouzij SimpleMAPI ( JCL ).

Pokud chces mit plnou kontrolu nad tim komunikaci, pak pouzij Synapsi.
SMTPSend pro odeslani mailu,
POP3Send pro precteni schranky.
Pouziti je snadne, i kdyz prave ted nemohu pohnout s jednim problemem pri
odesilani posty.
( psal jsem to sem asi pred tydnem ).

Pavel

TDBGrid - programove oznaceni vice radku

[*] delphak(zv)centrum(tec)cz - 7.10.2004 13:33:23

Dobry den,
muzete mi prosim nekdo poradit, jak v TDBGridu programove oznacim radky? Zjistovat je lze pred SelectedRows, ale na pridavani jsem neprisel .. a simulovat kliknuti mysi se shiftem se mi nepozdava ...

Dekuji za radu


Ztrata dat v FB

[*] Richard Kejval <kejval.delphi(zv)centrum(tec)cz> - 7.10.2004 13:19:20


----- Original Message -----
From: "Pavel Cisar" <pcb(zv)atlas(tec)cz>> > Posledni dobou se nam obcas u zakaznika stava, ze se ztrati data,
> > ktera uz maji vytisknuta na papire, takze musely byt zacommitovany.
>
> To je omyl. Ze jsou data na papire automaticky neznamena, ze byla
> comitnuta. Pokud je precetla a vytiskla stejna transakce jaka je
> ulozila, pak comitnuta byt nemusi. Doporucuji overit.

Asi jsem se spatne vyjadril, ale vsechna data jsou ukladana pres spolecny
framework, ktery ma svoji transakci pro ukladani, proto jestli je ulozeni
bez
chyb musi byt vzdy commitovano. Param. trans. je Read commited. V tom
problem byt nemuze..

>
> > Pouzivame Firebird 1.0.2.908, server je Win XP prof. Velikost DB je
> > radove 1.5GB V IBConfig mame pouze defaultni hodnoty. Parametr u DB
> > Forced writes je zapnuty, proto jsem si myslel, ze data z bufferu jsou
> > hned zapisovany na disk po commitu.
>
> Ze je v configu zapnuty synchronni zapis jeste neznamena, ze je na
> databazi skutecne aplikovan. Config definuje default pro server (a
> nove vytvorene databaze neni-li specifikovano jinak, viz dale). Pro
> kazdou databazi muze byt forced writes nastaveno individualne, viz
> gfix. Nastaveni FW pro databazi zustane zachovano i po obnove ze
> zalohy. Doporucuji proverit nastaveni FW pro danou databazi pomoci
> gstat -h.

Parametr FW je samozrejme nastaven pomoci gfix -w sync pro kazdou
DB. Bohuzel se tento problem zacal vyskytovat u vice instalaci, takze to
asi opravdu vypada na nejaky problem s FB 1.0.2

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


CodeRush a kolecko na mysi

[*] Karel Kral <kralkonf(zv)purus(tec)cz> - 7.10.2004 12:49:17

Ano, musi se odtranit snad nejaky nepotrebny plugin, jenomze uz si moc
nepamatuju, ktery to byl. Myslim, ze to byl Nav Bar. V Plug-In manager
vypnout.
Jan Rizek napsal(a):
> S instalaci CodeRush najednou nemohu pohybovat v editoru pomoci kolecka na mysi - kde to mohu zase nahodit? netusite nekdo?
>
> Zdravi
>
> JR
>
>
>
>


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

Synapse - maily a outlook

[*] Bronislav Klucka <bronislav.klucka(zv)pro2-soft(tec)com> - 7.10.2004 12:57:19


> > nedavno jsem se ptal, jak posilat email absolutne bez zasahu
> > uzivatele. Odkazali jste me na synapse. Stahnul jsem ji, ale nejak
> > nemuzu najit to prave. Muzete mi tedy poradit, jake unity
> pouzit pro
> > odesilani emailu, prochazeni outlook adresaru a kontrolovat
> zpravy v
> > nich?
>
> Synapse nema s outlookem nic spolecneho!
> Umi poslat e-mail na SMTP server. Hrabat se v outlooku
> opravdu neumi, a nikdy umet nebude.
>
Musis si uvedomit, ze chces 2 veci
1/ posilat maily
2/ cist maily
Takze se podivej na SMTPSend a IMAPSend

Brona


Problem s TXMLDocument

[*] Ing. Slavomir Timko <timko(zv)novisoft.sk> - 7.10.2004 12:37:16

Zdravim

Stretli ste sa niekedy s problemom s konstruktorom komponenty TXMLDocument?
V pripade ze pouzijem konstruktor TXMLDocument.Create(Application), teda s
nejakym Ownerom, vsetko bezi OK, ak vsak pouzijem konstruktor v tvare
TXMLDocument.Create(nil), resp. TXMLDocument.Create(''), aplikacia spadne
pri uvolnovani tohto objektu.
Da sa tento bug nejak odstranit, alebo tam musim stale zadat nejakeho
existujuceho Ownera?

Slavo


Rozklad obsahu Editu do nekolika jinych

[*] Petr Cafourek <petr.cafourek.d7(zv)seznam(tec)cz> - 7.10.2004 12:53:18

Ahoj vsem,
mam takovy orisek. V mem programu se mi v Edit1 zobrazi napriklad zhruba neco takoveho:
1234 Mesto 10.12-14:20 <NULL:T> "SUM: in= 123456 out=123456 res= 123456"

A ja bych potreboval toto rozdelit do jinych Editu. Asi takto: (Co radek, to Edit)
1234
Mesto
10.12
14:20
NULL:T
in= 123456 (Bez in= )
out=123456 (Bez out= )
res= 123456 (Bez res= )

ALE
ma to jeden hacek. Ta cast, kde je <NULL:T>, tam byt nemusi a pak potrebuji, aby se tam
jako hodnota objevilo DA, nebo tam muze byt neco jineho (<ERR:31>)a navic se to muze
objevit ve tvaru <KEY.1 UOT:123456>, nebo KEY.2, ale muze tam byt i IN:123456 a v takovem pripade
potrebuji, aby se hodnoty IN ci OUT prenesly do dalsich dvou Editu dle tipu.

Dalsi hacek je, ze hodnoty prakdicky maji vzdy jinou delku.

Dokazete mi prosim nekdo pomoci?

Petr

D6 Professional, Win2K


CodeRush a kolecko na mysi

[*] Zbysek Hlinka <konference(zv)hlinka(tec)cz> - 7.10.2004 12:37:16

> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Jan Rizek
> Sent: Thursday, October 07, 2004 12:15 PM
>
> Napsal jsem na support a mys je najednou v poradku - takze
> jim staci jen poslat email :-) Vubec tomu nerozumim..

:-))) Z toho si nic nedelej, mne se takove veci stavaji casto. Staci se jen
obratit na odborny dohled, a veci se spravuji samy. Vysvetleni pochopitelne
nemam.

S pozdravem

Zbysek Hlinka
E-mail: hlinka zavin. hlinka(tec)cz

CodeRush a kolecko na mysi

[*] Jan Rizek <jan_rizek(zv)centrum(tec)cz> - 7.10.2004 12:33:15

dasli restart pocitace a mys zase nechodi.. tak kdyby nekdo vedel.. :-)

> Napsal jsem na support a mys je najednou v poradku - takze jim staci jen
> poslat email :-) Vubec tomu nerozumim..
>
>
>
>
>

CodeRush a kolecko na mysi

[*] Jan Rizek <jan_rizek(zv)centrum(tec)cz> - 7.10.2004 12:03:13

CodeRush jsem odinstaloval a mys chodi bez problemu..

CodeRush opet nainstalovan a chyba je opet stejna..

> Skus napisat na ich support

news-y mi nejdou nacist..
zkousim v Outlook Expresu (Exploreru i Opere)

Konfigurace:
Ucet: news.eagle-software.com
Server: news.eagle-software.com

Jdou vam tyto news-y?

CodeRush a kolecko na mysi

[*] Jan Rizek <jan_rizek(zv)centrum(tec)cz> - 7.10.2004 12:15:14

Napsal jsem na support a mys je najednou v poradku - takze jim staci jen
poslat email :-) Vubec tomu nerozumim..

Synapse - maily a outlook

[*] Vlastimil Zdenek <delphi(zv)gestore(tec)cz> - 7.10.2004 12:19:14

Caues,
nedavno jsem se ptal, jak posilat email absolutne bez zasahu uzivatele. Odkazali jste me na synapse.
Stahnul jsem ji, ale nejak nemuzu najit to prave.
Muzete mi tedy poradit, jake unity pouzit pro odesilani emailu, prochazeni outlook adresaru a kontrolovat zpravy v nich?

Diky moc
Vlasta
D5Ent


IsNumeric?

[*] Petr Brant <brant(zv)dcomm(tec)cz> - 7.10.2004 11:49:12

Jo, ale davej pritom bacha na jednu vec: Nejsem si jist, jestli tahle funkce
nevyzaduje pro pripad float hodnoty natvrdo desetinnou tecku namisto
systemoveho oddelovace. Myslim, ze s tim byly nejake potize, ale radsi to
over, bohuzel se ted nemohu podivat.

RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
http://brant.wz(tec)cz <http://brant.wz(tec)cz> > Asi bude fakt nejjednodussi to otestovat pres fci VAL. Musis ale vedet,
> jestli to ma byt integer nebo float a pro jistotu vypnout $R a po testu
> yase
> yapnout.
>
> procedure Val(S; var V; var Code: Integer);
> pri nenulovem Code jde o cislo, jinak je to text.
>

TIBClientDataset - nahrada za jinou, ktera nepotre

[*] Vaclav Krmela <krmela(zv)ustinadorlici(tec)cz> - 7.10.2004 11:33:11

> From: Ing. Jiri Sokol
> Na toto mi prislo jako vhodne pouzit komponentu TIBClientDataset, ale
tato
> vyzaduje mit nekde v ceste knihovnu MIDAS.DLL.
> Muzete mi, prosim, poradit jinou komponentu, ktera by nic externiho
> nepotrebovala?

Pokud pridas do uses midaslib, tak se vse potrebne prilinkuje do exe a
externi midas.dll to potrebovat nebude.

Vaclav Krmela

TIBClientDataset - nahrada za jinou, ktera nepotre

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

Co je spatneho na dll knihovne ?
midas.dll by mela byt nakopirovana do system32 (jinak jsou problemy pri
odinstalovani aplikace),
ale funguje i v adresari aplikace.
Nebo prejdi na delphi7, ty umi zalinkovat midas do aplikace. Do uses
pridas midaslib.

Slavek

Ing. Slavomir Skopalik
Jednatel spolecnosti
Elekt Labs s.r.o.
Chaloupky 158
783 72 Velky Tynec
Czech Republic
--------------------------------------------
Mobil: +420 724 207 851
icq:199 118 333
e-mail:skopalik(zv)elektlabs(tec)cz
http://www.elektlabs(tec)cz


> Ahoj.
> Ve sve aplikaci potrebuji pred urcitou ulohou sthnout vybrane
> sloupce sloupce z tabulky/tabulek, tyto hodnoty si nechat
> nejak setridit (vzestupne/sestupne) a pak se k nim ve vypoctu
> dostavat pomoci nastavovani filtru. Na toto mi prislo jako
> vhodne pouzit komponentu TIBClientDataset, ale tato vyzaduje
> mit nekde v ceste knihovnu MIDAS.DLL.
>
> Muzete mi, prosim, poradit jinou komponentu, ktera by nic
> externiho nepotrebovala? Diky Jirka
> --------------------------------------------------
> Ing. Jiri Sokol; jiri.sokol(zv)seznam(tec)cz; 972 231 187
> D6Prof+SP3; WinXPProf+SP1; FB 1.5.0
> programator amater
>
>
>
>
>
>
>

Ztrata dat v FB

[*] Richard Kejval <kejval.delphi(zv)centrum(tec)cz> - 7.10.2004 11:33:10


U FB obcas dochazi k poruseni indexu, takze to chce overit, jetli je
> tomu
> i v tomto pripade (ryzdilne vysledky pri planu natural a planu pouzitim
> indexu).
> Resenim je deaktivace a aktivace indexu (pripadne drop a create indexu).
> Samozrejme take pomuze backup a restore.
> V kazdem pripade doporuciji update na verzi 1.0.3 (ta ma odstraneno
> nekolik zasadnich
> chyb 1.0.2).
> Zaroven doporucuji zvazit prechod primo na verzi 1.5.1.

O problemech s indexy u 1.0.2 vim a o prechodu na 1.0.3 uvazuji, ale
nevim, jestli v tom bude zakopany pes, protoze backup/restore se tam
pravidelne provadi a znovu dopsana data, by se tam objevila 2x, coz
mi nikdo nehlasil..

FB 1.5.1 mame nainstalovanou, ale trosku se ji bojim dat jeste do ostreho
provozu. Ma nekdo uz konkretni zkusenosti s praci na nejake vetsi DB ?

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

CodeRush a kolecko na mysi

[*] Martin Radvansky <delphiconf(zv)radvansky(tec)net> - 7.10.2004 11:31:10

Dobry den,
>> S instalaci CodeRush najednou nemohu pohybovat v editoru
>> pomoci kolecka na mysi - kde to mohu zase nahodit? netusite nekdo?

Delphi 7 Pro, build 8.1, CodeRush 7.04d Professional, neni problem s
koleckem mysi.


--
S pozdravem,
Martin Radvansky

CodeRush a kolecko na mysi

[*] Jan Rizek <jan_rizek(zv)centrum(tec)cz> - 7.10.2004 10:57:07

S instalaci CodeRush najednou nemohu pohybovat v editoru pomoci kolecka na mysi - kde to mohu zase nahodit? netusite nekdo?

Zdravi

JR

Ztrata dat v FB

[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 7.10.2004 10:21:04

Haj hou!

On 7 Oct 2004 at 9:28, Richard Kejval wrote:

> Posledni dobou se nam obcas u zakaznika stava, ze se ztrati data,
> ktera uz maji vytisknuta na papire, takze musely byt zacommitovany.

To je omyl. Ze jsou data na papire automaticky neznamena, ze byla
comitnuta. Pokud je precetla a vytiskla stejna transakce jaka je
ulozila, pak comitnuta byt nemusi. Doporucuji overit.

> Pouzivame Firebird 1.0.2.908, server je Win XP prof. Velikost DB je
> radove 1.5GB V IBConfig mame pouze defaultni hodnoty. Parametr u DB
> Forced writes je zapnuty, proto jsem si myslel, ze data z bufferu jsou
> hned zapisovany na disk po commitu.

Ze je v configu zapnuty synchronni zapis jeste neznamena, ze je na
databazi skutecne aplikovan. Config definuje default pro server (a
nove vytvorene databaze neni-li specifikovano jinak, viz dale). Pro
kazdou databazi muze byt forced writes nastaveno individualne, viz
gfix. Nastaveni FW pro databazi zustane zachovano i po obnove ze
zalohy. Doporucuji proverit nastaveni FW pro danou databazi pomoci
gstat -h.

Jinak doporucuji prejit na FB 1.5, ktery resi problem s Windows kde
pri asynchronim zapisu (FW OFF) nedochazelo k rizenemu ukladani zmen
na disk (viz release notes fb 1.5, sekce config options pouze pro
windows). S FB 1.5 by nemel byt zadny problem i s vypnutym FW na
WinXP/2000 (naopak je to doporuceno).

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


TIBClientDataset - nahrada za jinou, ktera nepotre

[*] Milan Tomes <delphi(zv)haida(tec)cz> - 7.10.2004 11:25:09

Co treba nejaky MemoryDataset ??? My pouzivame TdxMemData od
DeveloperExpress, ale ten je tusim placeny nebo je dodavan zdarma pri koupi
nejakeho baliku.
BTW - zrovna v tomto pripade vubec nepotrebuji zadny MemDataset - nas
framework tohle zvladne levou zadni :))))

S pozdravem

Milan Tomes

> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Ing. Jiri Sokol
> Sent: Thursday, October 07, 2004 10:51 AM
>
> Ahoj.
> Ve sve aplikaci potrebuji pred urcitou ulohou sthnout vybrane
> sloupce sloupce z tabulky/tabulek, tyto hodnoty si nechat nejak


Ztrata dat v FB

[*] Roman <sw.maurice(zv)seznam(tec)cz> - 7.10.2004 11:21:09

V 1.5.1 mam take problemy s "view inner join tabulka", je to nekde i v open
bugs a popsane reseni je na vetsim objemu dat nepouzitelne, v 1.0.3 je to
ok.

Roman


> Slavomir Skopalik dne 7 Oct 2004 v 9:55:
>
> > U FB obcas dochazi k poruseni indexu, takze to chce overit, jetli je
> > tomu i v tomto pripade (ryzdilne vysledky pri planu natural a planu
> > pouzitim indexu). Resenim je deaktivace a aktivace indexu (pripadne
> > drop a create indexu). Samozrejme take pomuze backup a restore. V
> > kazdem pripade doporuciji update na verzi 1.0.3 (ta ma odstraneno
> > nekolik zasadnich chyb 1.0.2). Zaroven doporucuji zvazit prechod primo
> > na verzi 1.5.1.
>
> Verze 1.5.1 se mi moc neosvedcila kvuli 100% vytizeni serveru pri pouziti
eventu (to, co je psano,
> ze je opraveno, naopak zacalo zlobit - po 6 hodinach na 100% FB server
spadnul s "terminated
> abnormally"), krom toho bych rekl, ze udelali par zmen k horsimu v
optimalizatoru.
> S verzi 1.5 mame problemu mene.
>
> Karel Rys
>
>
>

TIBClientDataset - nahrada za jinou, ktera nepotre

[*] Ing. Jiri Sokol <js-delphi(zv)email(tec)cz> - 7.10.2004 10:51:06

Ahoj.
Ve sve aplikaci potrebuji pred urcitou ulohou sthnout vybrane sloupce sloupce z tabulky/tabulek, tyto hodnoty si nechat nejak setridit (vzestupne/sestupne) a pak se k nim ve vypoctu dostavat pomoci nastavovani filtru.
Na toto mi prislo jako vhodne pouzit komponentu TIBClientDataset, ale tato vyzaduje mit nekde v ceste knihovnu MIDAS.DLL.

Muzete mi, prosim, poradit jinou komponentu, ktera by nic externiho nepotrebovala?
Diky
Jirka
--------------------------------------------------
Ing. Jiri Sokol; jiri.sokol(zv)seznam(tec)cz; 972 231 187
D6Prof+SP3; WinXPProf+SP1; FB 1.5.0
programator amater

Vlakna - zobrazeni vyjimek uzivateli

[*] Ing. Jiri Sokol <js-delphi(zv)email(tec)cz> - 7.10.2004 10:51:06

Ahoj.
Potreboval bych pomoct, jak zobrazovat vyjimky, ke kterym doslo ve vytvorenem vlaknu.
Nevim na kolik to s tim souvisi, ale pouzivam v aplikaci ErrorLog z JCL (JEDI) a nerad bych o nej prisel. Nedavno mi tady nekdo radil, abych sledoval udalost Application.OnExcept, ale kdyz to udelam ,tak odbouram ten ErrorLog.
Muzete mi s tim, prosim, nekdo pomoct?
Diky predem
Jirka
--------------------------------------------------
Ing. Jiri Sokol; jiri.sokol(zv)seznam(tec)cz; 972 231 187
D6Prof+SP3; WinXPProf+SP1; FB 1.5.0
programator amater

CodeRush a kolecko na mysi

[*] Ondrej Kelle <o.kelle(zv)digitalpublishing.de> - 7.10.2004 11:11:08

> S instalaci CodeRush najednou nemohu pohybovat v editoru
> pomoci kolecka na mysi - kde to mohu zase nahodit? netusite nekdo?

Skus napisat na ich support. Podla toho, co CodeRush robi, myslim, ze
subclassuje okno editora. Zrejme potlaca (nevola povodnu window procedure)
WM_MOUSEWHEEL. Je dost dobre mozne, ze je to bug (alebo feature? ;-))
CodeRush.

Pripadne to moze byt tiez sposobene nejakym inym pluginom, ktory mas
nainstalovany v IDE.
Skus si to overit na cistej instalacii Delphi + CodeRush (a nic ine).

HTH
TOndrej

Ztrata dat v FB

[*] Agroek <agroek(zv)seznam(tec)cz> - 7.10.2004 10:23:04

Taky to ted resim. Pouzivam Firebird 1.5 4.3.0.6 provedene zmeny jsou
prokazatelne vytistene a presto mi zakaznik hlasi,ze pri pozdejsi kontrole
tam nekdy tyto data chybi. Asi delam neco spatne v commitu. Pouzivam
IBDATASET a pro jistotu jsem kazdemu IIBDATASETU pridel zvlast
IBTRANSACTION.

----- Original Message -----
From: "Richard Kejval" <kejval.delphi(zv)centrum(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, October 07, 2004 9:28 AM
Subject: Ztrata dat v FB


> Ahoj do konference,
>
> Posledni dobou se nam obcas u zakaznika stava, ze se ztrati data, ktera uz
> maji
> vytisknuta na papire, takze musely byt zacommitovany.
>
> Pouzivame Firebird 1.0.2.908, server je Win XP prof. Velikost DB je radove
> 1.5GB V IBConfig mame pouze defaultni hodnoty. Parametr u DB Forced writes
> je zapnuty, proto jsem si myslel, ze data z bufferu jsou hned zapisovany
na
> disk po
> commitu. Setkal se s timto problemem nekdo ? Je to jen problem teto verze
?
> Jak nastavit parametry, aby tento zavazny problem nenastaval ani pri
vypadku
> proudu ? Vypnout uplne buffer, mi nepripada nejstastnejsi.
>
> Diky za kazdou radu..
>
> S pozdravem
> ing. Richard Kejval
> mobil: 602477679
> http://www.icsoftware(tec)cz
>
>
>

IsNumeric?

[*] Petr Brant <brant(zv)dcomm(tec)cz> - 7.10.2004 10:47:06

Funkce IsNum nebo snad IsNumber je v JCL, myslim ze v unite JCLStrings,
zjistuje se, jestli je kazdy znak cislo.

RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
http://brant.wz(tec)cz <http://brant.wz(tec)cz> > nejak jsem se zasekl na trivialnim problemku: Jak zjistit, jestli hodnota
> v
> databazove polozce datasetu BDE typu text je cislo nebo ne. Samozrejme ze
> to
> jde pres nejakou konstrukci try except, nebo funkci VAL, ale neni
> jednodussi
> zpusob, treba jako dotaz typ IsNumeric, jako je to ve VB? Pouzivam
> Delphi5
> Enterprise.
>

IsNumeric?

[*] Dalibor Faltynek <dalibor.faltynek(zv)orgrez(tec)cz> - 7.10.2004 10:45:06

Asi bude fakt nejjednodussi to otestovat pres fci VAL. Musis ale vedet,
jestli to ma byt integer nebo float a pro jistotu vypnout $R a po testu yase
yapnout.

procedure Val(S; var V; var Code: Integer);
pri nenulovem Code jde o cislo, jinak je to text.

Dalibor.

Jak je to s Length(DynArray)?

[*] delphin(zv)post(tec)cz - 7.10.2004 10:27:04

> potrebuji vicekrat pouzivat delku pole, jde mi o to, jestli neni
> lepsi si delku pole nacist do promenne a potom pouzivat tu
> promennou, nebo je to casove jedno ikdyz bych pouzival vsude
> Length(DynArray). Diky

Je rychlejsi precist delku z promenne nez volat length. Prakticky se to ale
projevi az pri deletrvajicim vypoctu.

IsNumeric?

[*] Ondrej Kelle <o.kelle(zv)digitalpublishing.de> - 7.10.2004 09:55:02

> nejak jsem se zasekl na trivialnim problemku: Jak zjistit,
> jestli hodnota v databazove polozce datasetu BDE typu text
> je cislo nebo ne.
> Samozrejme ze to jde pres nejakou konstrukci try except,
> nebo funkci VAL, ale neni jednodussi zpusob, treba jako
> dotaz typ IsNumeric, jako je to ve VB?
> Pouzivam Delphi5 Enterprise.

V Delphi 7 je TryStrToInt. Nespominam si, ci bola uz v Delphi 5.
Ak nie, potom funkcia IsNumeric by mohla vyzerat napriklad takto:

function IsNumeric(const S: string): Boolean;
var
I: Integer;
begin
Result := False;
if S = '' then
Exit;
for I := 1 to Length(S) do
if not (S[I] in ['0'..'9']) then
Exit;
Result := True;
end;

Nemam to odskusane, pisal som to priamo do mailu.

HTH
TOndrej

Ztrata dat v FB

[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 7.10.2004 09:55:01

U FB obcas dochazi k poruseni indexu, takze to chce overit, jetli je
tomu
i v tomto pripade (ryzdilne vysledky pri planu natural a planu pouzitim
indexu).
Resenim je deaktivace a aktivace indexu (pripadne drop a create indexu).
Samozrejme take pomuze backup a restore.
V kazdem pripade doporuciji update na verzi 1.0.3 (ta ma odstraneno
nekolik zasadnich
chyb 1.0.2).
Zaroven doporucuji zvazit prechod primo na verzi 1.5.1.

Slavek

Ing. Slavomir Skopalik
Jednatel spolecnosti
Elekt Labs s.r.o.
Chaloupky 158
783 72 Velky Tynec
Czech Republic
--------------------------------------------
Mobil: +420 724 207 851
icq:199 118 333
e-mail:skopalik(zv)elektlabs(tec)cz
http://www.elektlabs(tec)cz


>
> Pouzivame Firebird 1.0.2.908, server je Win XP prof. Velikost
> DB je radove 1.5GB V IBConfig mame pouze defaultni hodnoty.
> Parametr u DB Forced writes je zapnuty, proto jsem si myslel,
> ze data z bufferu jsou hned zapisovany na disk po commitu.
> Setkal se s timto problemem nekdo ? Je to jen problem teto
> verze ? Jak nastavit parametry, aby tento zavazny problem
> nenastaval ani pri vypadku proudu ? Vypnout uplne buffer, mi
> nepripada nejstastnejsi.

Zapamatovani hesla pri pripojeni sdileneho prostre

[*] Jan Naiser <tua(zv)wo(tec)cz> - 7.10.2004 10:17:03

Preji pekny den,

je nejaka moznost, jak programove "zapamatovat" heslo ke sdilenemu
prostredku na siti win pri pouziti funkce WNetAddConnection2?
Potreboval bych, aby pri dalsim spusteni PC se disk automaticky namapoval
bez nutnosti opet spustit aplikaci nebo zadavat heslo. Podobne, jako kdyz
zadam ve win manualne prihlaseni ke sdilenemu prostredku a dam zapamatovat.

Diky, Honza.

ZeosLib, MySQL, SHA1 a SSL

[*] Kvetoslav Rydval <krydval(zv)merlin(tec)cz> - 7.10.2004 09:49:01

Preji vsem pekneho dne,

jak mohu dynamicky nastavit kontrolu hesla pomoci MD5 (dosud
pouzivane) nebo SHA1 a dale, jak povolit/zakazat komunikaci pres SSH?

D6Prof, ZeosLib 6.1.5-stable build at 2004-04-29 07:03:04, MySQL:
pokud mozno libovolna.


Diky za kazde info.

Slavek

-----------------------------
e-mail:slavek(zv)rydval(tec)cz
http://www.rydval(tec)cz
-----------------------------


IsNumeric?

[*] Dalibor Faltynek <dalibor.faltynek(zv)orgrez(tec)cz> - 7.10.2004 09:43:00

Ahoj,
nejak jsem se zasekl na trivialnim problemku: Jak zjistit, jestli hodnota v
databazove polozce datasetu BDE typu text je cislo nebo ne. Samozrejme ze to
jde pres nejakou konstrukci try except, nebo funkci VAL, ale neni jednodussi
zpusob, treba jako dotaz typ IsNumeric, jako je to ve VB? Pouzivam Delphi5
Enterprise.

Diky Dalibor.

Jak je to s Length(DynArray)?

[*] jharman(zv)volny(tec)cz - 7.10.2004 09:22:56

Zdravim,
potrebuji vicekrat pouzivat delku pole, jde mi o to, jestli neni
lepsi si delku pole nacist do promenne a potom pouzivat tu
promennou, nebo je to casove jedno ikdyz bych pouzival vsude
Length(DynArray). Diky

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

ASP .NET a Firebird

[*] Dalibor <dalibor(zv)torola(tec)cz> - 7.10.2004 07:38:49

Dekuji za nakoponuti, opravdu chybelo jen nakopirovat do podadresare BIN tu
DLL ku...

A Firebird provider 1.7 je vporadku? Pouzivate ho nekdo?


----- Original Message -----
From: "Slavomir Skopalik" <skopalik(zv)elektlabs(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, October 06, 2004 10:50 PM
Subject: Re: ASP .NET a Firebird


> cekal bych, ze musis zkopirovat FirebirdSql.Data.Firebird.dll
> do adresare bin tvoji aspx aplikace.
> Pouzivam provider 1.5 (1.6 ma nejaku tu mouchu) a je to v pohode.
>
> Slavek
>
> Ing. Slavomir Skopalik
> Jednatel spolecnosti
> Elekt Labs s.r.o.
> Chaloupky 158
> 783 72 Velky Tynec
> Czech Republic
> --------------------------------------------
> Mobil: +420 724 207 851
> icq:199 118 333
> e-mail:skopalik(zv)elektlabs(tec)cz
> http://www.elektlabs(tec)cz
>
>
> >
> > Compiler Error Message: CS0246: The type or namespace name
> > 'FirebirdSql' could not be found (are you missing a using
> > directive or an assembly reference?)
> >
> > Line 2: <%(zv) import Namespace="System.Data" %>
> > Line 3: <%(zv) import Namespace="System.Data.SqlClient" %>
> > Line 4: <%(zv) import Namespace="FirebirdSql.Data.Firebird" %>
> > Line 5: <DEFANGED_script runat="server"> Line 6:
> >
> >
> > Nevite nekdo kde delam chybu? Musim jeste nekde neco
> > nastavit, zkopirovat?
> >
>

e-mail z aplikace

[*] TOROLA electronic - Bednarcik Dalibor <dalibor(zv)torola(tec)cz> - 7.10.2004 07:04:47



> Zdravim vsechny,
> potreboval bych poslat e-mail primo z aplikace.
> Poradte nekdo prosim, jak na to.
>
> Diky Zdenek
>
>

Posilam ti dva zpusoby jak by to slo....


var MapiLoaded: Boolean;
MAPIModule : Cardinal;
SendMail : TFNMapiSendMail;

function PosliMail2(Adresat, Subject, TeloZpravy, JmenoSouboru: String):
Boolean;
var
Email: TJclEmail;
begin
Result:=False;
Email := TJclEmail.Create;
try
Email.SelectedClientIndex:=1;
Email.Recipients.Add('Zde napiste adresata', '', rkTO);
Email.Subject := Subject;
Email.Attachments.Add(JmenoSouboru);
Email.Body:=TeloZpravy;
Email.Send;
finally
Email.Free;
end;
end;


function PosliMail(Adresat, Subject, TeloZpravy, JmenoSouboru: String):
Boolean;
var MSG : TMapiMessage;
FIL : Array[0..1] of TMapiFileDesc;
Adresati : TMapiRecipDesc;
SendRes : Cardinal;
begin
Result:=False;

if (Not MapiLoaded) then begin
MapiLoaded := True;
MAPIModule := LoadLibrary(PChar(MAPIDLL));
SendMail := GetProcAddress(MAPIModule, 'MAPISendMail');
end;

if ((zv)SendMail=Nil) then Exit;

ADresati.lpszName := Nil;
Adresati.lpszAddress := PChar(Adresat);
Adresati.ulReserved := 0;
Adresati.ulRecipClass := MAPI_TO;
Adresati.ulEIDSize := 0;
Adresati.lpEntryID := nil;

FIL[0].ulReserved := 0;
FIL[0].flFlags := 0;
FIL[0].nPosition := Cardinal($FFFFFFFF);
FIL[0].lpszPathName :=
PChar(JmenoSouboru);//PChar(ExtractFilePath(JmenoSouboru));
FIL[0].lpszFileName := Nil;//PChar(ExtractFileName(JmenoSouboru));
FIL[0].lpFileType := Nil;

MSG.ulReserved := 0;
MSG.lpszSubject := PChar(Subject);
MSG.lpszNoteText := PChar(TeloZpravy);
MSG.lpszMessageType := Nil;
MSG.lpszDateReceived := Nil;
MSG.lpszConversationID := Nil;
MSG.flFlags := 0;
MSG.lpOriginator := Nil;
MSG.nRecipCount := 1;
MSG.nFileCount := 1;
MSG.lpFiles := (zv)FIL;
MSG.lpRecips := (zv)Adresati;

SendRes := SendMail(0, Application.Handle, MSG, MAPI_DIALOG or
MAPI_LOGON_UI or MAPI_NEW_SESSION, 0);
Result := (SendRes = 0);
end;

texture1:pointer

[*] P&v <pa.v(zv)seznam(tec)cz> - 7.10.2004 06:58:46



> > Textury nacitam podle tutorialu procedurou
> > auxDIBImageLoadA do promene tohoto typu:
> >
> > type TAUX_RGBImageRec= record
> > sizeX, sizeY: TGLint;
> > data: pointer;
> > end;
> > PTAUX_RGBImageRec= ^TAUX_RGBImageRec;
> >
> > Moje zacatecnicka otazka zni, jak mam tyto informace, na nez ukazuje
> > "data" pozmenit? Tzn. jak se pracuje s typem obecny pointer? Umim
> > pouze typove ukazatele.
>
> data su formatu RGB, ak nie je alpha , ak je tak staci doplnit...
>
> type
> TRGB24 = record
> R,G,B: Byte;
> end;
> TData = array [0..0]of TRGB24;
>
>
> potom napr. jednoducho bielu farbu v prvom riadku nastavis takto:
>
> var p: ^TData;
> test: PTAUX_RGBImageRec;
> i: Integer;
> begin
> *LoadFromFILE*(test);
> p := test^.data;
>
> for i := 0 to test^.sizeX -1 do
> with p[i] do
> begin
> r:= 255;g:=255;b:=255;
> end;
>
> end;
>
> ked uz posles texturu do grafickej karty tak uz ju vies zmodifikovat
> iba ak ju znova posles ...
>
> palo
>
>
dik moc, cosi jsem udelal, vecer to vystavim
d


XML+XSL -> HTML

[*] Jan Sebelik <honza(zv)haes(tec)cz> - 7.10.2004 06:54:46

> potreboval bych programove vygenerovat HTML soubor z XML souboru
> (kde mam
> data) protlacenim pres XSL sablonu a nevim jak na to. Dekuji za radu.

http://www.haes(tec)cz/osnovy.asp?r=osnovy&kod=XML

Honza
====================================
= RNDr. Jan Sebelik - HAES
= Skolici a konzultacni stredisko pro vyvoj SW
= www.haes(tec)cz
= Vojtiskova 321
= 507 81 Lazne Belohrad
= tel. 493 792 569 (mobil 776 347 735)
====================================

monitor

[*] Vaclav Riha - Soft Consult <vaclav_riha(zv)softconsult(tec)cz> - 7.10.2004 06:02:40

>Ahoj. Potreboval bych vedet, zda je mozne zjistit, je-li monitor zapnuty/vypnuty. Pokud ano, jak na to v delphi ? Diky, prgx.

Obavam se ze ne. Videokarta detekuje pouze pripojeny/nepripojeny. Jedinou moznosti by mohl byt DVI, ale ten se moc nepouziva.

S pozdravem Vaclav Riha

Nabidka zamestnani

[*] Petr j <pj03(zv)seznam(tec)cz> - 7.10.2004 01:24:22

Petre, neznam podrobnosti tve neshody (a ani me to nezajima) s nasim byvalym jednatelem (kdysi v minulosti), ale to te preci neopravnuje k tomu, abys hazel spinu na nasi firmu. Jsem v teto firme pomerne kratce, ale za tim, co jsem napsal, si stojim. Tve osobni problemy prosim netahej do konference. Pospinujes tak jmeno nasi spolecnosti.

Klidne si opet dej moji adresu na blacklist, abych nemohl na tvoje prispevky reagovat. Zda se mi ale tvoje chovani trochu detinske.

S pozdravem

Petr Jarkovsky

e-mail z aplikace

[*] Ludek ZITA <konference(zv)sales(tec)cz> - 7.10.2004 01:14:21

On Behalf Of In g. Zdenek Reznicek
> potreboval bych poslat e-mail primo z aplikace.
> Poradte nekdo prosim, jak na to.

Ahoj.
Strucne :
1) synapse (http://www.ararat(tec)cz/synapse/)
2) JCL (TJclEmail)
3) Delphi: File-New-Other-Projects-Win2000 Logo App nebo Win95/98 Logo
App a tam se cihni na menu File-Send

Ludek


e-mail z aplikace

[*] In g. Zdenek Reznicek <reznicek(zv)pce(tec)cz> - 7.10.2004 00:02:15

Zdravim vsechny,
potreboval bych poslat e-mail primo z aplikace.
Poradte nekdo prosim, jak na to.

Diky Zdenek


ASP .NET a Firebird

[*] Petr Vones <konference(zv)petrvones(tec)net> - 6.10.2004 23:08:12

From: "Dalibor" <dalibor(zv)torola(tec)cz>
> Nevite nekdo kde delam chybu? Musim jeste nekde neco nastavit, zkopirovat?

A mas ho urcite v GAC ? Jinak s tim providerem jsem si uzil dost legrace :-)

Petr Vones

ASP .NET a Firebird

[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 6.10.2004 22:50:11

cekal bych, ze musis zkopirovat FirebirdSql.Data.Firebird.dll
do adresare bin tvoji aspx aplikace.
Pouzivam provider 1.5 (1.6 ma nejaku tu mouchu) a je to v pohode.

Slavek

Ing. Slavomir Skopalik
Jednatel spolecnosti
Elekt Labs s.r.o.
Chaloupky 158
783 72 Velky Tynec
Czech Republic
--------------------------------------------
Mobil: +420 724 207 851
icq:199 118 333
e-mail:skopalik(zv)elektlabs(tec)cz
http://www.elektlabs(tec)cz


>
> Compiler Error Message: CS0246: The type or namespace name
> 'FirebirdSql' could not be found (are you missing a using
> directive or an assembly reference?)
>
> Line 2: <%(zv) import Namespace="System.Data" %>
> Line 3: <%(zv) import Namespace="System.Data.SqlClient" %>
> Line 4: <%(zv) import Namespace="FirebirdSql.Data.Firebird" %>
> Line 5: <script runat="server"> Line 6:
>
>
> Nevite nekdo kde delam chybu? Musim jeste nekde neco
> nastavit, zkopirovat?
>

Asociace souboru s MDI aplikaci

[*] Jiri Foldyna <jiri.f(zv)avizo(tec)cz> - 6.10.2004 19:09:55

Diky vsem, vyzkousim.

Jiri Foldyna

> procedure TMyAppMainForm.WMCopyData(var Message: TWMCopyData);
> var
> S: string;
> Strings: TStringList;
> I: Integer;
> begin
> with Message do
> if (From = 0) and Assigned(CopyDataStruct) and
> (CopyDataStruct^.dwData =
> AppInstCmdLineDataKind) and
> (CopyDataStruct^.cbData > 0) then
> begin
> Strings := TStringList.Create;
> try
> with CopyDataStruct^ do
> SetString(S, PChar(lpData), cbData);
> Strings.Text := S;
> for I := 0 to Strings.Count - 1 do
> OpenFile(Strings[I]);
> finally
> Strings.Free;
> end;
> end;
> end;
>
> OpenFile potom kontroluje, ci pre dane meno suboru uz
> existuje otvorene MDI
> child okno; ak ano, len ho nastavi ho do popredia, inak
> vytvori nove okno.
>
> HTH
> TOndrej
>
>
>

monitor

[*] Pavol Stugel, NETGraphics <palo(zv)netgraphics.sk> - 6.10.2004 17:17:48

> Ahoj. Potreboval bych vedet, zda je mozne zjistit, je-li monitor zapnuty/vypnuty. Pokud ano, jak na to v delphi ? Diky, prgx.
Toto asi nepojde ...

Jedine co vies je prepinat medzi setriacim a normalnym rezimom monitora:
SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, 0 {1});

takze asi by mohlo niekde existovat zistenie v akom stave je ... skus hladat.

palo


PS: tak to mu mame nie kazdy druhy prispevok OT, ale kazdy :( supr.

OT: monitor

[*] prgx(zv)email(tec)cz - 6.10.2004 16:59:46

Ahoj. Potreboval bych vedet, zda je mozne zjistit, je-li monitor zapnuty/vypnuty. Pokud ano, jak na to v delphi ? Diky, prgx.

kde najit ceskou ASPXovou konferenci

[*] Pavol Stugel, NETGraphics <palo(zv)netgraphics.sk> - 6.10.2004 16:29:44

http://forum.builder(tec)cz/list.php?f=25


OT: kde najit ceskou ASPXovou konferenci

[*] Jaroslav Kohak <jaroslav.kohak(zv)dites(tec)cz> - 6.10.2004 16:23:44

Ahoj,
nechci se tu ptat na problemy s %Subj i kdyz tu neco na toto tema obcas probehne.
Nevite nekdo o takoveto konferenci?
Dik Jarda

-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Dalibor
Sent: Wednesday, October 06, 2004 2:10 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: OT: ASP .NET a Firebird


Ahoj,
stahnul jsem si Web Matrix na vytvareni ASP .Net
Chtel jsem si z nej vyzkouset pripojeni na Firebird

Nainstaloval jsem Firebird .Net Provider 1.7 (Toho jsem bezproblemu rozjel ve Visual #C 2005)

Do ASP scriptu jsem pridal radku

<%(zv) import Namespace="FirebirdSql.Data.Firebird" %>

A do Classes jsem pridal reference na FirebirdSql.Data.Firebird.

Po spusteni, se mi objevi v IE chybova hlaska

Compiler Error Message: CS0246: The type or namespace name 'FirebirdSql' could not be found (are you missing a using directive or an assembly reference?)

Line 2: <%(zv) import Namespace="System.Data" %>
Line 3: <%(zv) import Namespace="System.Data.SqlClient" %>
Line 4: <%(zv) import Namespace="FirebirdSql.Data.Firebird" %>
Line 5: <script runat="server">
Line 6:


Nevite nekdo kde delam chybu? Musim jeste nekde neco nastavit, zkopirovat?

Dekuji

CodeRush a Ctrl+Left (Right)

[*] Jan Rizek <jan_rizek(zv)centrum(tec)cz> - 6.10.2004 15:51:41

Ano ATI - control panel - tray iconka - ta to delala - odinstaloval jsem to
a vypada to OK..

Diky za pomoc..
> Panove, taky jsem z toho byl zoufaly. Ale CodeRush s tim nema nic
> spolecneho, muze za to ATI ovladaci panel a jeho klavesove zkratky.
> Staci zakazat service nebo ikony v systray, nutno experimentovat.
>
> Tak mi odpovedeli jeste z Eagle a pomohlo to.
>

XML+XSL -> HTML

[*] Jan Rizek <jan_rizek(zv)centrum(tec)cz> - 6.10.2004 15:53:42

Tohle jsem delal v Jave a je na to hromada parseru.. pro JAvu :-) ale
pocitam, ze by snad mohlo neco existovat i pro Delphi.. Takze hledat :-)
urcite uz to nekdo nekde udelal - tak to jenom pouzit..> Ahoj vsem,
> potreboval bych programove vygenerovat HTML soubor z XML souboru (kde mam
> data) protlacenim pres XSL sablonu a nevim jak na to. Dekuji za radu.
>
> Pavel B.
>
> Delphi7 Ent., Win2K
>
>
>

OT: ASP .NET a Firebird

[*] Dalibor <dalibor(zv)torola(tec)cz> - 6.10.2004 14:09:35

Ahoj,
stahnul jsem si Web Matrix na vytvareni ASP .Net
Chtel jsem si z nej vyzkouset pripojeni na Firebird

Nainstaloval jsem Firebird .Net Provider 1.7 (Toho jsem bezproblemu rozjel ve Visual #C 2005)

Do ASP scriptu jsem pridal radku

<%(zv) import Namespace="FirebirdSql.Data.Firebird" %>

A do Classes jsem pridal reference na FirebirdSql.Data.Firebird.

Po spusteni, se mi objevi v IE chybova hlaska

Compiler Error Message: CS0246: The type or namespace name 'FirebirdSql' could not be found (are you missing a using directive or an assembly reference?)

Line 2: <%(zv) import Namespace="System.Data" %>
Line 3: <%(zv) import Namespace="System.Data.SqlClient" %>
Line 4: <%(zv) import Namespace="FirebirdSql.Data.Firebird" %>
Line 5: <script runat="server">
Line 6:


Nevite nekdo kde delam chybu? Musim jeste nekde neco nastavit, zkopirovat?

Dekuji

CodeRush a Ctrl+Left (Right)

[*] Karel Kral <kralkonf(zv)purus(tec)cz> - 6.10.2004 13:35:32

Panove, taky jsem z toho byl zoufaly. Ale CodeRush s tim nema nic
spolecneho, muze za to ATI ovladaci panel a jeho klavesove zkratky.
Staci zakazat service nebo ikony v systray, nutno experimentovat.

Tak mi odpovedeli jeste z Eagle a pomohlo to.

Jan Rizek napsal(a):
> Zdravim,
>
> po nainstalovani CodeRush mi funguje spatne Ctrl+left (right) skace to nekam uplne jinam.. Netusite v cem by to mohlo byt. Nastaveni CodeRush je docela obsahle. Klavesovou zkratku Ctrl+Left (Right) jsem nikde nevidel..
>
> Nestalo se to jeste nekomu?
>
>
>
>
>
>


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


Asociace souboru s MDI aplikaci

[*] Jan Rizek <jan_rizek(zv)centrum(tec)cz> - 6.10.2004 12:55:29

Tohle jsem nikdy neresil, ale slo by ho zapsat do souboru a z nej si to
precist.. (ShellChangeNotifier) .> Ahoj,
>
> omlouvam se za asi neprilis vystizny subj, ale jde v podstate o toto:
>
> Mam MDI aplikaci, ktera je asociovana z urcitym typem souboru. Po
poklepani
> na soubor napr. v pruzkumniku se spusti aplikace a otevre se okno se
> souborem. Potreboval bych ale, aby se v pripade, ze aplikace uz bezi,
> nespoustela dalsi instance, ale aby se v bezici aplikaci otevrelo dalsi
> okno. Zjistit, jestli uz aplikace bezi, neni problem. Co potrebuji, je
> predat bezici aplikaci nazev souboru. Jak to resite ?
>
> Diky
>
> Jiri Foldyna
>
>
>
>

Asociace souboru s MDI aplikaci

[*] Ondrej Kelle <o.kelle(zv)digitalpublishing.de> - 6.10.2004 13:13:31

>> Mam MDI aplikaci, ktera je asociovana z urcitym typem
>> souboru. Po poklepani na soubor napr. v pruzkumniku
>> se spusti aplikace a otevre se okno se souborem.
>> Potreboval bych ale, aby se v pripade, ze aplikace uz
>> bezi, nespoustela dalsi instance, ale aby se v bezici
>> aplikaci otevrelo dalsi okno. Zjistit, jestli uz
>> aplikace bezi, neni problem. Co potrebuji, je predat
>> bezici aplikaci nazev souboru. Jak to resite ?

Ospravedlnujem sa, moj predosly prispevok nebol uplny.
Ten kod v .dpr posle prvej instancii spravu WM_COPYDATA, takze v hlavnom
formulari aplikacie treba tuto spravu osetrit:

procedure TMyAppMainForm.WMCopyData(var Message: TWMCopyData);
var
S: string;
Strings: TStringList;
I: Integer;
begin
with Message do
if (From = 0) and Assigned(CopyDataStruct) and (CopyDataStruct^.dwData =
AppInstCmdLineDataKind) and
(CopyDataStruct^.cbData > 0) then
begin
Strings := TStringList.Create;
try
with CopyDataStruct^ do
SetString(S, PChar(lpData), cbData);
Strings.Text := S;
for I := 0 to Strings.Count - 1 do
OpenFile(Strings[I]);
finally
Strings.Free;
end;
end;
end;

OpenFile potom kontroluje, ci pre dane meno suboru uz existuje otvorene MDI
child okno; ak ano, len ho nastavi ho do popredia, inak vytvori nove okno.

HTH
TOndrej

XML+XSL -> HTML

[*] Pavel Benacek <pavel.benacek(zv)cegedim(tec)com> - 6.10.2004 12:33:26

Ahoj vsem,
potreboval bych programove vygenerovat HTML soubor z XML souboru (kde mam
data) protlacenim pres XSL sablonu a nevim jak na to. Dekuji za radu.

Pavel B.

Delphi7 Ent., Win2K

Asociace souboru s MDI aplikaci

[*] Ondrej Kelle <o.kelle(zv)digitalpublishing.de> - 6.10.2004 13:01:30

> Mam MDI aplikaci, ktera je asociovana z urcitym typem
> souboru. Po poklepani na soubor napr. v pruzkumniku
> se spusti aplikace a otevre se okno se souborem.
> Potreboval bych ale, aby se v pripade, ze aplikace uz
> bezi, nespoustela dalsi instance, ale aby se v bezici
> aplikaci otevrelo dalsi okno. Zjistit, jestli uz
> aplikace bezi, neni problem. Co potrebuji, je predat
> bezici aplikaci nazev souboru. Jak to resite ?

program MyApp;

uses
Forms,
JclAppInst,
...;

const
MyAppUniqueID = ...; // napriklad GUID

begin
with JclAppInstances(MyAppUniqueID) do
if CheckInstance(1) then
begin
Application.Initialize;
Application.Title := ...;
Application.CreateForm(TMyAppMainForm, MyAppMainForm);
Application.Run;
end
else
begin
SwitchTo(0);
SendCmdLineParams('TMyAppMainForm', 0);
end;
end.

HTH
TOndrej

CodeRush a Ctrl+Left (Right)

[*] Jan Rizek <jan_rizek(zv)centrum(tec)cz> - 6.10.2004 12:33:27

V ShortCuts zadne Ctrl+left (right) neni..

Skace to strasne divne.. Ctrl+right skoci na zacatek slova, na kterem stojim
nebo funguje normalne..
Ctrl+left zaplat pambu funguje spravne.

> Ahoj,
>
> pokud ti to skace na predchozi/nasledujici slovo, tak ti to funguje stejne
> jako mne. Pokud to skace nekam jinam (kam ?), tak zkus zkontrolovat
> Coderush-Options, zalozka Shortcuts. Po kliknuti na zahlavi sloupce
> Shortcuts se seznam seradi podle kombinaci klaves, takze se to lip hleda.
>
> Zdravim
>
> Jiri Foldyna
>
> > Subject: CodeRush a Ctrl+Left (Right)
> >
> > Zdravim,
> >
> > po nainstalovani CodeRush mi funguje spatne Ctrl+left
> > (right) skace to nekam uplne jinam.. Netusite v cem by to
> > mohlo byt. Nastaveni CodeRush je docela obsahle. Klavesovou
> > zkratku Ctrl+Left (Right) jsem nikde nevidel..
> >
> > Nestalo se to jeste nekomu?
>
>
>
>

Asociace souboru s MDI aplikaci

[*] Ing. Petr Sikola <developer(zv)efg(tec)cz> - 6.10.2004 12:49:28

ja to delam pres message wm_copydata
kde si v aplikaci (jeste v *.dpr) zjistim jestli je jiz spustena jina
instance, a pokud ano, posilam mesage do te drive spustene, pokud ne,
nic neposilam.

v te drive spustene si wm_copydata odchytnu a prectu si z ni jmena
souboru.

Petr Sikola

> souborem. Potreboval bych ale, aby se v pripade, ze aplikace uz bezi,
> nespoustela dalsi instance, ale aby se v bezici aplikaci
> otevrelo dalsi
> okno. Zjistit, jestli uz aplikace bezi, neni problem. Co potrebuji, je
> predat bezici aplikaci nazev souboru. Jak to resite ?
> Jiri Foldyna

CodeRush a Ctrl+Left (Right)

[*] Jiri Foldyna <jiri.f(zv)avizo(tec)cz> - 6.10.2004 12:23:26

Ahoj,

pokud ti to skace na predchozi/nasledujici slovo, tak ti to funguje stejne
jako mne. Pokud to skace nekam jinam (kam ?), tak zkus zkontrolovat
Coderush-Options, zalozka Shortcuts. Po kliknuti na zahlavi sloupce
Shortcuts se seznam seradi podle kombinaci klaves, takze se to lip hleda.

Zdravim

Jiri Foldyna

> Subject: CodeRush a Ctrl+Left (Right)
>
> Zdravim,
>
> po nainstalovani CodeRush mi funguje spatne Ctrl+left
> (right) skace to nekam uplne jinam.. Netusite v cem by to
> mohlo byt. Nastaveni CodeRush je docela obsahle. Klavesovou
> zkratku Ctrl+Left (Right) jsem nikde nevidel..
>
> Nestalo se to jeste nekomu?

Asociace souboru s MDI aplikaci

[*] Jiri Foldyna <jiri.f(zv)avizo(tec)cz> - 6.10.2004 12:13:25

Ahoj,

omlouvam se za asi neprilis vystizny subj, ale jde v podstate o toto:

Mam MDI aplikaci, ktera je asociovana z urcitym typem souboru. Po poklepani
na soubor napr. v pruzkumniku se spusti aplikace a otevre se okno se
souborem. Potreboval bych ale, aby se v pripade, ze aplikace uz bezi,
nespoustela dalsi instance, ale aby se v bezici aplikaci otevrelo dalsi
okno. Zjistit, jestli uz aplikace bezi, neni problem. Co potrebuji, je
predat bezici aplikaci nazev souboru. Jak to resite ?

Diky

Jiri Foldyna

CodeRush a Ctrl+Left (Right)

[*] Jan Rizek <jan_rizek(zv)centrum(tec)cz> - 6.10.2004 12:11:24

Zdravim,

po nainstalovani CodeRush mi funguje spatne Ctrl+left (right) skace to nekam uplne jinam.. Netusite v cem by to mohlo byt. Nastaveni CodeRush je docela obsahle. Klavesovou zkratku Ctrl+Left (Right) jsem nikde nevidel..

Nestalo se to jeste nekomu?

isolation level, InterBase

[*] Jan Rizek <jan_rizek(zv)centrum(tec)cz> - 6.10.2004 11:25:21

Zkuste pridat TIBTransaction a poklepat na ni.. Propojit s TIBDatabase..> Delphi 7 Professional, Firebird 1.0.2., Interbase 6.5 Desktop
> Windows 98
>
> Pouzivam komponenty ze zalozky InterBase. Ted zacinam novou aplikaci,
> potreboval bych nastavovat isolation level a wait, no wait - jde to nejak?
> Napr. Komponenta Database ze zalozky BDE ma vlastnost TransIsolation.
> Komponenta IBDatabase takovou vlastnost nema. Mam kvuli tomu prejit na
BDE?
> Nevim, jake jsou vyhody a nevyhody. Mohl by nekdo poradit? Help odkazuje
na
> Interbase API Guide, ale to nemohu najit. Po instalaci InterBase 6.5
Desktop
> se v programovem menu objevi InterBase/Documentation/odkazy na nekolik
> dokumentu ve formatu .pdf, ale za temi odkazy nic neni - delam neco spatne
> pri instalaci, nebo to v Delphi 7 Professional proste neni? Mohl by nekdo
> poradit?
>
>

Aliasy SQL Serveru

[*] Vit Krska <vit.krska(zv)del(tec)cz> - 6.10.2004 10:05:15


>Zdravim,
>
>nevite jak ziskat (pres ADO) seznam aliasu SQL Serveru?

http://delphi.about.com/library/weekly/aa090704a.htm
>
>dik,
>
>Vaclav Sykora
>vaclav.sykora(zv)accidis(tec)cz
>
>
>
>.

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

Vit Krska
vit.krska(zv)del(tec)cz
2004-10-06

Aliasy SQL Serveru

[*] Vaclav Sykora <vaclav.sykora(zv)accidis(tec)cz> - 6.10.2004 09:21:12

Zdravim,

nevite jak ziskat (pres ADO) seznam aliasu SQL Serveru?

dik,

Vaclav Sykora
vaclav.sykora(zv)accidis(tec)cz

Net a DLLImport

[*] Dalibor <dalibor(zv)torola(tec)cz> - 6.10.2004 09:13:10

Dekuji, bylo to v poradi tech parametru.

----- Original Message -----
From: "Winsoft" <winsoft(zv)netkosice.sk>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, October 06, 2004 12:26 AM
Subject: Re: .Net a DLLImport


> > potreboval bych v .Net naimportovat funkce s jedne DLL.
> > V Delphi k ni pristupuje pres tenhle kod
> >
> > type
> > HANDLE = Pointer;
> >
> > OVR :procedure (SES: HANDLE; sx:Integer; sy:Integer); pascal;
>
> AIK .NET nepodporuje pascal volaciu konvenciu. Ale ked
> zmenis poradie parametrov, tak by mala fungoval stdcall konvencia:
>
> [DllImport("test.dll", EntryPoint="OVR",
> CallingConvention=CallingConvention.StdCall)]
> public static extern void OVR(int sy, int sx, IntPtr ses);
>
> Erik
>
>
>

Delphi nezkompiluje co je na formulari

[*] Ing. Miroslav Vopalecky <m.vopalecky(zv)tiscali(tec)cz> - 6.10.2004 09:07:09

Ahoj.
Neco podobneho se mi obcas deje v D7 Prof, W2000. Nevysledoval jsem proc.
Jedine co mi pomohlo bylo z projektu odstranit unitu a znovu ji pridat. Pak
doslo k uplnemu prekladu.
S pozdravem Mirek Vopalecky, D7 W2000

isolation level, InterBase

[*] Milan Tomes <delphi(zv)haida(tec)cz> - 6.10.2004 08:47:08

Toto nastavis na komponente TIBTransaction - jedna se o uroven izolace
transakce, takze nema smysl ji zabalovat nekam jinam. U BDE je situace jina,
protoze Te naprosto odstini od transakcniho rizeni.

S pozdravem

Milan Tomes


> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of ing. Petr Borkovec
> Sent: Wednesday, October 06, 2004 8:37 AM
>
> Pouzivam komponenty ze zalozky InterBase. Ted zacinam novou aplikaci,
> potreboval bych nastavovat isolation level a wait, no wait - jde to nejak?
> Napr. Komponenta Database ze zalozky BDE ma vlastnost TransIsolation.
> Komponenta IBDatabase takovou vlastnost nema. Mam kvuli tomu


isolation level, InterBase

[*] ing. Petr Borkovec <petrborkovec(zv)volny(tec)cz> - 6.10.2004 08:37:07

Delphi 7 Professional, Firebird 1.0.2., Interbase 6.5 Desktop
Windows 98

Pouzivam komponenty ze zalozky InterBase. Ted zacinam novou aplikaci,
potreboval bych nastavovat isolation level a wait, no wait - jde to nejak?
Napr. Komponenta Database ze zalozky BDE ma vlastnost TransIsolation.
Komponenta IBDatabase takovou vlastnost nema. Mam kvuli tomu prejit na BDE?
Nevim, jake jsou vyhody a nevyhody. Mohl by nekdo poradit? Help odkazuje na
Interbase API Guide, ale to nemohu najit. Po instalaci InterBase 6.5 Desktop
se v programovem menu objevi InterBase/Documentation/odkazy na nekolik
dokumentu ve formatu .pdf, ale za temi odkazy nic neni - delam neco spatne
pri instalaci, nebo to v Delphi 7 Professional proste neni? Mohl by nekdo
poradit?

D7 / WME/9X : ACM wave recorder

[*] Pavol Stugel, NETGraphics <palo(zv)netgraphics.sk> - 6.10.2004 08:19:05

> nema nekdo overenou ACM komponentu nebo zdrojak ktery bude nahravat na
> WME/9X,
> bude pro D7 a idealne je overen s MP3 codecem ktery je standardne ve WMP ?
Asi najlepsi bude deAudio (www.droopyeyes.com), (free bol do verzie 1.x, teraz je 2.x...).
Skor vsak problem bude s kodekom WMP, na s nim dodavany codec Mp3 ma nejake limity,
teraz presne neviem, skor v tvojom pripade bude problem s codecom ... skusal si ine?

palo

Firebird 1.5 a maximalni velikost DB souboru

[*] Pavol Stugel, NETGraphics <palo(zv)netgraphics.sk> - 6.10.2004 07:59:04

> prosim, jaka je maximalni velikost jednoho datoveho souboru (gdb/fdb) u
> verze Firebird 1.5 Super Server?
> U 1.0 to bylo tusim 2GB na Linuxu a 4GB naWindows a minimalne pro Linux
> existovaly i (64-bit ?) verze s nejakym hodne vysokym omezenim,
> pro novejsi verzi to nemohu najit.
.... a snazil si sa tak trochu???
www.google.com zadaj: max file size in firebird 1.5
a svete div sa hned prvy link:

Physical Limits
Firebird allows really huge databases. Databases can span multiple files, the size of each file is OS- dependant.
The theoretical limit is currently 64TB for a single-file database, so the practical limit is usually the operating / file system or available HD space.

ak by sa ti nechcelo prekladat, tak limit je 64TB, alebo podla OS, cize tak podobne ... kolko na disk dokazes zapisat.

palo

PS: kazdy druhy prispevok OT:, asi si nastavim filtre na mazanie ...
(alebo by mohol admin. nech si to ludia odvyknu pouzivat ...)

texture1:pointer

[*] Pavol Stugel, NETGraphics <palo(zv)netgraphics.sk> - 6.10.2004 07:47:03

> Textury nacitam podle tutorialu procedurou
> auxDIBImageLoadA do promene tohoto typu:
>
> type TAUX_RGBImageRec= record
> sizeX, sizeY: TGLint;
> data: pointer;
> end;
> PTAUX_RGBImageRec= ^TAUX_RGBImageRec;
>
> Moje zacatecnicka otazka zni, jak mam tyto informace, na nez ukazuje
> "data" pozmenit? Tzn. jak se pracuje s typem obecny pointer? Umim
> pouze typove ukazatele.

data su formatu RGB, ak nie je alpha , ak je tak staci doplnit...

type
TRGB24 = record
R,G,B: Byte;
end;
TData = array [0..0]of TRGB24;


potom napr. jednoducho bielu farbu v prvom riadku nastavis takto:

var p: ^TData;
test: PTAUX_RGBImageRec;
i: Integer;
begin
*LoadFromFILE*(test);
p := test^.data;

for i := 0 to test^.sizeX -1 do
with p[i] do
begin
r:= 255;g:=255;b:=255;
end;

end;

ked uz posles texturu do grafickej karty tak uz ju vies zmodifikovat
iba ak ju znova posles ...

palo

OT: Firebird 1.5 a maximalni velikost DB souboru

[*] URBAN Leos <leos.urban(zv)qds(tec)cz> - 6.10.2004 07:41:02

Ahoj,
prosim, jaka je maximalni velikost jednoho datoveho souboru (gdb/fdb) u
verze Firebird 1.5 Super Server?
U 1.0 to bylo tusim 2GB na Linuxu a 4GB naWindows a minimalne pro Linux
existovaly i (64-bit ?) verze s nejakym hodne vysokym omezenim,
pro novejsi verzi to nemohu najit.
Diky,
Leos


Net a DLLImport

[*] Petr Vones <konference(zv)petrvones(tec)net> - 6.10.2004 00:26:34

From: "Dalibor" <dalibor(zv)torola(tec)cz>
> Zjistil jsem, ze pokud ma funkce, ci procedura jeden parametr, tak je to OK,
> ale kdyz jich ma vice, tak je prave onen problem.

Vypada to ze tuhle volaci konvenci (pascal) P/Invoke nepodporuje. Neni mozne
to v te DLL zmenit na neco normalniho (typicky stdcall) ?

Petr Vones


Net a DLLImport

[*] Winsoft <winsoft(zv)netkosice.sk> - 6.10.2004 00:26:34

> potreboval bych v .Net naimportovat funkce s jedne DLL.
> V Delphi k ni pristupuje pres tenhle kod
>
> type
> HANDLE = Pointer;
>
> OVR :procedure (SES: HANDLE; sx:Integer; sy:Integer); pascal;

AIK .NET nepodporuje pascal volaciu konvenciu. Ale ked
zmenis poradie parametrov, tak by mala fungoval stdcall konvencia:

[DllImport("test.dll", EntryPoint="OVR",
CallingConvention=CallingConvention.StdCall)]
public static extern void OVR(int sy, int sx, IntPtr ses);

Erik

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