Ereignisbehandlungsroutine für die Schaltfläche erstellen

Aus RAD Studio
Wechseln zu: Navigation, Suche

Nach oben zu IntraWeb-Einführung - Index


Das Formular führt noch keine Aktionen durch, wenn der Benutzer auf die Schaltfläche OK klickt.

Weitere Informationen dazu finden Sie unter Bearbeiten des Hauptformulars.

Sie werden im Folgenden eine Ereignisbehandlungsroutine programmieren, die eine Begrüßungsmeldung anzeigt, wenn der Benutzer auf OK klickt.

  1. Doppelklicken Sie auf die mit OK beschriftete Schaltfläche auf dem Formular. Eine leere Ereignisbehandlungsroutine ähnlich der hier gezeigten wird im Editor-Fenster erstellt:
 
 procedure TformMain.IWButton1Click(Sender: TObject);
 begin
 
 end;
void fastcall TformMain::Button1Click(TObject *Sender)
{

}
  1. Fügen Sie mithilfe des Editors der Ereignisbehandlungsroutine den im folgenden Listing gezeigten Code hinzu:

     procedure TformMain.IWButton1Click(Sender: TObject);
     var s: string;
     begin
        s := editName.Text;
        if Length(s) = 0 then
           WebApplication.ShowMessage("Bitte geben Sie Ihren Namen ein.")
        else
        begin
           WebApplication.ShowMessage("Hallo, " + s +"!");
           editName.Text := "";
        end;
     end;
    
    void __fastcall TformMain::IWButton1Click(TObject *Sender)
    {
    	UnicodeString s;
    	s = editName->Text;
    	if (s.Length() == 0) {
    		WebApplication->ShowMessage("Please Enter Your Name");
    	}
    	else {
    		WebApplication->ShowMessage("Hello, " + s + "!");
    		editName->Text = "";
    	}
    }
    

Informationen zur Ausführung der fertig gestellten Anwendung finden Sie unter Fertig gestellte Anwendung ausführen.

Siehe auch