1

hereと次の部分のコードをテストしました

begin 
  Paths := TStringList.Create(); 
  try 
    ParseInfFile(LocateInfFile(DeviceHelper.InfName), DeviceHelper.InfSection)
  ...
...

コンパイル時...

Undeclared identifier InfName and InfSection

どうすれば修正できますか？誰か他の適切なバリアントを持っていますか?

4

1 に答える 1

2

DeviceHelperリンクされたコードに含まれていないクラスまたはレコードのようですが、投稿した行以外のどこにも使用されていません（他の人を簡単にするために、そのコードの一番下にあります） . したがって、代わりにそれらをローカル変数として宣言し、必要な値をInfNameおよびに割り当て、InfSectionなしで続行できDeviceHelperます。

var
  InfName, InfSection: string;
begin
  InfName := 'WhatEver.Inf';
  InfSection := 'WhatEverSection`;
  Paths := TStringList.Create(); 
  try 
    ParseInfFile(LocateInfFile(InfName), InfSection);
  ...

  // You'll need to remove these lines, too. They add the returned items
  // to a TListView using functionality that's available in Vista and above
  ListView_InsertGroup(lvAdvancedInfo.Handle, 'Driver Files', 2);
  for I := 0 to Paths.Count - 1 do
     ListView_AddItemsInGroup(lvAdvancedInfo, '', Paths[I], 2);
于 2012-08-11T21:42:54.357 に答える