Unless I want to have a lot of undeclared identifiers I have to have multiple var sections, see below. That is so wrong!
Also, this array declaration doesn't work under any circumstances even though I lifted it from another unit in the project and made sure it has the same uses list.
x: array[0..9] of variant;
The procedure in the other unit was not a (Sender: TObject) procedure (sorry for my ignorance of what to call that).
What am I doing wrong?
The list below has no errors when I put in all the var sections.
procedure TfDesignMaster.PopulatePdlNotesWithValuePack(Sender: TObject);
begin
var
stocknummm,value,value1,value2,keyfields, fieldname: string;
var
F: TField;
var
i: integer;
var
lresult: boolean;
var
fn:=tstringlist.create;
var
sl:=tstringlist.create;