Abdul Basit
AccuPlan developer
Posts: 20
Joined: 2006-12-01
|
I Just generated first project with a property Page, compiler generates these errors for all generated functions.
Incompatible types 'HRESULT' and boolean. for the following
function Tfirst.Get_Active(out Value: WordBool): HResult;
begin
Result := Active;
end;
Error is onResult := Active;
---
MyFirstOLaddin GlobalPropertyPage errors at Set_autoScroll = IlobalPropertyPage....
Declaration of set_AutoScroll differs from declaration in IGlobalPropertyPage
|
|
Dmitry Kostochko
Add-in Express team
Posts: 2880
Joined: 2004-04-05
|
Hi Abdul,
What Delphi version do you use? Could you please send me this project for checking?
P.S. Note that we take up your forum requests in the order we receive them.
Besides, it may take us some time to investigate your issue. Please be sure we will let you know as soon as the best possible solution is found.
|
|
Abdul Basit
AccuPlan developer
Posts: 20
Joined: 2006-12-01
|
Compiling MyFIrstAddin project from the Demos, Using D7.
Errors are generated for Unit GlobalPropertyPage;
Errors are at the bottom
--------------------------
function IGlobalPropertyPage.Set_AutoScroll = IGlobalPropertyPage_Set_AutoScroll;
function IGlobalPropertyPage.Set_AutoSize = IGlobalPropertyPage_Set_AutoSize;
function IGlobalPropertyPage.Set_AxBorderStyle = IGlobalPropertyPage_Set_AxBorderStyle;
function IGlobalPropertyPage.Set_Caption = IGlobalPropertyPage_Set_Caption;
function IGlobalPropertyPage.Set_Color = IGlobalPropertyPage_Set_Color;
function IGlobalPropertyPage.Set_Cursor = IGlobalPropertyPage_Set_Cursor;
function IGlobalPropertyPage.Set_DoubleBuffered = IGlobalPropertyPage_Set_DoubleBuffered;
function IGlobalPropertyPage.Set_DropTarget = IGlobalPropertyPage_Set_DropTarget;
function IGlobalPropertyPage.Set_Enabled = IGlobalPropertyPage_Set_Enabled;
function IGlobalPropertyPage.Set_HelpFile = IGlobalPropertyPage_Set_HelpFile;
function IGlobalPropertyPage.Set_KeyPreview = IGlobalPropertyPage_Set_KeyPreview;
function IGlobalPropertyPage.Set_PixelsPerInch = IGlobalPropertyPage_Set_PixelsPerInch;
function IGlobalPropertyPage.Set_PrintScale = IGlobalPropertyPage_Set_PrintScale;
function IGlobalPropertyPage.Set_Scaled = IGlobalPropertyPage_Set_Scaled;
function IGlobalPropertyPage.Set_Visible = IGlobalPropertyPage_Set_Visible;
=======================================================
Errors
[Error] GlobalPropertyPage.pas(84): Declaration of 'Set_AutoScroll' differs from declaration in interface 'IGlobalPropertyPage'
[Error] GlobalPropertyPage.pas(85): Declaration of 'Set_AutoSize' differs from declaration in interface 'IGlobalPropertyPage'
[Error] GlobalPropertyPage.pas(86): Declaration of 'Set_AxBorderStyle' differs from declaration in interface 'IGlobalPropertyPage'
[Error] GlobalPropertyPage.pas(87): Declaration of 'Set_Caption' differs from declaration in interface 'IGlobalPropertyPage'
[Error] GlobalPropertyPage.pas(88): Declaration of 'Set_Color' differs from declaration in interface 'IGlobalPropertyPage'
[Error] GlobalPropertyPage.pas(89): Declaration of 'Set_Cursor' differs from declaration in interface 'IGlobalPropertyPage'
[Error] GlobalPropertyPage.pas(90): Declaration of 'Set_DoubleBuffered' differs from declaration in interface 'IGlobalPropertyPage'
[Error] GlobalPropertyPage.pas(91): Declaration of 'Set_DropTarget' differs from declaration in interface 'IGlobalPropertyPage'
[Error] GlobalPropertyPage.pas(92): Declaration of 'Set_Enabled' differs from declaration in interface 'IGlobalPropertyPage'
[Error] GlobalPropertyPage.pas(93): Declaration of 'Set_HelpFile' differs from declaration in interface 'IGlobalPropertyPage'
[Error] GlobalPropertyPage.pas(94): Declaration of 'Set_KeyPreview' differs from declaration in interface 'IGlobalPropertyPage'
[Error] GlobalPropertyPage.pas(95): Declaration of 'Set_PixelsPerInch' differs from declaration in interface 'IGlobalPropertyPage'
[Error] GlobalPropertyPage.pas(96): Declaration of 'Set_PrintScale' differs from declaration in interface 'IGlobalPropertyPage'
[Error] GlobalPropertyPage.pas(97): Declaration of 'Set_Scaled' differs from declaration in interface 'IGlobalPropertyPage'
[Error] GlobalPropertyPage.pas(98): Declaration of 'Set_Visible' differs from declaration in interface 'IGlobalPropertyPage'
[Fatal Error] MyFirstOlAddIn.dpr(9): Could not compile used unit 'GlobalPropertyPage.pas'
|
|
Dmitry Kostochko
Add-in Express team
Posts: 2880
Joined: 2004-04-05
|
Hi Abdul,
The MyFirstAddin demo project doesn't contain any option pages because this demo project is destinated for MS Excel. But in the MyFirstOLAddin demo project, there is such a page, so I can assume you are using the MyFirstOLAddin sample. I have just opened and compiled it without any errors using Delphi 7. Could you please describe step-by-step what you did with the project? In my MyFirstOLAddin example I don't have the following code lines at all. Could you please send me your version of this project for testing?
function IGlobalPropertyPage.Set_AutoScroll = IGlobalPropertyPage_Set_AutoScroll;
function IGlobalPropertyPage.Set_AutoSize = IGlobalPropertyPage_Set_AutoSize;
function IGlobalPropertyPage.Set_AxBorderStyle = IGlobalPropertyPage_Set_AxBorderStyle;
// etc.
|
|
Abdul Basit
AccuPlan developer
Posts: 20
Joined: 2006-12-01
|
Yes the demo is MyFirstOLAddin I changed absolutely nothing.
Functions before the autoscroll do not generate errors. It is also true if I create a new application with a wizzard.
|
|
Dmitry Kostochko
Add-in Express team
Posts: 2880
Joined: 2004-04-05
|
Hi Abdul,
Very strange issue. Could you please send me this "damaged" project?
Do you have Update Pack 1 for Delphi 7 installed?
|
|