Einzelnen Beitrag anzeigen

Benutzerbild von markus5766h
markus5766h

Registriert seit: 5. Mär 2009
Ort: Hamburg
569 Beiträge
 
Delphi XE8 Professional
 
#1

Problem mit DELETE ???

  Alt 8. Jan 2017, 16:19
Moin, zusammen.

Kann mir bitte dies mal jemand erklären ?
Code:
var
  n, l, l2, i, r, sn : Byte;
  p : Integer;
  S : String;
  S2 : String;
  IndexList : TStringlist;
...
with MediaListView.Items.Add do
  begin
    Caption := SearchList[2].Strings[n];
    SubItems.Add(SearchList[2].Strings[n]);
    SubItems.Add(SearchList[5].Strings[n]);
    SubItems.Add(SearchList[1].Strings[n]);
    S := MediaList[1].Strings[n];
    p := Pos(Chr(19), S);
    Delete(S, 1, p);                            // ID <-------(950)
    p := Pos(Chr(19), S);
    S := Copy(S, 1, p);                         // FileName
    Delete(S, 1, p);                            <--------------(953)
    S := Copy(S, 1, Length(S));                 // ext Daten
    SubItems.Add(S);
    SubItems.Add(AddZero(IntToStr(i), 6));
  end;
Fehlermeldung :
[Error] uMain.pas(950): Too many actual parameters
[Error] uMain.pas(953): Too many actual parameters

ich steh' ziemlich auf dem Schlauch . . .
Markus H.
  Mit Zitat antworten Zitat