Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.11;
Скачать: [xml.tar.bz2];




Вниз

!!! HELP !!! СРОЧНО ... Вопрос жизни и смерти... =) 


x000d   (2002-03-31 04:31) [0]

Люди.........слушайте подскажите плиз как сделать..
1. Я открыл 1.txt пустой..
как мне через программу занести туда текст ??
например при нажатии кнопки button там текс hello.
помогите плизз... если можно пример привидите любые..
или хелп кто нить дайте касающейся этой темы.



Adder   (2002-03-31 04:43) [1]

{$I-}
AssignFile(MyFile,"MyText.txt");
Rewrite(MyFile);
WriteLn(MyFile,"Hello");
CloseFile(MyFile);
{$I+}



cutter   (2002-03-31 04:59) [2]

procedure TForm1.Button1Click(Sender: TObject);
var
f:TextFile;
begin
AssignFile(f,"c:\1.txt");
Rewrite(f);
Write(f,"Hello!");
CloseFile(f)
end;



Anatoly Podgoretsky   (2002-03-31 11:28) [3]

x000d © (31.03.02 04:31)
А как открыл, от жтого зависит как заносить?



Biorobot   (2002-03-31 21:17) [4]

Нечего добавить, коммент от Аддера лучший!



x000d   (2002-03-31 23:27) [5]

Вот такая ситуация , есть чат Vypress Chat 1.5.1
там строчка что писать текст она вроде Edit
как мне отловиить в Vypress Chat ,EDIT и программно написать текст ?



lipskiy   (2002-03-31 23:56) [6]

2 Adder
Простите, что влез не в тему, не подскажете ли, нафиг нужны директивы {$I-} и {$I+}? Я так понимаю, они отключают обработку ошибок ввода-вывода. А чем это лучше? Что произойдет, если ошибка действительно возникнет?



Вадим   (2002-04-01 00:05) [7]

Если возникнет ошибка, то о ней никто не узнает



lipskiy   (2002-04-01 00:12) [8]

Окей, я так и думал. А в системе нигде пакостей не останется?
И какими еще директивами можно так безболезненно пользоваться?



KaPaT   (2002-04-01 00:19) [9]

когда директивой отключаешь я думаю желательно вставить IOResult



Adder   (2002-04-01 00:20) [10]

The $I switch directive enables or disables the automatic code generation that checks the result of a call to an I/O procedure. If an I/O procedure returns a nonzero I/O result when this switch is on, an EInOutError exception is raised (or the program is terminated if exception handling is not enabled). When this switch is off, you must check for I/O errors by calling IOResult.



Anatoly Podgoretsky   (2002-04-01 00:29) [11]

И не дай бог не проверишь




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.11;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.73 MB
Время: 0.026 c
3-32679           vitnt2000             2002-03-20 07:05  2002.04.11  
SQL Запрос


3-32707           Андрей Брусов         2002-03-20 18:22  2002.04.11  
Настраиваемые отчеты


14-32973          limon                 2002-03-05 11:19  2002.04.11  
Создание экземпляра класса по имени (ClassRef)


3-32643           IronHawk              2002-03-19 12:24  2002.04.11  
Обнуляються данные в базе !


3-32655           Rad                   2002-03-18 19:12  2002.04.11  
Interbase vs Firebird