değer kontrolü

[serbek_tr]

Hayırlı çalışmalar,
arkadaşlar benzer konular çok ama aradığım cevabı bulamadım, bir değerin formata uygunluğunu nasıl bulabilirm.
örneğin 01.01.2008 13:30 değeri ama bu değer string

Kod: Tümünü seç

var zaman : string;
begin
zaman : '01.01.2008 13:30'  
zaman tarih değerimidir
end;

bu değer datetimestap olan bir field a verilecek yanlış olma ihtimaline karşın kontrol yapmak istiyorum

[mussimsek]

Merhaba,

Aşağıdaki fonksiyon işinizi görür.

Kod: Tümünü seç

function GecerliTarihmi(Tarih: string): Boolean;
begin
  Result := False;
  try
    StrToDateTime(Tarih);
    Result := True;
  except
    Result := False;
  end;
end;

Kolay gelsin.

[sabanakman]

Bir başka teknik..:

Kod: Tümünü seç

function GecerliTarihmi(Tarih: string): Boolean;
var Tar:TDateTime;
begin
  Result:=TryStrToDateTime(Tarih, Tar);
end;

[serbek_tr]

teşekkür ederim arkadaşlar, çok sağolun