пример

[DeDoK]

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

[theYozh]

Я тоже спрошу)
Приведите пожалуйста пример проги, которая ломает базу пентагона =)

[Arigato]

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

с меня плюсик

Обсуждение репутации запрещено правилами форума.

[DeDoK]

все, понял, исправил

[kangreon]

В потоке код автоизации

unit Unit1;

interface

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

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

  TCriricalThread = class(TThread)
    private
    protected
      procedure Execute; override;
    end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
  i:Integer;
  CriricalThread: TCriricalThread;
begin
  for i := 1 to 100 do
  begin
    CriricalThread:=TCriricalThread.Create(true);
    CriricalThread.FreeOnTerminate:=true;
    CriricalThread.Priority:=tpLower;
    CriricalThread.Resume;
  end;  
end;

{ TCriricalThread }

procedure TCriricalThread.Execute;
var
  h : TIdHTTP;
begin
  h := TIdHTTP.Create;
  h.Get('http://www.google.ru/');
  // Тут авторизация
  h.Free;
end;

end.

[DeDoK]

еще вопрос.если аккаунты берутся из списка, то получается что при запуске всех 10 потоков - все 10 сначала возьмут первый аккаунт, потом второй..
это так?

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

это смотря как организовать, я обычно делал конструктор потоку, и в нем вносил нужные данные, тогда именно главный поток будет побочным давать данные, и тогда гонки не будет, точнее её последствий.