Delphi-PRAXiS - Einzelnen Beitrag anzeigen

**Noobinator**

Delphi-Quellcode:

			procedure TForm1.Button1Click(Sender: TObject);

var x:string;

begin

x:=edit1.Text;

delete(x,11,100000);

label1.Caption:=x;

end;

damit schneidest du alle zeichen ab dem elften ab. auch wenn das ganze recht sinnlosprogrammiert ist

Noobinator Registriert seit: 9. Mai 2006 147 Beiträge Delphi 7 Personal	#4 Re: String filtern 21. Jul 2006, 15:43 markieren Delphi-Quellcode: procedure TForm1.Button1Click(Sender: TObject); var x:string; begin x:=edit1.Text; delete(x,11,100000); label1.Caption:=x; end; damit schneidest du alle zeichen ab dem elften ab. auch wenn das ganze recht sinnlosprogrammiert ist
	Zitat