|
|
|
DERS ANLATIMI FRAME |
|
DATETOSTR
| Tanimlama : |
function DateToStr(Date: TDateTime):
string; overload;
function DateToStr(Const DateTime:TDateTime:TDateTime;const
FormatSettings;
TFormatsSettings:string;overload; |
|
| Parametreyle girilen tarih degiskenini string tipe dönüstürmek
için kullanilan bir fonksiyondur. Eger DAteTime tipli bir
degisken degeri aktarilirsa hata vermekle beraber, sadece tarih
kismiyla ilgili tip dönüsümü gerçeklesecektir. |
procedure TForm1.Button1Click(Sender: TObject);
var
tarih:TDateTime;
sonuc:Ansistring;
begin
tarih:=now;
sonuc:=DateToStr(tarih);
ShowMessage(sonuc);//15.05.2004 yazar
end; |
|
| |
|
|
|
|