Eliminar salto de Linea
 

Hola que tal el motivo de mi consulta es que estoy con intentando hacer una aplicación que recibe los datos de una bascula a través del puerto serial estos datos los voy guardando en un listbox pero me resulta de la siguiente forma:

0000024
kg
0000025
kg
0000030
kg


y asi sucesivamente lo que me gustaría que me orientaran es si la bascula me esta enviando un salto de linea y como puedo hacerlo para que me quede en esta estructura y si es posible eliminar los ceros a la izquierda.

0000024
0000025
0000030

por su apoyo mil gracias

Si puedes leer los datos de la bascula los puedes almacenar en un archivo de la manera que tu deseas, entonces el salto de línea realmente no es problema.

Para quitar los cero de la izquierda lo que te recomiendo es que leas el dato como un entero (te trae sin ceros a la izquierda), y luego lo almacenas (si necesitas como string, cuentas el largo de entero hecho string con el comando largo:=length(num_com) don num_com contiene el dato string, conociendo el largo puedes aumentar los ceros que faltan mediante un ciclo for.

Espero te sirva

Recorre esa lista y realiza las modificaciones que necesites.
¿Exactamente dónde está el problema?

Código Delphi [-]
for i := 0 to (Listbox1.count - 1) do begin
  Str := Listbox1.Items[i];
  // Para cada línea hacer lo que necesites...
  // Eliminar los Kg
  ..
  // eliminar ceros
  ...
end;

Otra opción es realizar el filtro cuando lees los datos antes de añadirlos al Listbox.