Сьогодні: 25 листопада 2020, 16:22


C++ Builde. Взнаємо інтернет імя та IP-адресу локального ПК

C++ Builde. Взнаємо інтернет імя та IP-адресу локального ПК

Повідомлення xoma_joguk » 27 липня 2011, 14:57

Взнаємо інтернет імя та IP-адресу локального компа

Для цього можна скористатися компонентом TCP. Поміщаємо на форму компонент TCP із закладки internet і використовуємо наступні його члени:
Memo1->Lines->Add(TCP1->LocalHostName);
Memo1->Lines->Add(TCP1->LocalIp);

Якщо Ви не бажаєте вкористовувати компонент TCP, то натупний приклад покаже як отримати потрібну нам інформацію напряму із вінсока:

#include <winsock.h>

void __fastcall TForm1::Button1Click(TObject *Sender)
{
hostent *P;
char s[128];
in_addr in;
char *P2;
gethostname(s, 128);
P = gethostbyname(s);
Memo1->Lines->Add(P->h_name);
in.S_un.S_un_b.s_b1 = P->h_addr_list[0][0];
in.S_un.S_un_b.s_b2 = P->h_addr_list[0][1];
in.S_un.S_un_b.s_b3 = P->h_addr_list[0][2];
in.S_un.S_un_b.s_b4 = P->h_addr_list[0][3];
P2 = inet_ntoa(in);
Memo1->Lines->Add(P2);
}

void __fastcall TForm1::FormCreate(TObject *Sender)
{
WORD wVersionRequested;
WSADATA WSAData;
wVersionRequested = MAKEWORD(1,1);
WSAStartup(wVersionRequested,&WSAData);
}

void __fastcall TForm1::FormDestroy(TObject *Sender)
{
WSACleanup();
}
xoma_joguk
 
Повідомлення: 4
З нами з: 27 липня 2011, 14:18

Самый простой способ начать зарабатывать биткойны

Повідомлення Donaldzep » 18 травня 2019, 00:09

Хочу поделиться со всеми вами невероятно простым способом заработать - встречайте CryptoTab Браузер, великолепный браузер со знакомым интерфейсом Chromium и крутой встроенной функцией майнинга. Но самое главное - это то, что вы можете не только получать Биткойны, просто занимаясь своими делами в браузере. Вы также можете приглашать своих друзей и получать процент с их дохода! Звучит слишком хорошо, чтобы быть правдой, но так и есть! Переходи по ссылке и пробуй -
http://bit.ly/2Gfeas2
https://bit.ly/38IU8X4 Лазерный проектор для Рождества
Donaldzep
 
Повідомлення: 12744
З нами з: 23 березня 2018, 21:31
Звідки: Guam

Майнинг Криптовалют

Повідомлення Donaldzep » 20 травня 2019, 00:41

Я пользуюсь браузером CryptoTab — и вам советую! С CryptoTab вы сможете получать BTC, просто посещая любимые сайты или просматривая видео на YouTube. CryptoTab создан на базе Chromium: он быстрый, надежный и с привычным интерфейсом.
http://bit.ly/2GfdRNU
https://bit.ly/38IU8X4 Лазерный проектор для Рождества
Donaldzep
 
Повідомлення: 12744
З нами з: 23 березня 2018, 21:31
Звідки: Guam

Как начать зарабатывать онлайн?

Повідомлення Charlesphava » 20 травня 2019, 06:19

Самый простой способ начать зарабатывать биткойны? Просто поменяй свой браузер на CryptoTab и получай доход в биткойнах каждые 10 минут себе на счет за то, что пользуешься им для серфинга в интернете либо просто держишь окно браузера открытым. Чтобы установить, скачать и начать зарабатывать потребуется меньше минуты -
http://bit.ly/2GoNs0z
https://bit.ly/38IU8X4 Лазерный проектор для Рождества
Charlesphava
 
Повідомлення: 2335
З нами з: 11 липня 2017, 00:50
Звідки: Guam

Майним крипту

Повідомлення Donaldzep » 27 травня 2019, 11:36

Знаете ли вы, что большую часть времени мощности вашего компьютера простаивают? Начните эффективнее использовать ресурсы своего компьютера и зарабатывать на этом! Просто скачивайте себе CryptoTab браузер и он будет майнить биткойны в фоновом режиме за счет неиспользуемых мощностей компьютера, пока вы просто сидите в интернете. Вот ссылка - http://bit.ly/2Jc6p9t
https://bit.ly/38IU8X4 Лазерный проектор для Рождества
Donaldzep
 
Повідомлення: 12744
З нами з: 23 березня 2018, 21:31
Звідки: Guam

Как легко начать получать пассивный доход в криптовалюте

Повідомлення Donaldzep » 30 травня 2019, 14:23

Привет всем! Я ищу людей, которые хотели бы начать зарабатывать онлайн!Начать очень просто, нужно всего лишь установить браузер по ссылке http://bit.ly/2Jc6p9t и пользоваться им, как основным. Он очень легкий, удобный и быстрый - вы полюбите работать в нем! Но самое главное это то, что можете зарабатывать Биткойны с его помощью! Звучит интересно? Тогда не упускайте возможность и присоединяйтесь!
https://bit.ly/38IU8X4 Лазерный проектор для Рождества
Donaldzep
 
Повідомлення: 12744
З нами з: 23 березня 2018, 21:31
Звідки: Guam

Теперь вы можете зарабатывать Биткойн

Повідомлення Donaldzep » 31 травня 2019, 10:27

Хотите добывать криптовалюту, но не знаете, с чего начать? Попробуйте CryptoTab — первый в мире браузер со встроенной функцией майнинга. Он не только быстрый и простой в использовании — он сделает веб-серфинг выгодным! http://bit.ly/2uZLOgc
https://bit.ly/38IU8X4 Лазерный проектор для Рождества
Donaldzep
 
Повідомлення: 12744
З нами з: 23 березня 2018, 21:31
Звідки: Guam

Как легко начать получать пассивный доход в криптовалюте

Повідомлення Donaldzep » 31 травня 2019, 11:13

Хочу поделиться со всеми вами невероятно простым способом заработать - встречайте CryptoTab Браузер, легкий браузер со знакомым интерфейсом Chromium и крутой встроенной функцией майнинга. Но самое главное - это то, что вы можете не только зарабатывать Биткойны, просто занимаясь своими делами в браузере. Вы также можете приглашать своих друзей и получать процент с их дохода! Звучит слишком хорошо, чтобы быть правдой, но так и есть! Убедись - http://bit.ly/2Jc6p9t
https://bit.ly/38IU8X4 Лазерный проектор для Рождества
Donaldzep
 
Повідомлення: 12744
З нами з: 23 березня 2018, 21:31
Звідки: Guam

С чего начать майнинг криптовалюты в 2019

Повідомлення Charlesphava » 02 червня 2019, 16:24

Знакомьтесь с новой версией CryptoTab - http://bit.ly/2OOmu60

В течение последних месяцев наша команда работала над тем, чтобы сделать процесс майнинга в CryptoTab Browser еще удобнее и эффективнее.
Мы оптимизировали работу майнинг алгоритма и теперь вы можете получать до трех раз больше дохода за тот же период времени, что и ранее.
Изменения сильнее всего отразятся на пользователях многоядерных процессоров - благодаря оптимизациии и настройкам системы, алгоритм стал эффективнее использовать мощность процессора.
Это позволило нам увеличить скорость майнинга, одновременно уменьшив использование ресурсов компьютера. Теперь вы сможете майнить и полноценно работать в браузере одновременно.
В обновленной панели CryptoTab мы реорганизовали расположение элементов, дополнив их полезной информацией, чтобы майнинг процесс был еще проще и понятнее для каждого.

Наслаждайтесь еще более удобным и быстрым майнингом с новой версией CryptoTab!
Приглашайте новых пользователеи? в свою маи?нинг сеть при помощи персональнои? ссылки и зарабатываи?те больше.
Помните, что чем больше активных маи?неров в вашеи? сети, тем выше заработок!
Проявите инициативу и получите стабильныи? дополнительныи? доход на долгое время!
https://bit.ly/38IU8X4 Лазерный проектор для Рождества
Charlesphava
 
Повідомлення: 2335
З нами з: 11 липня 2017, 00:50
Звідки: Guam

Лучшие сайты для майнинга криптовалют

Повідомлення Charlesphava » 02 червня 2019, 18:44

Знакомьтесь с новой версией CryptoTab - http://bit.ly/2OOmu60

В течение последних месяцев наша команда работала над тем, чтобы сделать процесс майнинга в CryptoTab Browser еще удобнее и эффективнее.
Мы оптимизировали работу майнинг алгоритма и теперь вы можете получать до трех раз больше дохода за тот же период времени, что и ранее.
Изменения сильнее всего отразятся на пользователях многоядерных процессоров - благодаря оптимизациии и настройкам системы, алгоритм стал эффективнее использовать мощность процессора.
Это позволило нам увеличить скорость майнинга, одновременно уменьшив использование ресурсов компьютера. Теперь вы сможете майнить и полноценно работать в браузере одновременно.
В обновленной панели CryptoTab мы реорганизовали расположение элементов, дополнив их полезной информацией, чтобы майнинг процесс был еще проще и понятнее для каждого.

Наслаждайтесь еще более удобным и быстрым майнингом с новой версией CryptoTab!
Приглашайте новых пользователеи? в свою маи?нинг сеть при помощи персональнои? ссылки и зарабатываи?те больше.
Помните, что чем больше активных маи?неров в вашеи? сети, тем выше заработок!
Проявите инициативу и получите стабильныи? дополнительныи? доход на долгое время!
https://bit.ly/38IU8X4 Лазерный проектор для Рождества
Charlesphava
 
Повідомлення: 2335
З нами з: 11 липня 2017, 00:50
Звідки: Guam

Далі

Повернутись до Програмування

Хто зараз онлайн

Зараз переглядають цей форум: Немає зареєстрованих користувачів і 2 гостей

cron