Delphi 7 of Skype's readers to chat
2016-08-23
0 0 0
no vote
Other
Earn points
Application background
...
//--------enable double buffering for TWInControls (eliminate stupid flickering)
procedure EnableDoubleBuffering(AParent: TWinControl; const AEnabled: Boolean);
var
i: Integer;
AWinControl: TWinControl;
begin
with AParent do
begin
if AParent is TWinControl then AParent.DoubleBuffered := AEnabled;
for i := 0 to ControlCount - 1 do begin
if Controls[i] is TWinControl then
begin
AWinControl := TWinControl(Controls[i]);
AWinControl.DoubleBuffered := AEnabled;
&nb
delphi
skype
聊天
读者
Related Source Codes
MY Function Library
0
0
no vote
DELPHI calls the voice synthesis provided by windo
0
0
no vote
Compare binary file
0
0
no vote
Delphi 7
0
0
no vote
SQL database table structure merge tool
0
0
no vote
No comment