Köszi, de sajnos nem segített pedig jó ötlet volt. Az nls_iso8859-2.ko modul a helyén, modprobe parabcsal be is töltõdik,
utána benn van a betöltött modulok listájában: lsmod | grep nls

Sajnos ezek után elindítva a programot se változik a kép.

Köszi még 1x.

Szia

Egy dolog ami akadályozhatja a futást. A tûzfal például:
445 és 139-es portokat használja a két samba-s service. Illetve ha a „samba-swat” csomag telepítve van és használni akarod (http://127.0.0.1:901) akkor a 901-es portot is meg kell engedni legalább localhost-ként és az xinetd-ben is meg kell engedni a swat futását…

2.2.x és 3.0.x samba esetén változott a domain-be léptetés a 3.0.x alatti verzióknál
„net join -S -Uadmin%password” paranccsal tehetõ meg, ha a linux-os szerver be van konfugurálva ehhez. A samba doc könyvtárát gondolom megtaláltátok… a HoWTO rész nagyon hasznos (/usr/share/doc/samba-3.0.x/htmldocs/howto-collection/* ha jól emlékszem) …

Attila

http://www.dcinfo.org <----olvasd el s mindenre fény derül... :)
[align=right][snapback]102604[/snapback][/align]

Ez szép és jó csak WINDOWS-os programok beállítását magyarázza…. De majd kipróbálom…!!!

http://www.dcinfo.org <----olvasd el s mindenre fény derül... :)
[align=right][snapback]102604[/snapback][/align]

Köszi elolvasom… de ha valakinek egyéb jótanácsai vannak azt szívesen fogadom…

unit UMain;

interface

uses
SysUtils, Types, Classes, Variants, QTypes, QGraphics, QControls, QForms,
QDialogs, QStdCtrls, Libc, QExtCtrls;

type
TForm1 = class(TForm)
Button1: TButton;
Memo1: TMemo;
Timer1: TTimer;
Panel1: TPanel;
Edit1: TEdit;
procedure Button1Click(Sender: TObject);
procedure Timer1Timer(Sender: TObject);
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
NeedExit:boolean;
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.xfm}

procedure TForm1.Button1Click(Sender: TObject);
var
homedir,filename:string;
result:integer;
command:string;
begin
Memo1.Lines.Clear;
NeedExit:=false;
homedir:=GetEnvironmentVariable(‘HOME’);
filename:=homedir+’/result.txt’;
try
Timer1.Interval:=3*1000;
command:=Edit1.Text + ‘ > ‘+filename;
result:=Libc.system(PChar(command));
while not FileExists(filename) do begin
Sleep(100);
Application.ProcessMessages;
if (not Timer1.Enabled) and (not FileExists(filename)) then Timer1.Enabled:=true;
if NeedExit then exit;
end;
if FileExists(filename) then begin
Timer1.Enabled:=false;
Memo1.Lines.LoadFromFile(filename);
Memo1.Lines.Insert(0,”);
Memo1.Lines.Insert(0,Edit1.Text+’:’);
Memo1.Lines.Add(”);
Memo1.Lines.Add(‘Result=’+IntToStr(result));
end;
finally
Timer1.Enabled:=false;
if FileExists(filename) then DeleteFile(filename);
end;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
if smbCancel = Application.MessageBox(‘Folytatja a v�akoz�t a shell-command befejez��e?’,’K�d�’,[smbYes,smbCancel]) then begin
NeedExit:=true;
end;
Timer1.Enabled:=false;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
Timer1.Enabled:=false;
NeedExit:=false;
end;

end.