[Delphi] Eigen variabele declareren

[Verwijderd]

Ik had het idee om een eigen String type te maken (uiteraard compatible met String zelf) om daar m'n eigen methodes aan te kunnen hangen.

ff een voorbeeldje om het duidelijk te maken:

code:

var
  s: MyString;
Begin
  s := "hoi";
  s.UpperCase;            // zoiets dus...
  if (s.isNumber) then    // ...of dit...
   ...
End;

Ik heb al iets geprobeerd als:

code:

Type
  MyString = class of String
    ...
  End;

Maar een String is natuurlijk geen class dus dat werkte niet.
Dit werkt wel:

code:

Type
  MyString = type String;

Maarja.. daar kan je volgens mij geen procedures/functies aan hangen...

Op het moment gebruik ik gewoon een losse unit met de stringfuncties erin. Dat werkt natuurlijk ook best, maar het lijkt me veel makkelijker als Delphi met z'n code-completion schermpje komt, en dat je je functie er zo uit kan kiezen..

Is er iemand die hier iets voor weet?

[Glimi]

Maak een classe die een String type bevat en delegeer daar sommige bewerkingen heen?
Verder moet je dan natuurlijk wel de := operator overloaden om een Stringtype aan te nemen en deze te wrappen in je datastructuur, mits mogelijk in Delphi

[ Voor 6% gewijzigd door Glimi op 13-02-2003 20:54 ]

[Tomatoman]

Wil je een nieuwe klasse declareren dan moet die direct of indirect afstammen van TObject. een string is geen TObject of TObject descendant, dus wat jij doet gaat nooit werken. Bovendien heeft class of een andere betekenis dan waarvoor jij hem probeert te gebruiken. Zoek voor meer informatie in de inhoudsopgave van Delphi help naar Object Pascal Reference en dan naar Classes and objects.

[Verwijderd]

Ja, ik wist eigenlijk al dat dat descendant-van-string idee niet zou werken.. Maar toch proberen he...

Glimi: Goed idee..
Dit is het tot nu toe. Als je daar de overloading aan toe zou voegen, dan zou het volgens mij moeten werken...

code:

type
  MyString = class
  public
    Value: String;
    Procedure UpperCase;
    Function IsNumber: Boolean;
  End;

Maarja, hoe... Iemand die iets weet van operator overloading in Delphi?

[Creepy]

Verwijderd schreef op 13 February 2003 @ 21:53:
Maarja, hoe... Iemand die iets weet van operator overloading in Delphi?

Ja

Dat kan helaas niet in Delphi.

[Glimi]

Creepy schreef op 13 February 2003 @ 21:58:
Ja

Dat kan helaas niet in Delphi.

Dan kun je nog een constructor maken die een Stringtype accepteerd. Dan heb je feitelijk hetzelfde, maar dan zonder suiker

[Verwijderd]

Hmmm... Wel jammer, zo zonder suiker...

C en Java kunnen het wel, maar Delphietje niet...
Misschien in een volgende versie...

Nou ja, in ieder geval iedereen bedankt voor de reply!

[Tomatoman]

Gezien jouw computeromschrijving werk jij nog met Windows 3.11 en dus ook met Delphi 1. Daarin zit nog geen code completion en dus heb je die class die je wilt bouwen helemaal niet nodig

[ Voor 0% gewijzigd door Tomatoman op 14-02-2003 00:07 . Reden: tomatoman doelde hierop: 80286 - 10MHz passive cooled - 4 Mb - ISA VGA Graphics card - On-Bord speaker ]

[Glimi]

Verwijderd schreef op 13 februari 2003 @ 22:36:
C en Java kunnen het wel, maar Delphietje niet...
Misschien in een volgende versie...

Sinds waarneer kent Java operator overloading?
_{en kom nou niet met nice aan}

[Verwijderd]

Was te proberen...

[ modus]
Nou ja, ik heb nu wel Delphi 7 op mn 286...
OK, tijdens t compilen een beetje ...en die Win32-API he...
Die doet t niet op een of andere manier... Isser misschien een tweakertje die de oplossing weet?
[/ modus]

[Creepy]

Glimi schreef op 13 February 2003 @ 22:16:

[...]

Dan kun je nog een constructor maken die een Stringtype accepteerd. Dan heb je feitelijk hetzelfde, maar dan zonder suiker

Tja... wie begon er nou over operator overloading??

Er zijn overigens wel Pascal varianten die dit wel hebben (o.a. FreePascal).

[CyeZ]

Creepy schreef op 14 februari 2003 @ 08:15:
[...]
Er zijn overigens wel Pascal varianten die dit wel hebben (o.a. FreePascal).

Ook in delphi is het tegenwoordig wel tot op zeker hoogte mogelijk dmv een TCustomVariantType afgeleide te maken volgens mij. Heb het zelf nog nooit gebruikt, maar dat is wat ik uit de help begrijp in ieder geval.

[LordLarry]

Idd. Het kan tot op zekere hoogte met een Custom Variant vanaf D6. Maar over het algemeen vind de Delphi community operator overloading a bad thing. De vraag is dan ook of je dit moet gaan nastreven in een taal die dat liever niet heeft. Gebruik dan liever een taal die het wel kan of methodes in Delphi wat wel gebruikelijk is. Het is