Deutsches Lazarusforum

Danke! Da guck ich mir das Ellipse Forum aus der ellipse-forum.zip Datei mal an. Muss doch zu lösen sein, das Problem. Die vipgfx habe ich mir einfach mal aus Interesse runter geladen . Da das nicht funktioniert hat, obwohl von Herrn Kranz als getestet angegeben, Beispiele sind dabei, hat es bei der ...

Danke soweit, habe jetzt diesen Code draus gemacht, aber leider wird noch nichts gezeichnet.


procedure Draw_Ellipse(aLeft,aTop,aRight,aBottom: Longint);
var
bounds: windows.TRect;
canv: TFPPixelCanvas;
info: TEllipseInfo;
InfoData: PEllipseInfoData;
x,y: Longint;
c: dword;
r: Longint ...

Ich studiere gerade den Quelllcode der FCLimage Klassen und bin auf die Unit Ellipses gestoßen und da drin auf die folgenden Definitionen.

Welche Funktion/Bedeutung haben die aufgeführten Datenfelder?


PEllipseInfoData = ^TEllipseInfoData;
TEllipseInfoData = record
x, ytopmax, ytopmin, ybotmax ...

@theo:

Aaaah Ok, danke, so geht das also. Generics dürften zwar in Zukunft die bessere Wahl sein, aber nun weiß ich endlich wie ich in einer nicht generischen Stringliste sowas adressiere.

Danke, aber wie mache ich das?

Ich könnte meine Klasse TSelectedStrings so ändern:


TSelectedStrings = class
private
FDataStr: String;
fselected: boolean;
public
constructor create;
DataStr: String read FDataStr write FDataStr;
selected: boolean read fselected write fselected;
end ...

Hallo,

ich programmiere noch nicht so lange mit Object Pascal. Bin gerade bei der Stringliste. Dabei stoße ich auf folgendes Problem:

Ich will ein zusätzliches Objekt in die Stringliste einfügen, was mit der Methode AddObject gehen sollte.

Das Objekt scheut so aus:

Type
TSelectedStrings = class ...

@Andy Nightingale :

Habe das auch grad getestet. Die besagten Sonderzeichen werden nicht im Quelltext abgespeichert. Sind also nur in der IDE zu sehen wenn die besagte Option aktiviert ist. War auch erst verwirrt, habe nun aber einen Quelltext geschriben, in der IDE, dann die Sonderzeichen Option ...