View Issue Details

IDProjectCategoryView StatusLast Update
0000044Lazaruspublic2002-05-15 03:46
ReporterBug ImportAssigned ToMattias Gaertner 
PrioritynormalSeverityminorReproducibilityalways
Status closedResolutionfixed 
Product VersionProduct Build 
Target VersionFixed in Version 
Summary0000044: AOwner difers from Self
DescriptionWhen I change Self to AOwner, the program
crashes:

 constructor TForm1.Create(AOwner: TComponent);
 begin
 inherited Create(AOwner);

// ObjName:Form1 ClassName:TForm1
// Made by DFM To Pas V0.4

// MainMenu1:TMainMenu;
// File1:TMenuItem;
// Quit1:TMenuItem;

 Left := 288;
 Top := 264;
 Width := 381;
 Height := 392;
 Caption := 'Form1';

//MainMenu1:=TMainMenu.Create(AOwner);
MainMenu1:=TMainMenu.Create(Self);
 with MainMenu1 do
     begin
// File1:=TMenuItem.Create(AOwner);
     File1:=TMenuItem.Create(Self);
     with File1 do
          begin
          Caption := 'File';
// Quit1:=TMenuItem.Create(AOwner);
          Quit1:=TMenuItem.Create(Self);
          with Quit1 do
               begin
               Caption := 'Quit';
               File1.Add(Quit1);
               end;
          MainMenu1.Items.Add(File1);
          end;
     Menu:=MainMenu1;
     end;
Additional InformationImported information
--------------------
Name: João Schuler
Mail: jpss (at) schulers.com
TagsNo tags attached.
Fixed in Revision
LazTarget
WidgetsetGTK, Win32/Win64
Attached Files

Activities

There are no notes attached to this issue.

Issue History

Date Modified Username Field Change
2001-06-14 00:00 Bug Import New Issue
2001-06-14 00:00 Bug Import Widgetset => GTK, Win32
2002-05-15 03:46 Bug Import Status new => assigned
2002-05-15 03:46 Bug Import Assigned To => Mattias Gaertner
2002-05-15 03:46 Bug Import Status new => closed
2002-05-15 03:46 Bug Import Resolution open => fixed