Einzelnen Beitrag anzeigen

Benutzerbild von Tormentor32
Tormentor32

Registriert seit: 27. Okt 2005
Ort: Düsseldorf
369 Beiträge
 
Delphi XE5 Professional
 
#1

Konstantenobjekt kann nicht als var-Parameter weiter...

  Alt 11. Okt 2006, 08:27
Hi Leute!

Ich habe folgenden code und den oben beschrieben feheler, und ich möchte wissen, warum dies ein Konstantenobjekt ist

Delphi-Quellcode:

type
  TSection = class (Tobject)
  public
    FZeilen: array of string;
    FName,FType: string;
    procedure show(LBX: TListbox);
  end;


procedure SwapSections(var s1,s2: Tsection);
var tmpSection: TSection;
begin
  tmpSection := s1;
  s1 := s2;
  s2 := tmpSection;
  tmpSection.free;
end;

//beim Aufruf kommt der fehler


SwapSections(FSong.GetSectionByName(combobox.Text),FSong.FSections[i]);
Was muss ich tun, damit ich den Aufruf so machen kann?

gruß richard
Richard Mahr
  Mit Zitat antworten Zitat