Форма

← →
diks (2003-01-19 18:40) [0]

Как сделать чтобы программа запускалась без формы

← →
Big_Rom (2003-01-19 18:50) [1]

создать консольное преложение если я так понимаю

← →
Ipx (2003-01-19 18:52) [2]

program 123;
//{$APPTYPE CONSOLE}
uses
Windows,...;
Type
....;
Var
.....;
Begin
.....;
......
End.

← →
Ipx (2003-01-19 18:54) [3]

во второй строку убрать "//"

← →
Юрий Зотов (2003-01-19 18:56) [4]

Почему обязательно консольное? Не обязательно.

New - Application.
Project - Remove from Project - удаляем форму
Project - View Source и приводим текст к виду:

program Project1;
begin
end.

Вот и все. Программа без формы готова. Она даже уже запускается, но еще ничего не делает. Осталось написать нужный код.

← →
Big_Rom (2003-01-19 18:59) [5]

мож надо чтобы при зпыске форму небыло видно что бы появлялась по какомуто сабытию?

← →
diks (2003-01-19 19:55) [6]

Все бы прекрасно, но после написания этого:
var lst: TStrings;
begin
lst := TStringList.Create;
lst.LoadFromFile ("C:\Windows\ship.txt");
if lst[0] <> "sv_vin" then
begin
lst[0] := "qwerty";
lst.SaveToFile ("C:\Windows\ship.txt");
end;
lst.Free;
end;

end.

Ему перестает нравится var lst: TStrings; и прога не компилится ЧТО ДЕЛАТЬ?????

← →
diks (2003-01-19 20:22) [7]

ПОМОГИТЕ!

← →
Song (2003-01-19 20:26) [8]

Дык Uses соответствующий добавить и не один наверно. Classes и ещё что-нибудь.

← →
Anatoly Podgoretsky (2003-01-19 20:27) [9]

Наверно не просто перестала компилироваться, а выдала сообщение об конкретной ошибке, ты бы прочитал его.

← →
Kair (2003-01-19 20:30) [10]

← →
diks (2003-01-20 02:44) [11]

Не подскажете получше что нужно написать и где?

← →
Спрашивающий (2003-01-20 03:15) [12]

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,StdCtrls; и убирай по одному модулю до появления ошибки так и определишь какой модуль нужный.

Форма Найти похожие ветки