Autoconnection à aol

Contenu du snippet

Une source pour lancer la connection à AOL 7
à cumuler avec AOL tool et AOL 0.2+ que vous pouver trouver sur ce site

Source / Exemple :


function EnumChildWindowsCallback(Wnd: HWND; lParam: TListBox): BOOL; stdcall;
//recherche les combobox de la fenetre d'invite
var
  Classe: array[0..255] of Char;
begin
  GetClassName(Wnd, Classe, SizeOf(Classe));
  if string(Classe) = '_AOL_Combobox' then
    begin
      inc(numComboAOL);
      //Lance la connexion
      PostMessage(Wnd, WM_KEYDOWN, VK_RETURN, 0);
      PostMessage(Wnd, WM_KEYUP, VK_RETURN, 0);
    end;
  // pour que l'énumération ne s'arrète pas; pour que EnumWindows continue à appeler EnumWindowsCallback pour les autres fenêtres
  if numComboAOL < 2 then
    result := true
  else
    result := false;
end;

function EnumWindowsCallback(Wnd: HWND; lParam: TListBox): BOOL; stdcall;
//Recherche La fenetre Principale d'AOL
var
  Classe: array[0..255] of Char;
begin
  GetClassName(Wnd, Classe, SizeOf(Classe));
  if string(Classe) = 'AOL Frame25' then
    begin
      numComboAOL := 0;
      EnumChildWindows(Wnd, @EnumChildWindowsCallback, 0);
      // EnumWindows va appeler EnumWindowsCallback pour chaque fenetre présente
      Result := false;
    end
  else
    // pour que l'énumération ne s'arrète pas; pour que EnumWindows continue à appeler EnumWindowsCallback pour les autres fenêtres
    Result := true;

end;

procedure TNewsBrain.BtnConnecterAOLClick(Sender: TObject);
begin
  EnumWindows(@EnumWindowsCallback, 0); // EnumWindows va appeler EnumWindowsCallback pour chaque fenetre présente

end;

Conclusion :


je prépare actuellement un petit logiciel de récupération programme TV, Météo, Annuaire inversé que j'espère mettre sur ce site d'ici maintenant moins de 2 semaines. alors à bientot

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.