我有一個TObject調用Target2這是一個指針說TLabel並希望從此指針獲取屬性Name。因此,我有這個 Procedure TGetName()
var
Item : TLabel;
Begin
if Target2 is TLabel then
begin
Item := Target2;
if Item.Name := 'Some
該場景是我有一個動態創建的IbQuery,它具有許多可能的字段變體。執行後,我想測試一下是否包含一個特定的字段並且有數據。類似的東西: ibqry.fetchall();
while not ibqry.eof do
begin
if (ibqry.FieldByName(‘Lastname’) <> null)
lname := ibqry. FieldByName(‘Last