Ereignisbehandlungsroutine für die Schaltfläche erstellen
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.
- 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)
{
}
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.