How to display Prime Numbers in ListBox?

[SkyCross]

Hello Experts, I just wanna know how to display prime numbers in TListBox, If I put 10 in EditBox then it would display all the possible numbers fom 1 to 10,and will display to its according listbox.The even numbers in even_listbox, if prime it will display in prime_listbox and if it's odd then it will diplay in odd_Listbox.

Now I already got the even and odd numbers and displayed it to its according listboxes, however my problem is that I dont know how to display prime Numbers to its intended listbox.
Can you help me out of my problem? pls help me...
Your help is very much appreciated, thank you

Here's my current code by the way, (this is Delphi Programming Language and I'm using Lazarus version 1.2.4 as my IDE)

procedure TForm1.Button1Click(Sender: TObject);
var i:integer;
        begin
        if (Edit1.Text='') then
    ShowMessage('Input Field Required!')

    else
     for i:=1 to StrToInt(Edit1.Text) do
     begin
      if Odd(i) then
      ListBox3.Items.Add(IntToStr(i))
    else if (i mod 2)=0 then
    ListBox2.Items.Add(IntToStr(i))
    Button1.Enabled:=false;
   Button2.Enabled:=true;

   end;
end;

ListBox1 is for Prime
ListBox2 is for Even and
ListBox3 is for Odd
Button1 is "View"
Edit1.Text is an EditBox wherein, I input a particular number to be displayed in it's according Listboxes.

[SalmiSoft]

Why do you test the number to see if it is odd and then test to see if it is even? If it isn't odd it must be even, no?

For a simple test for whether a number is prime, see: http://www.nickhodges.com/category/Delphi.aspx?page=4