fix some file extensions
This commit is contained in:
parent
68f8f3e56b
commit
f3a896c724
789 changed files with 91 additions and 62 deletions
|
|
@ -1,25 +0,0 @@
|
|||
type
|
||||
TMyClass = class
|
||||
private
|
||||
FSomeField: Integer; // by convention, fields are usually private and exposed as properties
|
||||
public
|
||||
constructor Create;
|
||||
begin
|
||||
FSomeField := -1;
|
||||
end;
|
||||
procedure SomeMethod;
|
||||
property SomeField: Integer read FSomeField write FSomeField;
|
||||
end;
|
||||
|
||||
procedure TMyClass.SomeMethod;
|
||||
begin
|
||||
// do something
|
||||
end;
|
||||
|
||||
|
||||
var lMyClass: TMyClass;
|
||||
|
||||
lMyClass := new TMyClass; // can also use TMyClass.Create
|
||||
|
||||
lMyClass.SomeField := 99;
|
||||
lMyClass.SomeMethod;
|
||||
Loading…
Add table
Add a link
Reference in a new issue