|
Registriert seit: 28. Apr 2008
Ort: Stolberg (Rhl)
6.659 Beiträge
FreePascal / Lazarus
|
AW: Operationen mit Zeichenketten
5. Dez 2010, 22:44
Delphi-Quellcode:
procedure TForm1.Button6Click(Sender: TObject);
var s,s1:string;
begin
s:=Edit1.Text;
s1:= AnsiLowerCase(s);
Edit1.Text:=s1;
end;
Du mußt s1 auch wieder zur Anzeige bringen.
Gruß
K-H
Programme gehorchen nicht Deinen Absichten sondern Deinen Anweisungen
R.E.D retired error detector
|