Autor Beitrag
Chippie82
Hält's aus hier
Beiträge: 5



BeitragVerfasst: Mi 09.11.05 19:38 
Hallo Leute,
ich möchte gerne ein paar Sachen mit der Tabelle F1Book zu machen.
Jetzt ist meine erste Frage, wie speichere ich etwas in der ersten Zeile A1? Wie sieht der Quelltext dazu aus?
Wo kann ich nähere Informationen zu dem Book bekommen bzw. nachlesen?
Das werden bestimmt nicht die letzten Fragen dazu sein.
Ich hoffe auf eure Unterstützung!


Bis dann euer Chippie
Lannes
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 2352
Erhaltene Danke: 4

Win XP, 95, 3.11, IE6
D3 Prof, D4 Standard, D2005 PE, TurboDelphi, Lazarus, D2010
BeitragVerfasst: Mi 09.11.05 21:07 
Hallo,

wenn Du die F1Book-Komponente auf deiner Form markierst und die Taste [F1] betätigst wird die zugehörige Hilfe angezeigt.

In Zelle A1 Text setzen:
ausblenden Delphi-Quelltext
1:
f1book1.TextRC[1,1] := 'test';					


ansonsten stimme ich der Antwort zu. :?

_________________
MfG Lannes
(Nichts ist nicht Nichts) and ('' <> nil ) and (Pointer('') = nil ) and (@('') <> nil )
Chippie82 Threadstarter
Hält's aus hier
Beiträge: 5



BeitragVerfasst: Mi 09.11.05 23:19 
Danke, jetzt habe ich eine neue Frage.
Erst mal der Quelltext:

ausblenden volle Höhe Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
56:
57:
58:
59:
60:
61:
62:
63:
64:
65:
66:
67:
68:
69:
70:
71:
72:
73:
74:
75:
76:
77:
78:
79:
80:
81:
82:
83:
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls, AxCtrls, OleCtrls, vcf1;

type
  TForm1 = class(TForm)
    Button1: TButton;
    Button2: TButton;
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;
  Film: String;
  Ok: Boolean;
implementation

uses Unit2;

{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject);
 begin
  repeat
  Ok:= InputQuery('', 'Bitte geben Sie hier den Filmnamen ein', Film);
   if OK
    then Form2.f1book1.TextRC[1,1] :=Film;
     until
      not OK;
end;

procedure TForm1.Button2Click(Sender: TObject);
 begin
 Form2.Show;
end;

end.



unit Unit2;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  AxCtrls, OleCtrls, vcf1, StdCtrls, ComCtrls;

type
  TForm2 = class(TForm)
    Button1: TButton;
    F1Book1: TF1Book;
    procedure Button1Click(Sender: TObject);

  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form2: TForm2;

implementation

uses Unit1;

{$R *.DFM}


procedure TForm2.Button1Click(Sender: TObject);
 begin
 Form1.Show;
end;



Wie bekomme ich es jetzt hin, dass ich mit jeder Eingabe nicht immer das gleiche Feld des F1Books beschreibe, sondern dann die nächste Zeile darunter?
Lannes
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 2352
Erhaltene Danke: 4

Win XP, 95, 3.11, IE6
D3 Prof, D4 Standard, D2005 PE, TurboDelphi, Lazarus, D2010
BeitragVerfasst: Do 10.11.05 00:49 
Hallo,

wo ist das Problem?
nichts in der Hilfe gefunden :(
Zitat:
Syntax
F1Book1.TextRC ( nRow, nCol ) [ = text ]

ausblenden Delphi-Quelltext
1:
F1book1.TextRC[2,1] := 'sfkaksfmlkas';					

oder
ausblenden Delphi-Quelltext
1:
F1book1.TextRC[F1Book1.LastRow+1,1] := 'sfkaksfmlkas';					

_________________
MfG Lannes
(Nichts ist nicht Nichts) and ('' <> nil ) and (Pointer('') = nil ) and (@('') <> nil )