![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
|
|
#1
|
||||
|
||||
|
добавил в проект модуль SKYPE4COMLib_TLB
стал ругатся на такие строчки как Код:
Application.Minimize; Application.ShowMainForm:=true; Application.ProcessMessages; CreateLink(application.exename,'bbbbb.lnk','',''); Цитата:
в чем проблема на application почему ругается??? |
|
#2
|
||||
|
||||
|
Выложи, лучше, весь сорс. А то так не понятно.
|
|
#3
|
||||
|
||||
|
он большой, но как пример вот
Код:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs,SKYPE4COMLib_TLB, StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
Application.ProcessMessages;
end;
end.на Application.ProcessMessages; та же ругань |
|
#4
|
||||
|
||||
|
мб можно заменитькакто мои функции или из за чего так кричит
|
|
#5
|
|||
|
|||
|
Цитата:
Кричит потому, что при импорте у тебя создался класс application из скайпа. Теперь дельфя видит не тот класс. Указывай Application с указанием модуля, в котором он описан - Forms.Application.ProcessMessages, например. |
|
#6
|
||||
|
||||
|
либо SKYPE4COMLib_TLB в uses поставить перед Forms.
|