Puoi sfruttare la funzione StringReplace in questo modo:
codice:
s := StringReplace(s, ' ', '', [rfReplaceAll]);
Nella pratica, sostituisci tutte le occorrenze dello spazio con una stringa vuota.
Siccome non sono certo che questa funzione sia presente in tutte le edizioni di Delphi, magari puoi controllare il funzionamento delle funzioni Pos e Delete; la prima restituisce la posizione di un carattere all'interno di una stringa, la seconda elimina una sottostringa da una stringa data.
Usate in combinazione, si ottiene lo stesso effetto della StringReplace.
Ciao!