function TEventTableWidgetDemo.useranswercorrect(aIndex: integer): boolean; begin Result := SameText(UserAnswers[aIndex].Value, Answers[aIndex]); if Result then begin writeln('Správná odpovìï'); end; end; -- Sent from: http://pas2js.38893.n8.nabble.com/