ATNEL tech-forum

Re: Delphi komponent FormSave - INI.

2018-04-03T15:04:07+01:00

W związku z tym, że kolega jest nowy na forum to wyjątkowo nie dam WARNA za doklejanie się niestety kompletnie bez sensu do jakiegoś przypadkowego wątku na forum - zamiast ZAŁOŻENIA NOWEGO wątku z nowym pytaniem.... Ale na przyszłość proszę o tym pamiętać ok?

odnośnie pytania - brakuje ci w sekcji uses

[syntax=delphi]Vcl.Forms[/syntax]

Statystyki: Napisane przez mirekk36 — 3 kwi 2018, o 15:04

Re: Delphi komponent FormSave - INI.

2018-04-03T14:38:41+01:00

Witam

według poradnika o tworzeniu komponentu
#0378 DELPHI VCL - TCustom Component - własny komponent Part 02

podkreślia mi delphi 10 SEATTLE błąd

unit FormSave;

interface

uses
System.SysUtils, System.Classes, IniFiles;

type
TFormSave = class(TComponent)
private

FMasterForm : TForm; //TU podkreśla że nie ma TForm

{ Private declarations }

Statystyki: Napisane przez zimol81 — 3 kwi 2018, o 14:38

Re: Delphi komponent FormSave - INI.

2017-06-30T11:09:51+01:00

Trochę się sam zakręciłem, to fakt ale naprostowałem swoje myśli i rozwiązałem swój problem.
Mirek wyprowadził na zewnątrz komponentu procedurę SavePos, a ja wyprowadziłem SaveTxt(Parametr), ta zapisuje tekst z kontrolki edit, a parametrem jest nazwa edita, podobnie postąpiłem z checkboxem Teraz to pięknie działa i jest proste w użyciu a co ważne nie ważna jest ilość formatek, z każdej da się wszystko ładnie zapisać do ini.

Statystyki: Napisane przez Cam74 — 30 cze 2017, o 11:09

Re: Delphi komponent FormSave - INI.

2017-06-29T23:14:55+01:00

Quote:

najlepiej załatwiać we własnej aplikacji wiedząc z góry co mamy zapisać.

No dokładnie - bo aplikacja - aplikacji nierówna i zapisywanie hurtem nie ma sensu

Statystyki: Napisane przez mirekk36 — 29 cze 2017, o 23:14

Re: Delphi komponent FormSave - INI.

2017-06-29T23:09:04+01:00

Tak sobie dopiero zacząłem myśleć nad zastosowaniem takiego komponentu to doszedłem do wniosku, że sprawdziłby się w jakiejś prostej aplikacji, ale z dużą ilością kontrolek, których stan musiałby być zapamiętany. Wtedy taki komponent dość zgrabnie załatwiałby sprawę. Tak poza tym to masz rację, to najlepiej załatwiać we własnej aplikacji wiedząc z góry co mamy zapisać.

Statystyki: Napisane przez Adam12 — 29 cze 2017, o 23:09

Re: Delphi komponent FormSave - INI.

2017-06-29T22:16:03+01:00

Adam12 napisał(a):

E tam, Mirek, zaraz bez sensu...

ja nie mówię tego jakoś złośliwie, tylko wskazuję na pewne zależności. Takie podejście jest BARDZO ale to BARDZO specyficzne, dla jakiejś jednej aplikacji. Oczywiście taki pomysł to zwykle pomysł osoby początkującej więc moim zdaniem lepiej zwrócić uwagę, że taką drogą się nie idzie

Statystyki: Napisane przez mirekk36 — 29 cze 2017, o 22:16

Re: Delphi komponent FormSave - INI.

2017-06-29T22:07:05+01:00

E tam, Mirek, zaraz bez sensu... Przecież kolega nie tworzy jakiejś konkretnej aplikacji tylko uczy się tworzyć własny komponent i kombinuje. A ile się przy tym może nauczyć. Nie ma to jak własne, nawet głupie pomysły. Sam nie wiem jak to by działało z poziomu komponentu. Może trzeba będzie sprawdzać jaki obiekt jest właścicielem naszego komponentu i takie tam... zawsze to jakieś nowe doświadczenie...

Statystyki: Napisane przez Adam12 — 29 cze 2017, o 22:07

Re: Delphi komponent FormSave - INI.

2017-06-29T21:27:56+01:00

Cam74 napisał(a):

że na formatce kładę swój komponent kilka editów, chekboxów i to co musiałbym napisać w tworzonej aplikacji, byłoby już zawarte w komponencie,

Sorki ale to już z mojego punktu widzenia jest kompletnie bez sensu, bez urazy oczywiście. W ogóle nie widzę sensu takiego działania. Ty patrzysz na komponent jak element aplikacji - swojej aplikacji, konkretnej aplikacji a więc nie jest on od niej odizolowany.

Lepiej już spójrz na przykład wyżej który dał ci kolega - takie rzeczy załatwia się we własnej aplikacji - można w oddzielnym unicie, funkcji itp

Statystyki: Napisane przez mirekk36 — 29 cze 2017, o 21:27

Re: Delphi komponent FormSave - INI.

2017-06-29T21:22:16+01:00

Chodzi Ci o coś takiego?

[syntax=delphi]procedure TForm1.Button1Click(Sender: TObject);
var
i: Integer;
S : string;
begin
Memo1.Clear;
for i := 0 to ComponentCount - 1 do
if (Components[i] is TEdit) or (Components[i] is TCheckBox) then
begin
if (Components[i] is TEdit) then Memo1.Lines.Add( Format('%-15s Text: %-15s', [Components[i].Name, TEdit(Components[i]).Text]));
if (Components[i] is TCheckBox) then
begin
if TCheckBox(Components[i]).Checked then S := 'True' else S := 'False';
Memo1.Lines.Add( Format('%-15s Checked: %-15s', [Components[i].Name, S]));
end;
end;
Memo1.Lines.Add('');
end;[/syntax]

Statystyki: Napisane przez Adam12 — 29 cze 2017, o 21:22

Re: Delphi komponent FormSave - INI.

2017-06-29T19:51:34+01:00

Wszystko pięknie ładnie tylko się nie zrozumieliśmy. To co mi pokazałeś to wykorzystanie tego w tworzonej aplikacji, a mi chodziło o to, że na formatce kładę swój komponent kilka editów, chekboxów i to co musiałbym napisać w tworzonej aplikacji, byłoby już zawarte w komponencie, na tym właśnie polega mój problem, chciałem potraktować komponent edit tak samo jak ty potraktowałeś formę.

Statystyki: Napisane przez Cam74 — 29 cze 2017, o 19:51

Re: Delphi komponent FormSave - INI.

2017-06-29T18:06:34+01:00

[syntax=pascal]MkFormSr1.MyINI.WriteString( 'edit1', 'moj_string', Edit1.Text );

Edit1.Text := MkFormSr1.MyINI.ReadString( 'edit1', 'moj_string', 'default' );[/syntax]

------------------------ [ Dodano po: kilkunastu sekundach ]

tak z pamięci piszę - nie jestem przy kompie

Statystyki: Napisane przez mirekk36 — 29 cze 2017, o 18:06

Re: Delphi komponent FormSave - INI.

2017-06-29T15:39:29+01:00

Na początek wystarczyłoby abym wiedział jak obsłużyć ten jeden komponent np. Edit.
No tak może być ich przecież więcej na formatce a później chciałbym móc je pogrupować w odpowiednie sekcje.

Statystyki: Napisane przez Cam74 — 29 cze 2017, o 15:39

Re: Delphi komponent FormSave - INI.

2017-06-29T15:35:02+01:00

Ja bym coś podpowiedział ale nie rozumiem do końca za bardzo co ty chcesz uzyskać ?

Cam74 napisał(a):

NIe wiem jak sprawdzić czy na formie już leży dany komponent i jak wyliczyć ile ich jest.

co to pytanie np oznacza? po co ci sprawdzać ile jest komponentów ? to ty je dynamicznie tworzysz? czy jak ?

Statystyki: Napisane przez mirekk36 — 29 cze 2017, o 15:35

Delphi komponent FormSave - INI.

2017-06-29T15:32:35+01:00

Po obejrzeniu poradnika Mirka na temat budowy własnego komponentu z plikami ini, sam takowego zapragnąłem.
Pięknie działa zapisywanie i odczytywanie położenia i nazwy formy. Dorobiłem nawet propertisa, którym pięknie zmieniam nazwę pliku ini. Ale za skarby świata nie potrafię zmusić Edita czy CheckBoxa do zapisu danych. Jak już się zapisze to bez nazwy komponentu i wartości przez niego reprezentowanej. NIe wiem jak sprawdzić czy na formie już leży dany komponent i jak wyliczyć ile ich jest. Byłbym wdzięczny za jakieś wskazówki.

Statystyki: Napisane przez Cam74 — 29 cze 2017, o 15:32