레지스트에 기록하는 프로시저를 하나 만들었습니다.
하나의 프로젝트를 만들어서 실행을 하니 동작을 하였습니다.
그래서 프로시저만 모아두는 form 없는 unit에 옮켰더니
[Error] Util.pas(146): This form of method call only allowed in methods of derived types
라는 에러가 남니다.
<나중에 프로젝트에 이 unit을 포함할려구요..>
제가 만든 프로시저는 아래와 같습니다.
146번줄은 inherited; 부분입니다.
어떻게 해야 하는지 고수님들의 충고 말씀 부탁드립니다.
procedure WriteRegistryValue(Key : string ; value : string );
var
Reg: TRegistry;
begin
Reg := TRegistry.Create;
try
Reg.RootKey := HKEY_CURRENT_USER;
if Reg.OpenKey('SoftwareMSversion', True)
then
begin
Reg.WriteString(Key,value);
showMessage('등록완료');
end;
finally
Reg.CloseKey;
Reg.Free;
inherited;
end;
end;