Forum: Programmieren allgemein
Delphi
by DelphiUser1,
2. Okt 2012
Die Frage war ja wie ich die Maximallänge vorgeben kann?
Forum: Programmieren allgemein
Delphi
by DelphiUser1,
2. Okt 2012
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...
Forum: Programmieren allgemein
Delphi
by DelphiUser1,
30. Sep 2012
tatsächlich, jetzt geht es.
Danke nochmal :wink:
Forum: Programmieren allgemein
Delphi
by DelphiUser1,
30. Sep 2012
Ich glaube ich bin der blinde Mann, es ist tatsächlich noch nicht hier. Seltsam, wie man sich irren kann :roll:
procedure TForm1.Button2Click(Sender: TObject);
begin
if (Edit3.Text='') or (Edit4.Text='') or (MaskEdit1.Text='') or (Edit6.Text='') or (ComboBox3.Text='') or not (Checkbox4.Checked) then
ShowMessage('Ungenügende Angaben')
else
myform:=TReg.CreateNew(Self);
with myform do
...
Forum: Programmieren allgemein
Delphi
by DelphiUser1,
30. Sep 2012
ich denke nicht, alle Informationen sind doch im Quelltext enthalten..
Hmm okay danke für den Tipp, seltsamer Weise klappt es trotzdem :-D
Was genau meinst du mit ich führe kein Exit aus?
Der Quelltext mit der ShowMessage ist ja bereits hier zu sehen.
Forum: Programmieren allgemein
Delphi
by DelphiUser1,
29. Sep 2012
Großer Dank an Bummi :thumb:
Bei den ganzen Ends und Begins blickt auch kein Mensch mehr durch...
Ganz deiner Meinung, aber unser Informatik Lehrer ist sowieso etwas sonderlich und was muss, das muss :-D
Damit wäre mein Problem also gelöst, danke nochmal an alle, die geholfen haben
Jetzt habe ich nur das Problem, das im Falle "Showmessage('Ungenügende Angaben')" eine Zugriffsverletzung...
Forum: Programmieren allgemein
Delphi
by DelphiUser1,
29. Sep 2012
Ja das ist natürlich richtig, aber es bestanden genaue Vorgaben, also es soll schon so gemacht werden. das Seltsame ist das gerade die Onclick-Methode des Buttons auf der erzeugten Form nicht mehr geht. also der Code für die Form ist ja oben und hier nochmal der Quelltext für das Onclick Ereignis, wer findet den fehler :?:
procedure TReg.Button1Click(Sender: TObject);
var sl, sd, sf: TStrings;...
Forum: Programmieren allgemein
Delphi
by DelphiUser1,
29. Sep 2012
Hallo alle miteinander ;)
ich habe in der Klasse Treg=class(TForm) eine Form erstellt (myform). Diese wird während der Laufzeit erzeugt. In Unit1 habe ich eine function eingebaut, mit der ich ein Passwort verschlüsseln kann(function XorStr(const Text: string; Key: Integer): string). Der gesamte Quellcode für myform steht unten. Leider ändert sich Label3 nicht in die Verschlüsselung sondern die...