ListBox

Tags:    delphi

Jeg er gået igang med et lille program, hvor man kan hente færdige JavaScripts til sin hjemmeside. Jeg har brug for en listbox til dette. Problemet er bare, at jeg ikke aner hvordan jeg skal bruge den sammen med en button. Jeg har tænkt lidt over, om jeg skulle bruge "if-else"-sætninger!?

Her får i lige, hvad jeg har:

Formen indeholder:
1 stk GroupBox med følgende på:
1 stk. Button
1 stk. ListBox. Listboxen indeholder følgende items:
Tekst-effekter
Billedeffekter
Museffekter
Baggrundseffekter
Dato/Tid

Så jeg skal bare have HELT på plads hvordan jeg bruger listboksen. Jeg er relativt ny, så please hjælp mig!


- Thomas Johansen




3 svar postet i denne tråd vises herunder
1 indlæg har modtaget i alt 5 karma
Sorter efter stemmer Sorter efter dato
er det noget lign:
<pre>
procedure TForm1.ListBox1Click(Sender: TObject);
begin
if Listbox1.Selected[0] then begin
memo1.Lines.Text := 'dav det her er ting 1';
end;

if Listbox1.Selected[1] = true then begin
memo1.Lines.Text := 'dav det her er ting 2';
end;

if Listbox1.Selected[2] then begin
memo1.Lines.Text := 'dav det her er ting 3';
end;
end;
</pre>
du eftersøger ?

-
neuroman? det' da mig :D
Aloha - Er du fresh???



er det noget lign:
<pre>
procedure TForm1.ListBox1Click(Sender: TObject);
begin
if Listbox1.Selected[0] then begin
memo1.Lines.Text := 'dav det her er ting 1';
end;

if Listbox1.Selected[1] = true then begin
memo1.Lines.Text := 'dav det her er ting 2';
end;

if Listbox1.Selected[2] then begin
memo1.Lines.Text := 'dav det her er ting 3';
end;
end;
</pre>
du eftersøger ?

-
neuroman? det' da mig :D
Aloha - Er du fresh???



Wee, ja præcis! :D Jeg er meget taknemmelig for svaret, dine 300 Pnts er dine, HVIS du blot fortæller mig hvordan jeg får et nyt vindue til at åbne sig, når der bliver trykket på knappen!?

- Thomas Johansen





Wee, ja præcis! :D Jeg er meget taknemmelig for svaret, dine 300 Pnts er dine, HVIS du blot fortæller mig hvordan jeg får et nyt vindue til at åbne sig, når der bliver trykket på knappen!?

- Thomas Johansen


i knappens OnClick skal du skrive:

form2.show;
form2.showmodal; //hvis det skal være det eneste der må være aktivt...
-
neuroman? det' da mig :D
Aloha - Er du fresh???



t