Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Sinnlose Rechtecke in StringGrid weglassen (https://www.delphipraxis.net/73776-sinnlose-rechtecke-stringgrid-weglassen.html)

Smeivel 23. Jul 2006 22:05


Sinnlose Rechtecke in StringGrid weglassen
 
Liste der Anhänge anzeigen (Anzahl: 1)
Hallo hab mir bei den Schweizern mal den Code geholt um Id3 Tags auszulesen wenn ich diese Infos jetzt in verschiedene Label anzeigen lasse klappt auch alles wunderbar nur möcht ich gerne die Infos in ein Stringgrid schreiben das klappt auch alles ganz gut nur werden immer noch so seltsame rechtecke hinten angehängt, bzw. wenn kein Id3 Tag verfügbar ist nur rechtecke gezeichnet. Die Infos aus dem Id3 Tag füge ich mit folgender Funktion hinzu:
Delphi-Quellcode:
procedure TForm1.BitBtn1Click(Sender: TObject);
var
i:integer;
begin
   for i:=0 to Memo1.Lines.Count-1 do begin
      with readID3Tag(Memo1.Lines.Strings[i]) do begin
         with Id3List do begin
            cells[1,i+1]:= Artist;
            cells[2,i+1]:= Titel;
            cells[3,i+1]:= Album;
            cells[4,i+1]:= Year;
         end;
      end;
   end;
end;
Im Anhang ist ein Screenshot wie mein StringGrid aussieht
Danke im Voraus

Luckie 23. Jul 2006 22:12

Re: Sinnlose Rechtecke in StringGrid weglassen
 
Benutz mal TrimRight bevor du die Strings in das StringGrid einträgst.[delphi]

Smeivel 23. Jul 2006 22:16

Re: Sinnlose Rechtecke in StringGrid weglassen
 
Ok vielen dank klappt super.


Alle Zeitangaben in WEZ +1. Es ist jetzt 14:08 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz