Delphi Sources

Избавиться от раздражающего SQL Wait курсора



Оформил: DeeCo

{ 
  Simply place this one line of code in the OnCreate event of 
  the form that is showing the annoying SQL Wait cursor... 
}

 procedure TForm1.FormCreate(Sender: TObject);
 begin
   Screen.Cursors[crSQLWait] := Screen.Cursors[crHourGlass];
   // or whatever cursor you would like to replace the SQL hourglass with 
end;




Похожие по теме исходники

Конструктор тестов SQL

SQL Zapros

Wait Indicator

Exec and Wait