Einzelnen Beitrag anzeigen

Peter666

Registriert seit: 11. Aug 2007
357 Beiträge
 
#5

AW: Listview mit Firemonkey

  Alt 3. Mai 2016, 20:29
Normalerweise ist das unsinnig. Es handelt sich Webcams, und die Datenbank die ich hier habe beinhaltet den Stream, einen Link zum aktuellen Screenshot, den Namen der CAM und eine kurze Erklärung. Leider ist das ganze nicht in Regionen aufgeteilt, so dass ich eventuell ein virtuelles Directory erstellen kann (quasi nach Region->Land->Stadt->Cams).
Für den Test habe ich erst einmal nur eine Liste gefüllt:

Delphi-Quellcode:
procedure TForm2.Button1Click(Sender: TObject);
var
  i: integer;
  item: TListViewItem;
begin
  ListView1.BeginUpdate;
  for i := 0 to 4000 do
  begin
    item := ListView1.Items.Add;
    item.Text := format('channel %d', [i]);
    item.Detail := 'lorem ipsum' + sLineBreak + 'lorem ipsum';
    item.Bitmap.SetSize(128,128);
    item.Bitmap.Clear($FFFF0000);
  end;
  ListView1.EndUpdate;
end;

Das dauert auf dem PC schon 3 Sekunden, auf einem Mobilgerät will ich das gar nicht erst probieren.

Peter
  Mit Zitat antworten Zitat