Funktion in selbst erstellter Form

[nuclearping]

Zitat:

Zitat von DelphiUser1 (Beitrag 1185114)

Zitat:

Was? Lass mich raten: Du führst nach ShowMessage kein Exit aus?

Was genau meinst du mit ich führe kein Exit aus?

Wie schon gesagt, Einrückung ... :stupid:

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
begin
  // Warum klammerst du hier nur (Checkbox4.Checked) statt das "not" mit reinzunehmen?
  if (Edit3.Text='') or (Edit4.Text='') or (MaskEdit1.Text='') or (Edit6.Text='') or (ComboBox3.Text='') or (not Checkbox4.Checked) then
    begin
      ShowMessage('Ungenügende Angaben');
      Exit; // <-- da hätte zB ein Exit gefehlt, natürlich im begin ... end-Block. :D
    end;

  myform:=TReg.CreateNew(Self);
  with myform do
    begin
      // Einrückung! ... Und ggf auch Kategorisierung! ;)
      visible := true;
      Autoscroll:=false;

      Caption := 'Registrieren(2/2)';
      Color:=clblack;

      Left := Form1.Left;
      Top := Form1.Top;
      ClientHeight := Form1.ClientHeight;
      ClientWidth := Form1.ClientWidth;
      
      // ...
    end;

  // ...

end;

[DelphiUser1]

ich will jetzt nicht ne neue Frage wegen so einer Kleinigkeit aufmachen, also einfach kurz hier:
Ich habe eine GroupBox benutzt um einen Rahmen um eine Schrift zu setzten (Ich weiß es geht auch anders, aber das tut jetzt mal nichts zur Sache). Nun darf der Benutzer seinen Namen eingeben und dieser wird dann in diesem Kasten (Groupbox mit Label drin) angezeigt. Ist der Name jedoch zu lang, passt er nicht mehr in den Kasten. Wie kann ich dem entgegenwirken?

[himitsu]

http://www.delphipraxis.net/faq.php
Ein Thread = eine Frage?


Wie?
Box vergrößern,
Maximallänge vorgeben
oder Zeilenumbruch?

[DelphiUser1]

Die Frage war ja wie ich die Maximallänge vorgeben kann?

[himitsu]

Zitat:

Zitat von DelphiUser1 (Beitrag 1185472)

Die Frage war ja wie ich die Maximallänge vorgeben kann?

Ich bin mir sicher, daß sie das nicht war. :roll:

Tipp: Geh zu einem Edit und schau mal, was man so alles im OI findet. (das klingt eventuell wie "maximale Länge" auf Englisch)
Oder wie wäre es mit der Forensuche? ([DP]Edit maximale Länge[/DP], bzw. [DP]TEdit maximale Länge[/DP])