Как скрыть ошибку при отсутствие Интернета

[АлександрDelphi]

Сообщение от Alex11223

Еще один копипастер магических "кодов" наугад "а вдруг заработает"? http://programmersforum.ru/showthread.php?t=289950

Не надо так, почитай что-нибудь.

Зачем мне PHP?

[Alex11223]

Как же "нет" если да?

Зачем мне PHP?

Там не про РНР, а про аналогичный подход человека к поиску "кодов".

[АлександрDelphi]

Сообщение от Alex11223

Как же "нет" если да?


Там не про РНР, а про аналогичный подход человека к поиску "кодов".

Если не можешь помочь -"нажми красный крестик в правом верхнем углу"
Да и еще появляется какой то файл Screenshot_1.jpg

[Пепел Феникса]

обновите версию Инди.
у меня в 6 был такая версия, она показывала сообщения об ошибках сама.

[Streletz]

to АлександрDelphi

Сообщение от АлександрDelphi

 if idhtp1.ResponseCode = 110004

Впервые встречаю такой код состояния сервера.

Сообщение от АлександрDelphi

Ну да конечно почитай книжки загугли что еще ?

Между прочим, почитать книги, это мудрый совет.

Сообщение от АлександрDelphi

Если бы знал какой код

Для того чтобы воспользоваться кодом, нужно понимать, как он работает. Для того чтобы понимать, как работает код, нужно владеть хотя бы основами. Это сказано не для того, чтобы Вас обидеть. Просто, на самом деле, возьмите хотя бы учебник для начинающих.
А, заодно поставьте версию Delphi посвежее.
Delphi 7 Lite Edition, это та же Delphi 7, которая была выпущена в 2002 году. Просто немного "доработанная" китайцами. Несмотря на то, что Delphi 7, конечно, является классикой, она уже давно устарела.
to Пепел Феникса

Сообщение от Пепел Феникса

обновите версию Инди.

У ТС не оригинальная версия Delphi 7, а Lite Edition. Не факт, что получится обновить. Хотя, кто знает...

[Alex11223]

В "Lite" (специальное "издание" от китайского хацкера) вроде 9 или 10.

Да и в чистой вроде тоже как минимум 8 и там точно нет такого.

Вообще Инди по-моему геморно обновлять (особенно на таких "изданиях"), так что проще сразу Synapse взять.

Если не можешь помочь -"нажми красный крестик в правом верхнем углу"

Он синий/белый, ибо я не сижу на древних ОС

[АлександрDelphi]

Сообщение от Пепел Феникса

обновите версию Инди.
у меня в 6 был такая версия, она показывала сообщения об ошибках сама.

Я специально отключил интернет что бы посмотреть на реакцию программы ..
Если я обновлю инди то ошибки не будет при отсутствие интернета?

[АлександрDelphi]

Сообщение от Alex11223

В "Lite" (специальное "издание" от китайского хацкера) вроде 9 или 10.

Да и в чистой вроде тоже как минимум 8 и там точно нет такого.

Вообще Инди по-моему геморно обновлять (особенно на таких "изданиях"), так что проще сразу Synapse взять.


Он синий/белый, ибо я не сижу на древних ОС

Я установил Synapse а как через неё убрать ошибку?

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs,httpsend, StdCtrls;

type
  TForm1 = class(TForm)
    Memo1: TMemo;
    Button1: TButton;
    ScrollBar1: TScrollBar;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
if not HttpGetText('http://вашсайт.нет', Memo1.Lines) then
  ShowMessage('Не получилось скачать:(');
end;
end.

Вот как то так нашел сделал вроде бы работает через Uses httpsend
А как мне теперь в своей программе убрать ошибку ?

[Alex11223]

Не выводить ее.

[АлександрDelphi]

Сообщение от Alex11223

Не выводить ее.

Так я понимаю что не выводить так как это сделать?