Einzelnen Beitrag anzeigen

alzaimar
(Moderator)

Registriert seit: 6. Mai 2005
Ort: Berlin
4.956 Beiträge
 
Delphi 2007 Enterprise
 
#3

Re: Verwendung der gleiche Komponente an mehr als 100 Stelle

  Alt 14. Mär 2006, 09:17
Ja, Du sollst damit rechnen. Und deshalb wirst Du Dir keine Events für diese 'DatasetToStringList'-Query dazuschreiben und kein OnCalcFields.

Oder, Du sorgst dafür, das Deine Routinen reentrant sind, also den Laden genauso hinterlassen, wie sie ihn vorgefunden haben, übrigens ein simpler Trick, um robuste Programme zu schreiben:
Delphi-Quellcode:
Procedure SQLToStringList (Const anSQLStmt : String; aStringList : TStrings);
Begin
  SetupEventsAndCalculatedFieldsBlaBla; // Irgendwie die Events setzen und Veränderungen vornehmen
  Try
    With MyDataModule.TempQuery Do Begin
      SQL.Text := anSQLStmt;
      Active := True;
      First;
      While Not Eof Do Begin
        aStringList.Add (Fields[0].Value);
        Next;
      End;
    End;
  Finally
     ResetEventsAndCalculatedFieldsBlaBla; // Alle Änderungen wieder rückgängig machen
  End;
End;
"Wenn ist das Nunstruck git und Slotermeyer? Ja! Beiherhund das Oder die Flipperwaldt gersput!"
(Monty Python "Joke Warefare")
  Mit Zitat antworten Zitat