Дата: Воскресенье, 10.07.2011, 20:47 | Сообщение # 2
Авторитетный
Зарегистрирован: 01.05.2010
Группа: Пользователи
Сообщений: 385
Статус: Offline
Code
function GetComputerNetName: string; var buffer: array[0..255] of char; size: dword; begin size := 256; if GetComputerName(buffer, size) then Result := buffer else Result := '' end;
Дата: Воскресенье, 10.07.2011, 22:03 | Сообщение # 4
Авторитетный
Зарегистрирован: 01.05.2010
Группа: Пользователи
Сообщений: 385
Статус: Offline
Quote (raviti2)
Спасибо это нужно 2 кода писать или только один?
1 - функция. 2 - использование функции (создание папки на фтп и переход в нее) TheDeduction Для ускорения получения ответов на ваши вопросы рекомендуется подкармливание в виде +'ов в рейтинг :)
