Delphi-PRAXiS - Einzelnen Beitrag anzeigen

**bttb930**

Delphi-Quellcode:

			var

vorher, nachher: Integer;

...

vorher := GetFileSizeA(Edit1.Text);

nachher := vorher div 1024;

Label1.Caption := IntToStr(nachher);

bttb930 Registriert seit: 6. Okt 2003 372 Beiträge	#4 Re: Dateigröße abfragen 8. Apr 2007, 23:52 markieren Delphi-Quellcode: var vorher, nachher: Integer; ... vorher := GetFileSizeA(Edit1.Text); nachher := vorher div 1024; Label1.Caption := IntToStr(nachher);
	Zitat