Подписаться на RSS рассылку
Главная » Статьи по Delphi » Операционная система » Узнать имя компьютера

Узнать имя компьютера

Автор: Борисов Сергей

uses Windows;
...
Function ReadComputerName:string;
var i:DWORD; p:PChar; begin i:=255; GetMem(p, i); GetComputerName(p, i); Result:=String(p); FreeMem(p); end;

Просмотров: 3714

Обсудить на форуме


Имя *:
Email:


Код *:

On-line статистика:
Онлайн всего: 4
Гостей: 4
Пользователей: 0
Статистика:


Copyright © 2008-2012 Программирование на Delphi для начинающих и не только

Полнота авторских прав на все материалы, опубликованные на сервере DelphiDevelop.ru принадлежит их авторам

Перепечатка материалов разрешается с указанием авторства и гиперссылки на первоисточник информации

Хостинг от uCoz

Автор проекта: Борисов Сергей

e-mail: save-x@yandex.ru

Связь с администрацией сайта

Гостевая книга