---

Hej.

Mange af de kodestumper, som jeg finder på nettet, hedder noget lignende
denne her:

Procedure TfrmMain.CheckCapsLock;
begin
If Odd(GetKeystate(VK_CAPITAL)) then
Statusline.Panels[1].text := 'CAPS
else
Statusline.Panels[1].Text := '';
end;

Men indsætter jeg denne kode i min unit (og min form vel at mærke hedder
frmMain, så får jeg en fejl ved ".CheckCapsLock"

"TfrmMain does not contain a member named CheckCapsLock"

Hvad skykldes det? Jeg har taget koden direkte.

---

"Michael Sørensen" <ms1 SNABELA skindbeni punktum dk> wrote in message
news:4455232f$0$11673$ba624c82@nntp02.dk.telia.net...
>
> Hvad skykldes det? Jeg har taget koden direkte.

Du skal tilføje "Procedure CheckCapsLock;" i f.eks. public sektionen for
TfrmMain.

hilsen
Uffe