Nee, ich hab schon die Enterprise.
Ich stell mich nur einfach zu blöd an!
Hier mein Quelltext (is nicht viel, musste auch schon ungefähr 10x neu anfangen):
Delphi-Quellcode:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TFIndi =
class(TForm)
Eingabe1: TEdit;
BGo: TButton;
BQuit: TButton;
procedure BGoClick(Sender: TObject);
private
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;
var
FIndi: TFIndi;
e, etha0, Pi, Mueh0, c, me, mp, mn, etharv, etharl, etharw: integer;
implementation
{$R *.dfm}
procedure TFIndi.BGoClick(Sender: TObject);
begin
e:=1,602E-19;
etha0:=8,85418782E-12;
Pi:=3,141592654;
Mueh0:=1,256637061E-06;
c:=299791100;
me:=9,10939E-31;
mp:=1,6726E-27;
mn:=1,6749E-27;
etharv:=1;
etharl:=1,0006;
etharw:=81;
if (Eingabe1.text:='
F')
then
F:=
end;
end.
Ich guck mir jetzt nochmal das mit
ADO an. Weiß aber bestimmt im Endeffekt immer noch nicht, was ich da hinschreiben soll..
Die Vars sind auch noch falsch deklariert...
[edit=Sharky]Quote-Tags gegen Delphi-Tags getauscht. Mfg, Sharky[/edit]