Delphi-PRAXiS - Einzelnen Beitrag anzeigen

**fkerber**

Hi!

Wenn Test am Anfang steht (also immer):

Delphi-Quellcode:

			procedure TForm1.Button1Click(Sender: TObject);

var s: string;

begin

s:='test544564';

if copy(s,0,4)='test' then showmessage('aa');

end;

Ciao Frederic

fkerber (CodeLib-Manager) Registriert seit: 9. Jul 2003 Ort: Ensdorf 6.723 Beiträge Delphi XE Professional	#9 Re: Verschiedene Zahlen 17. Aug 2004, 10:54 Hi! Wenn Test am Anfang steht (also immer): markieren Delphi-Quellcode: procedure TForm1.Button1Click(Sender: TObject); var s: string; begin s:='test544564'; if copy(s,0,4)='test' then showmessage('aa'); end; Ciao Frederic Frederic Kerber
	Zitat