Listbox mit Hindernissen!

[Eichhoernchen]

Soo, bin mir nicht ganz sicher ob es in dieses Unterforum kommt oder in VCL/winforms/Controls unterforum.
Aber ich glaub mal hier bin ich schon richtig.

Und zwar hier kommt mein Problem:
Ich hab nen Dialog mit mehreren Listboxen, es geht aber nur um eine!
Und zwar möchte ich per Sendmessage in diese inhalt einfügen! Das geht auch so weit, nur wird dieserher in einer falschen Reihenfolge angezeigt.

Hier erstmal den code den ich nutze:

Delphi-Quellcode:

var m : String;  //hier bin ich mir schon nicht sicher ob ich dafür nen String nutzen darf!
Begin
//...
               m := 'Away';
               SendMessage(GetDLGItem(hdlg, IDC_listbox2), LB_ADDSTRING, 0, Integer(M));
               m := 'N/A';
               SendMessage(GetDLGItem(hdlg, IDC_listbox2), LB_ADDSTRING, 0, Integer(M));
               m := 'Occupied';
               SendMessage(GetDLGItem(hdlg, IDC_listbox2), LB_ADDSTRING, 0, Integer(M));
               m := 'DND';
               SendMessage(GetDLGItem(hdlg, IDC_listbox2), LB_ADDSTRING, 0, Integer(M));

So es sollte ja hinterher so sein:
1.
Away
N/A
Occupied
DND

aber es ist so:
2.
Away
DND
N/A
Occupied


Und das lustige ist wenn ich es im Code tausche, also so das es richtig sein sollte(DND mit Occupied tauschen und Occupied mit N/A[also im code]) bleibt es aber wie nr.2

Was mache ich da falsch?? Liegt es daran das ich Strings benutze? Wenn ja was muss ich stattdessen nehmen? pchar?