Показать исходный код Web-страницы в TMemo

Оформил: DeeCo

// You need a TMemo, a TButton und a NMHTTP 
// Man braucht ein TMemo, einen TButton und eine TNMHTTP 

procedure TForm1.Button1Click(Sender: TObject);
 begin
   NMHTTP1.Get('www.swissdelphicenter.ch');
   memo1.Text := NMHTTP1.Body
 end;

Похожие по теме исходники

Barcode (штрих-код)

Оптимальное кодирование информации

BarCode39 (штрихкоды)

Код Хаффмана

Web Tools

Mini WebBrowser (браузер)

Stud WebServer (web-сервер)

WebSite Downloader

Web-Sniffer

Simple WebBrowser (браузер)

Недавно добавленные исходники
• Animation Loaders 708 • DeLiKaTeS Tetris (Тетрис) 5 708 • TDictionary Custom Sort 7 664 • Fast Watermark Sources 7 352 • 3D Designer 10 564 • Sik Screen Capture 7 880 • Patch Maker 8 107 • Айболит (remote control) 8 160 • ListBox Drag & Drop 6 956 • Доска для игры Реверси 100 192 • Графические эффекты 8 228 • Рисование по маске 7 619 • Перетаскивание изображений 6 220 • Canvas Drawing 6 586 • Рисование Луны 6 515 • Поворот изображения 5 686 • Рисование стержней 4 609 • Paint on Shape 3 307 • Генератор кроссвордов 4 297 • Головоломка Paletto 3 439 • Теорема Монжа об окружностях 4 258 • Пазл Numbrix 2 759 • Заборы и коммивояжеры 3 668 • Игра HIP 2 470 • Игра Go (Го) 2 459 • Симулятор лифта 2 864 • Программа укладки плитки 2 297 • Генератор лабиринта 3 024 • Проверка числового ввода 2 523 • HEX View 2 937