// U_Reperation.cpp
// 21. maj 2001
// Datamatiker, Programmering af store systemer
// Mikkel Munksgaard og Niels Grove-Rasmussen

//---------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop

#include "U_Reperation.h"
//--------------------------------------------------------------------- 
#pragma resource "*.dfm"
TDial_Reperation *Dial_Reperation;
//---------------------------------------------------------------------
__fastcall TDial_Reperation::TDial_Reperation(TComponent* AOwner)
	: TForm(AOwner) {}
//---------------------------------------------------------------------

void __fastcall TDial_Reperation::FormActivate(TObject *Sender) {
    Memo_Beskrivelse->Clear();
    Memo_Beskrivelse->SetFocus();
}
//---------------------------------------------------------------------------

void __fastcall TDial_Reperation::OKBtnClick(TObject *Sender) {
    if(Memo_Beskrivelse->Text == "") {
        MessageDlg("Der er ingen beskrivelse", mtError,
                   TMsgDlgButtons() << mbRetry, 0);
        Memo_Beskrivelse->SetFocus();
    }
    else
        ModalResult = mrOk;
}
//---------------------------------------------------------------------------

void __fastcall TDial_Reperation::Fejl(const String& metode,
                                       const String& meddelelse) {
    MessageDlg("Fejl i TDial_Reperation." + metode + ":\n\n" + meddelelse
               + ".", mtError, TMsgDlgButtons() << mbAbort, 0);
    exit(EXIT_FAILURE);
}
//---------------------------------------------------------------------------