Delphi-PRAXiS - Einzelnen Beitrag anzeigen

**Die Muhkuh**

Hi,

Delphi-Quellcode:

			function DeleteZero(aStr: String): String;

begin

  if aStr[1] = '0' then

    Delete(aStr, 1, 1);

  Result := aStr;

end;

Sowas?

Die Muhkuh Registriert seit: 21. Aug 2003 7.332 Beiträge Delphi 2009 Professional	#3 Re: Führende Null entfernen 22. Mai 2007, 15:27 Hi, markieren Delphi-Quellcode: function DeleteZero(aStr: String): String; begin if aStr[1] = '0' then Delete(aStr, 1, 1); Result := aStr; end; Sowas? Manuel Blog reactivated
	Zitat