Виртуальная клавиатура

[Alex Cones]

Имеется: готовая (почти) виртуальная клавиатура, все кнопки рабочие (в смысле нажимаются). Теперь нужно сделать что бы при нажатии на клавишу в изображение NAMEIMG появлялось изображение клавиши. Это не проблема - NAMEIMG.Canvas.Draw(28*LettersCount ,0,ButtonA); А вот как сделать, что бы при CPSLCK = true изображения рисовались на 8 пикселей выше? Сразу приходит на ум код:

  If LettersCount<8 then
  Begin
   If Capslock = True  then Form1.NAMEIMG.Canvas.Draw(LettersCount*28,0,ButtonA);
   If Capslock = False then Form1.NAMEIMG.Canvas.Draw(LettersCount*28,8,ButtonA);
   Inc(LettersCount);
  End;

Но проблема в том, что существуе кнопка BCKSPC (да будет проклят её создатель), задача которой - стирать последнюю букву и уменьшать количество LetterCount на единицу. Вопрос - как её сделать?

P.S. У NAMEIMG transparent = true, на фоне - другая картинка.

[evg_m]

if key=backspace then
begin
   form1.nameimg.canvas.brush.color:=transparentcolor;
   form1.nameimg.canvas.fullrect(rect((letterscount-1)*28,0,lettercount*28,fontheight+8));
   dec(Lettercount)
end;

[DomiNick]

А вот как сделать, что бы при CPSLCK = true изображения рисовались на 8 пикселей выше?

При включённом "Caps Lock"..? Почему тогда выше? Если там буквы, то надо просто заглавные буквы выводить)

Сразу приходит на ум код: ...

Только зачем там целых два "If"..?