이 소스인데 컴파일 할려고 하면 에러가 나거든요 선언을 잘 못한거 같은데
초보라서 선언하는게 어렵네요 아직 이해도 잘 안가고
선언 하는 방법좀 알려주세요
function LoadFile(const FileName: TFileName): string;
var
StringList: TStringList;
begin
StringList := TStringList.Create;
try
StringList.LoadFromFile(FileName);
Result := StringList.Text;
finally
StringList.Free;
end;
end;
procedure SaveFile(const FileName: TFileName; const S: String);
var
StringList: TStringList;
begin
StringList := TStringList.Create;
try
StringList.Text := S;
StringList.SaveToFile(FileName);
finally
StringList.Free;
end;
end;
어떤종류의 에러가 어떻게 난다는 것인지요?
증상을 자세하게 말씀하셔야 치료가 가능하지 않을까요?