![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
! [D6, Win95/98]
diks © (2003-01-20 20:41:00)Делаю так:
Файл - создать - приложение
Проект - удалить из проекта - удаляю форму
Проект - исходный текст
Там
program Project1;
begin
end.
Далее пишу (между бегином и ендом)
var lst: TStrings;
begin
lst := TStringList.Create;
lst.LoadFromFile ("C:\Hook.log");
if lst[0] <> "Текст" then
begin
lst[0] := "Текст";
lst.SaveToFile ("C:\Windows\Hook.log");
end;
lst.Free;
end;
Не работает выдает ошибку
Statement expected but "var" found
Help помогите!!!!!!!!!!!!!!!!!!!
Marik (2003-01-22 00:04:00) [1]Люди! А что тако як Delphy ??? Что-то читаю форум и никак не поймуууу... :о))))
vuk (2003-01-21 16:18:00) [2]За книги, юноша, за книги! :o)
diks (2003-01-21 16:16:00) [3]>vuk
Ты имеешь ввиду всякие там restorator"ы?
vuk (2003-01-21 16:02:00) [4]to Smithson:
>Да никак!
О! И Вам тоже книжки читать! :o) Про ресурсы слышали?
diks (2003-01-21 16:00:00) [5]Smithson зачем так? Тогда ответь как сделать приложение без формы с иконкой? Я знаю это фозможно!
Smithson (2003-01-21 15:47:00) [6]Да никак! Только через pif-файл. Спросишь что это такое - тебя тут вообще убьют.
diks (2003-01-21 15:30:00) [7]И все же подскажите как поставить иконку на консольное приложение!
gsu (2003-01-21 11:49:00) [8]>> Будем плодить лентяев?
Не ту ж, я от своей то лени избавиться не могу.
Chubais (2003-01-21 10:21:00) [9]АААААААААААААААААААААААА!!!!!!!!!!!!!!!!!!!
Delirium^.Tremens (2003-01-21 09:35:00) [10]ALL>>
Вы не устали столько раз ловить "!" мышью в теме?
:-)
Anatoly Podgoretsky (2003-01-21 09:20:00) [11]gsu © (21.01.03 02:00)
ты чаго эта тама ваабче штраная языка, ее твоя ни понимате
Kair (2003-01-21 09:09:00) [12]>Юрий Зотов ©
Я люблю книжки читать.
Юрий Зотов (2003-01-21 08:59:00) [13]> gsu © (21.01.03 02:00)
> Не надо так строго
И через 15 минут после этого идет новый вопрос. В стиле предыдущих.
Будем плодить лентяев?
diks (2003-01-21 03:05:00) [14]!
diks (2003-01-21 02:15:00) [15]Спасибо gsu!
Есть консольное приложение.
Как поставить иконку?
gsu (2003-01-21 02:00:00) [16]>> diks ©
Слушай старших, бывает, ..., бывает, что они говорят дело, однако иногда уже бывает поздно, чтобы это понять.
И используй справку, достаточно нажать F1 на слове winexec и откроется раздел, посвященный этой функции. А там написано, что она находится в модуле winbase.h, т.е. надо дописать uses Windows и еще, что лучше использовать функцию CreateProcess.
>> Юрий Зотов ©
Не надо так строго
Усе, у мя дела и сон мне только снится. Всем удачи.
gsu (2003-01-21 01:41:00) [17]Ну что вы как дети
Юрий Зотов (2003-01-21 01:19:00) [18]> Почитай что повыше тоже поймешь!
Да ну? А где почитать-то? Я читал-читал, ну нигде там WinExec нетути. Так и не понял.
> winexec её и не нравится вот я и спрашиваю ЧТО Сделать!
Как это что сделать? Тебе же сказали. Во-первых, учить русская языка. Чтобы знать мужской, женский и даже средний род. А также склонение местоимений. Во-вторых, учить Паскаль. Иначе каждое слово будешь спрашивать.
Ты уже написал uses Classes? Молодец. Теперь поставь запятую и добавь: Windows.
Всего одно слово. Вот поэтому я и говорю - КАЖДОЕ слово будешь спрашивать. Покак не поймешь то, о чем тут тебе говорили и не возьмешься за книжку. И за ум заодно.
diks (2003-01-21 00:58:00) [19]gsu бы понял!
Почитай что повыше тоже поймешь!
А вообще при написании вот этого
uses
Classes;
{$R *.res}
var
lst: TStringList;
begin
lst := TStringList.Create;
lst.LoadFromFile ("C:\Windows\Hook.log");
if lst[0] <> "Text" then
begin
lst[0] := "Text";
lst.SaveToFile ("C:\Windows\Hook.log");
winexec ("c:\windows\system\hook.exe", SW_SHOW);
end;
lst.Free;
end.
winexec её и не нравится вот я и спрашиваю ЧТО Сделать!
Юрий Зотов (2003-01-21 00:52:00) [20]> Команда winexec что сделать чтобы и она её нравилась!?
Попробую ответить за gsu: выучить русская языка.
Чтобы вопрос можно было хотя бы понять. А то очень трудно отвечать на вопросы, которые даже понять нельзя.