paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-27 04:13:43 +02:00
Code Issues Packages Projects Releases Wiki Activity

fixed initialization of GTKAPIWidget_new

Browse Source 
git-svn-id: trunk@5782 -
This commit is contained in:
mattias 2004-08-13 17:41:18 +00:00
parent c4db8f2797
commit 414e677c1e
6 changed files with 37 additions and 5 deletions

1
.gitattributes vendored
View File

@ -627,6 +627,7 @@ ideintf/componentreg.pas svneol=native#text/pascal
ideintf/componenttreeview.pas svneol=native#text/pascal
ideintf/formeditingintf.pas svneol=native#text/pascal
ideintf/graphpropedits.pas svneol=native#text/pascal
ideintf/helphtml.pas svneol=native#text/pascal
ideintf/helpintf.pas svneol=native#text/pascal
ideintf/idecommands.pas svneol=native#text/pascal
ideintf/imagelisteditor.pp svneol=native#text/pascal

1
ideintf/Makefile.fpc
View File

@ -29,6 +29,7 @@ implicitunits=actionseditor \
objinspstrconsts \
propedits \
helpintf \
helphtml \
texttools \
actionseditor \
formeditingintf \

2
ideintf/allideintf.pas
View File

@ -22,7 +22,7 @@ uses
IDECommands, PropEdits, ObjInspStrConsts, ObjectInspector, ColumnDlg,
ComponentEditors, GraphPropEdits, ListViewPropEdit, ImageListEditor,
ComponentTreeView, ActionsEditor, HelpIntf, TextTools, FormEditingIntf,
SrcEditorIntf, ComponentReg, PackageIntf;
SrcEditorIntf, ComponentReg, PackageIntf, HelpHTML;
implementation

30
ideintf/helphtml.pas Normal file
View File

@ -0,0 +1,30 @@
{
*****************************************************************************
* *
* See the file COPYING.modifiedLGPL, included in this distribution, *
* for details about the copyright. *
* *
* This program is distributed in the hope that it will be useful, *
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. *
* *
*****************************************************************************
Author: Mattias Gaertner
Abstract:
Methods and types for HTML help.
}
unit HelpHTML;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils, HelpIntf;
implementation
end.

3
ideintf/helpintf.pas
View File

@ -12,9 +12,6 @@
Author: Mattias Gaertner
!!! UNDER CONSTRUCTION !!!
!!! ONLY A DESIGN STUDY !!!
Abstract:
This unit defines various base classes for the Help System used by the IDE.
}

5
lcl/interfaces/gtk/gtkwinapiwindow.pp
View File

@ -1009,7 +1009,7 @@ begin
// TODO: check if we still need to pass the args in gtk1
Result := gtk_widget_new(GTKAPIWidget_GetType, nil);
{$ELSE}
FillChar(Args,SizeOf(TGTKArg)*(High(Args)-Low(Args)),0);
FillChar(Args[0],SizeOf(TGTKArg)*(High(Args)-Low(Args)+1),0);
Args[0].theType:=GTK_ADJUSTMENT_TYPE;
Args[0].name:='hadjustment';
Args[1].theType:=GTK_ADJUSTMENT_TYPE;
@ -1135,6 +1135,9 @@ end.
{ =============================================================================
$Log$
Revision 1.60 2004/08/13 17:41:18 mattias
fixed initialization of GTKAPIWidget_new
Revision 1.59 2004/08/13 12:41:54 mattias
fixed uninitialized argument