2ちゃんねる用ブラウザ「OpenJane」Part41

このエントリーをはてなブックマークに追加
226名無しさん@お腹いっぱい。
>>225
こんなん見つけたんだけどコンパイル出来ないのよ

procedure TMainWnd.UpdateIndicator;
begin
StatusBar.Panels[0].Text := loginIndicator + IntToStr(AsyncManager.Count);
//ここから追加
if AsyncManager.Count > 0 then
try
if not Animate.Active then
Animate.Play(2, Animate.FrameCount, 0);
except
end
else
Animate.Stop;
  //ここまで追加
end;