1 #include "workflow\TShowValueCmd.h"
    2 
    3 extern TSteering Steering;
    4 
    5 TShowValueCmd::TShowValueCmd ( TCmdTag ct ) : TCmd(ct)
    6 {
    7         char buf[MaxString];
    8 
    9         eStep= CReady;
   10         bNoMeasure= TRUE;
   11         switch (ct.P1)
   12         {
   13                 case Hwb:
   14                         sprintf(buf, "Halbwertsbreite : %.2f arcsec", Steering.GetHwb());
   15                         MessageBox(GetFocus(), buf, "Information", MBINFO);
   16                         break;
   17 
   18                 case Peak:
   19                         sprintf(buf, "Peak (D,I) : (%.2lf,%.2f)", Steering.dPeakPoint, Steering.fPeakIntensity);
   20                         MessageBox(GetFocus(), buf, "Information", MBINFO);
   21                         break;
   22 
   23                 case Start:
   24                         sprintf(buf, "Startposition : %.2lf", Steering.dStartPoint);
   25                         MessageBox(GetFocus(), buf, "Information", MBINFO);
   26                         break;
   27         }
   28 };
   29 
   30 void TShowValueCmd::GetName ( LPSTR aName )
   31 {
   32         strcpy( aName, "ShowValue" );
   33 }
   34 
   35 bool TShowValueCmd::GetShowData ( LPSTR buffer )
   36 {
   37         buffer[0]= 0;
   38         /*if ( eStep==CReady ) {
   39           #ifdef GermanVersion
   40             sprintf( buffer, "\"ShowValue\"-Kommando erfolgreich." );
   41           #else
   42             sprintf( buffer, "\"ShowValue\"-Command ready." );
   43           #endif
   44         }*/ 
   45         return true;
   46 };
   47