Текущий архив: 2003.11.13;
Скачать: CL | DM;
Вниз
Гражжне! как FileNam-у передать значение переменной? Найти похожие ветки
← →
kXmok (2003-11-02 19:49) [0]Гражжне! как FileNam-у передать значение переменной?
Пасибо!!!
Макс
← →
Anatoly Podgoretsky © (2003-11-02 19:52) [1]Можно с помощью присваивания, или нельзя.
← →
Gero © (2003-11-02 20:06) [2]Если хочешь получить ответ, корректно задавай вопрос.
← →
kXmok © (2003-11-02 20:19) [3]прошу просЧения за костноязычие.
Итак, что мне надо... есть переменная(q:string;). Надо, чтобы файл (текстовый) сохранился в виде: xx.txt? где xx - значение переменной.
если я опять непонятно написал - не пинайтесь - я только 2 недели в Delphi сижу!
← →
Palladin © (2003-11-02 22:15) [4]чет ты не с того начал
← →
wnew © (2003-11-02 22:16) [5]
procedure SaveMyFile(const q: String);
var myFile: TextFile;
begin
AssignFile(myFile, q+".txt");
Rewrite(myFile);
try
Writeln(myFile,"Bla-Bla-Bla");
finally
CloseFile(myFile);
end;
end;
SaveMyFile("xx");
← →
kXmok © (2003-11-04 00:20) [6]Спасибо WNEW. В Твоем коде полностью не разобрался многое мне ышшо неизвестно. Пришлось "сообразить" код попроще:
procedure TForm1.SaveButtonClick(Sender: TObject);
var
q:string;
begin
if MainMemo.Lines.Count<>0 then
q := MainMemo.Lines.Strings[0];
begin
MainMemo.Lines.SaveToFile(q +".txt");
end;
end;
осталось написать функцию проверки символов в названии файла, а то mustdie иногда плюется.
← →
kXmok © (2003-11-04 00:22) [7]Всем спасибо!!!
Вопросов (пока что) больше нет!
Удачи!!!
← →
Думкин © (2003-11-04 05:20) [8]Удалено модератором
← →
kXmok © (2003-11-04 21:51) [9]Удалено модератором
← →
kXmok © (2003-11-04 21:57) [10]Удалено модератором
Страницы: 1 вся ветка
Текущий архив: 2003.11.13;
Скачать: CL | DM;
Память: 0.48 MB
Время: 0.058 c
