Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 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.46 MB
Время: 0.039 c
1-41605
LastLamer
2003-10-26 23:00
2003.11.13
перехват изменения свойства объекта


3-40920
hunter84
2003-10-20 00:31
2003.11.13
Проверка обновления данных на серваке из клиентского приложения


1-41441
qwe
2003-10-29 09:46
2003.11.13
Чем отличаются Hint и Warning


1-41320
denick
2003-10-31 09:52
2003.11.13
Мастера, помогите пожалуйста.


8-41755
m_e_t_a_n
2003-07-09 09:25
2003.11.13
DrawGrid!!!





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский