Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Имя ПК [D7, XP]

Страницы: < 1 2
givi © (2008-12-02 15:40:00)
скажите пожалуйста как определить имя ПК

blackman (2008-12-02 21:33:00) [21]
С другой стороны: сегодня не почистил пуговицы, а завтра -
предал Родину :)
+1 :)

Anatoly Podgoretsky (2008-12-02 19:59:00) [22]

> Просто, пока еще не понял, что можно сделать разрушительного
> с пустым именем собс-ного компьютера

Переименовать, продать, наконец снять с безчувственного тела

Leonid Troyanovsky (2008-12-02 19:49:00) [23]

> KilkennyCat © (02.12.08 19:31) [15]

> Не проверять результат выполнения функции - это будет "неточно",
> только пока все хорошо. А потом может резко стать "неверно".

Я, во-ще-то, не против.
Просто, пока еще не понял, что можно сделать разрушительного
с пустым именем собс-ного компьютера .

С другой стороны: сегодня не почистил пуговицы, а завтра -
предал Родину :)

--
Regards, LVT.

KilkennyCat (2008-12-02 19:31:00) [24]

> Leonid Troyanovsky © (02.12.08 18:37) [11]
>

Не проверять результат выполнения функции - это будет "неточно", только пока все хорошо. А потом может резко стать "неверно".

Leonid Troyanovsky (2008-12-02 18:54:00) [25]

> clickmaker © (02.12.08 18:50) [12]

> SetString(Result, Buf, Length(Buf));

SetString(Result, Buf, N);
Ну, и, там Win32Check.

--
Regards, LVT.

Сергей М. (2008-12-02 18:52:00) [26]

> написать

насяльника ма !

clickmaker (2008-12-02 18:50:00) [27]
> [6] stas © (02.12.08 15:58)

зачем все эти + и - ?

var buf: array[0..MAX_COMPUTERNAME_LENGTH] of char;

N := Sizeof(Buf);
GetComputerName(Buf, N);
SetString(Result, Buf, Length(Buf));

Leonid Troyanovsky (2008-12-02 18:37:00) [28]

> KilkennyCat © (02.12.08 16:27) [9]

> неверно.

Скорее - неточно.

--
Regards, LVT.

Jeer (2008-12-02 18:14:00) [29]

> что стыдно писать пример.

Мне не стыдно..Что там нужно оп исать ?

KilkennyCat (2008-12-02 16:27:00) [30]

> stas ©

неверно.

Anatoly Podgoretsky (2008-12-02 16:19:00) [31]
> givi (02.12.2008 15:43:02) [2]

Настолько простая функция, что стыдно писать пример.

clickmaker (2008-12-02 16:02:00) [32]
> [3] KilkennyCat © (02.12.08 15:49)
> написать
> [цитата]
>
> [4] givi (02.12.08 15:55)
> написать

полностью согласен с предыдущими ораторами.
написать.

stas (2008-12-02 15:58:00) [33]
function GetComputerName: string;
var
N: Cardinal;
Buf: array [0..MAX_COMPUTERNAME_LENGTH + 1] of AnsiChar;
begin
N:=SizeOf(Buf)-1;
Windows.GetComputerName(Buf, N);
Result:=PChar(@Buf[0]);
end;

KilkennyCat (2008-12-02 15:57:00) [34]
я не вопрос задавал.

givi (2008-12-02 15:55:00) [35]
написать

KilkennyCat (2008-12-02 15:49:00) [36]
написать

givi (2008-12-02 15:43:00) [37]
Пример можно! Как применить GetComputerName в коде?

Сергей М. (2008-12-02 15:40:00) [38]
GetComputerName

Страницы: < 1 2

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »