Wiecie moźe dlaczego?...

0

mam taką procedurkę:

procedure TMain.SpeedButton1.Click(Sender: TObject);
begin
TAdd.Memo1.Lines.Add(ListView1.ItemFocused.Caption);
TAdd.Memo2.Lines.Add(ListView2.ItemFocused.SubItems.CommaText);
end;

jak widać wstawia zaznaczone itemy do mem'ów na inny formularzu tylko że do Memo1 tekst przechodzi i jest OK a do Memo2 przechodzi ale np zamiast: delphi jest
"delphi"
dlaczego???--Pozdrawiam @ll

0

Moze odpowiem:

procedure TMain.SpeedButton1.Click(Sender: TObject);
begin
TAdd.Memo1.Lines.Add(ListView1.ItemFocused.Caption);
TAdd.Memo2.Lines.Add(ListView1.ItemFocused.Caption);
end;

TAdd.Memo2.Lines.Add(ListView2.ItemFocused.SubItems.CommaText); - przecież to jest inna linijka, w ogóle inny kod

I poskutkowało????

0

Zrob tak:
TAdd.Memo1.Lines.Add(MainForm.ListView.ItemFocused.Caption);
TAdd.Memo2.Lines.Add(MainForm.ListView.ItemFocused.SubItems.Text);
Przed chwila sprawdzalem :)
--Pozdrawiam {hello}
Tomasz K.

0

Lee sory u Ciebie to bedzie tak wygladac:

TAdd.Memo1.Lines.Add(ListView1.ItemFocused.Caption);
TAdd.Memo2.Lines.Add(ListView1.ItemFocused.SubItems.Text);

Teraz chyba good.
--Pozdrawiam {hello}
Tomasz K.

0

wiecie co na początek to oczywiście dzięki za pomysły już działa zrobiłem akurat później zobaczyłem odpowiedzi i teraz tak:

  • to działa tak jak było na początku (z wyjątkiem tego że jak pisałem ten kod tutaj to fakt dałem plamę bo wszędzie miało być ListView1) i teraz już w tym Memo1 mam to co chciałem bez żadnych ""
  • tylko, że dodałem takie cósik:
    procedurka przy Memo1.Change
    a:String;
    begin
    a:=Memo1.Lines.Text;
    ShowMessage((a));
    Edit1.Text:=(a);
    end;

i wszysko jest spoko wiadomość wyskakuje powiedzmy 12 ale w Edit1 mam 12i dwie pionowe kreski no i się tego później na Integer nieda zamienić

jak dalej się wam chce móżdżyć to dzięki z góry ja też cały czas myślę {browar}

--Pozdrawiam @ll

0

Te dwie pionowe kreski to znak konca lini i powrto karetki.
Nie bylo by ich gdybys w Memo nie dzielil tekstu na wiersze

0

Sproboj zrobic petle ktora bedzie dodawac kolejne linie do zmiennej. Powinno pomoc ale nie probowalem. Ale jak juz stwierzdzil kolega Fojcik zapisywanie liczby do komponentu memo nie wydaje sie zbyt trafionym pomyslem. Ja bym to zrobil w Edit, nie mial bys wtedy podobnych problemow.--Pozdrawiam {hello}
Tomasz K.

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