Announcement

Collapse
No announcement yet.

suchen

Collapse
X
  • Filter
  • Time
  • Show
Clear All
new posts

  • suchen

    Entschuldigung, was mache ich falsch? Ich möchte in Edit1 die Zeile haben in der sich das gesuchte wort befindet.<br><br>
    void __fastcall TForm1::Button1Click(TObject *Sender)<br>
    {<br>
    int FoundAt;<br>
    String suchstr = Memo1->Lines->CommaText;<br>
    FoundAt = suchstr.AnsiPos("Hallo");<br>
    Memo1->SetFocus();<br>
    int h = Memo1->SelStart;<br>
    Edit1->Text=FoundAt;<br>
    }<br>
    <br>

  • #2
    <html>

    <head>
    <meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
    <meta name="GENERATOR" content="Microsoft FrontPage 4.0">
    <meta name="ProgId" content="FrontPage.Editor.Document">
    <title>Neue Seite 1</title>
    </head>

    <body>

    <pre>void __fastcall TForm1::Button1Click(TObject *Sender)
    {
    int FoundAt;
    String suchstr = Memo1-&gt;Lines-&gt;CommaText;
    <i> // wozu brauchst Du eigentlich den CommaText ???</i>
    FoundAt = suchstr.AnsiPos(&quot;Hallo&quot;
    <i> // in FoundAt steht jetzt die Position, wo der Text gefunden wurde - wenn er gefunden wurde.</i>
    Memo1-&gt;SetFocus();
    <i> // hat nix mit dem Problem zu tun.</i>
    int h = Memo1-&gt;SelStart;
    <i> // Oje, Oje, was soll diese Zeile bewirken ? h wird nie wieder benutzt !</i>
    Edit1-&gt;Text=FoundAt;
    <i> // Oje, Oje, jetzt wird dem Text ein int zugewiesen.
    </i>}
    </pre>
    so ungefähr sollte es funktionieren:
    <pre>void __fastcall TForm1::Button1Click(TObject *Sender)
    {
    String suchstr = Memo1-&gt;Lines-&gt;CommaText;
    int FoundAt = suchstr.AnsiPos(&quot;Hallo&quot;
    Memo1-&gt;SelStart=FoundAt;
    int y=Memo1-&gt;CaretPos.y;
    Edit1-&gt;Text=Memo1-&gt;Lines-&gt;Strings[y].
    }
    </pre>
    Wenn nicht, dann sorry, ich hab's jetzt nur so dahingeschrieben...

    </body>

    </html&gt
    Günther

    Comment

    Working...
    X