안녕하세요

빌더 초보입니다.

다름이 아니오라 빌더에서 델파이로 작성된 파스칼 함수를

이용하는 방법이 없나요

예를 들면 , 아래와 같은 소스를

하나의 함수로 많들어 이용하고 싶습니다.


procedure TForm1.Button1Click(Sender: TObject);
var
  SerialNum : DWord;
  A,B: DWord;
  C: array [0..255] of Char;
  Buffer: array [0..255] of Char;
begin
  if GetVolumeInformation( PChar('C:\'), Buffer, 256, @SerialNum, A, B, C, 256 ) then
      Label1.Caption := IntToStr( SerialNum );
end;