Listbox - DblClick i dane do nowej formy

0

<font color="red">DOPISANE

POST NIEAKTULANY!!! JUZ ROZWIAZALEM PROBLEM!! DZIEKI JEDNAK ZA ZAINTERESOWANIE!!!</span>

Trzybobry!

Szukalem na 4p i nie znalazlem, wiec pytam :). Pisze sobie prosciutka ksiazke "adresowa" (tylko maile). Wykorzystuje do tego Listbox. Zapis i odczyt z/do jest ok, po kliknieciu (pojedynczym) na element listy jego wartosc pojawia sie w Edicie (taki bejer). Problem jest nastepujacy - jak zrobic, zeby po podwojnym kliknieciu wartosc zaznaczonego pola pojawiala sie w Edit na innej formie? Probuje tak: mam druga forme (nazwijmy ja DrugaFrm, w unicie DrugaFrmU). Ta forma jest tworzona dynamicznie

procedure jakas_tam
var
DF: TDrugaForm; //tak sie nazywa forma
begin
DF:= TDrugaForm.Create(Self);
DF.ShowModal;
DF.Free;
end;

Forma wyswietla sie pieknie. Na formie jest Edit. Jak przekazac do tego Edit na DrugaForma tekst z Edit z poprzedniej formy? DrugaFrmU jest w unitach pierwszej. Probowalem pomiedzy DF.ShowModal, a DF.Free wpisac DF.Edit.Text:=Edit.Text (Edit z pierwszej formy) i po stworzeniu DrugaForma pole Edit nie przyjmuje wartosci... Aha! Pole Edit na pierwszej formie ma wartosc = zaznaczonemu polu w Listboxie. No i jak przekazac te wartosc? Moze to byc bezposrednio z Listbox lub Edita na pierwszej formie (= wartosc pola Listbox).

Mam nadzieje, ze za bardzo nie namieszalem ;).

Dzieki za pomoc!

<font color="red">DOPISANE, ROZWIAZANIE PROBLEMU</span>

procedure TAdressForm.AdresyDblClick(Sender: TObject);
var
BF: TBForm;
begin
BF:=TBForm.Create(Self);
BF.Edit1.Text:=Adresy.Items.Strings[Adresy.ItemIndex];
BF.ShowModal;
BF.Free;
end;

BF - druga forma

0

Może spróbuj najpierw stworzyć drugą formę, a w zdarzeniu OnShow drugiej formy dać:

<font color="blue">Edit2.text:=Form1.Edit1.text;</span>

Powinno zadziałać.

1 użytkowników online, w tym zalogowanych: 0, gości: 1