Exportar items de un TListBox del siguiente modo?

[THACKER]

El problema es que no se como separarlos, no soy un programador Delphi. Aun estoy estudiando... Pienso una ves entre en las vacaciones.. un poco de ayuda por favor ?

[rgstuamigo]

Empezado por THACKER

El problema es que no se como separarlos, no soy un programador Delphi. Aun estoy estudiando... Pienso una ves entre en las vacaciones.. un poco de ayuda por favor ?

Disculpa pero no entiendo bien lo que pretendes hacer
Que quieres separar?
Por favor sé.. mas claro y conciso.
Saludos...

[THACKER]

Haver haver..
Te dejo una pic:

[Neftali [Germán.Estévez]]

Yo estoy igual que rgstuamigo, no entiendo lo que necesitas.

¿Qué código te falta? ¿Tienes algun error?

¿De la imagen que has puesto, qué es lo que no sabes hacer?
* ¿El primer botón?
* ¿El segundo botón?
* ...

[Axel_Tech]

Lo que yo he entendido es que necesita separar en 2 partes cada Item del ListBox para luego meterlo en el Memo, es decir coger lo que hay a un lado y a otro del carácter '/'.
Si es así creo que algo como esto podría valer:

Código Delphi [-]
string1 := AnsiLeftStr(ListBox1.Item[i], AnsiPos('/', ListBox1.Item[i]) - 2);
string2 := AnsiMidStr(ListBox1.Item[i], AnsiPos('/', ListBox1.Item[i]) + 2, Length(ListBox1.Item[i]) - AnsiPos('/', ListBox1.Item[i]));

*Nota: i sería el índice del Item del ListBox.

[Neftali [Germán.Estévez]]

Si estás con alguna versión antigua de Delphi, en lugar de AnsiLeftStr y AnsiMidStr deberás utilizar el Copy combuinado con el AnsiPos.

[THACKER]

Build
[Error] Unit1.pas(59): Undeclared identifier: 'AnsiLeftStr'
[Error] Unit1.pas(59): Undeclared identifier: 'Item'
[Error] Unit1.pas(59): Undeclared identifier: 'Item'
[Error] Unit1.pas(60): Undeclared identifier: 'AnsiMidStr'
[Error] Unit1.pas(60): Undeclared identifier: 'Item'
[Error] Unit1.pas(60): Undeclared identifier: 'Item'
[Error] Unit1.pas(60): Undeclared identifier: 'Item'
[Error] Unit1.pas(60): Undeclared identifier: 'Item'
[Fatal Error] Project1.dpr(5): Could not compile used unit 'Unit1.pas'

No sirve ;S

[Neftali [Germán.Estévez]]

Empezado por THACKER

...Los agregue, y me devuelbe:[Fatal Error] Project1.dpr(5): Could not compile used unit 'Unit1.pas'

Empezado por Neftali

Si estás con alguna versión antigua de Delphi, en lugar de AnsiLeftStr y AnsiMidStr deberás utilizar el Copy combinado con el AnsiPos.

¿Qué versión de Delphi utilizas?