Сохранить в файл

[megostudent]

как сохранить содержимое мемо в файл в папку темп?
memo1.lines.sevetofile('c:\temp\1.t xt'); не подходит, на хр у меня сохраняет, а на вин7 не хочет. Как еще можно?

[Volkogriz]

Прочьти

var
GetTempDir,buf:string;
len:UINT;
begin
SetLength(buf, MAX_PATH+1);
len:=GetTempPath(MAX_PATH, PAnsiChar(buf));
SetLength(buf,len);
GetTempDir:=buf ;
begin
memo1.lines.sevetofile(buf+'1.t xt');