ich glaube ich habe schon was gefunden.
Code: Alles auswählen
DCBROWSECOL OBJECTVAR gueltigbez;
DATATOOLTIP {|| .T.} TIPBLOCK{|nPos| oDialogZusatz:aTagesdienste[nPos]:gueltigbez};
EVAL {|x|x:dataArea:rbClick := {|a,b,o| zeigeDaten(oDialogZusatz,"Gültigkeitsbezeichnung",o)}};
HEADER "Gültigkeits-Bezeichnung";
PARENT oDialogZusatz:oBrowseTagesdienste;
VALID {|| oDialogZusatz:validcol("gueltigbez",GUELTIGBEZ) };
WIDTH oSysPara:skaliereXbParts(200)
Code: Alles auswählen
FUNCTION zeigeDaten(oDialog,cFeld,oZelle)
LOCAL cText
LOCAL nZeile := DC_GetColArray(0,oDialog:oBrowseTagesdienste)
MEMVAR oSysPara
IF ! Empty(oZelle:getcell(nZeile))
cText := StrTran(oZelle:getcell(nZeile),";",CRLF)
oSysPara:oMessage:anzeigen(cText,,,,,"Inhalt der Spalte: " + cFeld)
ENDIF
RETURN(.T.)
Das löst zumindest schonmal ein Problem.