Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  AW: Compilerschalter für Framework

    Delphi
    by Uwe Raabe, 10. Mai 2015
  Du könntest vielleicht zwei solche Units wie die beiden Hybrid-Units aus meinem Beispiel nehmen und dort jeweils eine Konstante FrameWorkVCL bzw. FrameWorkFMX deklarieren. Dann kannst du beim Compilieren über {$IF Declared(FrameWorkXXX)} abfragen, was gerade eingebunden wurde.
  
  unit VCL.Hybrids;
  
  interface
  
  const
  FrameWorkVCL = 1;
  
  implementation
• Forum: Object-Pascal / Delphi-Language

  AW: Compilerschalter für Framework

    Delphi
    by Uwe Raabe, 10. Mai 2015
  Das Framework wird ja nur für den Designer benötigt und kann sich ja auch gelegentlich mal ändern (siehe MonkeyMixer). Es ist somit durchaus erlaubt, wenn auch nicht empfohlen, VCL und FMX in einem Projekt gleichzeitig zu verwenden. Insofern gibt es für den Compiler so etwas wie ein eindeutiges Framework gar nicht. Ein solcher Mix würde aber eine Unit, wie deine, die sich wahlweise auf VCL oder...
• Forum: Object-Pascal / Delphi-Language

  AW: Compilerschalter für Framework

    Delphi
    by Uwe Raabe, 9. Mai 2015
  Die uses-Anweisung eines frisch erstellten Services sieht aber so aus:
  
  uses
  Vcl.SvcMgr,
  
  
  Dabei verweist Vcl.SvcMgr wiederum auf Vcl.Forms & Co.
• Forum: Object-Pascal / Delphi-Language

  AW: Compilerschalter für Framework

    Delphi
    by Uwe Raabe, 9. Mai 2015
  Vermutlich geht man davon aus, daß FMX-Anwendungen immer voll qualifizierte Unitnamen verwenden. Aber: ja, das ist zumindest diskutabel. Für mein Beispiel oben musste ich FMX auch noch in die Liste aufnehmen.
  
  
  
  Da Services eh nur unter Windows gehen, ist das zumindest nicht tragisch. Es würde somit auch keinen Sinn machen, hier mit Gewalt auf VCL verzichten zu wollen.
  
  
  
  Hier unter XE8...
• Forum: Object-Pascal / Delphi-Language

  AW: Compilerschalter für Framework

    Delphi
    by Uwe Raabe, 9. Mai 2015
  unit VCL.Hybrids;
  
  interface
  
  uses
  Vcl.ExtCtrls;
  
  type
  TTimer = Vcl.ExtCtrls.TTimer;