Zitat von
Daniel B:
Hallo,
spiel doch einfach damit. Es ist halt ziemlich Blöd wenn man nicht weiss was man damit machen soll, daher einfach mal ein Beispiel mit der Message.
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
iFor: Integer;
sEdit: String;
begin
sEdit := Edit1.Text;
for iFor := 0 to Length(sEdit) do
begin
if sEdit[iFor] = ' ' then
begin
ShowMessage('An der ' + IntToStr(iFor) + ' stelle ist eine Leerstelle!');
end;
end;
end;
Grüsse, Daniel
In der For-Schleife muss es dann doch heißen "0 to x -1" oder?
[edit]
Sind die Textformatierungen (Größe/Farbe) ganz ausgeschaltet?