stargaz0r спасибо.
Avaddon я через тул входящий в состав VS.net создю ресурс.

Может все-таки кто-нить поможет?

Daemon
Нафиг! Ручками!
-=Hunter=-
Ты должен передать туда VarArray.

Avaddon А поподробнее можно? Как будто для тупого..

Я чот совсем ни чо не понимаю, функция fileopen() не открывает файл.
Мне нужно просто запустить файл (*.doc, *.txt,*.rtf может еще какой),

помогите плиз.

Подскажите плиз, есть ли в делфах функция типа Format или Deltree, или ее можно реализовать только средствами встроенного асма ? Можно ли задать для Erase или DeleteFile имя файла *.* ?

lex-chem WinExec или ShellExecute. А FileOpen открывает файл в другом смысле.
Smon FindFirst, FindNext - находят первый файл и все последующие (вызывашь в цикле или даже рекурсивно, директории они тоже ищут). DeleteFile - удалить файл, но, кажется, он wildcards не берет.

Smon shFileOperation - для операций с файлами и каталогами.

Ray Adams
А как его инициализировать ? - в хелпе ничего похожего не нашел. Это стандартная библиотека или дополнительно устанавливаемая ?

Эта функция Windows, дай поиск по гуглу или ya.ru по этому слову. Примеров использования много.

А еще лучше на спец. ресурсе - www.koders.com - можно найти много типовых решений.

procedure TForm1.Button1Click(Sender: TObject);
var i,d: integer;
begin
for i:=0 to 7 do
edit1.text := edit1.text + inttostr(i);
edit1.text := edit1.text + 'N';
begin
end;
end;

у меня выведится надпись: 1234567N
а как сделать так, что б в цикле выполнялись 2 действия? т.е что б надпись была 1N2N3N4N5N6N7N ?
y меня в программме по другому все, то проблема такая же.//долго сидел и пытался понять в чем ошибка.

SardoX
procedure TForm1.Button1Click(Sender: TObject);
var i,d: integer;
begin
for i:=0 to 7 do
begin {начало действий в цикле}
edit1.text := edit1.text + inttostr(i);
edit1.text := edit1.text + 'N';
end; {конец цикла}
end;
Вот так работает.

-=Hunter=-
Создаешь в текстовом редакторе файл, например myres.rc, в нем пишешь
THIS_XXX_RESORCE RCDATA "имя файла"

Далее в коммандной сторке пишешь brc32 -r myres.rc.
Получаешь файл myres.res.

Нежить Я затупил...и уже разобрался. Но все равно спасибо..Просто не спал давно.

Добавлено спустя 15 минут, 30 секунд:
Народ, аси не подкинете свои?а?вопросы есть.

winexec(pchar('c:\1.txt'),SW_SHOWNORMAL);
не срабатывает?

lex-chem
И не сработает
Если использовать WinExec то так : WinExec('cmd.exe /s start 1.txt',SW_SHOWNORMAL);
И еще, это цитата из MSDN:
Note This function is provided only for compatibility with 16-bit Windows. Applications should use the CreateProcess function.
Так что, для корректного вызова приложения используй ShellExecute.

Avaddon
А примерчик с shellexecute можно, а то количество ее параметров сводит с ума?

lex-chem
ShellExecute(NULL,"open",,NULL,FileName.c_str(),NULL);

Avaddon


FileName.c_str() - как писать (допустим файл на С:\1.txt)