Hayatın içindeki kodlar..: MaskUtils

MaskUtils etiketine sahip kayıtlar gösteriliyor. Tüm kayıtları göster

Perşembe, Temmuz 05, 2018


Uses

Vcl.Mask,
Vcl.ValEdit,

   System.MaskUtils,
   ...

.
.
.
function isMaskEditEmpty(me: TMaskEdit) : Boolean;
begin
Result := FormatMaskText(me.EditMask, '') = me.Text;
end;
.
.