risolto cosi:
procedure TForm1.FormCreate(Sender: TObject);
begin
if ParamStr(1) <> '' then
Richedit1.lines.loadfromfile(ParamStr(1));
end;
end.
grazie.
risolto cosi:
procedure TForm1.FormCreate(Sender: TObject);
begin
if ParamStr(1) <> '' then
Richedit1.lines.loadfromfile(ParamStr(1));
end;
end.
grazie.