kod timer icinde bir kere islesin

[RAD Coder]

Temel mantık;

  if Self.Tag=0 then
 begin
   //Bir defaya mahsus çalıştırmak istediğiniz kodlar
   Self.Tag:=1;
 end;

Kodunuzda bir defa çalışmayı etkileyen iki kontrol var;
_gMod=3 olması,  snc1=1 ve adm5<>2 olması

Bir defa çalışması için _gMod değerinin mutlaka 3 olması,  snc1 değerinin 1 ile birlikte adm5 değerinin de 2 olmaması ve sonrassında bu şartı sağlayamaması gerekiyor.

Özetle _gMod=3 olsun;
snc1=1 iken ve adm5 2 den farklı bir değere sahip iken belirttiğiniz blok bir defa çalışacaktır.
Bu noktadan sonra, artık iki şartı değiştirmek gerekiyor.  
Her defasında çalışıyorsa şartlar değişmemiş demektir.