Guardar y Cargar Contenido del ListBox

[FrianxD]

Hola, tenia una duda, se puede guardar el contenido del ListBox Ejemplo

estas serian las lineas que tiene escrita el ListBox


Teclado
Mouse
Monitor



y quiero poner un boton de guardar, para guardarlo en la pc, y tb un boton cargar, para poder cargarlo de nuevo al listbox, se puede hacer eso???, si es asi me gustaria saber el codigo en C++ Builder del boton guardar y el cargar, desde ya Muchas gracias

[[cHackAll]]

ListBox1->Items->SaveToFile('ClubDelphi_Rules.txt');

y

ListBox1->Items->LoadFromFile('ClubDelphi_Rules.txt');

Saludos

[FrianxD]

Hola, Muchisimas Gracias te agradesco !

[Esquivel]

Busco Lo Mismo Que El, Pero Quiero Hacerlo En delphi.

¿Hay Alguna Forma?

[[AgustinOrtu]]

Código Delphi [-]
ListBox1.Items.SaveToFile(ruta_archivo);

[Esquivel]

Eso me sirvió de mucha ayuda, pero no me explique bien, Lo que quiero decir es que, al momento de dar clic a un botón 'X' El Usuario que lo presiono Pueda escoger la ruta a la Cual Guardar los datos de un ListBox.

[Casimiro Notevi]

Empezado por Esquivel

... Pueda escoger la ruta a la Cual Guardar los datos ...

Es que no podemos leerte el pensamiento, tendrás que aclarar bien lo que quieres

[ecfisa]

Hola.

Empezado por Esquivel

, Lo que quiero decir es que, al momento de dar clic a un botón 'X' El Usuario que lo presiono Pueda escoger la ruta a la Cual Guardar los datos de un ListBox.

¿ Lo que buscas será algo así ?

Código Delphi [-]
...

implementation

uses Dialogs;

procedure TForm1.btnSaveClick(Sender: TObject);
var
  sd: TSaveDialog;
begin
  sd := TSaveDialog.Create(nil);
  try
    sd.Filter := 'Archivos de texto | *.TXT';
    sd.DefaultExt := 'TXT';
    if sd.Execute then
      ListBox1.Items.SaveToFile(sd.FileName);
  finally
    sd.Free;
  end;
end;

Saludos

[Esquivel]

[quote=ecfisa;520599]Hola.



¿ Lo que buscas será algo así ?
[delphi]
...

implementation

uses Dialogs;

Aqui en dialogs me marca un error:

[DCC Error] Datos.pas(36): E2004 Identifier redeclared: 'Dialogs'

[Casimiro Notevi]

Empezado por Esquivel

Identifier redeclared: 'Dialogs'

Lo tienes redeclarado, repetido, en el uses, deja uno.

[Esquivel]

Le agradezco a los que respondieron mis dudas, Gracias