lazarus

    0

    1答えて

    私はlazarusを使ってラズベリーpi(モデル3B)で使う共有ライブラリを構築しようとしています。私の元のライブラリが正しく動作しなかったことが分かりましたので、私はthisの例を使って非常に単純なライブラリに切り替えました。 しかし、この単純なライブラリでも、適切にコンパイルされずに使用されます。私は別のラザロプロジェクトにライブラリを開こうとすると、それは私にエラーを与える: <libNam

    -1

    1答えて

    いくつかの「検索」ホットキー、F1〜F4を使用してデータベースの異なるテーブルを検索する小さなアプリケーションを作成していますので、検索を保持するTPageControlを作成しました私は1 PageControlと4つのタブシートがあるので、私は1つのif文を入れて、適切な検索フィールドにフォーカスを設定しようとしていると私はTPageControlのOnShowイベントでそれを呼び出す、フォー

    0

    1答えて

    私はTTrayIconのキャンバスに描画しようとしていますが、成功しません。 私は窓の私がこれまで試したことはある10 上ラザロV1.6.2を使用したプログラミングよ: procedure TForm1.TrayIcon1Paint(Sender: TObject); var tmpcanvas: TCanvas; begin tmpcanvas := TrayIcon1.

    -1

    1答えて

    私はMS AccessからデータをフィルタリングしてLazReportに取得したいと思います。 私はいくつかのコードの組み合わせを試しましたが、どれもうまくいきませんでした。私はまだ "デ​​ータの種類がクリテリア表現では等しくない"というエラーを受けています。 MS Accessフィールドは、Short Date(01.01.2017)という形式のDate/Timeに設定されています。 Date

    0

    1答えて

    私はSQLを初めて使い、Lazarusと言語パスカルの中にデータベースを作成しました。私は現在SQLlite3を使用しています。これまで私は、ビジネスの現在の資産と負債(整数)を持つデータベースを作成しましたが、私はこれらの2つの数値を分割し、これら2つの数値の「比率」を新しいテーブルに入力するアルゴリズムを作成する必要があります。どんな助けもありがとう。 多くのありがとう。

    -1

    1答えて

    edit1.textフィールドの型付きの内容をチェックするための行がたくさんありますが、何らかの理由でOnKeyUpイベントを使用する必要があります。このコードをKey:Wordのタイプ(通常はKey:OnKeyPressのChar)に変換しますか? if not (key in ['0'..'9', #08]) then begin key:=#0;

    1

    1答えて

    私はLazarus 1.7を使用します。 Ubuntuの私は、テキストをクリップボードにコピーする14、 Clipboard.AsText:='some txt'; 私のアプリを終了、クリップボードはOSによってクリア:テキスト永久コピーする方法?アプリの終了後、クリップボードにはまだこのテキストがありますか?

    1

    1答えて

    私はDelphiとLazarusの両方でチュートリアルを行っています。私はDelphi 10.1 Berlin Update 2とLazarus 1.6.2を使用しています。 次のコンストラクタはDelphiで動作しますが、TDogクラスのコンストラクタは "重複した識別子"エラーが発生してLazarusで失敗します。 すべてのチュートリアルとフォーラム私はこのように見ていますが、これは問題ではあ

    -1

    1答えて

    印刷キャンバスを使用して複数ページを印刷するにはどうすればよいですか? linetoとtextoutを使用してキャンバス上に出力を生成しますか?キャンバスは1ページでうまく動作します。これは、最初のページに通常の印刷を使用しています。その後、プリンタキャンバスにcopyrectを使用し、新しいページを発行しましたが、後続のページは空白です。 1つの質問で、彼らがPrintPageについて話している

    0

    1答えて

    これは私が学校プロジェクトのために作った2つのリンクリストです。 2番目から最初のリストを呼びたいと思います。コンパイル時はすべてOKです。私がそれを実行すると、それは言う: プロジェクト(myProject)例外クラス '外部:SIGSEGV'を発生させた。アドレス40D32Dここ で は私のコードです: list2=^ptr; ptr=record vlera:integ