Passwort und Benutzername

[Sprint]

Zitat von freak4fun:

Bei mir gehts auch, aber wie kann ich das anpassen, denn wenn ich das bei mir breiter mach ist das auch wieder doof.

Du musst ClientWidth und ClientHeight deiner Form wärend der Laufzeit anpassen. Nehmen wir mal an deine ListBox die in deinem Programm verwendet wird heißt ListBox1. Dann könnte das so aussehen.

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin

  with Self do
  begin
    BorderIcons := BorderIcons - [biMaximize];
    BorderStyle := bsSingle;
    ClientWidth := ListBox1.Left + ListBox1.Width + 5;
    ClientHeight := ListBox1.Top + ListBox1.Height + 5;
  end;

end;

Zusätzlich würde ich den Maximieren Button der Form entfernen. Der macht ja kein Sinn, weil du deine Controls ja nicht an die Form anpasst. Außerdem kannst du mit dem BorderStyle bsSingle noch erreichen, das der Benutzer die Form nicht vergrößern kann.