DGL • Thema anzeigen - C# like classes in delphi?

C# like classes in delphi?

Moderator: DGL-Team

Seite 1 von 1

[ 3 Beiträge ]

Druckansicht

Vorheriges Thema | Nächstes Thema

Autor

Nachricht

noeska

Betreff des Beitrags: C# like classes in delphi?

Verfasst: Do Dez 21, 2006 20:13

DGL Member

Registriert: Di Jul 01, 2003 18:59
Beiträge: 887
Wohnort: (The Netherlands)
Programmiersprache: fpc/delphi/java/c#

In C# you have special classes like String that work like this

Code:

 
String MyString = "    This is an test string   "; 
Console.WriteLine(MyString.Trim());

It class like the String class is created like this:
http://www.codeproject.com/useritems/Cs ... erator.asp

Is it possible to use something like this in Delphi ((win32) 2005/turbo)? I know something like this is possible for arrays. E.g. MyObject[i] instead of MyObject.Lines[i].

Thanks for your answers in advance.

_________________
http://3das.noeska.com - create adventure games without programming

Nach oben

LarsMiddendorf

Betreff des Beitrags:

Verfasst: Do Dez 21, 2006 21:52

DGL Member

Registriert: Sa Dez 28, 2002 11:13
Beiträge: 2244

Delphi 2006/ Turbo Delphi has operator overloading for .Net(class and record) and Win32(record only, not Delphi2005). This includes the implicit conversion operator.

Code:

 Test=record
   class operator Implicit(t:Test):string;
 end;
 
class operator Test.Implicit(t: Test): string;
begin
end;

Nach oben

noeska

Betreff des Beitrags:

Verfasst: Do Dez 21, 2006 22:17

DGL Member

Registriert: Di Jul 01, 2003 18:59
Beiträge: 887
Wohnort: (The Netherlands)
Programmiersprache: fpc/delphi/java/c#

I got the following answer on the pascalgamedevelopment forum:

Code:

 
type 
 MyString = record 
  data: string; 
  function Trim: MyString; 
  class operator implicit(a: string): MyString; 
  class operator implicit(a: MyString): String; 
 end; 
 
{ MyString } 
 
class operator MyString.implicit(a: string): MyString; 
begin 
   result.data := a; 
end; 
 
class operator MyString.implicit(a: MyString): String; 
begin 
   result := a.data; 
end; 
 
function MyString.Trim: MyString; 
begin 
   //trim stuff here 
   result := self; 
end; 
 
begin 
   a := '    This is an test string   '; 
   writeln(string(a.Trim())); 
end;
 

This seem to do what i want, thanks jsoftware.
Also thanks to Lars.

This allow to do some good things in delphi e.g. for vectors, martices etc...

Where can i find explanations of all operators for records in the delphi help, i cannot find it as i get lost in the delphi help.

_________________
http://3das.noeska.com - create adventure games without programming

Nach oben

Seite 1 von 1

[ 3 Beiträge ]

Foren-Übersicht » English » English Programming Forum

Wer ist online?

Mitglieder in diesem Forum: 0 Mitglieder und 4 Gäste

Du darfst keine neuen Themen in diesem Forum erstellen.
Du darfst keine Antworten zu Themen in diesem Forum erstellen.
Du darfst deine Beiträge in diesem Forum nicht ändern.
Du darfst deine Beiträge in diesem Forum nicht löschen.
Du darfst keine Dateianhänge in diesem Forum erstellen.