Started PanningWindow implementation

Fixed some resource files

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@140 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
blikblum
2007-04-04 18:09:47 +00:00
parent 2090bf84b2
commit 28313808a3
34 changed files with 1526 additions and 1017 deletions

View File

@ -3,13 +3,17 @@ unit ViewCode;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, LResources;
delphicompat, LCLIntf, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, LResources, SynHighlighterPas, SynEdit;
type
TfrmViewCode =
{ TfrmViewCode }
TfrmViewCode =
class(TForm)
memo: TMemo;
SynEdit1: TSynEdit;
SynPasSyn1: TSynPasSyn;
procedure FormActivate(Sender: TObject);
private
@ -19,7 +23,6 @@ interface
end;
implementation
{.$R *.dfm}
procedure TfrmViewCode.FormActivate(Sender: TObject);
var