Fórum Erro para criar procedure !!! #193287

Olá galera do Fórum!!!

Eu sou novo no Delphi. Eu não estou entendendo pq eu não estou conseguindo criar uma procedure. Eu estou fazendo isso:

unit Uprinc;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, Menus, StdCtrls, ToolWin, ComCtrls, ExtCtrls;

type
Tfrmprinc = class(TForm)
.
.
.

Private
{ Private delcarations }
public
procedure AlimentaCbo(oCombo: TComboBox);
{ Public declarations }
end;

var
frmprinc: Tfrmprinc;


implementation

uses

procedure AlimentaCbo(oCombo: TComboBox);
begin
oCombo.Items.Add(´A´);
oCombo.Items.Add(´B´);
oCombo.Items.Add(´C´);
end;

end.

O que está errado? Eu não estou entendendo. Parece estar tudo certo!

O erro que está dando é o seguinte:

[Error] Uprinc.pas(62): Unsatisfied forward or external declaration: ´Tfrmprinc.AlimentaCbo´

Se vcs puderem me ajudar...
Valeu!!!