Delphi XE3 - Leistungsproblem mit TDataSet

Question

Datenverarbeitung mit XE3-Programmen dauert bis zu 10 Mal mehr als mit gleichen Programmen mit XE2 kompiliert. Dies ist bekanntes Problem (wahrscheinlich bezieht sich hauptsächlich auf TStringField), gemeldet an QC 111942, aber es ist noch nicht behoben. Hat jemand einen Fix/Workaround für dieses Problem?

TIA Branko

Answer 1

Gleiches in XE5. Plus zusätzlicher Verkehr und all diese Client-Server-Sache erfordern> 5 Mbit pro Sekunde (!), Um normal zu arbeiten. Ich verwende nur TFDConnection und TFDQuery. Speziell für MySQL ist die Geschwindigkeit identisch mit Delphi-Komponenten und mit Treibern von Drittanbietern (libmysql.dll). Wenn Sie kein FireDAC haben, können Sie TFDQuery durch TSQLQuery ersetzen. Hier ist ein Verfahren zum Füllen eines String-Rasters:

procedure SelGrid(sql:ansiString;Q:TFDQuery;grid:TStringGrid); 
var i: integer; 
begin 
    Q.Close; 
    Q.SQL.Text:=''; 
    Q.Open(sql); 
    grid.ColCount:=Q.FieldCount; 
    grid.RowCount:=1; 
    while not Q.Eof do begin 
    for i := 0 to grid.ColCount-1 do grid.Cells[i,grid.RowCount-1]:=Q.Fields.Fields[i].AsString; 
    grid.RowCount:=grid.RowCount+1; 
    Q.Next; 
    end; 
    Q.Close; 
    if grid.RowCount>1 then grid.RowCount:=grid.RowCount-1; 
    grid.Row:=0; 
    //AutoSizeGridColumns(grid,30,200); 
end; 

Dies ist VCL String Grid. Natürlich musst du mit Updates umgehen und so weiter, aber du wirst keine Performance-Probleme mehr haben.