Foros Club Delphi

Foros Club Delphi (http://www.clubdelphi.com/foros/index.php)
-   C++ Builder (http://www.clubdelphi.com/foros/forumdisplay.php?f=13)
-   -   como comparar cada linea de un componente Memo1 con un componente ListBox1 (http://www.clubdelphi.com/foros/showthread.php?t=49823)

soma25 31-10-2007 07:58:22

como comparar cada linea de un componente Memo1 con un componente ListBox1
 
hola

estoy haciendo un analizador sintactico, alguien me podria mostrar como comparo cada linea de un componente Memo1 con un componete ListBox1

ejemplo

Memo1 Listbox1
go go
scanf scanf

y asi sucesivamente

grax

atte

soma25

Neftali 31-10-2007 11:02:22

Es sencillo; Tanto la propiedad Lines de TMemo, como la propiedad Items de TListBox son TStrings.
Basta con que hagas un recorrido por ambas y compares con AnsiCompareStr o AnsiCompareText.

Algo así:

Código Delphi [-]
  for i :=0 to (MEmo1.Lines.Count - 1) do begin
    // Comparar linea a linea
    if (AnsiCompareText(Memo1.Lines[i], ListBox1.Items[i]) = 0) then begin
      ... iguales
    end
    else begin
      ... diferentes
    end;
  end;


La franja horaria es GMT +2. Ahora son las 16:15:36.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi