Skip to content

Commit 94c63c5

Browse files
committed
Fix My->MyInterface in comments
Fixes #23
1 parent 6aef01f commit 94c63c5

File tree

1 file changed

+4
-4
lines changed

1 file changed

+4
-4
lines changed

code-samples/interface_casting.dpr

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -65,8 +65,8 @@ begin
6565
MyInterface := TMyClass2.Create(nil);
6666
MyClass := TMyClass2.Create(nil);
6767

68-
// This doesn't compile, since at compile-time it's unknown if My is IMyInterface2.
69-
// UseInterface2(My);
68+
// This doesn't compile, since at compile-time it's unknown if MyInterface is IMyInterface2.
69+
// UseInterface2(MyInterface);
7070
// UseInterface2(MyClass);
7171

7272
// This compiles and works OK.
@@ -80,12 +80,12 @@ begin
8080
UseInterface2(MyClass as IMyInterface2);
8181

8282
// This compiles, but will fail at runtime, with ugly "Access violation".
83-
// UseInterface3(IMyInterface3(My));
83+
// UseInterface3(IMyInterface3(MyInterface));
8484
// This does not compile. Casting InterfaceType(ClassType) is checked at compile-time.
8585
// UseInterface3(IMyInterface3(MyClass));
8686

8787
// This compiles, but will fail at runtime, with nice "EInvalidCast: Invalid type cast".
88-
// UseInterface3(My as IMyInterface3);
88+
// UseInterface3(MyInterface as IMyInterface3);
8989
// This compiles, but will fail at runtime, with nice "EInvalidCast: Invalid type cast".
9090
// UseInterface3(MyClass as IMyInterface3);
9191

0 commit comments

Comments
 (0)