7 znaków w edicie

jak zrobic zeby edit wyswietlal tylko 7 pierwszych znaków z 12 wpisanych?

Jak wpisujesz do Edita jakąś zmienną, to możesz użyć procedurki Delete przed wpisaniem, albo użyć pętelki :

if length(s) > 7 then
    for i := 1 to 7 do begin
       Edit1.Text := Edit1.Text + s[i];
    end;

s to oczywiście wpisywany string.

Edit1.Text := copy ( Edit1.Text , 1 , 7 );