Zitat von
marabu:
Eine property hast du schnell deklariert:
Delphi-Quellcode:
type
TForm1 = class(TForm)
private
ActiveFileIndex: Integer;
function GetActiveFile: TMarkFile;
public
property ActiveFile: TMarkFile read GetActiveFile;
end;
function TForm1.GetActiveFile: TMarkFile;
begin
Result := Files[ActiveFileIndex];
end;
Genauso wollte ich das auch machen
Aber wegen dem Zeiger war ich irritert.
Zitat von
marabu:
Das Feld ActiveFileIndex musst du ständig in Übereinstimmung mit den Aktionen des Benutzers aktualisieren. Zuvor solltest du dir ein paar Gedanken zur Benutzerschnittstelle und zu deiner Programmstruktur machen. Ich vermisse ein Konzept. So läufst du Gefahr eine Menge überflüssigen Code zu schreiben, der später mühevoll raus operiert werden muss.
Ich war bisher immer der Meinung, da wäre ein (bisschen) Konzept drin
Kannst du mir nen Ansatz geben, weil ich von alleine weiterkommen möchte