procedure TForm1.DBGrid1DblClick (Sender: TObject); varitem_xh: string; beginitem_xh: = DBGrid1.SelectedField.DataSet.FieldValues [ 'item_xh']; item_xh: = item_xh '. htm'; showmessage (item_xh); shellexecute (0, 'Open ', item_xh,' ',' ', sw_show; end;
// Tips String and PansString types do not match, how should you do if this feature is to be implemented? ?
