Entwickler-Ecke

Grafische Benutzeroberflächen (VCL & FireMonkey) - In meinem Grid wird statt der gewünschte Text einfach (TMEMO


cherry - Mi 26.04.06 11:51
Titel: In meinem Grid wird statt der gewünschte Text einfach (TMEMO
In meinem Grid wird statt der gewünschte Text einfach (TMEMO) angezeigt.

Die Daten kommen aus einer MSSQLDatenbank DatenTyp text...
Ich verwende Querys und DataSources...

Ich hatte das Problem schon mal und habs irgendwie selber lösen können, nur
habe ich grad keine Zeit um lange zu suchen. Die Applikation sollte endlich fertig werden.

Bitte um schnelle Antwort... 8)


cherry - Mi 26.04.06 15:01

Musste mir rasch selber helfen... :P


Delphi-Quelltext
1:
2:
3:
4:
5:
procedure TDataModule1.ADOQuery16_SearchBetriebbetr_weitereNamenGetText(
  Sender: TField; var Text: String; DisplayText: Boolean);
begin
 Text := Copy(ADOQuery16_SearchBetriebbetr_weitereNamen.AsString, 150);
end;


Hier noch eine kleine "Doku" dazu: http://delphi.about.com/library/weekly/aa030105a.htm