Zeilennummer in TRichEdit ermitteln

Stefan71242

Hallo,

wenn ich in ein RTF klicke, wüsste ich gerne die Zeilennummer.

So funktioniert es leider nicht:

void __fastcall TForm1::frm1_rtfErgebnisMouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y)
{Integer i2; AnsiString z1;                                                     // Vars lokal halten

 i2=frm1_rtfErgebnis->CaretPos.y;                                               //
 z1=frm1_rtfErgebnis->Lines->Strings[i2];                                       // Zeile auslesen
 ShowMessage("Aktuelle Zeile: "+IntToStr(i2)+"\r\rZeile: "+z1);                 // und Info geben
}

Über die Suche kann ich leider auch nichts finden; mit SelStart komme ich auch nicht weiter *grübel* Danke für jeden Tipp...

Gruss Stefan

Stefan71242

Habe compiliert und siehe da in der EXE geht es; im IDE bekomme ich Müll angezeigt

Werde mal den BCB6 neu starten... grummel

Gruss Stefan