Index: AAPClient/UI/DrieKnoppenScherm.pas =================================================================== diff -u -r142 -r143 --- AAPClient/UI/DrieKnoppenScherm.pas (.../DrieKnoppenScherm.pas) (revision 142) +++ AAPClient/UI/DrieKnoppenScherm.pas (.../DrieKnoppenScherm.pas) (revision 143) @@ -128,13 +128,13 @@ begin PopupScherm := TfmPopupScherm.Create(self); PopupScherm.lblWaarschuwing.Caption := Melding; - PopupScherm.pnlbtnActie1.Caption := Actie1; + PopupScherm.lblActie1.Caption := Actie1; //indien nodig twee textknoppen zichtbaar maken if Actie2 <> '' then begin PopupScherm.pnlbtnActie1.Width := 134; PopupScherm.pnlbtnActie2.Visible := True; - PopupScherm.pnlbtnActie2.Caption := Actie2; + PopupScherm.lblActie2.Caption := Actie2; PopupScherm.imgActie1.Left := 35; PopupScherm.imgActie2.Left := 35; end; Index: AAPClient/UI/PopupScherm.pas =================================================================== diff -u -r142 -r143 --- AAPClient/UI/PopupScherm.pas (.../PopupScherm.pas) (revision 142) +++ AAPClient/UI/PopupScherm.pas (.../PopupScherm.pas) (revision 143) @@ -17,6 +17,8 @@ pnlGroteImage: TPanel; imgVraagteken: TImage; imgUitroepteken: TImage; + lblActie1: TLabel; + lblActie2: TLabel; procedure pnlbtnActie1Click(Sender: TObject); procedure FormShow(Sender: TObject); procedure pnlbtnActie2Click(Sender: TObject); Index: AAPClient/UI/PopupScherm.dfm =================================================================== diff -u -r142 -r143 --- AAPClient/UI/PopupScherm.dfm (.../PopupScherm.dfm) (revision 142) +++ AAPClient/UI/PopupScherm.dfm (.../PopupScherm.dfm) (revision 143) @@ -55,6 +55,21 @@ Height = 64 OnClick = imgActie1Click end + object lblActie1: TLabel + Left = 1 + Top = 1 + Width = 298 + Height = 58 + Align = alClient + Alignment = taCenter + AutoSize = False + Caption = 'links' + Layout = tlCenter + WordWrap = True + ExplicitTop = 20 + ExplicitWidth = 62 + ExplicitHeight = 39 + end end object pnlbtnActie2: TPanel Left = 214 @@ -80,6 +95,21 @@ Height = 64 OnClick = imgActie2Click end + object lblActie2: TLabel + Left = 1 + Top = 1 + Width = 132 + Height = 58 + Align = alClient + Alignment = taCenter + AutoSize = False + Caption = 'rechts' + Layout = tlCenter + WordWrap = True + ExplicitTop = 20 + ExplicitWidth = 62 + ExplicitHeight = 39 + end end object pnlGroteImage: TPanel Left = 125