bonjour,

J'utilise Delphi XE5.

Pour mettre mon problème en évidence, j'ai fait une appli qui ne possède qu'un objet TIdHttp et un bouton qui faire une requête IdHttp1.get('http://www.crystalxe.com');

Lorsque je sélectionne le thème windows, ça fonctionne bien.
Par contre si je choisis un thème comme par exemple "Lavender classico" alors dès que j'appuie sur mon bouton, j'ai une exception "access violation at....read of address..."

Pour changer le thème je passe par le menu Projets / Options puis l'élément Application / apparence
Voici mon code:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
 
unit Unit1;
 
interface
 
uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, IdBaseComponent, IdComponent, IdTCPConnection, IdTCPClient, IdHTTP;
 
type
  TForm1 = class(TForm)
    IdHTTP1: TIdHTTP;
    ButtonGet: TButton;
    procedure ButtonGetClick(Sender: TObject);
  private
    { Déclarations privées }
  public
    { Déclarations publiques }
  end;
 
var
  Form1: TForm1;
 
implementation
 
{$R *.dfm}
 
//---------------------------------------------------------
procedure TForm1.ButtonGetClick(Sender: TObject);
Var
  S : String;
begin
  S := IdHttp1.get('http://www.crystalxe.com');
  ShowMessage(S);
end;
//---------------------------------------------------------
 
end.
Merci
Franck