Member Avatar for 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.

Edited by SkyCross because: typo error
  • 2 Contributors
  • 1 Reply
  • 914 Views
  • 46 Minutes Discussion Span
  • Latest Post Latest Post by SalmiSoft
Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.