seri portddan çoğunlukla saçma sapan verilerde geliyor bunları filitrelemem lazım
sadece integerler seçsin geri kalanını süzsün
Kod: Tümünü seç
if not (gln in ['0'..'9',#8]) then
begin
gln:=#0; //girilen karakter rakam veya backspace değilse null(#0)'a dönüştür
end;
saygılar