Topic: Index 0 ComboBox
как убрать Index 0?
procedure frmClientServiсeList_cbStatusName_OnClick (Sender: TObject);
var
sStatus : string = IntToStr ( frmClientServiсeList.cbStatusName.dbItemID );
begin
SQLExecute ('UPDATE servise SET id_status = "'+sStatus+'" WHERE id='+ frmServiceCen.tgList.sqlValue );
UpdateDatabase('servise');
end;
действие должно происходить именно в OnClick
Index 0 - Вызывает ошибку